${ЗОНА(1. Наименование формы)
// Форма № ЗП-физическая культура и спорт
// СВЕДЕНИЯ О ЧИСЛЕННОСТИ И ОПЛАТЕ ТРУДА РАБОТНИКОВ ОРГАНИЗАЦИЙ В ОБЛАСТИ
// ФИЗИЧЕСКОЙ КУЛЬТУРЫ И СПОРТА ПО КАТЕГОРИЯМ ПЕРСОНАЛА
//
// Приказ Росстата от 02.04.2019 № 189
//
// Квартальная
// Действует с отчета за первый квартал 2019 года
// 
$}ЗОНА(1. Наименование формы)
${ЗОНА(2. Инструкция)
// Настройки формы находятся в разделе
// "Настройка" -> 
// "Настройки таблиц и форм печати" -> 
// "Справки по статистике" -> 
// "Формы ЗП-xx" ->
// "Настройки для формы 3П-физическая культура и спорт"
//
// ------------------------------------------------------------
//
// Замечания.
//
// В настройке "Столбец для выборки сумм" нужно указать номер стобца
// Виды начислений должны быть помечены символом 1 в этом столбце.
//
// Для графы 4 (внутреннее совместительство) суммы могут выбираться двумя способами:
//
// 1) выполняется разбивка по исполняемым должностям,
//    учитываются те совместительства у которых в справочнике совместительств поле
//    "Совмещение для" не заполнено
// 2) используется отдельный набор видов
//
// ------------------------------------------------------------
//
// В настройке формы желательно указать поле кадровой части для кода категории
// (при необходимости добавить поле в настройках изменяемой кадровой части)
// от которого будет зависеть в какой строке формы будут учитываться данные (суммы и численность)
//
// Так же желательно откорректировать сетку 
// "Справочники" -> "Сетка окладов и другие таблицы" -> "Обычные сетки" - Форма ЗП-физическая культура
// В этой сетке задается соответствие "Код категории" - "Строка формы"
//
// Дополнение:
//
// Строка 01 (10) является суммой строк 02, 04, 06, 08
// Строка 08 (40) является суммой строк 09, 12, 13, 14
//
// Строка 02 (21) является суммой строк 02, 03
// Строка 04 (23) является суммой строк 04, 05
// Строка 06 (23) является суммой строк 06, 07
// Строка 09 (41) является суммой строк 09, 10, 11
//
// 
$}ЗОНА(2. Инструкция)
//
#CHVS(N,2,0)=НАСТРОЙКА(chisvs,p3cul,1); // 0-в целых числах; 1-с одним десятичным знаком
//
&Format(N,2,0)=0;
&FPRINT(N,2,0)=1;
#FF1(N,3,0)=ЧИТАТЬ_ПОЛЕ(FFIRST,0);
#FN1(C,256,0)=ЧИТАТЬ_ПОЛЕ(FNAME1,0);
#FN2(C,256,0)=ЧИТАТЬ_ПОЛЕ(FNAME2,0);
$BEG_SCRIPT
  var CurFile=CreateObject("CurPrnFile");
  CurFile.SetFlagBrowse(0);
  FreeSpaceString(FN1,3,""); FreeSpaceString(FN2,3,"");
  string FN = FN1 + FN2;
  if ( access(FN,0) ) FF1 = 0;
$END_SCRIPT
$ЕСЛИ(_EQ(FF1-1))
//
  #Format=ДВЕ_КНОПКИ(15,9,70,15,Выберите режим, Печать формы , Передача в файл );
//
  $ЕСЛИ(_EQ(Format-27))
    $ВЫХОД
  $КОНЕЦ_ЕСЛИ
//
  $ЕСЛИ(_EQ(Format))
    #FPRINT=ДВЕ_КНОПКИ(15,9,70,15,Режим печати, Открыть сформированную , Создать новую );
    $ЕСЛИ(_EQ(FPRINT-27))
      $ВЫХОД
    $КОНЕЦ_ЕСЛИ
  $КОНЕЦ_ЕСЛИ
//
$КОНЕЦ_ЕСЛИ
//
$BEG_SCRIPT

  int np = 3;
  var param[np];

  param[0]  = atoi(Format);
  param[1]  = atoi(FPRINT);
  param[2]  = atoi(CHVS);

  UnloadScriptModule("dmodules");
  LoadScriptModule("dmodules");
    UnloadDynamicModules();
  UnloadScriptModule("dmodules");

  UnloadScriptModule("forms\\p31fiz_19");
  LoadScriptModule("forms\\p31fiz_19");
    p3fiz(param,np);
  UnloadScriptModule("forms\\p31fiz_19");

$END_SCRIPT
$ВЫХОД