REPS GROUP — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Смотрите также) |
||
Строка 39: | Строка 39: | ||
= Смотрите также = | = Смотрите также = | ||
− | |||
[[Полезные функции]] | [[Полезные функции]] | ||
+ | |||
+ | [[Функции Delphi]] |
Версия 12:17, 26 апреля 2017
REPS_GROUP - это функция из справочника R266
Возвращает код группы отчета по переданному наименованию и номера модуля
REPS_GROUP( task_name, task_num [ , task_anal ] )
task_name - наименование модуля
task_num - номер модуля
task_anal - вместо наименования модуля и номера модуля достаточно передать код аналитики из R10
Текст программы
parameters task_name, task_num, task_anal if Empty( task_name ) or Empty( task_num ) if !Empty( task_anal ) if IsSklad( task_anal ) task_name := 'SKLAD' task_num := GetTaskNum( task_name, task_anal ) endif endif endif if task_name = 'SKLAD' if GetPrm( 'REPSONPRVS', task_name, task_num ) if GetPrm( 'RPT_KOD', task_name, task_num ) == 'SKLAD' result := '2801' elseif GetPrm( 'RPT_KOD', task_name, task_num ) == 'BUNKSKLAD' result := '1901' else result := '1201' endif else result := '0301' endif endif