TIPTOP内置函数

TIPTOP 内置函数 TIPTOP 内置函数是一组预先定义的函数，旨在提供便捷的开发体验。这些函数涵盖了多个方面，包括程序信息、用户交互、日期计算、字符串处理、权限检查等。 让我们来看看 cl_about 函数。该函数用于显示程序信息，没有输入参数，也不返回任何值。其用法非常简单，只需调用 CALL cl_about() 即可。 cl_anykey 函数允许用户按下任何键继续执行程序。该函数也没有输入参数，不返回任何值。用法同样简单， CALL cl_anykey()。 cl_autotime 函数用于自动累加时间，累加级数为 1。该函数需要三个输入参数：time1 为累加起始时间，sw 为累加类型（H:小时、M:分钟、S:秒钟），lay 为累加级数（默认为 1）。该函数返回累加结果的时间。用法示例：CALL cl_autotime('09:30','H',1)。 cl_batch_proc 函数用于动态产生批次数据处理画面。该函数需要一个输入参数 ps_headers，为表头字符串，中间以逗号分隔。没有返回值。用法示例：LET ls_headers = "img01,img02,img03,img04,imk09" CALL cl_batch_proc(ls_headers)。 cl_cal 函数用于计算日期。该函数需要三个输入参数：p_date 为当前日期、p_month 为增加的月份、p_day 为增加的天数。该函数返回计算结果的日期。用法示例：LET l_date=cl_cal(p_date,p_mm,p_dd)。 cl_chg_comp_att 函数用于更改原有对象的 attribute。该函数需要三个输入参数：ps_field 为欲更改的字段名称、ps_atts 为字段类型属性、ps_values 为字段类型属性值。没有返回值。用法示例：CALL cl_chg_comp_att ("ima01","NOENTRY|ITEMS","1|(1,2,3),(red,blue,green)")。 cl_chg_win_title 函数用于转换程序标题显示。该函数需要一个输入参数 ps_str，为显示字符串。没有返回值。用法示例：CALL cl_chg_win_title(“用户参数设定作业”)。 cl_chk_act_auth 函数用于检查 ACTION 的权限。该函数不需要输入参数，返回值为 1（TRUE）或 0（FALSE）。用法示例：LET g_action_choice = “insert” IF cl_chk_act_auth() THEN ... cl_chk_data_continue 函数用于检查资料是否连续。该函数需要一个输入参数 ps_source，为来源资料。返回值为 1（TRUE）或 0（FALSE）。用法示例：IF NOT cl_chk_data_continue(g_pmw.pmw01[5,10]) THEN ... cl_chk_str_correct 函数用于检查字符串是否符合 0~9,a~z。该函数需要三个输入参数：ps_source 为来源资料、ps_count 为检查几码、li_result 为返回结果。返回值为 1（TRUE）或 0（FALSE）。用法示例：IF NOT cl_chk_data_continue(g_pmw.pmw01[1,3]) THEN ... cl_chkym 函数用于检查文字型态变量是否为年月型态。该函数需要一个输入参数 p_str，为文字型态变量。返回值为 1（TRUE）或 0（FALSE）。用法示例：IF cl_chkym(p_str) THEN ... cl_choice 函数用于让用户输入选择。该函数需要一个输入参数 l_msg，为窗口上显示的说明文字。返回值为用户选择的结果。用法示例：CALL cl_choice(l_msg) RETURNING g_choice。 cl_open_url 函数用于打开指定的 URL。该函数需要一个输入参数，为 URL 字符串。没有返回值。 TIPTOP 内置函数提供了多种便捷的开发函数，涵盖了多个方面，可以帮助开发者快速完成开发任务。