TIPTOP内置函数 收藏
函式名称：cl_about
程序名称：cl_about.4gl
用途：程序信息
传入参数：none
回传值：none
用法：CALL cl_about()
函式名称：cl_anykey
程序名称：cl_anykey.4gl
用途：请按任何键继续
传入参数：p_sw Not used
回传值：none
用法：CALL cl_anykey()
函式名称：cl_autotime
程序名称：cl_autotime.4gl
用途：自动累加时间，累加级数为1
传入参数：time1 累加起始时间
sw 累加类型H:小时M:分钟S:秒钟
lay 累加级数Default = 1
回传值：Time 时间
用法：CALL cl_autotime('09:30','H',1)
函式名称：cl_batch_proc
程序名称：cl_batch_proc.4gl
用途：动态产生批次数据处理画面
传入参数：ps_headers (Table 的Header 字符串，中间以逗号分隔)
回传值：none
用法：LET ls_headers = "img01,img02,img03,img04,imk09"
CALL cl_batch_proc(ls_headers)
函式名称：cl_cal
程序名称：cl_cal.4gl
用途：传入当前日期，要增加的月份及天数取得计算过后的日期
传入参数：p_date 日期
p_month 月份
p_day 日
回传值：l_year,l_month,l_day
用法：LET l_date=cl_cal(p_date,p_mm,p_dd)
函式名称：cl_chg_comp_att
程序名称：cl_chg_comp_att.4gl
用途：更动原有对象的attribute
传入参数：ps_field STRING 欲更动字段名称
ps_atts STRING 字段type 属性
ps_values STRING 字段type 属性值
回传值：none
用法：CALL cl_chg_comp_att
("ima01","NOENTRY|ITEMS","1|(1,2,3),(red,b lue,green)")
函式名称：cl_chg_win_title
程序名称：cl_chg_win_title.4gl
用途： 转换程序Title 显示
传入参数：ps_str 显示字符串
回传值：none
用法：CALL cl_chg_win_title(“用户参数设定作业”)
函式名称：cl_chk_act_auth
程序名称：cl_chk_act_auth.4gl
用途： 检查ACTION 的权限［检查前务必指定g_action_choice 值］
传入参数：none
回传值：1 FOR TRUE 是
0 FOR FALSE 否
用法：LET g_action_choice = “insert”
IF cl_chk_act_auth() THEN
函式名称：cl_chk_data_continue
