// -3 2011-2015 .   
${(1. ன )   
//  㣫 客 
&TOKR(N,2,0)=2; // 0- 㡫; 2- 
&TCOD(N,2,0)=1; // 0-஢ ANSI (1251); 1-஢ UTF-8 (65001)
$}(1. ன )   
&SOKR(N,2,0)=0; // 0-㬬  ਮ 㣫 ⤥쭮   
//                 1-㣫 㬬  , 㬬  ਮ ᪫뢠  㣫 㬬     
&VSTR(N,2,0)=1; //0-祭 祭  㬬 ᮢ      
//                1-        
// ᮡ ᫥    ᮢ   
&VDOK(N,2,0)=1; // 0- ᪫뢠  㬬 祭      
//                 1-   祭  祭   砫 ਮ + 祭   ᫥ ⠫   
&Format(N,2,0)=0;   
&FPRINT(N,2,0)=1;   
#MES(N,3,0)=_(AEDAT,0);    
#FF1(N,3,0)=_(FFIRST,0);   
#FN1(C,256,0)=_(FNAME1,0);   
#FN2(C,256,0)=_(FNAME2,0);   
&FP2015(N,2,0)=0; //  뢠  㣮 2015 : 0-  ଥ; 1- ன ଥ   
$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))   
//   
  $(_EQ(IKRT))   
    #Format=_(15,9,70,15,롥 ०,   , ।  䠩 );   
  $   
    &Format=0;   
  $_   
//   
  $(_EQ(Format-27))   
    $   
  $_   
//   
  $(_EQ(Format))   
    #FPRINT=_(15,9,70,15, ,  ନ஢ ,   );   
    $(_EQ(FPRINT-27))   
      $   
    $_   
  $_   
//   
$_   
//   
$BEG_SCRIPT   
   
  FP2015 = GetCommonCnfInt("FP2015","rsv1");   
   
  int np = 7;   
  var param[np];   
   
  param[0] = atoi(Format);   
  param[1] = atoi(FPRINT);   
  param[2] = atoi(VSTR);   
  param[3] = atoi(SOKR);   
  param[4] = atoi(VDOK);   
  param[5] = atoi(TOKR);   
  param[6] = atoi(TCOD);   
   
  UnloadScriptModule("dmodules");   
  LoadScriptModule("dmodules");   
    UnloadDynamicModules();   
  UnloadScriptModule("dmodules");   
   
  UnloadScriptModule("forms\\rv3_11");   
  UnloadScriptModule("forms\\rv3_15");   
   
  if ( atoi(MES) < 330 || atoi(FP2015) ) LoadScriptModule("forms\\rv3_11");   
  else                                   LoadScriptModule("forms\\rv3_15");   
   
  rv3m(param,np);   
   
  UnloadScriptModule("forms\\rv3_11");   
  UnloadScriptModule("forms\\rv3_15");   
   
$END_SCRIPT   
$