//-----------------   -----------------
${(8. ੪  Excel)
&pn(N,2,0)=0; // 0 -  㫥 ⮫; 1 -  
&st(N,2,0)=0; // 0 - ਭ ⮫殢 । ⮬᪨; 1 - ᮮ⢥ ࠧ୮; 2 - ᮮ⢥ ਭ ⮡  ⠡
&fg(N,2,0)=0; // ࠧ    (7)
&fp(N,2,0)=0; // ࠧ    ⠡ (7)
&ns(N,2,0)=0; // 0 -  ப  ࠬ ⮫殢; 1 -  
&pt(N,2,0)=0; // 1 -  ஬ ⮣ १ ⢮ ப  ࠬ஬ cs; 0 -  
&cl(N,2,0)=1; // 0 -   ⠡   ; 1 -       ப 祬 㪠 ᫥騬 ࠬ஬
&cs(N,2,0)=0; // ⢮ ப  , ᯮ ⮫쪮  砥 ᫨ pt  cl ࠢ 1 (25)
&tl(N,2,0)=1; // 1 - ᯮ짢  ; 0 -  ᯮ짮
&pd(N,2,0)=0; // 1 - ᯮ짮   ; 0 -  ᯮ짮
&xv(N,2,0)=1; // 0 -  Excel ; 1 - 
&pl(N,2,0)=2; // ਥ : 0- 㬮砭; 1-; 2-
&ss(N,2,0)=0; // ᫮ ப  蠯 ( 蠯 ⠥  ⮬       ⠡)
&np(N,2,0)=0; // 1 -   ࠧ     ; 0 -  
#wc(C,250,0)=R_String(FIO=15 & SN1-CASHSUM=8);
$}(8. ੪  Excel)
#FORMAT(N,2,0)=_(15,9,65,15,ଠ :,⮢,Excel);    
$(_EQ(FORMAT-27))    
  $BEG_SCRIPT    
    var CurFile=CreateObject("CurPrnFile");    
    CurFile.SetFlagBrowse(0);    
  $END_SCRIPT    
  $    
$_    
#(N,8,0)=_(1);         
#podr(C,30,0)=_();         
#d1(,7,0)=(7);         
$(_EQ(FORMAT-1))
  $BEG_SCRIPT    

    int npar = 14;
    var param[npar];

    param[0]  = atoi(pn);
    param[1]  = atoi(st);
    param[2]  = atoi(ns);
    param[3]  = atoi(fg);
    param[4]  = atoi(fp);
    param[5]  = atoi(pt);
    param[6]  = atoi(cl);
    param[7]  = atoi(cs);
    param[8]  = atoi(tl);
    param[9]  = atoi(pd);
    param[10] = atoi(xv);
    param[11] = atoi(pl);
    param[12] = atoi(ss);
    param[13] = static_cast_to_string(wc);

    int nret = 3;
    var retpar[nret];
    for ( int i = 0; i < nret; i++ ) 
      retpar[i] = 0;

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

    LoadScriptModule("forms\\comtab");
      comtab(param,npar,retpar,nret);
    UnloadScriptModule("forms\\comtab");

    if ( retpar[0] != -1 )
    { // 맮 㭪樨 ᮡ⢥ ࠡ⪨ ᮧ excel ⠡
      // retpar[1] -  ᫥ worksheet'a  ஬ ⠫ ⠡
      // retpar[2] -  ப ᫥饩  ᫥ ⠭ ப ⠡

      int nrp = 5;
      var rpar[nrp];

      rpar[0] = static_cast_to_string(podr);
      rpar[1] = static_cast_to_string(d1);
      rpar[2] = atoi(tl);
      rpar[3] = atoi(np);
      rpar[4] = atoi(pd);

      LoadScriptModule("forms\\rpved");
        rpved_new(retpar,nret,rpar,nrp);
      UnloadScriptModule("forms\\rpved");
    }

  $END_SCRIPT    
  $    
$_    
//     Excel
#(N,5,0)=_(0); // ᫮ ࠡ ᥩ  ⠡
$(_EQ())
  $
