&obr_ls(N,6,0)=_; 
&vib_ls(N,6,0)=_; 
&obr_kv(N,6,0)=_; 
&vib_kv(N,6,0)=_; 
&month_kv(N,6,0)=_; 
${(8. ன).  ன. 
&flagTabelComb(N,2,0)=0; // 0-  ᭮ ; 1-  ᮢ⥫ 
$}(8. ன).  ன. 
// ଠ  ⭮ ⪠    . 
//  ࠧ  .䨭஢   ᮢ⥫⢠ 
#CLIN(N,4,0)=_(); #SIZL(N,4,0)=_(); 
$(_GT(+CLIN+12-SIZL)) 
  $LF 
$_ 
${(7. ਧ  ) 
 &(N,4,0)=2;        // ⠢ &(N,4,0)=2   㬬   
$}(7. ਧ  ) 
${(3. ⭮ ⪠).  ଫ 蠯. 
$(_,68)  //     㬠  ண ⪠
$(_, );    //   ।⠢ 㫥 ࠡ祣 ६
#F(C,31,0)=R_Name(1); // ⠢ R_Name(1), ᫨     蠯
&(N,6,0)=0;  // ⠢ &(N,6,0)=1  뤥 㬬 .楢
#S(C,2,0)=R_String(  ); #OFICE(C,42,0)=R_String(); #PODR(N,7,0)=R_Face(podr); #NPodr(C,30,0)=_(PODR);
#T0(N,7,0)=R_Face(tn);
#DOLG(C,30,0)=R_Face(dolgnost);
&TN(N,7,0)=T0; #KAT(N,2,0)=R_Face(kat); &SUMOTPUV(N,12,@)=0;
&K(N,2,0)=KAT; #GOD(N,4,0)=(5); #MES(N,2,0)=(2); #MRASCH(C,8,0)=_(MES);
&1(N,9,@)=0;
&1(N,6,2)=0.00;
&2(N,9,@)=0;
&2(N,6,2)=0.00;
#1(N,9,@)=R_Summ(**,894);
#1(N,6,2)=R_Time("",894);
#2(N,9,@)=R_Summ(**,896);
#2(N,2,0)=R_Time("",896);
&(N,9,@)=0;
&(N,6,2)=0.00;
&(N,9,@)=1+2;
&(N,6,2)=1+2;
 ⮪
@2                                      @MRASCH  @GOD .
ࠧ:@PODR   @NPodr
: @F
  (⥣): @TN    (@K)
: @DOLG
          @                 ଠ   @

$}(3. ⭮ ⪠).  ଫ 蠯. 
#SL(C,200,0)=SrcList(); 
#SLC(C, 250, 0)=CombList(); 
&QQQC(N,4,0)=1; &SEAC(N,5,0)=0; 
$ 
#COMB(N,10,0)=_(SLC,QQQC,1); 
$ (_GT(COMB)) 
#SEAC=SetPrintCombine(COMB); 
#NAMECOMB(C, 45, 0)=NameCombine(COMB,2); 
&QQQ(N,4,0)=1; 
$ 
#SRC(N,3,0)=_(SL,QQQ,1); 
#SRCFLAG(N, 3, 0)=_(SL,2,1); //  ⮬᪨ 몫  筨 ᫨     
$ (_GT(SRC)) 
#SEAC=SetPrintSrc(SRC); 
#NAMESRC(C,35,0)=NameSrc(SRC,2); 
@NAMECOMB                                    @NAMESRC 
$FPT$ 
------------------------------------------------------------ 
&(N,2,0)=0; &(N,3,0)=0; #(C,7,0)=R_String( ); &(N,7,2)=0; &(N,10,@ )=0; #(C,2,0)=R_String( ); &(N,3,0)=0; #(C,35,0)=R_String( ); #(C,27,0)=R_String( ); &2(N,11,@ )=0; 
&(N,2,0)=0; &(N,3,0)=0; #(C,7,0)=R_String( ); &(N,6,2)=0; &(N,10,@ )=0; #(C,2,0)=R_String( ); &(N,3,0)=0; &(N,11,@ )=0;  &0(N,3,0)=99; &0(N,3,0)=99; &1(N,11,@ )=0; 
#TEMPSUM(N,12,@)=R_Face(ved1); 
&SUMOTPUV=SUMOTPUV+TEMPSUM; 
&RCN(N,4,0)=0; &RCU(N,4,0)=0; //  ⥫ 
$                                   //     ⠡ 
  &0=; &0=; 
  #O(N,2,0)=_(,,,,,,,RCN); #Q(N,2,0)= _(,,,,,,,RCU); 
  $ (_GE(+-4)*_LT(0+0-4)) 
    $ (RCN+RCU) 
