T100——作业action执行其他P作业，后台背景执行完后才能继续操作改作业

范例：如axmt500订单，查询开单占用量；

客制作业cxmp500，通过参数-订单号，查询该订单下的料件，目前有库存量、开单占用量、库存可用量，查询后更新到该订单下的单身对应栏位；

现在axmt500上的action动作，后台执行cxmp500，执行完后axmt500数据刷新；

 

axmt500代码：

   DEFINE la_param   RECORD
          prog          STRING,
          actionid      STRING,
          background    LIKE type_t.chr1,
          param         DYNAMIC ARRAY OF STRING
                     END RECORD
   DEFINE ls_js      STRING 
   #    #######add by chenwb 20170221 
    INITIALIZE la_param.* TO NULL
    LET la_param.prog     = 'cxmp500'
    LET la_param.param[1] = g_xmda_m.xmdadocno
    LET la_param.param[2]='T'
    LET la_param.background='Y'
    LET ls_js = util.JSON.stringify(la_param)
    CALL cl_cmdrun_wait(ls_js)
    CALL axmt500_b_fill()

 

 

 

LET g_bgjob = g_argv[02]

#背景(Y) 或半背景(T) 時不做主畫面開窗