$_
${(5. ⥫ ப ᯨ᪠)
  $(__,1);  // 1 (0,1,...) - ⢮ ய᪮ ப
  $(_,"-");      // ᨬ  મ: "-" ( .ᨬ)
$}(5. ⥫ ப ᯨ᪠)
${(6. ⥫ ⮫殢 ᯨ᪠)
  $(__,1); // 1,2,...-᫮ ᨬ  ࠧ 
  $(_,"|");     // ᨬ-ࠧ⥫  (|  ||  ..)
$}(6. ⥫ ⮫殢 ᯨ᪠)
${(7. ਧ  )
  $(_,"0"); // " " (஡) -   㫨, "0" - 
$}(7. ਧ  )
&(N,5,0)=0;
&(N,5,0)=1;                                 // 稪 ࠭
#(N,3,0)=_();                      //  ࠭
#(N,8,0)=_(1);
#(C,30,0)=_();
#(C,15,0)=_(PrintNumb);
#(N,3,0)=(8); #(N,4,0)=(9);
#(C,8,0)=_();
#NS(N,3,0)=_(SRC);
#ORG(C,50,0)=R_String();
$ (_GE(NS))
#S(C,2,0)=_(NS,0);
#RES(N,4,0)=_(S,* );
$
&RES(N,4,0)=0;
$_
${(1.  ᯨ᪠)
  &(N,1,0)=1;  // =1 -    ᯨ᪠, =0 - ⪨.
//   ⨬ ਥ 室 ⥪    ᯨ᪠
  #(N,3,0)=_(CASHSUM);    //  ⮫  㬬  
  #(N,12,2)=_(,0);   // 㬬  
  $(_EQ(-1))
    $(_GT())
      #(C,150,0)=_();
      #(N,8,0)=_(,50);   // 颥 ᫮ ப
      &(N,8,0)=0;
      #1(N,50,0)=_();
      &=+1;
      $(_LT(-))
        #2(N,50,0)=_();
      $
        #2(N,50,0)=R_String(___________________________________________________________________);
      $_
      &=+1;
      $(_LT(-))
        #3(N,50,0)=_();
      $
        #3(N,50,0)=R_String(___________________________________________________________________);
      $_
        #=_();
    $
      #1(N,50,0)=R_String(___________________________________________________________________);
      #2(N,50,0)=R_String(___________________________________________________________________);
      #3(N,50,0)=R_String(___________________________________________________________________);
    $_
    &(N,12,0)=_Long(); &(N,4,0)=(-)*100;
  $_
  &(N,15,0)=_Long(); &(N,4,0)=(-)*100;
  #(,15,0)=DIVIDER_INSERT();
  #(C,22,0)=R_String();
  #(C,22,0)=R_String();
  #(C,20,0)=(61);
  #(N,8,0)=_(1);
  $(_GT())
    #(C,50,0)=_(@   );
  $
    #(C,50,0)=R_String(__________________________________________________);
  $_
  $(_EQ(-1))
                                                      - ________________
                                                                                                                                               -----------------
                                                                                                                                               |           |
                                                                                                                                               |---------------|
      ப                                                                                                               |    0504401    |
                                                                                                                                               |---------------|
  ___________________________  ________________________ .                                @               .                      |               |
                                                                                                                                               |---------------|
  㬬 @1                                                               ० (業ࠫ .)_______________    |               |
 @2                                                                       @ORG                                                        |---------------|
 @3                                                                       ୮ ࠧ_________________________          |               |
          (@            @ )                                           @                                                    |---------------|
                                                                                                                                               |               |
 @                ________________ @                                       ७, .                               |      383      |
                          ()     (஢ )                                                                                  -----------------
                                                                                                                                               
 @             ________________ @                                                                                                 
                          ()     (஢ )                                                                                  
                                                                                                                                               
              -----------------------               -----------------------                             -----------------------                -----------------
    |                     |  ।  |                     |  室 ᮢ थ  |                     |          |               |
              -----------------------               -----------------------                             -----------------------                -----------------
$_
$}(1.  ᯨ᪠)
//${( ⠡)
  #=_(,,)             //  
  #=_(__);                 //  㬬  
//$}( ⠡)
$                                        //     ⠡
  //${(ப )
    #=_();                         // ਧ  
    $()
      #=_(_,,)  //   ப
    $_
  //$}(ப )
  &=+1;
  #(N,5,0)=_();                   // 稪 ப  
  $(_GE(+6-)+_EQ(-))
    //${(⮣ )
      #=_(,_);            //  ⮣  .
    //$}(⮣ )
    ${(3.  )
//   ⨬ ਥ 室 ⥪   

    $}(3.  )
    $(_LT(-))
      $_
      ${(2.  )
        $()
  ࠧ: @     @
        $_
        &=+1;
//   ⨬ ਥ 室 ⥪  
  ௫  @ @ .                                    @
      $}(2.  )
      //${( ⠡).   .
        #=_(,,)             //  
        #=_(__);                 //  㬬
      //$}( ⠡).   .
    $_
  $_
$(_GT(-))
//${(⮣ )
  #=_(_)
//$}(⮣ )
${(4.  ᯨ᪠)
   &(N,1,0)=1;  // =1-   ᯨ᪠, =0-⪮.
//   ⨬ ਥ 室 ⥪     ᯨ᪠
  $(_EQ(-1))
  $(_GT())
    #(C,160,0)=_();
    #(N,8,0)=_(,60);   // 颥 ᫮ ப
    &(N,8,0)=0;
    $
      #(N,60,0)=_();
  @
      &=+1;
    $(_LT(-))
    #=_();
  $
  ...................................................................
  ...................................................................
  $_
                                 ------------------------------             ------------------------------                ------------------------------
  饩 :  뤠 |                            |,   뤠 |                            |,  ஢ |                            |
                                 ------------------------------             ------------------------------                ------------------------------

 ⠢ _________________ ___________ _______________________    稪 ________________ ___________ _______________________ 
             ()     ()   (஢ )                 ()     ()   (஢ )  
                                                                                                                                  
 ஢ਫ _________________ ___________ _______________________     ___________ _______________________ 
             ()     ()   (஢ )             ()   (஢ )  
                                                                                                                                  
 "___"_______________ 20__.                                        "___"_______________ 20__.                                    

  $_
$}(4.  ᯨ᪠)
$LF