------------------------------------------------------------ 
    $_ 
   .            㬬 |   㤥.      㬬 
  $_ 
  $ ((1-_EQ(-3))*_GT(-))             // ନ㥬 ப ᫥ 
    #=R_String(                                  |); //  ப 
  $ 
    $ (_EQ(-3))                                   // ⮣ 
      #O(N,2,0)=_(,,,,,,,RCN); 
      #=R_String(                 @     @); &RCN=RCN+1; 
    $_ 
    $ (_LT(-3))                                   // 㬬 
      #=R_String(@ @ @  @    @     @); &RCN=RCN+1; 
    $_ 
  $_                              // ନ㥬 ப 㤥ঠ 
  $ (_GE(-2)*_LT(-2)+_GE(-7)*_LT(-7)) 
    #=R_String(                         );          //  ப 
  $ 
    $ (_EQ(-3))                                   // ⮣ 
      #Q(N,2,0)= _(,,,,,,,RCU); 
      #=R_String(         @     );        &RCU=RCU+1; 
    $_ 
    $ (_EQ(-4)) // ਩   믫⠬, ப 1 
      #=R_String(                         );        &RCU=RCU+1; 
    $_ 
    $ (_EQ(-5)) // ਩   믫⠬, ப 2 
      #=R_String(  믫:   );        &RCU=RCU+1; 
    $_ 
    $ (_LT(-3)+_EQ(-6))                         // 㬬 
      #=R_String(@ @ @  @     @);      &RCU=RCU+1; 
    $_ 
  $_ 
  $ (_LT(-7)+_LT(-7)) 
@                              @ 
  $_ 
$ (_LT(-7)+_LT(-7)) 
$ (RCN+RCU) 
------------------------------------------------------------ 
$_ 
#O(N,2,0)=_(,,,,,,,RCN); #Q(N,2,0)= _(,,,,1,,,RCU); 
&RCN=RCN+1; &RCU=RCU+1; 
  ᫥      @      | 㤥ঠ     @1 
------------------------------------------------------------ 
#O(N,2,0)=_(,,,,,,,RCN); 
&RCN=RCN+1;                            //  , ⮪,  
#O(N,2,0)=_(,,,,1,,,RCN); #Q(N,2,0)= _(,,,,2,,,RCU); 
#=R_String( ); 
$ (_GT(1)) 
  #=R_String( ⮪      @1     ); 
$_ 
$ (_GT(2)) 
  #=R_String(          @2     ); 
$_ 
$ (_GT()) 
  .        @       @ 
$ 
$ (_GT(1)+_GT(2)) 
    ᫥饬         @ 
$ 
&T1(N,5,@)=0; 
    ᫥饬         @T1 
$_ 
$_ 
&QQQ=QQQ+1; 
//$_ //  
$_ //(_GT(SRC)) 
$ (_GT(SRC)) 
&QQQC=QQQC+1; 
$_ //(_GT(COMB)) 
$ (_GT(COMB)) 
// 
$ (_EQ(flagTabelComb)) 
#TABEL(C,40,0)=R_Caln(0);                    // ⠡ 
 
 : @TABEL 
$ 
#SLC1(C, 250, 0)=CombList(); 
&QQQC1(N,4,0)=1; 
$ 
#COMB1(N,10,0)=_(SLC1,QQQC1,1); 
$ (_GT(COMB1)) 
//$ (_EQ(COMB1)) 
#SEAC1(N,5,0)=SetPrintCombine(COMB1); 
#NAMECOMB1(C, 45, 0)=NameCombine(COMB1,2); 
#TABEL(C,40,0)=R_Caln(0);                    // ⠡ 
 
 $ (_GT(QQQC-2)) // ᫨   ᮢ⥫⢠ - ⠥  
 @NAMECOMB1 
 $_ //(_GT(QQQC-2)) 
 : @TABEL 
