${(1.  )
// ଠ ᡮ ଠ樨  ࠡ⭮  ࠡ⭨ 㤠⢥  㭨樯 ०
// 쬮 㤠 ᨨ  15.03.2021 N 14-5/10/-1949
$}(1.  )
${(2. )
// 
//  室  ⠫ DOCAMBA
// RASCHET\DOCAMBA\ଠ ᡮ ଠ樨  ࠡ⭮ .docx
//
$}(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);
$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\\siozp");
  LoadScriptModule("forms\\siozp");
    siozp(param,np);
  UnloadScriptModule("forms\\siozp");

$END_SCRIPT
$