今天在客制批次作业的时候,有很多部分需要用到弹窗的效果,特此记录一下
执行弹窗
在方法的执行的过程中,我们可以根据执行的情况可以设定弹窗提示使用者程式运行的情况,其中包括两种
- 失败
- 成功
其中最常用的是报错弹窗
报错
INITIALIZE g_errparam TO NULL #将报错的信息初始化
LET g_errparam.code = '!' #此处可以输入错误的编号(azzi920)也可以直接用!表示
LET g_errparam.extend = '报错信息'#此处可以自定义报错的信息
LET g_errparam.popup = TRUE #是否弹窗,TURE为是,FALSE为否
CALL cl_err() #执行报错弹窗
其中的code可以在azzi920中维护,格式如下
这样后来者可以根据编号在作业中找到该报错的具体信息
成功
在批处理作业的debugger的过程中,发现了一些执行成功,反馈的弹窗。
下面介绍其中一种,用法如下
CALL cl_ask_confirm3("","执行成功")
在设计器中使用ctrl+i可以获取到对应程式的信息
############################################################
#+ @code
#+ 函式目的 確認畫面
#+ @param ps_msg STRING 訊息字串或訊息代碼
#+ @param ps_msg2 STRING 訊息字串
#+
############################################################
PUBLIC FUNCTION cl_ask_confirm3(ps_msg,ps_msg2)
根据批次作业代码顺延下去,发现其中ps_msg中的编码也是在azzi920定义的
格式如下
还有很多的弹窗方法可以根据cl_ask去在程式下载中搜索出来