${(1. ன ॥)
#VidR(N,3,0)=      (_VidR     ,reestrBL,0);	//  ॥: 0 -  㬬 , 1 - ⮫쪮 ,
//										// 2 - ⮫쪮   ., 3 - ,  ࠧ쭮
#tRV(N,3,0)=       (_tRV      ,reestrBL,1); 	//   : 1 -  , 2 -  
#VidI(N,3,0)=      (_VidI     ,reestrBL,1); 	//  ⮣: 0 - ⮫쪮   㬬, 1 - - /
#PrintD(N,3,0)=    (_PrintD   ,reestrBL,0);	//   ।   ࣠樨: 0 -   (),
#OptPr(N,3,0)=     (_OptPr    ,reestrBL,1); 	// ⨬  ( ):
//							 	   		// 0 -  ⨬஢, 1 - ⨬஢ (   ⮫ /)
#PrZeroD(N,3,0)=   (_PrZeroD  ,reestrBL,1); 	// ன   ॥ == 2  == 1
//										// 0 -   /,       㫥
//										// 1 - 
#AddD(N,3,0)=      (_AddD     ,reestrBL,0);	// ன   ॥ == 2 (⮫쪮   ):
//										// 0 -     ।  ਮ 稢 .宬
//										// 1 - 
#OnlyTotals(N,3,0)=(_OnlyTotal,reestrBL,0); 	//  ⮫쪮 ⮣,  ᥣ ॥:
//                       						// 0 - ⠥ , 1 - ⠥ ⮫쪮 ⮣
#PrSnils(N,3,0) =  (_PrSnils,reestrBL,0);	//  ⮫   0-  , 1 - 
#PrComment(N,3,0)= (_PrComment,reestrBL,0);	//  ⮫  ᭥  /: 0 -  , 1 - 
#PrDatBL(N,3,0)=   (_PrDatBL  ,reestrBL,0);	//  ⮫  ⠬ /: 0 -  , 1 - 
#PrSerNum(N,3,0)=  (_PrSerNum ,reestrBL,0);	//  ⮫  ਥ  ஬: 0 -  , 1 - 
#H2D(N,3,0)=       (_H2D      ,reestrBL,0);	// ॢ ᮢ  : 1 -  ⠡, 0 - /8
#PrintVm(N,3,0)=   (_PrintVm  ,reestrBL,0);	//    室: 0 - ᤥ 
//                       						// 2 - ᭮ 室, 3 - , 1 -  
&TypePrVm(N,3,0)=  1;// (_TypePrVm ,reestrBL,0);	//   .室 (᫨ PrintVm=1):
//                       						// 0 - "᪫"  ᭮ 室, 1 - ⤥묨 ப
#PrExcel(N,3,0)=   (_PrExcel  ,reestrBL,0); 	// 0 - ᤥ , 1 - ⥪⮢ ଠ, 2 - Excel
#CntRowExcel(N,3,0)=(_CntRowExc,reestrBL,95); 	// ⢮ ப     १ Excel
#PrDopBL(N,3,0)=   (_PrDopBL  ,reestrBL,1);	// 1 -  .   ( 1.5 ,-, ஦,࠭ ப ६.),
//                       						// 0 -  
#RvMainSrc(N,3,0)= (_RvMainSrc,reestrBL,1);	// 1 -   ⬥祭 3,4,6,7  2.  ᢮  ६  筨  室   ७  205;
//										// 0 - ன  
#BLFilter(N,3,0)=  (_BLFilter ,reestrBL,0);	// 0-  , 1 -  ⮫쪮   襭 ०
$}(1. ன ॥)
$(_EQ(PrExcel))
#PrExcel=_(15,9,65,15,ଠ :, ⮢ ,  Excel    );
$(_EQ(PrExcel-27))
   $BEG_SCRIPT
     var CurFile=CreateObject("CurPrnFile");
     CurFile.SetFlagBrowse(0);
   $END_SCRIPT
   $
$_
$
  &PrExcel = PrExcel-1;
$_
//////////////////////
$(_EQ(PrintVm))
#PrintVm=_(15,9,65,15, 室:,         ,  ᭮ , ./. );
$(_EQ(PrintVm-27))
   $BEG_SCRIPT
      var CurFile=CreateObject("CurPrnFile");
      CurFile.SetFlagBrowse(0);
    $END_SCRIPT
    $
$_
////////////////////
&TypePrVm=1;
//$(_EQ(PrintVm))
//   #TypePrVm(N,3,0)=_(15,9,65,15,  .室:,     ᭮ 室  , ࠧ쭮 );
//   $(_EQ(TypePrVm-27))
//      $BEG_SCRIPT
//         var CurFile=CreateObject("CurPrnFile");
//         CurFile.SetFlagBrowse(0);
//       $END_SCRIPT
//       $
//   $_
//   &PrintVm = 3;
//$_
//$(_EQ(PrintVm))
//    &TypePrVm=1;
//$_
/////////////////////
$
  &TypePrVm=1;
  &PrintVm = PrintVm-1;
$_
#VidR=_(15,9,65,15, ॥:,         ,  .. , ࣠ );
$(_EQ(VidR-27))
   $BEG_SCRIPT
      var CurFile=CreateObject("CurPrnFile");
      CurFile.SetFlagBrowse(0);
    $END_SCRIPT
    $
$_
$(_EQ(VidR))
   #Vid(N,3,0)=_(15,9,65,15,  㬬:,     , ࠧ쭮 );
   $(_EQ(Vid-27))
      $BEG_SCRIPT
         var CurFile=CreateObject("CurPrnFile");
         CurFile.SetFlagBrowse(0);
       $END_SCRIPT
       $
   $_
   $(_EQ(Vid-1))
     &VidR = 3;
   $_
$_
$BEG_SCRIPT

   var array_param[21];
   array_param[0]  = 20; //⢮ ࠬ஢
   array_param[1]  = atoi(VidR);
   array_param[2]  = atoi(VidI);
   array_param[3]  = atoi(tRV);
   array_param[4]  = atoi(PrintD);
   array_param[5]  = atoi(OptPr);
   array_param[6]  = atoi(PrZeroD);
   array_param[7]  = atoi(AddD);
   array_param[8]  = atoi(OnlyTotals);
   array_param[9]  = atoi(PrComment);
   array_param[10] = atoi(PrDatBL);
   array_param[11] = atoi(PrSerNum);
   array_param[12] = atoi(H2D);
   array_param[13] = atoi(PrintVm);
   array_param[14] = atoi(TypePrVm);
   array_param[15] = atoi(PrExcel);
   array_param[16] = atoi(PrDopBL);
   array_param[17] = atoi(RvMainSrc);
   array_param[18] = atoi(BLFilter);
   array_param[19] = atoi(CntRowExcel);
   array_param[20] = atoi(PrSnils);


   UnloadScriptModule("forms\\blreestr_1");
   UnloadScriptModule("forms\\blreestr_2");
   UnloadScriptModule("forms\\blreestr_ex");
   LoadScriptModule("forms\\blreestr_1");
   LoadScriptModule("forms\\blreestr_2");
   LoadScriptModule("forms\\blreestr_ex");
   //PrintReestrBL(VidR,VidI,tRV,PrintD,OptPr,PrZeroD,AddD,OnlyTotals,PrComment,PrDatBL,PrSerNum,H2D,PrintVm,TypePrVm);

   PrReestrBL(array_param);

   UnloadScriptModule("forms\\blreestr_1");
   UnloadScriptModule("forms\\blreestr_2");
   UnloadScriptModule("forms\\blreestr_ex");
$END_SCRIPT
$