Wer kann ein Beispiel geben Umsetzung DNS_CLIENT oder SNTP_CLIENT Sprache ST?
Mein Code funktioniert nicht:
PROGRAM PLC_PRG
VAR
go: BOOL := TRUE;
IP_CONTROL1: IP_CONTROL;
DNS_CLIENT1: DNS_CLIENT;
IP_C1: IP_C;
S_BUF1: NETWORK_BUFFER;
R_BUF1: NETWORK_BUFFER;
SNTP_CLIENT1: SNTP_CLIENT;
RTC1: RTC_2;
UDT1: DT;
LDT1: DT;
END_VAR
IP_CONTROL1(TIME_OUT := T#4s, IP_C:=IP_C1, S_BUF:=S_BUF1, R_BUF:=R_BUF1);
DNS_CLIENT1(ACTIVATE := go, IP4_DNS:=IP4_DECODE('8.8.8.8'), DOMAIN := 'time.nist.gov', IP_C:=IP_C1, S_BUF:=S_BUF1, R_BUF:=R_BUF1);
SNTP_CLIENT1(IP4 := DNS_CLIENT1.IP4, ACTIVATE := DNS_CLIENT1.DONE, IP_C:=IP_C1, S_BUF:=S_BUF1, R_BUF:=R_BUF1);
RTC1(SET := SNTP_CLIENT1.DONE_P,SDT := SNTP_CLIENT1.UDT, SMS := SNTP_CLIENT1.XMS, DEN := TRUE, OFS := 6);
UDT1 := RTC1.UDT;
LDT1 := RTC1.LDT;
OUT1 := DNS_CLIENT1.DONE;
OUT2 := SNTP_CLIENT1.DONE_P;
go := NOT SNTP_CLIENT1.DONE_P;