SRG 20160406

Материал из Фабиус wiki
Версия от 13:46, 23 июня 2016; Hisava (обсуждение | вклад) (Новая страница: «SRG_20160406 - это программа из справочника R266 Запросить из фронтола операции за период = Те…»)

(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

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" }