${(  ன )  
&wsname(N,3,0)=0; //  뢠     Excel 
                  // 0-,1-⠡ 
&recalc(N,3,0)=1; // 0 -   
$}(  ன )  
#format(N,3,0)=_(15,9,65,15,ଠ :,ப,㧪,१ Excel);    
$(_EQ(FORMAT-27))    
  $BEG_SCRIPT    
    var CurFile=CreateObject("CurPrnFile");    
    CurFile.SetFlagBrowse(0);    
    CurFile.SetFlag_Print(0);
  $END_SCRIPT    
  $    
$_    
//
#drasch(C,10,0)=R_String(          );    
$BEG_SCRIPT    
  sprintf(drasch,"%-10.10s",datatek);    
$END_SCRIPT    
#=( , ,  , drasch);    
$(_EQ(27-))    
$BEG_SCRIPT    
  var CurFile=CreateObject("CurPrnFile");    
  CurFile.SetFlagBrowse(0);    
  CurFile.SetFlag_Print(0);
$END_SCRIPT    
$    
$_    
//
$BEG_SCRIPT

  int np = 4;
  var param[np];

  param[0] = format;
  param[1] = wsname;
  param[2] = recalc;
  param[3] = static_cast_to_string(drasch);

  UnloadScriptModule("dmodules");
  LoadScriptModule("dmodules");
  UnloadDynamicModules();
  UnloadScriptModule("dmodules");

  LoadScriptModule("forms\\ndfl14");   
    ndfl1_par(param,np);
//  ndfl1(format, wsname, recalc, drasch);
  UnloadScriptModule("forms\\ndfl14");   

$END_SCRIPT
$