${(1. )
//
// 冷 ନ஢  
// 믮:
//  - ⭮  ⨪ - F7 () - ਭ (ࠢ) XML   ࠡ⭮ 
//  ਮ ( )
// ᫥ ⮣   ப (⠡) :
// -  室,   ⠡ (Enter)  ஢ 
// - ନ஢ Excel- (F5)
// - 믮 ।  XML-䠩 (Alt + F9), । ⨬ Excel-   ਬ஢,  XML-䠩    Excel
//     ଥ 㦥 XML-䠩
//
//--------------------------------------------------------------------------------------------------------------------
//
//ன  : ன -> 5.  ன ⠡    -> >>   樭 -> ன "  "
//:
//  " ।  "
//     1-   ࠢ筨 ( 㬮砭)
//     2- 祭  ..
//     (  ।  , 㪠  ..   
//      ᫨  ࠢ筨 ⥩   㪠 뫪    ,  ⠥   
//      ᫨  ࠢ筨 ⥩    㪠 뫪    ,  ।    .. 㤥  䨪 "   ࠢ筨 :"
//      ᫨  ࠢ筨 ⥩    㪠 뫪    ,   ன " ।  "  ⮨ 1, ⠥    .. (䨪   㤥))
//  /७ ᮢ⥫⢮/譥 ᮢ⥫⢮
//  "譥 ᮢ⥫⢮" - ᫨      .. "ᮡ   " ⮨ 4  9
//  "᭮" - ,  ன ⮨  "᭮  ࠡ"  ᯨ᪥ ᯮ塞 ⥩
//  "७ ᮢ⥫⢮" -  ⠫ 
//:
//  "" - 㪠뢠   筨/쥪⮢/ࠧ  ଥ 뢮  ""
//  "।⢠   䨭ᮢ ᯥ祭 㤠⢥ " - 㪠뢠   筨/쥪⮢/ࠧ  ଥ 뢮  "।⢠   䨭ᮢ ᯥ祭 㤠⢥ "
//  "ᨤ  । " - 㪠뢠   筨/쥪⮢/ࠧ  ଥ 뢮  "ᨤ  । "
//  "।⢠    " - 㪠뢠   筨/쥪⮢/ࠧ  ଥ 뢮  "।⢠    "
//  " ।⢠  ਭ 室 ⥫쭮" - 㪠뢠   筨/쥪⮢/ࠧ  ଥ 뢮  " ।⢠  ਭ 室 ⥫쭮"
// :
//  ",  稨 㬬(.ਭ.)  ,    㫥 ப"
//     ᫨ 㬬   ਭ  㪠  㫥 -   㤥  ப  ⥪饬 筨,  ᫨ ப 㫥.
//     ( 樨  : ᫨  ࠡ⭨    ⮬            ᪥      뫮     믫,  ଠ       ।⠢塞,
//      㪠뢠  䠪᪮   ⢮  ᮢ    㬬  믫  㪠뢠  䠪᪨  ᫥,    ⮬   ᫥  "㫥".
//      ᫨  㤭  室    ᪥    ६    த     室    ॡ,  ଠ  塞  筮)
//  " ॣ" - 㪠 祭 ⠢   ⮫ 
//  "  " - 㪠 祭 ⠢  ன ⮫ 
//  " ஢ "
//     0- ஢
//     1-஢  䨮
//     2-஢  
//     +4-᭮  ⠥ ࢮ
//  "   " - ᫨ ன  -  㤥 ।  ⠡. ᫨ ன ,  㤥   㪠 .
//  ", 騥 ७ ᮢ⥫⢮" - ᫨    ७ ᮢ⥫   ⤥ ᯮ塞 ,
//      ஢  १ ⤥ ,   ⮩ ன  㪠  ⮣ .
//       ⮬ 砥    㤥 ⠭ " ७ ᮢ⥫⢠  ।",
//       ࠧ - "ࠧ ७ ᮢ⥫⢠  ।"
//       㦭 㤥   ଥ .
//  "⥫ ன " - 0 (㦭 ⮡  ⮩ ன 뫮 0 -  ⮫ ⠡ 祭 +   "")
//
//--------------------------------------------------------------------------------------------------------------------
//
//⤥/  OID ⤥/ (易⥫ )
//   砥, ᫨ ஬ 祭 "ࠧ"  "OID ୮ ࠧ" 㦭 㪠뢠   "⤥/"  "OID ⤥/"
//  㦭 ᤥ ᫥騥 ன:
//  -  ன 塞 ஢  (ன - ன ஢  - ன 塞 ஢ )  
//    : ⤥ () (  ਠ)
//    : T ( ⨭᪠ 㪢)
//    : 5
//    ᥢ: otd_kab
//  -  ࠢ筨 ஢  (ࠢ筨 - ࠢ筨 ஢ ) 㦭  ࠢ筨    ஢ 
//      ࠢ筨 ஢ 
//     F7,   "롥  ,  ண  ࠢ筨", 롥  
//      ࠢ筨     
//     Ctrl+A+A,  ⠡ ᯨ᪠ ࠢ筨  ⥫ ⮫.
//     ⮫ " 䠩" : otd_kab.tab
//    祢 : 0;  祭: 1
//    멤  ࠭  ᯨ᪠ ࠢ筨 
//   ࠢ筨 㦭 ⪮४஢,  譥,  㦭.   祭  "⤥/" 㪠   OID
//      "⤥/" ᯮ ࠢ筨. ( ஬    Enter, ⥬ F2)
//
//--------------------------------------------------------------------------------------------------------------------
//
// ⥫ :
// ᪨ ࠡ⠭ Covid-19
// ᪨ ࠡ⠭ ( 415)
// ᪨ ࠡ⠭ ( 484)
// 
//  ⮣ ⮡  ⨬ ⥫  祭, 㦭
//  ன "   " ⬥     㤥  
// 
// ᫨   ⭮  筨:
// - LIST_SRC42 ᨤ  ।  ꥪ  믫  ࠡ  COVID-19
// - LIST_SRC43 ᨤ  . ࣠ ⭮ ᠬࠢ  믫  ࠡ  COVID-19
// - LIST_SRC44  筨 䨭஢ 믫  ࠡ  COVID-19
// - LIST_SRC45 ᨤ  । 䥤ࠫ쭮     1396
//     㤥 ⥭  "᪨ ࠡ⠭ Covid-19"
// 
// ᫨   ⭮  筨:
// - LIST_SRC06 ᨤ 䥤ࠫ쭮      415
// - LIST_SRC07 ᨤ  ꥪ ᨩ᪮ 樨    415
// - LIST_SRC08 ᨤ  ࣠ ⭮ ᠬࠢ    415
// - LIST_SRC09  筨 䨭஢    415
// - LIST_SRC26 ᨤ 䥤ࠫ쭮      415 (᪭)
// - LIST_SRC27 ᨤ  ꥪ ᨩ᪮ 樨    415 (᪭)
// - LIST_SRC28 ᨤ  ࣠ ⭮ ᠬࠢ    415 (᪭)
// - LIST_SRC29  筨 䨭஢    415 (᪭)
//     㤥 ⥭  "᪨ ࠡ⠭ ( 415)"
// 
// ᫨   ⭮  筨:
// - LIST_SRC10 ᨤ 䥤ࠫ쭮     484
// - LIST_SRC30 ᨤ 䥤ࠫ쭮     484 (᪭)
//     㤥 ⥭  "᪨ ࠡ⠭ ( 484)"
// 
//--------------------------------------------------------------------------------------------------------------------
//  㬬
// -------------------------------------------------------------------------------------------------------------------
// XML                          ன    ன      ன
//                     ⠡      筨 䨭.  
// -------------------------------------------------------------------------------------------------------------------
// Dolgnostn_oklad        S1        CllNU_1                     ⭮ 
// V_Tyg_Vredn_Opasn      S2        CllNU_2                     ।
// V_Rayon_koef           S3        CllNU_3                      樥
// V_Pust_Bezvod          S4        CllNU_4                     樥  ࠡ  뭭   ⭮
// V_Vysokogor            S5        CllNU_5                     樥  ࠡ  ᮪ ࠩ
// N_Kr_Sev               S6        CllNU_6                       ⠦ ࠡ  ࠩ ࠩ   ࠢ   ⭮
// D_Sovm_profes_dolgn    S7        CllNU_7                       ᮢ饭 ᨩ (⥩)
// D_Selsk_mestn_Komp     S8        CllNU_8                       ࠡ  ᥫ᪮ ⭮
// D_Rash_zon_obsl        S9        CllNU_9                       ७  㦨
// D_Uvelich_ob_rabot     S10       CllNU_10                      㢥祭 ꥬ ࠡ
// D_Vrem_otsutstv        S11       CllNU_11                      ᯮ 易⥩ ६ 饣 ࠡ⭨  ᢮
// D_Rasl_kvalif          S12       CllNU_12                      믮 ࠡ ࠧ筮 䨪樨
// D_Vyhodn_Prazdn        S13       CllNU_13                      ࠡ  室  ࠧ 
// D_Nochn_vr             S14       CllNU_14                      ࠡ  筮 ६
// N_Gostaina_Shifr       S15       CllNU_15                      ࠡ  ᢥﬨ, ⠢騬 㤠⢥ ⠩,  
// Proch_Kompens_charact  S16       CllNU_16                     믫 樮 ࠪ, ⠭  䥤ࠫ쭮 ஢
//                                + CllNU_34                     믫 樮 ࠪ, ⠭ ꥪ⮬ ᨩ᪮
//                                + CllNU_35                     믫 樮 ࠪ, ⠭ ०
// N_Intensivn            S17       CllNU_17                      ⥭ᨢ 㤠
// P_visok_result         S18       CllNU_18                    ६  ᮪ १ ࠡ
// P_Vazn_Otvetstv_rab    S19       CllNU_19                    ६  믮 ᮡ   ⢥⢥ ࠡ
// N_Kvalif_kategor       S20       CllNU_20                      稥 䨪樮 ⥣ਨ
// P_Goszadan             S21       CllNU_21                    ६  ࠧ殢 믮 㤠⢥ (㭨樯쭮) 
// N_Vysl_let             S22       CllNU_22                         ࣠樨
// N_Stag_rab             S23       CllNU_23                      ⠦ 뢭 ࠡ (樭᪨ ⠦)
// P_Month                S24       CllNU_24                    ६  ⮣ ࠡ  
// P_Qvart                S25       CllNU_25                    ६  ⮣ ࠡ  ⠫
// P_Year                 S26       CllNU_26                    ६  ⮣ ࠡ  
// N_Molod_spec           S27       CllNU_27                     " ᯥ樠"
// N_Poch_zvan            S28       CllNU_28                      ⭮ 
// N_Uch_step             S29       CllNU_29                      稥 "񭮩 ⥯"
// D_Selsk_mestn_Stim     S30       CllNU_30                      ࠡ  ᥫ᪮ ⭮
// N_Uchast               S31       CllNU_31                      "⪮"
// K_Rayon_koef_415       S34                                   
// K_Kr_Sev_415           S35                                   
//                                                S36  S37   筨 䨭஢
// V_415                  S36       CllNU_38     LIST_SRC06     ᨤ 䥤ࠫ쭮      415                  
// Srah_vznos_415         S37       CllNU_39     LIST_SRC07     ᨤ  ꥪ ᨩ᪮ 樨    415                  
//                                               LIST_SRC08     ᨤ  ࣠ ⭮ ᠬࠢ    415
//                                               LIST_SRC09      筨 䨭஢    415
//                                               LIST_SRC26     ᨤ 䥤ࠫ쭮      415 (᪭)
//                                               LIST_SRC27     ᨤ  ꥪ ᨩ᪮ 樨    415 (᪭)
//                                               LIST_SRC28     ᨤ  ࣠ ⭮ ᠬࠢ    415 (᪭)
//                                               LIST_SRC29      筨 䨭஢    415 (᪭)
// K_Rayon_koef_484       S38                                   
//                                                S39  S40    筨 䨭஢
// V_484                  S39       CllNU_38     LIST_SRC10                       
// Srah_vznos_484         S40       CllNU_39     LIST_SRC30                       
// Proch_Stimul_charact   S32       CllNU_32                     믫 ⨬㫨饣 ࠪ, ⠭ ꥪ⮬ ᨩ᪮ 
//                                + CllNU_36                     믫 ⨬㫨饣 ࠪ, ⠭ ०
// O_Neotrab_vrem         S33       CllNU_33                      ࠡ⠭ ६, ६ ⥫  㣨 믫,
//                                + CllNU_37                     ⮬ ᫥: ६ ⥫ 믫
// V_Dopoln_za_COVID19    S42       CllNU_38     LIST_SRC42     ᨤ  ।  ꥪ  믫  ࠡ  COVID-19
//                                               LIST_SRC43     ᨤ  . ࣠ ⭮ ᠬࠢ  믫  ࠡ  COVID-19
//                                               LIST_SRC44      筨 䨭஢ 믫  ࠡ  COVID-19
//                                               LIST_SRC45     ᨤ  । 䥤ࠫ쭮     1396
// V_Dopoln_3118          S41       CllNU_38     LIST_SRC41      ⠬ ꥪ⮢ ᨩ᪮ 樨    3118-
//                                               LIST_SRC40      ⠬ ꥪ⮢ ᨩ᪮ 樨    3118- (᪭)
//
$}(1. )
//
&Format(N,2,0)=0;
&FPRINT(N,2,0)=1;
&FF(N,3,0)=1;
$BEG_SCRIPT

   var CurFile=CreateObject("CurPrnFile");
   CurFile.SetFlagBrowse(0);

   var CTabl = CreateObject("CurPrnTbl");
   var KeyValueRef = CTabl.GetKeyValueCollections(true);
   string commonPart = GetAmbaResourceWorkDir();
   string formPart = TrimN(KeyValueRef.GetValue("__AdditionalFiles/xls"));
   string fullXlsName = commonPart + formPart;

   int acc = access(to_string(fullXlsName),0);
   if ( acc || !strlen(formPart) ) FF = 0;

$END_SCRIPT
//
$(_EQ(FF-1))
   #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] = 1; //   ࠡ⭮ 

   var modules=GetArray("forms\\monitoringMed2020","forms\\monitoringMed_common","forms\\monitoringMedXml");
   ReLoadSMs(modules);
   PrintMonitoringMedXml(param,np);
   UnLoadSMs(modules);

$END_SCRIPT
$