//------------- ଠ 56-,  -----------------
${(1. ன )
&bSplitPack(N,2,0)=0; // 1 - 室 ࠧ    窠
#Empty(C,81,0)=R_String(._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._.);
&bSplitPack(N,2,0)=0; // 1 - 室 ࠧ    窠
&bTime(N,2,0)=0;      // 1 - 뢠 ⠢襥 ६, 0 - 業 믮 ࠡ
$}(1. ன )
${(2. )
  #Regim(N,2,0)=_(15,9,65,15,롥 ० , C-1,  -6-1);
$}(2. )
$BEG_SCRIPT
  var CurFile=CreateObject("CurPrnFile");
  CurFile.SetFlagBrowse(0);

  if(!atoi(Regim))
  {
    var array_param[3];
    array_param[0]=2; //⢮ ࠬ஢
    array_param[1]=bSplitPack;
    array_param[2]=0;// 0 - 

    LoadScriptModule("PF\\formpf");
    LoadScriptModule("PF\\XMLtr56FZ");
    LoadScriptModule("PF\\XMLComm");
    LoadScriptModule("PF\\commonpf");
    LoadScriptModule("PF\\FZ56");

    Print56FZ(array_param);
  
    UnloadScriptModule("PF\\FZ56");
    UnloadScriptModule("PF\\formpf");
    UnloadScriptModule("PF\\commonpf");
    UnloadScriptModule("PF\\XMLtr56FZ");
    UnloadScriptModule("PF\\XMLComm");
  }
  else
  {
    var array_param[7];
    array_param[0]=6; //⢮ ࠬ஢
    array_param[1]=8; //⨯  - 
    array_param[2]=1;
    array_param[3]=Empty;
    array_param[4]=Regim;
    array_param[5]=bSplitPack;
    array_param[6]=bTime;

    LoadScriptModule("PF\\formpf");
    //PrintPF_DL( 0, Excel, Empty, Regim, ExcPrint, bSplitPack, bTime );  
    PrintPF_DL2(array_param);
    UnloadScriptModule("PF\\formpf");
  }

$END_SCRIPT
$