${(1. ன )      
// ଠ  1: । ᫥  ࠧࠬ ࠡ⭮   ५ 2025 .
// ਪ   27.12.2024  696
// ன   室  ० 
// ன -> 5.  ன ⠡    -> >> ⭮  ⨪ -> 8. । ᫥  ५ (ଠ 1)
// 1) ⮫  롮ન  ࠡ⭨ - ⮫  ⠡ 室  ஬ 롨 㬬  . 
//         F2   ⮫  ࠢ筨. 
//        ᫨ 㪠 祭 -1,  롨    ᫥ ஬ 室饣 ⪠
// 2)   롮ન - ᨬ   롨 ᫥.  㬮砭 (*)  ᥬ 㫥.
//        ᮡ ० 롮ન   ⬥祭 3.  ⮬ 砥 롨ࠥ 㬬   3.
// 3) ਧ  㬬 -  롨 㬬: 0 -   ਭ, 1 -   ᫥
// 4)  ⠡   5  - ᫨ 㪠 ᨬ ⠡   5, ࠡ⭨ 㤥 ᪫祭  ࠢ
$}(1. ன )  
&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);
$BEG_SCRIPT
  var CurFile=CreateObject("CurPrnFile");
  CurFile.SetFlagBrowse(0);
  string FN = GetFormXlsName(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\\sp_osd");
  LoadScriptModule("forms\\sp_osd");
    osd(param,np);
  UnloadScriptModule("forms\\sp_osd");

$END_SCRIPT
$