//-------------------------------------------------------
#(N,5,0)=_(0);        // ᫮ ࠡ ᥩ  ⠡
$(_EQ())
  $
$_
${(7. ਧ  )
  $(_," "); // " " (஡) -   㫨, "0" - 
$}(7. ਧ  )
${(2. ன ⠡)
//
#(N,2,0)=_( 6,9,72,15,। 稭 믫,뢠 ࠡ⭨  譨 室,뢠 );
$(_EQ(-27))
  $
$
  $(_EQ()) //  ॥
    $(_LE(-30))
      &5(N,14,2)=30;
    $
      &5(N,14,2)=10;
    $_
  $
    &5(N,14,2)=0;
  $_
&(N,5,0)=1;//0 - 㣫, 1 - 뢠, 2 - 
$}(2. ன ⠡)
#NPER(N,5,0)=R_Date(3); #KPER(N,5,0)=R_Date(4);
&DPER(N,5,0)=KPER-NPER+1;
&(N,5,0)=0;
&(N,5,0)=1;                                 // 稪 ࠭
#(C,1,0)=_(1,,5,);
&(N,14,2)=0;
&SSH01(N,14,2)=0; &SSH02(N,14,2)=0; &SSH03(N,14,2)=0; &SSH04(N,14,2)=0; &SSH05(N,14,2)=0; &SSH06(N,14,2)=0;
&SSH07(N,14,2)=0; &SSH08(N,14,2)=0; &SSH09(N,14,2)=0; &SSH10(N,14,2)=0; &SSH11(N,14,2)=0; &SSH12(N,14,2)=0;
&SSH101(N,14,2)=0; &SSH102(N,14,2)=0; &SSH103(N,14,2)=0; &SSH104(N,14,2)=0; &SSH105(N,14,2)=0; &SSH106(N,14,2)=0;
&SSH107(N,14,2)=0; &SSH108(N,14,2)=0; &SSH109(N,14,2)=0; &SSH110(N,14,2)=0; &SSH111(N,14,2)=0; &SSH112(N,14,2)=0;
$                                             //     ⠡
 #(N,12,2)=_(3,);
 #TN(N,14,0)=_(0,);
 #(C,1,0)=_(2,,TN);
 &=+;
 &=+1;
$(_GT(-))
&(N,5,0)=0;
$                                             //     ⠡
 #TN(N,12,0)=_(0,);
 #(N,1,0)=_(8,TN);
 &R(V,2,0)=0;
 $
  &R=R+1;
  #TEMP(N,14,2)=_(R+4,);
  &SSH@R=SSH@R+TEMP;
  $(_EQ())
   &SSH1@R=SSH1@R+TEMP;
  $_
 $(_LT(R-DPER))
 &=+1;
$(_GT(-))
${(3.  ଠ)
&R=0;
&TMP(N,14,0)=0;
&SUM(N,14,2)=0;
&SUM1(N,14,2)=0;
$
 &R=R+1;
 &TMP=SSH@R;
 &SUM=SUM+TMP;
 &TMP=SSH1@R;
 &SUM1=SUM1+TMP;
$(_LT(R-DPER))
&SUM=SUM/DPER;
&SUM1=SUM1/DPER;
&SUM0(N,14,0)=SUM;
&SUM2(N,14,0)=SUM1;
//   ⨬ ਥ 室 ⥪   ᯨ᪠
#1(N,14,2)=_(3); //㬬  
#2(N,14,2)=_(4); //⢮ ,   ந室 
#3(N,14,2)=_(5); //襭 㬬
#4(N,14,2)=_(6); //⢮ , 㬬  뫨 襭
//#5(N,9,2)=_(7); //業
&6(N,14,2)=100-5;    //業2
#(C,1,0)=_(9);
$(_GT(SUM2))
&(N,14,2)=1/SUM2;
$
&(N,14,2)=0;
$_
#B(C,2,0)=R_Date(1);
#E(C,2,0)=R_Date(2);
#1(C,4,0)=R_Date(5);
#2(C,4,0)=R_Date(6);
&(N,14,0)=;
//
&4(N,14,0)=4;
&3(N,14,0)=3;
          ࠢ   ࠧ 믫,
      ᫥  ।   ࠡ⭨
           ਮ  @B.@1  @E.@2
Ŀ
 㬬 ᫥  ।-    @         
  ਮ                                 
Ĵ
 ᫥ ࠡ⭨       @           
। ᫥                @SUM0          
Ĵ
⭨  뢠  ࠢ                
騥 訩 室                       
 業                           @5            
 ᫮ ⠪ ࠡ⭨            @4            
 㬬 ᫥                  @3            
Ĵ
⭨ 뢠  ࠢ                   
 業                           @6            
 ᫮ ⠪ ࠡ⭨            @2            
 । ᫥ ⠪ ࠡ.    @SUM2          
 㬬 ᫥                  @1            
Ĵ
㬬 ᫥  ।       @          
 ࠡ⭨                                  


 @              ________________ @
                          ()

$}(3.  ଠ)
$LF