pi_construct TRUE 多选数据/FALSE 单选数据回传 回传值：lc_result 开窗值回传

用法：CALL cl_userdefined_field_query(\RETURNING g_ima.imaud02

函式名称：cl_validate 程序名称：cl_validate.4gl

用途：检查行业别字段数据、带出关联字段数据（p_per 设定） 传入参数：none

回传值：li_result TRUE/FALSE

用法：IF NOT cl_validate() THEN NEXT FIELD CURRENT END IF

函式名称：cl_ui_set_init 程序名称：cl_validate.4gl

用途：抓取组件设定值（p_per 行业别字段设定） 传入参数：none

回传值：ls_value 画面上显示的值lc_gav28 基本文件资料检查方式 lc_gav20 动态检查设定lc_gav21 SQL 或函式检查设定 lc_gav29 关联字段抓取方式lc_gav31 关联字段代码

lc_gav22 关联字段动态设定lc_gav23 SQL 或函式抓取方式 lc_gav30 数据重复检查方式lc_gav26 动态数据检查 lc_gav27 SQL 或函式检查设定 用法：CALL cl_ui_set_init()

RETURNING g_ui.g_value,g_ui.g_check_mtd,g_ui.g_check_dym, g_ui.g_check_fun, g_ui.g_refer_mtd,g_ui.g_refer_fld, g_ui.g_refer_dym,g_ui.g_refer_fun,g_ui.g_rpt_mtd, g_ui.g_rpt_dym, g_ui.g_rpt_fun

函式名称：cl_data_check 程序名称：cl_validate.4gl

用途：基本文件数据检查（p_per 行业别字段设定） 传入参数：ps_field 字段代码 pc_value 字段值

回传值：li_result TRUE/FALSE

用法：CALL cl_data_check(\RETURNING li_result

函式名称：cl_repeat_check 程序名称：cl_validate.4gl

用途：数据重复检查（p_per 行业别字段设定） 传入参数：ps_field 字段代码 pc_value 字段值

回传值：li_result TRUE/FALSE

用法：CALL cl_repeat_check(\

RETURNING li_result

函式名称：cl_reference 程序名称：cl_validate.4gl

用途：关联字段值抓取并显示（p_per 行业别字段设定） 传入参数：ps_field 字段代码 pc_value 字段值

回传值：li_result TRUE

用法：CALL cl_reference(\RETURNING li_result

函式名称：cl_qry_string 程序名称：cl_validate.4gl

用途：字段连查（p_per 字段设定） 传入参数：ps_fldname 字段代码 回传值：none

用法：CALL cl_qry_string(\

函式名称：cl_get_table_name 程序名称：cl_validate.4gl

用途：寻找字段在数据库对应的table name 传入参数：ps_fldname 字段代码 回传值：lc_frmname 表格代码

用法：CALL cl_get_table_name(lc_gaq01)