${(1.  )
//        
//
// ਪ   30.07.2021  457
//
//  2021 
// ப ।⠢ - 21 
$}(1.  )
${(2. )
// ன  室  
// "ன" (F9) - "ன ⠡   " - "⭮  ⨪"
$}(2. )
//
&Format(N,2,0)=0; 
&FPRINT(N,2,0)=1; 
#FF1(N,3,0)=_(FFIRST,0); 
#FN1(C,256,0)=_(FNAME1,0); 
#FN2(C,256,0)=_(FNAME2,0); 
#MES(N,3,0)=_(AEND,0);
$BEG_SCRIPT 
  var CurFile=CreateObject("CurPrnFile"); 
  CurFile.SetFlagBrowse(0); 
  FreeSpaceString(FN1,3,""); FreeSpaceString(FN2,3,""); 
  string FN = FN1 + FN2; 
  if ( access(FN,0) ) FF1 = 0; 
$END_SCRIPT 
$(_EQ(FF1-1)) 
// 
  #Format=_(15,9,70,15,롥 ०,   , ।  䠩 ); 
// 
  $(_EQ(Format-27)) 
    $ 
  $_ 
// 
  $(_EQ(Format)) 
    #FPRINT=_(15,9,70,15, ,  ନ஢ ,   ); 
    $(_EQ(FPRINT-27)) 
      $ 
    $_ 
  $_ 
// 
$_ 
//
$BEG_SCRIPT

  int np = 2;
  var param[np];

  param[0]  = atoi(Format); 
  param[1]  = atoi(FPRINT); 

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

  UnloadScriptModule("forms\\f1_14");

    LoadScriptModule("forms\\f1_14");
    f1(param,np);

  UnloadScriptModule("forms\\f1_14");

$END_SCRIPT
$