//-------- ࠢ    ࠡ祣 ६
#DAT(C,10,0)=(6);
#(N,5,0)=_(0);        // ᫮ ࠡ ᥩ  ⠡
$(_EQ())
  $
$_
#M1(N,2,0)=R_Date(1); #G1(N,4,0)=R_Date(5); #M2(N,2,0)=R_Date(2); #G2(N,4,0)=R_Date(6);
&M1=M1+0; &M2=M2+0;
#MBEG(C,7,0)=_(M1,.,G1); #MFIN(C,7,0)=_(M2,.,G2);
&ITSUM(N,12,2)=0; &NMES(N,5,0)=0;
&ITSUM1(N,12,2)=0;
&ITSUM2(N,12,2)=0;
&ITSUM3(N,12,2)=0;
&ITSUM4(N,12,2)=0;  &NS(N,4,0)=1;
&ITSUM5(N,10,2)=0;
&ITSUM6(N,10,2)=0;
&ITSUM7(N,10,2)=0;
&ITSUM8(N,10,2)=0;
${(1.  ᯨ᪠)
                                                      @G1   .
                                                                                                         @NS
___________________________________________________________________________________________________________________________________________________________________
                     |           |   |   ᥣ    |         |     |         |      |.ꥬ|⪮.| |.|
________________________|____________________|________|____________|____________|____________|____________|____________|___________|_________|__________|__________|
$}(1. ᯨ᪠)
${(7. ਧ  )
  $(_,"0"); // " " (஡) -   㫨, "0" - 
$}(7. ਧ  )
&(N,5,0)=0; &OLDTN(N,7,0)=0; &FLUD(N,5,0)=0; &OLDPODR(N,6,0,)=0;
#(N,3,0)=_();             //  ࠭
$                             //     ⠡
$ (_GT(-))
#FIOLS(C,24,0)=_(FIO,); #TNLS(N,6,0)=_(C_FIO,); #PODRLS(N,6,0)=_(FCpodr,);#DOLG(C,20,0)=_(FCdolgnost,);
#IPOD(C,25,0)=_(PODRLS);
$
#FIOLS(C,24,0)=R_String( ); &TNLS(N,6,0)=0; &PODRLS(N,6,0)=0;
$_
$ (_EQ())                     //   ࠧ
                                          @IPOD
                                          ____________________________
#FIO(C,24,0)=_(FIO,);
$_
$ (1-_EQ(OLDTN-TNLS))              //   / 
$ (_GT(OLDTN))
//$EC (_GT(OLDTN))                     //  
#M1(N,2,0)=R_Date(1); #G1(N,4,0)=R_Date(5); #M2(N,2,0)=R_Date(2); #G2(N,4,0)=R_Date(6);
&M1=M1+0; &M2=M2+0;
$ (_LE(NMES))
&ASUM(N,12,2)=0;
&ASUM1(N,12,2)=0;
&ASUM2(N,12,2)=0;
&ASUM3(N,12,2)=0;
&ASUM4(N,12,2)=0;
&ASUM5(N,10,2)=0;
&ASUM6(N,10,2)=0;
&ASUM7(N,10,2)=0;
&ASUM8(N,10,2)=0;
$
&ASUM1(N,12,2)=ITSUM1/NMES;
&ASUM2(N,12,2)=ITSUM2/NMES;
&ASUM3(N,12,2)=ITSUM3/NMES;
&ASUM(N,12,2)=ITSUM/NMES;
&ASUM4(N,12,2)=ITSUM4/NMES;
&ASUM5(N,10,2)=ITSUM5/NMES;
&ASUM6(N,10,2)=ITSUM6/NMES;
&ASUM7(N,10,2)=ITSUM7/NMES;
&ASUM8(N,10,2)=ITSUM8/NMES;
$_
$ (_NE(ASUM))
____________________________________________________________________________________________________________________________________________________________________
                         /  @NMES  .|@ASUM       |@ASUM1      |@ASUM2      |@ASUM3      |@ASUM4      |@ASUM5     |@ASUM6    |@ASUM7    |@ASUM8    |
