Время на ПЛК110-60

[ПРОЕКТ-П]

Здравствуйте.
У меня возникла следующая проблема - не могу задать время на ПЛК110-60, как через ПЛК-браузер,, так и через CurTimeEx. Я уже связывался по подобному вопросу с Вашими специалистами в июле этого года, тогда необходимо было мне задавать время на ПЛК100 с панели оператора. Мне в ответ на мою задачу выслали пример с использование SysLibTime функции CurTimeEx. Сделал в проекте также как в примере - и все заработало. Сейчас мне необходимо тоже самое сделать на ПЛК110-60 - задать время ПЛК с панели оператора, делаю абсолютно также (использую один и тот же функциональный блок) как и с ПЛК100 с использованием CurTimeEx - а результата нет, т.е. время на ПЛК110-60 не задается. Подскажите пожалуйста в чем может быть причина.
Спасибо.

[Yegor]

Проект в студию.

[ПРОЕКТ-П]

Ниже привожу функциональный блок который работает с ПЛК100 и не работает с ПЛК110-60

FUNCTION_BLOCK date_time
VAR_INPUT
EN: BOOL;
read: BOOL;
write: BOOL;
END_VAR
VAR_OUTPUT
ENO: BOOL;
END_VAR
VAR_IN_OUT
day: WORD;
month: WORD;
year: WORD;
hour: WORD;
minute: WORD;
second: WORD;
END_VAR
VAR
CurTimeEx: CurTimeEx;
SystemTime: SysTime64;
TimeDate: SystemTimeDate;
END_VAR

*******************************************
ENO:=EN;

IF EN THEN

IF read THEN

TimeDate.dwHighMsec:=0;
TimeDate.dwLowMSecs:=0;
TimeDate.Day:=0;
TimeDate.DayOfWeek:=0;
TimeDate.Month:=0;
TimeDate.Year:=0;
TimeDate.Hour:=0;
TimeDate.Minute:=0;
TimeDate.Second:=0;
TimeDate.Milliseconds:=0;
SystemTime.ulHigh:=0;
SystemTime.ulLow:=0;

CurTimeEx(SystemTime:=SystemTime,TimeDate:=TimeDat e);

day:=TimeDate.Day:=0;
month:=TimeDate.Month:=0;
year:=TimeDate.Year:=0;
hour:=TimeDate.Hour:=0;
minute:=TimeDate.Minute:=0;
second:=TimeDate.Second:=0;

END_IF;

IF write THEN

TimeDate.Day:=day;
TimeDate.Month:=month;
TimeDate.Year:=year;
TimeDate.Hour:=hour;
TimeDate.Minute:=minute;
TimeDate.Second:=second;

СurTimeEx(SystemTime:=SystemTime,TimeDate:=TimeDat e);

END_IF;

END_IF;

[Yegor]

У меня на ПЛК160 дата установилась. Пробовал так:

PROGRAM PLC_PRG
VAR
	d: date_time;
	test: BOOL;

	day: WORD := 1;
	month: WORD := 1;
	year: WORD := 2010;
	hour, minute, second: WORD;
END_VAR

IF test THEN
	d(EN := TRUE, write := TRUE, day := day, month := month, year := year, hour := hour, minute := minute, second := second);
	test := FALSE;
END_IF

Смутили кириллическая «С» и пробел «TimeDat e» во втором вызове CurTimeEx.

[ПРОЕКТ-П]

Кирилическая "C" и пробел походу при копировании появились

[lara197a]

Где-то давно выкладывал пример "будильник".
Можете написать в личку свой емайл, скину.