====== AS/400: Системная дата и время ====== ====== Показать системное время ====== DSPSYSVAL SYSVAL(QTIME) Показать системное значение Системное значение . . : QTIME Описание . . . . . . . : Время Время . . . . . . . . : 17:58:37 ЧЧ:MM:СС ====== Изменить системное время ====== CHGSYSVAL SYSVAL(QTIME) VALUE('HHMMSS') |HH|часы| |MM|минуты| |SS|секунды| Другие переменные: ''QTIME, QHOUR, QMINUTE, QSECOND'' :!: Изменение системного времени вызывает ошибку при печати этикеток из программ УЧЕТ ПРОДУКЦИИ Нужно менять системное время когда эти программы не работают или перезагружать программы сразу после изменения системного времени. ====== Показать системную дату ====== ''DSPSYSVAL SYSVAL(QDATE)'' Показать системное значение Системное значение . . : QDATE Описание . . . . . . . : Системная дата Дата . . . . . . . . . : 02.11.04 ДД.MM.ГГ Другие переменные: ''QDAYOFWEEK, QDATE, QDAY, QMONTH, QYEAR'' ====== Показать разность между текущим врем. и врем. по Гринвичу ====== DSPSYSVAL SYSVAL(QUTCOFFSET) Показать системное значение Системное значение . . : QUTCOFFSET Описание . . . . . . . : Разность между текущим врем. и врем. по Гринвичу Смещение . . . . . . . : +03:00 От -24:00 до +24:00 ====== Изменить разность между текущим врем. и врем. по Гринвичу ====== WRKSYSVAL SYSVAL(QUTCOFFSET) ====== Переход на летнее/зимнее время ====== 1. Изменить разность между текущим врем. и врем. по Гринвичу На за летнее время: CHGSYSVAL SYSVAL(QUTCOFFSET) VALUE('+0400') На зимнее время: CHGSYSVAL SYSVAL(QUTCOFFSET) VALUE('+0300') 2. [[#Изменить системное время|Изменить системное время]] {{tag>AS/400 Date_Time}}