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)