SCADA 2016 11 10

Материал из Фабиус wiki
Перейти к: навигация, поиск

SCADA_2016_11_10 - это программа из справочника R266

Заполнить документ TPS

SCADA_2016_11_10()

Текст

local ip, my, end_data
ip := InputPeriod( true )
if Empty( ip )
  return
endif
my := StoD( ip[1] )
end_data := StoD( ip[2] ) + 1
while my <> end_data
  // SCADA_2016_11_10_1( my )

  // Заполнить документ TPS ( вариант 2 )
  SCADA_2016_12_30_1( my )

  my := my + 1
end

Смотрите также

Функции Delphi

Полезные функции