&QQQC1=QQQC1+1; 
$_ //(_GT(COMB1)) 
$ (_GT(COMB1)) 
$_ //(_EQ(flagTabelComb)) 
// 
${(1.㬬  ஢ન /).  㬬  /. 
$  //   ப   㬬  /. 
&FLSUMM(N,4,0)=1;  // 1 -  㬬 筨 믫, 2   㬬 
#(C,160,0)=R_String(2,3,8,9,12,13,14); // ᫨  ᪮ 㦭 㬬 
#REM001(C,35,0)=R_String( 室   ᪨);            // 1 
#REM002(C,35,0)=R_String(᭮ 室   ᪨);          // 2 
#REM003(C,35,0)=R_String(室  2- ⠡   ᪨);    // 3 
#REM007(C,35,0)=R_String(   㬬);                     // 7 
#REM008(C,35,0)=R_String(  ᭮ 㬬);                   // 8 
#REM009(C,35,0)=R_String(  㬬  2- ⠡);             // 9 
#REM011(C,35,0)=R_String(, ।  ᪠  );       // 11 
#REM012(C,35,0)=R_String(,㤥ঠ  ਮ)                // 12 
#REM013(C,35,0)=R_String(,㤥ঠ   ਮ)           // 13 
#REM014(C,35,0)=R_String(㬬 ⮢);                            // 14 
#REM015(C,35,0)=R_String(ᮭ );                      // 15 
#REM016(C,35,0)=R_String(  楢);                     // 16 
#REM032(C,35,0)=R_String(業  );                // 32 
#REM033(C,35,0)=R_String(㬬 ᪨  室);                   // 33 
#REM034(C,35,0)=R_String(㬬  3- ⠡);                     // 34 
#REM035(C,35,0)=R_String( 㬬  3- ⠡);          // 35 
#REM036(C,35,0)=R_String(㬬   3- ⠡);              // 36 
#REM037(C,35,0)=R_String(㬬 ⮢  室);                  // 37 
#REM038(C,35,0)=R_String(㬬 ⮢  2- ⠡);             // 38 
#REM039(C,35,0)=R_String(㬬 ⮢  3- ⠡);             // 39 
#REM041(C,35,0)=R_String( 室  ⮬ ᪨);             // 41 
#REM042(C,35,0)=R_String(᭮ 室  ⮬ ᪨);           // 42 
#REM043(C,35,0)=R_String(室  2- ⠡  ⮬ ᪨);     // 43 
#REM044(C,35,0)=R_String(室  3- ⠡  ⮬ ᪨);     // 44 
#REM045(C,35,0)=R_String( 㬬 ᭮ 室);        // 45 
#REM046(C,35,0)=R_String( 㬬  2- ⠡);          // 46 
#REM047(C,35,0)=R_String( 㬬  3- ⠡);          // 47 
#REM048(C,35,0)=R_String(  㬬);                   // 48 
#REM050(C,35,0)=R_String(室   ⮢);                // 50 
#REM063(C,35,0)=R_String(  ᭮ 室);               // 63 
#REM064(C,35,0)=R_String(  2- ⠡);                    // 64 
#REM065(C,35,0)=R_String(  3- ⠡);                    // 65 
#REM300(C,35,0)=R_String(ਠ쭠 );                      // 300 
#REM301(C,35,0)=R_String(  ਠ쭮 );            // 301 
#REM302(C,35,0)=R_String(ન);                                  // 302 
#REM303(C,35,0)=R_String(  ઠ);                       // 303 
#REM304(C,35,0)=R_String(ਧ);                                    // 304 
#REM305(C,35,0)=R_String(  ਧ);                         // 305 
#REM306(C,35,0)=R_String(    ᭮ 室);            // 306 
#REM307(C,35,0)=R_String(    /);                         // 307 
#REM308(C,35,0)=R_String(    室 ᮢ⥫);        // 308 
#REM309(C,35,0)=R_String(    / ᮢ⥫);           // 309 
#REM310(C,35,0)=R_String(  ந⥫⢮);                 // 310 
#REM507(C,35,0)=R_String(   㬬  );                // 507 
#REM508(C,35,0)=R_String(  ᭮ 㬬  );              // 508 
#REM509(C,35,0)=R_String(  㬬 p/  );                   // 509 
#REM511(C,35,0)=R_String(  ᪠    );              // 511 
#REM512(C,35,0)=R_String(ঠ   ਮ  );           // 512 
#REM513(C,35,0)=R_String(ঠ    ਮ  );      // 513 
  㬬  ஢ન /        ⥪..   . 
$}(1.㬬  ஢ન /).   㬬  /. 
// ⥬   㬬  / 
$ (_EQ(FLSUMM-1)) 
  #001(N,11,@ )=R_Tax(1,1,g,0,筨 믫,*,); 
