//ਪ  ७  
${(1. ன)  
&ZAPROS(N,5,0)=1;
// 0-뢮   ࠧ; 1-   ⤥쭮; 2- 
// ( ᯨ᪮ : 0,1 - , 2 -  )
$}(1. ன)  
#FPrint(N,2,0)=_(15,9,65,15,ଠ ,⤥쭮   (-11),᮪ (-11));  
$(_EQ(FPrint-27))              
  $BEG_SCRIPT              
    var CurFile=CreateObject("CurPrnFile");              
    CurFile.SetFlagBrowse(0);              
  $END_SCRIPT              
  $              
$_              
$BEG_SCRIPT  
  var array_param[4];  
  array_param[0]=3; // ⢮ ࠬ஢  
  array_param[1]=5; // ७  
  array_param[2]=FPrint;  
  array_param[3]=ZAPROS;  
  UnloadScriptModule("forms\\orders");   
  LoadScriptModule("forms\\orders");  
  PrintOrders(array_param);  
  UnloadScriptModule("forms\\orders");  
$END_SCRIPT  
$