SCADA 2016 11 10 — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м (→Текст) |
Hisava (обсуждение | вклад) м |
||
| Строка 1: | Строка 1: | ||
[[SCADA_2016_11_10]] - это программа из справочника [[R266]] | [[SCADA_2016_11_10]] - это программа из справочника [[R266]] | ||
| − | + | Заполнить документ [[TPS]] | |
| − | Заполнить документ [[TPS]] | + | [[SCADA_2016_11_10]]() |
| − | + | ||
| − | + | ||
| − | + | ||
= Текст = | = Текст = | ||
| − | |||
local ip, my, end_data | local ip, my, end_data | ||
ip := [[InputPeriod]]( true ) | ip := [[InputPeriod]]( true ) | ||
| Строка 22: | Строка 18: | ||
my := my + 1 | my := my + 1 | ||
end | end | ||
| + | = Смотрите также = | ||
| + | [[Полезные функции]] | ||
| − | |||
[[Функции Delphi]] | [[Функции Delphi]] | ||
| − | |||
| − | |||
Текущая версия на 09:35, 21 июля 2017
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