$ 
  #001(N,11,@ )=R_Tax(1,1,g,0,*,*,); 
$_ 
#002(N,11,@ )=R_Tax(2);   #003(N,11,@ )=R_Tax(3); 
#007(N,11,@ )=R_Tax(7);   #008(N,11,@ )=R_Tax(8); 
#009(N,11,@ )=R_Tax(9);   #011(N,11,@ )=R_Tax(11); 
#012(N,11,@ )=R_Tax(12); 
#013(N,11,@ )=R_Tax(13);  #014(N,11,@ )=R_Tax(14); 
#015(N,11,@ )=R_Tax(15);  #016(N,11,@ )=R_Tax(16); 
#032(N,11,@ )=R_Tax(32);  #033(N,11,@ )=R_Tax(33); 
#034(N,11,@ )=R_Tax(34);  #035(N,11,@ )=R_Tax(35); 
#036(N,11,@ )=R_Tax(36);  #037(N,11,@ )=R_Tax(37); 
#038(N,11,@ )=R_Tax(38);  #039(N,11,@ )=R_Tax(39); 
#041(N,11,@ )=R_Tax(41);  #042(N,11,@ )=R_Tax(42); 
#043(N,11,@ )=R_Tax(43);  #044(N,11,@ )=R_Tax(44); 
#045(N,11,@ )=R_Tax(45);  #046(N,11,@ )=R_Tax(46); 
#047(N,11,@ )=R_Tax(47);  #048(N,11,@ )=R_Tax(48); 
#050(N,11,@ )=R_Tax(50);  #063(N,11,@ )=R_Tax(63); 
#064(N,11,@ )=R_Tax(64);  #065(N,11,@ )=R_Tax(65); 
#300(N,11,@ )=R_Tax(list,Summa,2760,0,503,1," "); 
#301(N,11,@ )=R_Tax(list,RealDiscount,2760,0,503,1," "); 
#302(N,11,@ )=R_Tax(list,Summa,2720,0,501,1," "); 
#303(N,11,@ )=R_Tax(list,RealDiscount,2720,0,501,1," "); 
#304(N,11,@ )=R_Tax(list,Summa,2730,0,502,1," "); 
#305(N,11,@ )=R_Tax(list,RealDiscount,2730,0,502,1," "); 
#306(N,11,@ )=R_Tax(list,Summa,0,10,0,1," "); 
#307(N,11,@ )=R_Tax(list,Summa,0,11,0,2," "); 
#308(N,11,@ )=R_Tax(list,Summa,0,10,0,1,"0"); 
#309(N,11,@ )=R_Tax(list,Summa,0,11,0,2,"0"); 
#310(N,11,@ )=R_Tax(list,Summa,0,42,5,1," "); 
$ (_EQ(FLSUMM-1)) 
  #001(N,11,@ )=R_Tax(1,1,0,0,筨 믫,*,); 
$ 
  #001(N,11,@ )=R_Tax(1,1,0,0,*,*,); 
