//-------------------------------------------------------
${(0. 騥 ன  )
  &PrNs(N,2,0)    = 1; // 0 -  㫥 ⮫; 1 -  , 2 - ண ஫  ⮣ ⮫
  &TypeF(N,2,0) = 1;// 1 - ਯ⮢ 㭨ᠫ쭠 ଠ, 0 -  筠 ଠ
  &BreakPodr(N,2,0) = 1;//  ਯ⮢   ࠧ 饣 ᢮  ࠧ
  //   (᫨  ᢮  ⮫ "ࠧ")
  // 1 - ࠧ  ࠧ, 0 - 
  &FondMNIM(N,2,0) = 1;//  砥  㬬  䮭
  // 1 -      㬬  䮭
  // 0 - 
  &PrColPodr(N,2,0) = 0;// ਧ  ⮫   ࠧ
  // ᢮   ࠧ  ࠧ  ࠧ
  // 0 - ꥤ   ப ⫨騥 ⮫쪮 ࠧ
  // 1 -  ⠪ ப ࠧ쭮
  &PrItogTbl(N,2,0) = 0;// ਧ ⮣   3 ⠡ ( ⮣)
  //  饣 ᢮,  ⠥   ࠧ
  // (  ᥬ ࠧ)  ࠧ  ࠧ:
  // 0 -  ⮣ ⠡  ᢮   ࠧ
  // 1 -  ⮣ ⠡ ᫥  ᢮  ᫥ ࠧ
  &FzpBP(N,2,0) = 1;// 뤥 ⮣  ,  ਮ,  ਮ
  // 1 - 뤥, 0 - 
$}(0. 騥 ன  )
//${(5. ⥫ ப ᯨ᪠)
//  $(__,0);  // 0 (1,...) - ⢮ ய᪮ ப
//  $(_,"-");      // ᨬ  મ: "-" ( .ᨬ)
//$}(5. ⥫ ப ᯨ᪠)
//${(6. ⥫ ⮫殢 ᯨ᪠)
//  $(__,1); // 1,2,...-᫮ ᨬ  ࠧ 
//  $(_,"|");     // ᨬ-ࠧ⥫  (|  ||  ..)
//$}(6. ⥫ ⮫殢 ᯨ᪠)
//${(7. ਧ  )
//  $(_," "); // " " (஡) -   㫨, "0" - 
//$}(7. ਧ  )
${(1. ன   Excel)
// ࠬ Excel
  &FontZag(N,2,0) = 8; // ࠧ   
  &FontZap(N,2,0) = 8; // ࠧ    ⠡
  &Orient(N,2,0)  = 0; // ਥ  0- 㬮砭; 1-; 2-
  &WItog(N,2,0)   = 3; // - 祥 1- ⮫ () ⮣ (3 ⠡)
$}(1. ன   Excel)

$(TypeF)
  #Excel(N,2,0)=_(15,9,65,15,ଠ ,,१ Excel);
  $(_EQ(Excel-27))
    $BEG_SCRIPT
      var CurFile=CreateObject("CurPrnFile");
      CurFile.SetFlagBrowse(1);
      CurFile.SetFlag_Print(0);
    $END_SCRIPT
    $
  $_
   $BEG_SCRIPT
     var array_param[12];
     array_param[0]=11; //⢮ ࠬ஢
     array_param[1]=FondMNIM;
     array_param[2]=BreakPodr;
     array_param[3]=Excel;
     array_param[4]=PrColPodr;
     array_param[5]=PrItogTbl;
     array_param[6]=FzpBP;
     array_param[7]=PrNs;
     array_param[8]=atoi(FontZag);
     array_param[9]=atoi(FontZap);
     array_param[10]=Orient;
     array_param[11]=WItog;

     UnloadScriptModule("SVOD\\extsvod");
     UnloadScriptModule("SVOD\\excelsv");
     LoadScriptModule("SVOD\\extsvod");
     LoadScriptModule("SVOD\\excelsv");
     PrintSvodEx(array_param);
     UnloadScriptModule("SVOD\\extsvod");
     UnloadScriptModule("SVOD\\excelsv");
   $END_SCRIPT
  $
$
   ${(1.  ᯨ᪠)
   //   ⨬ ਥ 室 ⥪  ᯨ᪠
   $}(1.  ᯨ᪠)
   #COUNTT(N,2,0)=_();
   &(N,1,0)=0;
   $
      // ᫨ ⠡   - ⠥   ।
      //  ⨢ 砥,   ⠡ ᢮,  筠 筠 ⠡.
      $(_GT(COUNTT-1))
         #=_();
      $
         &=1;
      $_
      $()
         #(N,5,0)=_(0);        // ᫮ ࠡ ᥩ  ⠡
         $(_NE())
         //${(砫 㬬)
           #=_(_);     //  砫 㬬
         //$}(砫 㬬)
         &(N,5,0)=0;
         &(N,5,0)=1;                                 // 稪 ࠭
         #(N,3,0)=_();                      //  ࠭
         //${( ⠡)
           #=_(,,,);   //  
           #=_(__);                 //  㬬  
         //$}( ⠡)
         $                                             //     ⠡
           //${(ப )
             #=_();                         // ਧ  
             $()
               #=_(_,,)  //   ப ⠡
             $_
           //$}(ப )
           &=+1;
           #(N,5,0)=_();                 // 稪 ப  
           $(_GE(+6-)+_EQ(-))
             //${(⮣ )
               #=_(,_);            //  ⮣  .
               #=_(__);            //  ⮣  .
             //$}(⮣ )
             ${(3.  )
         //   ⨬ ਥ 室 ⥪   
             $}(3.  )
             $(_LT(-))
               $_
               ${(2.  )
         //   ⨬ ਥ 室 ⥪  
               $}(2.  )
               //${( ⠡).   .
                 #=_(,,)             //  
                 #=_(__);                 //  㬬
               //$}( ⠡).   .
             $_
           $_
         $(_GT(-))
         //${(⮣ )
           #=_(_)
         //$}(⮣ )
         $_
      $_
      &=+1;
   $(_GT(COUNTT-))
   ${(4.  ᯨ᪠)
   //   ⨬ ਥ 室 ⥪   ᯨ᪠
   $}(4.  ᯨ᪠)
   $LF
$_
$