SRG 20160406 — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м (→Текст программы) |
Hisava (обсуждение | вклад) м (→Смотрите также) |
||
| Строка 31: | Строка 31: | ||
= Смотрите также = | = Смотрите также = | ||
| + | |||
| + | [[Функции Delphi]] | ||
[[Полезные функции]] | [[Полезные функции]] | ||
Версия 13:54, 12 сентября 2016
SRG_20160406 - это программа из справочника R266
Запросить из фронтола операции за период
Текст программы
local ip, aa, datas, folderatol, from_atolf, from_atol
from_atol := GetPrm( 'FROM_ATOL', 'SHOP', TaskNum )
from_atolf := GetPrm( 'FROM_ATOLF', 'SHOP', TaskNum )
folderatol := GetPrm( 'FOLDERATOL', 'SHOP', TaskNum )
ip := InputPeriod( true )
if Empty( ip )
return
endif
folderatol := Nice_Path( folderatol )
aa := { '$$$TRANSACTIONSBYDATERANGE' }
datas := StoD( ip[1] ) + '; ' + StoD( ip[2] )
Aadd( aa, datas )
FErase( folderatol + from_atol )
WriteTxtFile( aa, from_atolf, folderatol, true )
Message( 'Сформирован файл ' + from_atolf + ' в папке ' + folderatol )
// { "20151201", "20151201" }