$_ 
#002(N,11,@ )=R_Tax(2);    #003(N,11,@ )=R_Tax(3); 
#007(N,11,@ )=R_Tax(7);    #008(N,11,@ )=R_Tax(8); 
#009(N,11,@ )=R_Tax(9);    #011(N,11,@ )=R_Tax(11); 
#012(N,11,@ )=R_Tax(12); 
#013(N,11,@ )=R_Tax(13);   #014(N,11,@ )=R_Tax(14); 
#015(N,11,@ )=R_Tax(15);   #016(N,11,@ )=R_Tax(16); 
#032(N,11,@ )=R_Tax(32);   #033(N,11,@ )=R_Tax(33); 
#034(N,11,@ )=R_Tax(34);   #035(N,11,@ )=R_Tax(35); 
#036(N,11,@ )=R_Tax(36);   #037(N,11,@ )=R_Tax(37); 
#038(N,11,@ )=R_Tax(38);   #039(N,11,@ )=R_Tax(39); 
#041(N,11,@ )=R_Tax(41);   #042(N,11,@ )=R_Tax(42); 
#043(N,11,@ )=R_Tax(43);   #044(N,11,@ )=R_Tax(44); 
#045(N,11,@ )=R_Tax(45);   #046(N,11,@ )=R_Tax(46); 
#047(N,11,@ )=R_Tax(47);   #048(N,11,@ )=R_Tax(48); 
#050(N,11,@ )=R_Tax(50);   #063(N,11,@ )=R_Tax(63); 
#064(N,11,@ )=R_Tax(64);   #065(N,11,@ )=R_Tax(65); 
#300(N,11,@ )=R_Tax(list,Summa,2760,0,503,1," "); 
#301(N,11,@ )=R_Tax(list,RealDiscount,2760,0,503,1," "); 
#302(N,11,@ )=R_Tax(list,Summa,2720,0,501,1," "); 
#303(N,11,@ )=R_Tax(list,RealDiscount,2720,0,501,1," "); 
#304(N,11,@ )=R_Tax(list,Summa,2730,0,502,1," "); 
#305(N,11,@ )=R_Tax(list,RealDiscount,2730,0,502,1," "); 
#306(N,11,@ )=R_Tax(list,Summa,0,10,0,1," "); 
#307(N,11,@ )=R_Tax(list,Summa,0,11,0,2," "); 
#308(N,11,@ )=R_Tax(list,Summa,0,10,0,1,"0"); 
#309(N,11,@ )=R_Tax(list,Summa,0,11,0,2,"0"); 
#310(N,11,@ )=R_Tax(list,Summa,0,42,5,1," "); 
  &CNT(N,4,0)=1; 
  $ 
    #N(V,3,0)=_(,CNT); 
    $ (_GT(N)) 
      #(C,35,0)=R_String(REM@N ); 
      &(N,11,@ )=@N; 
      &(N,11,@ )=@N; 
 @                             @     @ 
    $_ 
    &CNT=CNT+1; 
  $ (_GT(N)) 
$_                  //  ⥭  㬬  / 
${(2.㬬  롮ઠ ⠡.-).  㬬  롮ઠ. 
//#(N,11,@ )=R_Col_S("1","*",15,0,0); 
//#(N,11,@ )=R_Col_S("2","*",15,0,0); 
// 㬬                   @ 
// 㬬                   @ 
$}(2.㬬  롮ઠ ⠡.-).   㬬  롮ઠ. 
$ (_EQ(-1)) 
${(6. 㬬  㣨 ).  㬬  㣨 . 
#(N,12,@ )=R_Col_S(1,=,0,-14,-1); #(N,12,@ )=R_Col_S(1,=,0,1,6); 
$ (1-_EQ()) 
믫.      ⥪饣    @ 
$_ 
$ (1-_EQ()) 
믫.  騥    ⥪饣    @ 
$_ 
$}(6. 㬬  㣨 ).  㬬  㣨 . 
$_ 
#(N,4,0)=_(""); 
$ (_EQ(-1)) 
${(4. ⪠  ).  㬬  . 
//#(N,12,@ )=R_Face(ved1); 
㬬      @SUMOTPUV 
$}(4. ⪠  ).  㬬  . 
$_ 
#(N,4,0)=_(""); 
$ (_EQ(-1)) 
${(5. ⪠  㢮쭥).  㬬  㢮쭥. 
//#(N,12,@ )=R_Face(ved1); 
㬬  㢮쭥 @SUMOTPUV 
$}(5. ⪠  㢮쭥).   㬬  㢮쭥. 
$_ 
${(6.ࠢ ⪮  ) 
$BEG_SCRIPT 
  SendKvitokToEmail();//ࠢ塞   
$END_SCRIPT 
$}(6.ࠢ ⪮  ) 
$