//  ⮪  ࠧ   ஢.
#CLIN(N,4,0)=_(); #SIZL(N,4,0)=_();
$(_GT(+CLIN+12-SIZL))
  $LF
$_
&obr_ls(N,6,0)=_;
&vib_ls(N,6,0)=_;
&obr_kv(N,6,0)=_;
&vib_kv(N,6,0)=_;
&month_kv(N,6,0)=_;
${(1.ਬ砭  . ன)
// OrdSort >= OrdDepth - 㡨 ࠧ   ॢ 㡨 ஢
//
// OrdDepth ࠭稢 祭 PR_BALANCE (㡨 ࠧ      ஥ ⥬)
//
//  flCheck = 0 ன 稭  SortSrc  OrdSort ⥫쭮 
//
//  OrdDepth > 0  ࠧ ⭮ ⪠     ᪮쪮 ⪮:
//
//     ਡ⠬ 㤥 ஢ ࠧ  :
//   1) 浪 ஢  ⥫ ஥    flCheck = 1
//   2) 浪       ஥ ⥬  flCheck = 0
//
//    砥 ਬ ᮡ⢥ ஥ 浪   (flCheck = 1)
//   㦭 뢠 :
//    ᫥ ஢  ⥬ ਡ⠬    ,  ⮬ 冷
//    易⥫쭮  ᮢ  浪     ஥ ⥬,
//   ..    ⪨ ( ᮮ⢥饩 㬬  )  
//   樨 ਡ⮢      
//
//  OrdSort = OrdDepth  ⪠ ஢  믮.
//
//  OrdSort > OrdDepth  ⪥ 㤥 믮 ப (㯯஢).   ਡ⠬
// 㤥 믮 ஢   浪 ஢.  ⮬  祭 ⠪ ࠧ
//  ⪠   ⮣ (fitPartCheck)
//
//  砥 ᫨ ⮪ ⮨   祬  ⥩ ( ஢  ⪠) 
//  㬬      ⥩ ⪠ ( ⮬ 砥  ਡ⠬   뫠
// 믮 ஢   )  ⮣ 㦨 ன fVedCheck = 1
//
//  砥 ᫨  室  ᪮쪮 㬬    ⪠   ,
//  뫠 믮 ஢  ਡ⠬     , ᫥ 
//  㬬    ⮪ fVedCheck = 0
$}(1.ਬ砭  . ன)
$BEG_SCRIPT

  int np = 6;
  var param[np];
  param[0] = CreateObject("MapString");
  param[1] = atoi(obr_ls);
  param[2] = atoi(vib_ls);
  param[3] = atoi(obr_kv);
  param[4] = atoi(vib_kv);
  param[5] = atoi(month_kv);

  // ᫨ 室 । ᢮ ன  ⭮ :
  // 1.  "᢮" ⮪  ᭮   ⠢
  // 2.  ப  param[0].Add(" 饩 ன ⪠"," 祭"),
  //     ਬ (筮 ᪮஢):
  //param[0].Add("ndflInfo","2,33,15,16,41,7");
  //param[0].Add("prExcel","1");
  //param[0].Add("OrdSD102","3,3");    // OrdSort, OrdDepth
  //param[0].Add("Sort102","1,0,2,3"); // SortSrc, SortPod, SortCom, SortSub
  //param[0].Add("flCheck","1");

  UnloadScriptModule("check\\check102");
  LoadScriptModule("check\\check102");
    MainCheckPar(param,np);
  UnloadScriptModule("check\\check102");

$END_SCRIPT
${(6.ࠢ ⪮  )
$BEG_SCRIPT
  SendKvitokToEmail();//ࠢ塞  
$END_SCRIPT
$}(6.ࠢ ⪮  )
$