Date_To_BinaryTime6Day

Konvertiert ein Datum des Typs: DATE in die Anzahl der vergangenen Tage seit dem 1. Januar 1984 vom Typ WORD. Die Funktion liefert den Wert „0“ zurück, wenn das zu konvertierende Datum vor dem 1. Januar 1984 liegt.

Namensraum: Tc3_Collections
Bibliothek: Tc3_Collections (Tc3_Collections.compiled-library)

Syntax

FUNCTION Date_To_BinaryTime6Day : WORD(0..16#AE35)
VAR_INPUT
    in     : DATE := D#1984-01-01;
END_VAR
VAR_OUTPUT
    bError : BOOL;
END_VAR

Date_To_BinaryTime6Day 1: Eingänge

Name

Typ

Beschreibung

in

DATE

Das zu konvertierende Datum.

Date_To_BinaryTime6Day 2: Ausgänge

Name

Typ

Beschreibung

bError

BOOL

Der Ausgang ist „TRUE“ wenn der Eingangswert kleiner ist als „D#1984-01-01“. In diesem Fall liefert die Funktion den Rückgabewert „0“ zurück.

Date_To_BinaryTime6Day 3: Rückgabewert

Name

Typ

Beschreibung

Date_To_BinaryTime6Day

WORD

Konvertierte Anzahl der vergangenen Tage seit dem 1. Januar 1984. Dieser Wert entspricht dem Wert der T_BinaryTime.day-Komponente.

Beispiel

METHOD FINAL BinaryTime6Day_ToFrom_Date : BOOL
VAR
    tValue : T_BinaryTime;
    d      : DATE;
    sValue : STRING;
END_VAR

tValue.timeOfDay:=TOD#00:00:00.125;
tValue.day:=Date_To_BinaryTime6Day(D#1984-01-01);(* tValue.day:=16#0000 *)
sValue:=BinaryTime6_To_String(tValue);(* sValue:='BT#1984-01-01-00:00:00.125' *) 
d:=BinaryTime6Day_To_Date(tValue.day);(* d:=D#1984-01-01 *)

tValue.timeOfDay:=TOD#01:02:03.125;
tValue.day:=Date_To_BinaryTime6Day(D#1984-01-02);(* tValue.day:=16#0001 *)
sValue:=BinaryTime6_To_String(tValue);(* sValue:='BT#1984-01-02-01:02:03.125' *)
d:=BinaryTime6Day_To_Date(tValue.day);(* d:=D#1984-01-02 *)

tValue.timeOfDay:=TOD#04:05:06.125;
tValue.day:=Date_To_BinaryTime6Day(D#2018-03-21);(* tValue.day:=16#30D2 *)
sValue:=BinaryTime6_To_String(tValue);(* sValue:='BT#2018-03-21-04:05:06.125' *)
d:=BinaryTime6Day_To_Date(tValue.day);(* d:=D#2018-03-21 *)

tValue.timeOfDay:=TOD#07:08:09;
tValue.day:=tValue.day + 7;(* add 7 days *)
sValue:=BinaryTime6_To_String(tValue);(* sValue:='BT#2018-03-28-07:08:09' *)
d:=BinaryTime6Day_To_Date(tValue.day);(* d:=D#2018-03-28 *)

BinaryTime6Day_ToFrom_Date:=TRUE;