@FIO                         @MBEG       @MFIN     |            |            |            |            |            |           |          |          |          |
______________________________________________________|____________|____________|____________|____________|____________|___________|__________|__________|__________|
$_
#FIO(C,24,0)=_(FIO,);
$ (_GT(-))
$ (_NE())
$ (_NE(OLDPODR-PODRLS))
                                          @IPOD
                                          __________________________
$_
$_
$_
$ (_GT(TNLS))                      //  
&ITSUM(N,12,2)=0; &NMES(N,5,0)=0;
&ITSUM1(N,12,2)=0;
&ITSUM2(N,12,2)=0;
&ITSUM3(N,12,2)=0;
&ITSUM4(N,12,2)=0;
&ITSUM5(N,10,2)=0;
&ITSUM6(N,10,2)=0;
&ITSUM7(N,10,2)=0;
&ITSUM8(N,10,2)=0;
$_
$_
$_
#=_();                // ਧ  
$()                            //   ப ⠡
#CMES(C,7,0)=_(Month,); #CSUM(N,12,2)=_(Sum,);
#CSUM1(N,12,2)=_(Sum1,);
#CSUM2(N,12,2)=_(Sum2,);
#CSUM3(N,12,2)=_(Sum3,);
#CSUM4(N,12,2)=_(Sum4,);
#CSUM5(N,10,2)=_(Sum5,);
#CSUM6(N,10,2)=_(Sum6,);
#CSUM7(N,10,2)=_(Sum7,);
#CSUM8(N,10,2)=_(Sum8,);
@FIOLS                  |@DOLG               |@CMES   |@CSUM       |@CSUM1      |@CSUM2      |@CSUM3      |@CSUM4      |@CSUM5    |@CSUM6   |@CSUM7    |@CSUM8    |
&ITSUM=ITSUM+CSUM; &NMES=NMES+1;
&ITSUM1=ITSUM1+CSUM1;
&ITSUM2=ITSUM2+CSUM2;
&ITSUM3=ITSUM3+CSUM3;
&ITSUM4=ITSUM4+CSUM4;
&ITSUM5=ITSUM5+CSUM5;
&ITSUM6=ITSUM6+CSUM6;
&ITSUM7=ITSUM7+CSUM7;
&ITSUM8=ITSUM8+CSUM8;
$_
&=+1; &OLDTN=TNLS;&OLDPODR=PODRLS;
#(N,5,0)=_();         // 稪 ப  
$(_GE(+6-)+_EQ(-))
   ${(3.  )
//   ⨬ ਥ 室 ⥪   
   $}(3.  )
   $(_LT(-))
      $_
      ${(2.  )
//   ⨬ ਥ 室 ⥪  
#M1(N,2,0)=R_Date(1); #G1(N,4,0)=R_Date(5); #M2(N,2,0)=R_Date(2); #G2(N,4,0)=R_Date(6);
&M1=M1+0; &M2=M2+0;
#MBEG(C,7,0)=_(M1,.,G1); #MFIN(C,7,0)=_(M2,.,G2);

                                                      @G1   .
                                                                                                @NS
_________________________________________________________________________________________________________________________________________________________________
                     |           |   |   ᥣ    |         |     |       |      |.ꥬ|⪮.| |.|
________________________|____________________|________|____________|____________|____________|__________|____________|___________|_________|__________|__________|
      &NS=NS+1
      $}(2.  )
   $_
$_
$(_GT(-+1))
${(4.  ᯨ᪠)
//   ⨬ ਥ 室 ⥪   ᯨ᪠

//   壠             ___________  ﭨ ..

    㪮⥫ ⭮ 㯯 ___________  ७ ..

    壠                     ___________

     뤠 @DAT
$}(4.  ᯨ᪠)
$LF
