T100错误信息提示方式

例如：

                  IF g_browser_cnt =  THEN

                     INITIALIZE g_errparam TO NULL

                     LET g_errparam.extend = ""

                     LET g_errparam.code   = "-100"

                     LET g_errparam.popup  = TRUE

                     CALL cl_err()

                     CLEAR FORM

                  ELSE

                     CALL cxmi101_fetch("F")

                  END IF

LET g_errparam.extend = "" 　　——　　可维护中文、英文等提示，可写入提示内容；

LET g_errparam.code = "-100" 　　——　　是azzi920的错误信息代码

LET g_errparam.popup = TRUE 　　——　　TRUE为弹出错误信息窗口提示，FALSE为在作业界面下面状态栏位置显示（红色字体错误提示）

CALL cl_err()　　——　　调用函数，显示错误信息内容

其次，也可直接使用　　CALL cl_ask_confirm3("axm-00440","")　　函数；

注意，axm-00440 为azzi920错误信息维护作业里的错误代码；

巴特西

T100错误信息提示方式

最新文章

热门文章