銆怌odesys銆戝疄鐜拌幏鍙栧綋鍓嶆椂闂达細澶┿�佺�掋�佹��绉掞紙婧愮爜锛夈��

tt99166

鑾峰彇褰撳墠绯荤粺鏃堕棿鐨勫悇绉嶆暟鍊硷紝鏂逛究璁板綍褰撳墠鏃堕棿鍙戠敓鏃堕棿銆�
//鑾峰彇褰撳墠鏃堕棿锛屽ぉ銆佺�掋�佹��绉�
FUNCTION_BLOCK FB_GetTime
VAR_INPUT
END_VAR
VAR_OUTPUT
     GetTimeMs:STRING;
     GetTimeS:STRING;
     GetTimeDay:STRING;
END_VAR
VAR
     stUTC_Timestamp : SysTime;
     stLocal_TimeStamp : SysTime;
     stdNow : SysTimeDate;
     Result : RTS_IEC_RESULT;
     dtNow : DATE_AND_TIME;
     todNow : TIME_OF_DAY;
     datToday  : DATE;
     str1,Str2:STRING;

     udiUtcTime             : UDINT;
     udiUtcTimeLocal     : UDINT;
     udiResult             : UDINT;
     DTTime                : DATE_AND_TIME;
     strTime                :STRING;
END_VAR
杩愯�屼唬鐮�
(*-------------绮剧‘鍒版��绉�-----------------*)
Result := SysTimeRtcHighResGet(stUTC_Timestamp); // ULINT#1528273494913
Result := SysTimeRtcConvertHighResToLocal(stUTC_Timestamp, stdNow);
Result := SysTimeRtcConvertDateToHighRes(stdNow, stLocal_TimeStamp); // ULINT#1528280694913
dtNow := TO_DT(stLocal_TimeStamp / 1000 (* ms *)); // DT#2018-6-6-10:24:54
todNow := TO_TOD(stLocal_TimeStamp MOD TO_ULINT(T#1D)); // TOD#10:24:54.913
datToday := TO_DATE(dtNow); // D#2018-6-6
str1:= TO_STRING(datToday);
str1:=REPLACE(STR1:=str1,STR2:='',L:=2,P:=1);
GetTimeDay:=str1;
str2:= TO_STRING(todNow);
str2:=REPLACE(STR1:=str2,STR2:='-',L:=4,P:=1);
GetTimeMs:=CONCAT(str1,str2);
(*-------------绮剧‘鍒扮��-----------------*)
(* Fetch the UTC time. *)//鑾峰彇UTC鏃堕棿  
udiUtcTime := SysTimeRtcGet(udiResult);
(* Convert the UTC time to local time. *) //灏哢TC鏃堕棿杞�鍖栦负鏈�鍦版椂闂�
udiResult := SysTimeRtcConvertUtcToLocal(udiUtcTime, udiUtcTimeLocal);
(* Convert the seconds from the local time in a Date and Time format.*)  
//杞�鎹㈡湰鍦版椂闂存牸寮�  骞存湀鏃ユ椂鍒嗙��
DTTime := UDINT_TO_DT(udiUtcTimeLocal);
strTime:=TO_STRING(DTTime);
GetTimeS:=REPLACE(STR1:=strTime,STR2:='',L:=3,P:=1);