itpop內(nèi)置函數(shù)大全.docx

TIPTOP內(nèi)置函數(shù) 收藏1.函式名稱(chēng)：cl_about 程序名稱(chēng)：cl_about.4gl 用途：程序信息 傳入?yún)?shù)：none 回傳值：none 用法：CALL cl_about()2.函式名稱(chēng)：cl_anykey 程序名稱(chēng)：cl_anykey.4gl 用途：請(qǐng)按任何鍵繼續(xù) 傳入?yún)?shù)：p_sw Not used 回傳值：none 用法：CALL cl_anykey()3.函式名稱(chēng)：cl_autotime 程序名稱(chēng)：cl_autotime.4gl 用途：自動(dòng)累加時(shí)間，累加級(jí)數(shù)1 傳入?yún)?shù)：time1 累加起始時(shí)間 sw 累加類(lèi)型H:小時(shí)M:分鐘S:秒鐘 lay 累加級(jí)數(shù)Default = 1 回傳值：Time 時(shí)間 用法：CALL cl_autotime(09:30,H,1)4.函式名稱(chēng)：cl_batch_proc 程序名稱(chēng)：cl_batch_proc.4gl 用途：動(dòng)態(tài)產(chǎn)生批次數(shù)據(jù)處理畫(huà)面 傳入?yún)?shù)：ps_headers (Table 的Header 字符串，中間以逗號(hào)分隔) 回傳值：none 用法：LET ls_headers = img01,img02,img03,img04,imk09 CALL cl_batch_proc(ls_headers)5.函式名稱(chēng)：cl_cal 程序名稱(chēng)：cl_cal.4gl 用途：傳入當(dāng)前日期，要增加的月份及天數(shù)取得計(jì)算過(guò)后的日期 傳入?yún)?shù)：p_date 日期 p_month 月份 p_day 日 回傳值：l_year,l_month,l_day 用法：LET l_date=cl_cal(p_date,p_mm,p_dd)6.函式名稱(chēng)：cl_chg_comp_att 程序名稱(chēng)：cl_chg_comp_att.4gl 用途：更動(dòng)原有對(duì)象的attribute 傳入?yún)?shù)：ps_field STRING 欲更動(dòng)字段名稱(chēng) 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)7.函式名稱(chēng)：cl_chg_win_title 程序名稱(chēng)：cl_chg_win_title.4gl 用途： 轉(zhuǎn)換程序Title 顯示 傳入?yún)?shù)：ps_str 顯示字符串 回傳值：none 用法：CALL cl_chg_win_title(“用戶參數(shù)設(shè)定作業(yè)”)8.函式名稱(chēng)：cl_chk_act_auth 程序名稱(chēng)：cl_chk_act_auth.4gl 用途： 檢查ACTION 的權(quán)限檢查前務(wù)必指定g_action_choice 值 傳入?yún)?shù)：none 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：LET g_action_choice = “insert” IF cl_chk_act_auth() THEN9.函式名稱(chēng)：cl_chk_data_continue 程序名稱(chēng)：cl_chk_data_continue.4gl 用途： 檢查資料是否連續(xù) 傳入?yún)?shù)：ps_source STRING 來(lái)源資料 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF NOT cl_chk_data_continue(g_pmw.pmw015,10) THEN10.函式名稱(chēng)：cl_chk_str_correct 程序名稱(chēng)：cl_chk_data_continue.4gl 用途：檢查字符串是否符合09,az 傳入?yún)?shù)：ps_source STRING 來(lái)源資料 ps_count SMALLINT 檢查幾碼，如果未傳幾碼，則會(huì)以 來(lái)源字符串長(zhǎng)度當(dāng)作ps_count li_result SMALLINT 回傳結(jié)果 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF NOT cl_chk_data_continue(g_pmw.pmw011,3) THEN11.函式名稱(chēng)：cl_chkym 程序名稱(chēng)：cl_chkym.4gl 用途：檢查文字型態(tài)變量是否為年月型態(tài) 傳入?yún)?shù)：p_str CHAR(6) 文字型態(tài)變量 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF cl_chkym(p_str)函式名稱(chēng)：cl_choice 程序名稱(chēng)：cl_choice.4gl 用途：讓用戶輸入選擇 傳入?yún)?shù)：l_msg CHAR(100) 窗口上顯示的說(shuō)明文字 回傳值：l_choice 用法：CALL cl_choice(l_msg) RETURNING g_choice函式名稱(chēng)：cl_open_url 程序名稱(chēng)：cl_client_app.4gl 用途：藉由explorer 開(kāi)啟傳入的網(wǎng)址 傳入?yún)?shù)：ps_url STRING 網(wǎng)址 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：CALL cl_open_url(http:/www)函式名稱(chēng)：cl_open_doc 程序名稱(chēng)：cl_client_app.4gl 用途：開(kāi)啟檔案 傳入?yún)?shù)：ps_doc STRING 檔案位置 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：CALL cl_open_doc(C:/tiptop/tiptop.txt)函式名稱(chēng)：cl_open_prog 程序名稱(chēng)：cl_client_app.4gl 用途：藉由指定的程序開(kāi)啟檔案 傳入?yún)?shù)：ps_prog STRING 程序工具 ps_arg STRING 檔案位置 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：CALL cl_open_prog(C:/Editor.exe, C:/tiptop/tiptop.txt)函式名稱(chēng)：cl_close 程序名稱(chēng)：cl_close.4gl 用途：詢問(wèn)此筆資料是否確定結(jié)案(Y/N)： 或此筆資料是否取消結(jié)案(Y/N)： 傳入?yún)?shù)：p_row,p_col 無(wú)作用，傳入0,0 即可 p_old_acticode 傳入Y 代表訊息為取消結(jié)案；N 代表確定結(jié)案 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF cl_close(0,0,”Y”)函式名稱(chēng)：cl_cmdask 程序名稱(chēng)：cl_cmdask.4gl 用途：詢問(wèn)用戶欲執(zhí)行的程序，并執(zhí)行之 傳入?yún)?shù)：none 回傳值：none 用法：CALL cl_cmdask()函式名稱(chēng)：cl_cmdat 程序名稱(chēng)：cl_cmdat.4gl 用途：指定時(shí)間延后執(zhí)行UNIX 指令 傳入?yún)?shù)：p_time 指定時(shí)間 p_cmd UNIX 指令 回傳值：none 用法：CALL cl_cmdat(p_code,p_time,p_cmd)函式名稱(chēng)：cl_cmdrun 程序名稱(chēng)： 用途：執(zhí)行UNIX 指令 傳入?yún)?shù)：ps_cmd 程序代碼或UNIX 執(zhí)行指令 回傳值：none 用法：CALL cl_cmdrun(axmq450)函式名稱(chēng)：cl_cmdrun_wait 程序名稱(chēng)： 用途：執(zhí)行UNIX 指令，需等待此指令結(jié)束后才可繼續(xù)原程序的執(zhí)行 傳入?yún)?shù)：ps_cmd 程序代碼或UNIX 執(zhí)行指令 回傳值：none 用法：LET l_cmd=axmp800 ,g_oea.oea01, ,g_oea.oea905, CALL cl_cmdrun_wait(l_cmd)函式名稱(chēng)：cl_cmmsg 程序名稱(chēng)：cl_cmmsg.4gl 用途：顯示異動(dòng)更新成功訊息 傳入?yún)?shù)：p_code 訊息種類(lèi)1 及4 代表異動(dòng)更新完成 2 及3 代表此張單據(jù)異動(dòng)更新完成 回傳值：none 用法：CALL cl_cmmsg(1)函式名稱(chēng)：cl_conf3 程序名稱(chēng)：cl_conf3.4gl 用途：根據(jù)MESSAGE CODE 取出正確訊息，詢問(wèn) 配合發(fā)票的使用，本作業(yè)允許用戶不輸入數(shù)據(jù) 傳入?yún)?shù)：p_row,p_col 無(wú)作用 p_msgcode 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF cl_conf(0,0,p_msgcode) THEN函式名稱(chēng)：cl_confirm 程序名稱(chēng)：cl_confirm.4gl 用途：依照訊息代碼將數(shù)據(jù)顯示在畫(huà)面上，詢問(wèn)是否 傳入?yún)?shù)：ps_msg 訊息代碼或訊息字符串 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF (cl_confirm(agl-021) THEN函式名稱(chēng)：cl_cont 程序名稱(chēng)：cl_cont.4gl 用途：詢問(wèn)是否繼續(xù)執(zhí)行本作業(yè)(Y/N)： 傳入?yún)?shù)：p_row,p_col 無(wú)作用 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF cl_cont(0,0) THEN函式名稱(chēng)：cl_create_4sm 程序名稱(chēng)：cl_create_4sm.4gl 用途：產(chǎn)生udm_tree 所需要的StartMenu 檔案 傳入?yún)?shù)：pc_menu_root StartMenu 的根節(jié)點(diǎn) pi_rebuild 是否需要重新覆蓋已存在的4sm 檔案 回傳值：none 用法：CALL cl_create_4sm(m01, TRUE)函式名稱(chēng)：cl_create_qry 程序名稱(chēng)：cl_create_qry.4gl 用途：動(dòng)態(tài)產(chǎn)生窗口以供查詢，并回傳查詢結(jié)果 傳入?yún)?shù)：none 回傳值：ms_ret1,ms_ret2,ms_ret3 回傳數(shù)目依照對(duì)應(yīng)的回傳字段數(shù) 用法：CALL cl_create_qry() RETURNING g_oea.oea14函式名稱(chēng)：cl_dynamic_qry 程序名稱(chēng)：cl_create_qry.4gl 用途：自定義/行業(yè)別字段動(dòng)態(tài)產(chǎn)生開(kāi)窗功能，并回傳查詢結(jié)果 傳入?yún)?shù)：none 回傳值：ms_ret1,ms_ret2,ms_ret3 回傳數(shù)目依照對(duì)應(yīng)的回傳字段數(shù) 用法：CALL cl_dynamic_qry() RETURNING g_oea.oeaida001函式名稱(chēng)：cl_days 程序名稱(chēng)：cl_days.4gl 用途：取得該年月的天數(shù) 傳入?yún)?shù)：p_year 年份 p_month 月份 回傳值：l_days 天數(shù) 用法：let l_days=cl_days(p_yy,p_mm)函式名稱(chēng)：cl_delb 程序名稱(chēng)：cl_delb.4gl 用途：詢問(wèn)是否確定取消此筆單身資料(Y/N)： (for 單文件建文件程序單身取消功能ON KEY F2) 傳入?yún)?shù)：p_row,p_col 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF cl_delb(0,0) THEN函式名稱(chēng)：cl_delete 程序名稱(chēng)：cl_delete.4gl 用途：詢問(wèn)是否刪除此筆資料？ 傳入?yún)?shù)：none 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：IF (cl_delete() THEN函式名稱(chēng)：cl_delh 程序名稱(chēng)：cl_delh.4gl 用途：詢問(wèn)是否確定刪除此筆單頭及所有單身數(shù)據(jù)(Y/N)： (for 單文件建文件程序單頭刪除功能) 傳入?yún)?shù)：p_row,p_col 回傳值：1 FOR TRUE 是 0 FOR FALSE 否 用法：if cl_delh(0,0) 函式名稱(chēng)：cl_delh1程序名稱(chēng)：cl_delh1.4gl用途：詢問(wèn)是否確定取消此筆單頭及所有單身數(shù)據(jù)(Y/N)：(for 單文件建文件程序單頭取消功能)傳入?yún)?shù)：p_row,p_col回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：if cl_delh1(0,0)函式名稱(chēng)：cl_detail_input_auth程序名稱(chēng)：cl_detail_input_auth.4gl用途：檢查是否允許在單身中有insert 或delete 的權(quán)限傳入?yún)?shù)：ps_act_type STRING 要檢查的字符串（insert/delete）回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：CALL cl_detail_input_auth(insert)函式名稱(chēng)：cl_digcut程序名稱(chēng)：cl_digcut.4gl用途：將數(shù)值依指定的小數(shù)位數(shù)做四舍五入傳入?yún)?shù)：p_value 數(shù)值p_digit 允許小數(shù)位數(shù)回傳值：p_value 四舍五入后的數(shù)值用法：LET a = cl_digcut(p_value,p_digit)函式名稱(chēng)：cl_doc程序名稱(chēng)：cl_doc.4gl用途：相關(guān)檔案維護(hù)傳入?yún)?shù)：none回傳值：none用法：LET g_doc.column1 = oea01LET g_doc.value1 = g_oea.oea01CALL cl_doc()函式名稱(chēng)：cl_dynamic_locale程序名稱(chēng)：cl_dynamic_locale.4gl用途：動(dòng)態(tài)轉(zhuǎn)換畫(huà)面語(yǔ)言別傳入?yún)?shù)：none回傳值：none用法：CALL cl_dynamic_locale()函式名稱(chēng)：cl_end程序名稱(chēng)：cl_end.4gl用途：顯示作業(yè)結(jié)束，請(qǐng)按任何鍵繼續(xù)：傳入?yún)?shù)：p_row,p_col 無(wú)作用回傳值：none用法：CALL cl_end(0,0)函式名稱(chēng)：cl_end2程序名稱(chēng)：cl_end2.4gl用途：顯示執(zhí)行結(jié)果，并詢問(wèn)是否要繼續(xù)作業(yè)傳入?yún)?shù)：p_code （1 代表成功，2 代表失敗）回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：CALL cl_end2(1) RETURNING l_flag函式名稱(chēng)：cl_err程序名稱(chēng)：cl_err.4gl用途：顯示錯(cuò)誤訊息傳入?yún)?shù)：p_msg 錯(cuò)誤訊息的附加說(shuō)明err_code 錯(cuò)誤訊息代碼p_n 顯示錯(cuò)誤訊息后的停留秒數(shù)或是等用戶按下確定0 ：不開(kāi)啟訊息窗口，只在狀態(tài)列顯示 1 ：停留秒數(shù)1 ：開(kāi)啟訊息窗口等待用戶確定回傳值：none用法：CALL cl_err(p_msg,err_code,p_n)函式名稱(chēng)：cl_err_msg程序名稱(chēng)：cl_err_msg.4gl用途：顯示錯(cuò)誤訊息傳入?yún)?shù)：ps_title 錯(cuò)誤訊息的附加說(shuō)明ps_err_code 錯(cuò)誤訊息代碼ps_replace_arg 欲替換的訊息字符串，以”| ”分隔字符串pi_idle_sec idle 秒數(shù)0 ：不開(kāi)啟訊息窗口，只在狀態(tài)列顯示 1 ：停留秒數(shù)1 ：開(kāi)啟訊息窗口等待用戶確定回傳值：none用法：CALL cl_err_msg(Warning,1000,NULL,1)函式名稱(chēng)：cl_err3程序名稱(chēng)：用途：顯示數(shù)據(jù)庫(kù)處理后的錯(cuò)誤訊息（insert/update/delete/select）傳入?yún)?shù)：Type 訊息的類(lèi)型（ins、del、upd、sel）Tables 處理的table 代碼Key1 Key1 的valueKey2 Key2 的valueDescription 額外訊息（訊息代碼/訊息字符串）Action 訊息Action 代碼（未來(lái)延伸功能，可不傳）Mark 按下更多按鍵時(shí)顯示的訊息Open 是否開(kāi)窗（0/1）回傳值：none用法：CALL cl_err3(ins,azb_file,g_azb01,SQLCA.sqlcode,0)函式名稱(chēng)：cl_err_msg_log程序名稱(chēng)：cl_err_msg.4gl用途：紀(jì)錄錯(cuò)誤訊息傳入?yún)?shù)：none回傳值：none用法：WHENEVER ERROR CALL cl_err_msg_log函式名稱(chēng)：cl_exp程序名稱(chēng)：cl_exp.4gl用途：詢問(wèn)此筆資料是否確定無(wú)效(Y/N)：或此筆資料是否恢復(fù)有效(Y/N)：(for 單文件建文件無(wú)效功能)傳入?yún)?shù)：p_row,p_colp_old_acticode 有效碼Y/N回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：IF cl_exp(0,0,g_pmw.pmwacti) THEN函式名稱(chēng)：cl_export_to_excel程序名稱(chēng)：cl_export_to_excel.4gl用途：傳入?yún)?shù)：n 畫(huà)面的根節(jié)點(diǎn)組件ui.Interface.getRootNode()t、t1、t2 單身的數(shù)據(jù)若有兩個(gè)以上的單身才會(huì)用到t1、t2回傳值：none用法：CALL cl_export_to_excel(ui.Interface.getRootNode(),base.TypeInfo.create(g_pmx),)函式名稱(chēng)：cl_facfor程序名稱(chēng)：cl_facfor.4gl用途：將INPUT DECLIAM(16,8) 數(shù)值轉(zhuǎn)為9 位字符的格式若值為12345678 , 將傳回12345678若值為1234567 , 將傳回1234567.0若值為123456 , 將傳回123456.00若值為12345.67 , 將傳回12345.670若值為1.234567 , 將傳回1.2345670若值為.1234567 , 將傳回.12345670傳入?yún)?shù)：p_fac 數(shù)值回傳值：l_str FORMAT 后的數(shù)值，以CHAR 型態(tài)RETURN用法：LET a = cl_facfor(p_fac); PRINT aPRINT cl_facfor(p_fac)函式名稱(chēng)：cl_field_format程序名稱(chēng)：cl_field_format.4gl用途：轉(zhuǎn)換p_per 內(nèi)自由格式設(shè)定的format傳入?yún)?shù)：ps_currency CHAR(04) 當(dāng)前無(wú)用處pc_frm_name CHAR(10) 畫(huà)面檔名回傳值：none用法：CALL cl_field_format(g_aza.aza17, mc_frm_name)函式名稱(chēng)：cl_fld_doc程序名稱(chēng)：cl_fld_doc.4gl用途：字段的相關(guān)檔案維護(hù)傳入?yún)?shù)：ps_field STRING 字段名稱(chēng)回傳值：url 檔案的URL用法：CALL cl_fld_doc(ima01)函式名稱(chēng)：cl_fldhelp程序名稱(chēng)：cl_fldhelp.4gl用途：顯示字段說(shuō)明傳入?yún)?shù)：g_frm_name 畫(huà)面檔名稱(chēng)g_fld_name 字段名稱(chēng)g_lang 語(yǔ)言別回傳值：none用法：CALL cl_fldhelp(g_frm_name,g_fld_name,g_lang)函式名稱(chēng)：cl_flow_notify程序名稱(chēng)：cl_flow_notify.4gl用途：透過(guò)JavaMail 傳送工作流程通知傳入?yún)?shù)：ps_doc_no STRING 單據(jù)編號(hào)pc_state CHAR(1) 功能類(lèi)別(I.新增U.更改D.刪除Y.確認(rèn)S.過(guò)帳V.作廢)回傳值：none用法：CALL cl_flow_notify(g_pmw.pmw01,I)函式名稱(chēng)：cl_forupd_sql程序名稱(chēng)：cl_forupd_sql.4gl用途：判斷SELECT . FOR UPDATE 是否加上其它語(yǔ)法(byDatabase)傳入?yún)?shù)：ps_forupd_sql STRING 原傳入SQL 字符串回傳值：ps_forupd_sql STRING 調(diào)整過(guò)的SQL 字符串用法：CALL cl_forupd_sql(ps_forupd_sql)函式名稱(chēng)：cl_get_column_info程序名稱(chēng)：cl_get_column_info.4gl用途：取得字段型態(tài)及長(zhǎng)度傳入?yún)?shù)：p_tabname TABLE 名稱(chēng)p_colname 字段名稱(chēng)回傳值：字段型態(tài)not null FOR TRUE：有回傳值：null FOR FALSE：否長(zhǎng)度not null FOR TRUE：有回傳值：null FOR FALSE：否用法：CALL cl_get_column_info(p_tabname,p_colname)RETURNING l_coldatatype,l_collength函式名稱(chēng)：cl_get_feldname程序名稱(chēng)：cl_get_feldname.4gl用途：依字段代碼取出系統(tǒng)字段名稱(chēng)設(shè)定維護(hù)作業(yè)(p_feldname)內(nèi)的字段名稱(chēng)傳入?yún)?shù)：p_gaq01 字段代碼p_lang 語(yǔ)言別回傳值：l_gaq03 字段說(shuō)明用法：LET g_msg = cl_get_feldname(p_gaq01,p_lang)函式名稱(chēng)：cl_get_progdesc程序名稱(chēng)：cl_get_progdesc.4gl用途：取得程序代碼說(shuō)明(若有客制碼=Y的優(yōu)先回傳)傳入?yún)?shù)：p_gaz01 程序代碼p_lang 語(yǔ)言別回傳值：l_gaz03 程序代碼說(shuō)明用法：LET g_msg = cl_get_progdesc(g_prog,p_lang)函式名稱(chēng)：cl_getmsg程序名稱(chēng)：cl_getmsg.4gl用途：依訊息代碼取出系統(tǒng)錯(cuò)誤訊息文件(ze_file)內(nèi)的錯(cuò)誤訊息傳入?yún)?shù)：p_code 訊息代碼p_lang 語(yǔ)言別回傳值：l_msg 錯(cuò)誤訊息.用法：LET g_msg = cl_getmsg(p_code,p_lang)函式名稱(chēng)：cl_insert_top_menu程序名稱(chēng)：cl_insert_top_menu.4gl用途：插入TopMenu傳入?yún)?shù)：pc_prog CHAR(10) 程序代號(hào)回傳值：none用法：CALL cl_insert_top_menu(NULL)函式名稱(chēng)：cl_itemname_by_lang程序名稱(chēng)：cl_itemname_by_lang.4gl用途：多語(yǔ)言記錄功能查詢傳入?yún)?shù)：l_gbc01 檔案代碼(Table ID) zx_filel_gbc02 字段代碼zx02l_gbc03 KEY 值序列，多組時(shí)以，隔開(kāi)001l_gbc04 語(yǔ)言別g_langl_gbc05 數(shù)據(jù)多語(yǔ)言名稱(chēng)中文名稱(chēng)回傳值：lc_gbc05 對(duì)應(yīng)語(yǔ)言別的名稱(chēng)用法：CALL cl_itemname_by_lang(ima_file,ima02,g_ima.ima01CLIPPED,g_lang,g_ima.ima02) RETURNING g_ima.ima02函式名稱(chēng)：cl_load_act_list程序名稱(chēng)：cl_load_act_list.4gl用途：載入ActionList 程序所屬的4ad，ex. axmt410.4ad傳入?yún)?shù)：ps_prog STRING 程序代號(hào)回傳值：none用法：CALL cl_load_act_list(NULL)函式名稱(chēng)：cl_load_act_sys程序名稱(chēng)：cl_load_act_sys.4gl用途：加載ActionList 系統(tǒng)標(biāo)準(zhǔn)的4ad，tiptop.4ad傳入?yún)?shù)：ps_prog STRING 程序代號(hào)回傳值：none用法：CALL cl_load_act_sys(NULL)函式名稱(chēng)：cl_load_action_view程序名稱(chēng)：cl_load_action_view.4gl用途：載入TopMenu 與ToolBar傳入?yún)?shù)：none回傳值：none用法：CALL cl_load_action_view()函式名稱(chēng)：cl_load_style_list程序名稱(chēng)：cl_load_style_list.4gl用途：載入StyleList傳入?yún)?shù)：ps_prog STRING 程序代號(hào)回傳值：none用法：CALL cl_load_style_list(NULL)函式名稱(chēng)：cl_msgany程序名稱(chēng)：cl_msgany.4gl用途：顯示訊息，然后按任何鍵繼續(xù)傳入?yún)?shù)：p_row,p_col 無(wú)作用p_msg 訊息代碼回傳值：none用法：CALL cl_prompt(0,0,l_msg)函式名稱(chēng)：cl_navigator_setting程序名稱(chēng)：cl_navigator_setting.4gl用途：設(shè)定ToolBar 上瀏覽上下筆數(shù)據(jù)的按鈕狀態(tài)傳入?yún)?shù)：pi_curr_index 當(dāng)前Cursor 索引值pi_row_count 資料筆數(shù)回傳值：none用法：CALL cl_navigator_setting( g_curs_index, g_row_count )函式名稱(chēng)：cl_null程序名稱(chēng)：cl_null.4gl用途：檢查字符串是否為Null 或是空字符串傳入?yún)?shù)：ps_source （來(lái)源字符串）回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：IF NOT cl_null(g_pmxl_ac.pmx02) THEN函式名稱(chēng)：cl_numchk程序名稱(chēng)：cl_numchk.4gl用途：檢查p_str 是否為數(shù)值型態(tài)傳入?yún)?shù)：p_str 欲檢查字符串p_len 檢查的長(zhǎng)度回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：IF cl_numchk(p_str,p_len) THEN函式名稱(chēng)：cl_numfor程序名稱(chēng)：cl_numfor.4gl用途：將數(shù)值依指定的打印長(zhǎng)度及小數(shù)字?jǐn)?shù)做FORMAT，以便打印若值為0，將傳回0.00，并非空白傳入?yún)?shù)：p_value 數(shù)值p_len 允許打印長(zhǎng)度回傳值：l_str FORMAT 后的數(shù)值，以CHAR 型態(tài)RETURN用法：LET a = cl_numfor(amt,17)；PRINT a函式名稱(chēng)：cl_numfor3程序名稱(chēng)：cl_numfor3.4gl用途：將數(shù)值不須的小數(shù)位數(shù)不打印出傳入?yún)?shù)：p_value 數(shù)值回傳值：l_str FORMAT 后的數(shù)值，以CHAR 型態(tài)RETURN用法：LET a = cl_numfor3(amt,13)；PRINT a函式名稱(chēng)：cl_on_idle程序名稱(chēng)：cl_on_idle.4gl用途：在ON IDLE 時(shí)的處理傳入?yún)?shù)：none回傳值：none用法：CALL cl_on_idle()函式名稱(chēng)：cl_opmsg程序名稱(chēng)：cl_opmsg.4gl用途：顯示操作方法于狀態(tài)列操作方法著重于FUNCTION 鍵的使用傳入?yún)?shù)：p_op_type 操作型態(tài)a:新增,u:更改,q:查詢b:單身處理,w:多欄查詢,p:打印條件選擇回傳值：none用法：CALL cl_opmsg(q)函式名稱(chēng)：cl_outnam程序名稱(chēng)：cl_outnam.4gl用途：賦予一個(gè)報(bào)表文件代號(hào)(Disk File Name)傳入?yún)?shù)：p_code 報(bào)表程序代號(hào)回傳值：p_name 報(bào)表文件代號(hào)用法：call cl_outnam(p_code) RETURNING l_name函式名稱(chēng)：cl_parse程序名稱(chēng)：cl_parse.4gl用途：將MATCHES xyz 的指令轉(zhuǎn)成ORACLE 的IN (x,y,z)傳入?yún)?shù)：p_type 欲轉(zhuǎn)換的字符串回傳值：l_str 轉(zhuǎn)換過(guò)后的字符串用法：CALL cl_parse(ls_str)函式名稱(chēng)：cl_pause程序名稱(chēng)：cl_pause.4gl用途：請(qǐng)按Enter 繼續(xù)傳入?yún)?shù)：none回傳值：none用法：IF cl_pause()函式名稱(chēng)：cl_progress_bar程序名稱(chēng)：cl_progress_bar.4gl用途：開(kāi)啟作業(yè)處理進(jìn)度畫(huà)面?zhèn)魅雲(yún)?shù)：pi_total_count 處理作業(yè)總次數(shù)回傳值：none用法：CALL cl_progress_bar(3)函式名稱(chēng)：cl_progressing程序名稱(chēng)：cl_progress_bar.4gl用途：顯示當(dāng)前處理進(jìn)度傳入?yún)?shù)：ps_log 正在處理的作業(yè)說(shuō)明回傳值：none用法：CALL cl_progressing(Create : )函式名稱(chēng)：cl_prompt程序名稱(chēng)：cl_prompt.4gl用途：詢問(wèn)l_msg傳入?yún)?shù)：p_row,p_col 無(wú)作用l_msg 顯示于窗口上的說(shuō)明回傳值：1 FOR TRUE 是0 FOR FALSE 否用法：IF cl_prompt(0,0,l_msg) THEN函式名稱(chēng)：cl_prt程序名稱(chēng)：cl_prt.4gl用途：詢問(wèn)用戶以何種方式處理報(bào)表文件傳入?yún)?shù)：p_name 報(bào)表文件名稱(chēng)p_prtway 打印方式p_copies 打印份數(shù)p_len 報(bào)表長(zhǎng)度回傳值：none用法：CALL cl_prt(l_name, ,1,g_len)函式名稱(chēng)：cl_qbe_init程序名稱(chēng)：用途：預(yù)設(shè)QBE 及g_qbe_code 的值傳入?yún)?shù)：none回傳值：none用法：CALL cl_qbe_init()函式名稱(chēng)：cl_qbe_select程序名稱(chēng)：用途：開(kāi)啟QBE 查詢條件列表及顯示條件于畫(huà)面上傳入?yún)?shù)：none回傳值：none用法：CALL cl_qbe_select()函式名稱(chēng)：cl_qbe_list程序名稱(chēng)：用途：QBE 查詢條件列表傳入?yún)?shù)：none回傳值：g_qbe_code 條件序號(hào)用法：CALL cl_qbe_list() RETURNING lc_qbe_sn函式名稱(chēng)：cl_qbe_display_condition程序名稱(chēng)：用途：顯示QBE 查詢條件于畫(huà)面上傳入?yún)?shù)：pc_gbm01 條件序號(hào)回傳值：none用法：CALL cl_qbe_display_condition(lc_qbe_sn)函式名稱(chēng)：cl_qbe_save程序名稱(chēng)：用途：QBE 查詢條件儲(chǔ)存?zhèn)魅雲(yún)?shù)：none回傳值：none用法：CALL cl_qbe_save()函式名稱(chēng)：cl_qzx程序名稱(chēng)：cl_qzx.4gl用途：對(duì)g_user 提供可執(zhí)行程序的窗口查詢傳入?yún)?shù)：p_row,p_col 無(wú)作用p_key 用戶基本檔代碼回傳值：p_key 用戶基本檔代碼用法：call cl_qzx(0,0,p_key) returning p_key函式名稱(chēng)：cl_rbmsg程序名稱(chēng)：cl_rbmsg.4gl用途：顯示ROLLBACKWORK 訊息傳入?yún)?shù)：p_code 訊息種類(lèi)1 代表異動(dòng)更新不成功2 及3 代表此張單據(jù)異動(dòng)更新不成功4 代表更新不成功回傳值：none用法：CALL cl_rbmsg(1)函式名稱(chēng)：cl_repcon程序名稱(chēng)：cl_repcon.4gl用途：詢問(wèn)特殊打印條件傳入?yún)?shù)：p_pdate 制表日期p_towhom 報(bào)表收受單位或人員p_lang 選擇打印語(yǔ)言別p_bgjob 是否延后執(zhí)行本作業(yè)p_time 執(zhí)行時(shí)間p_prtway 選擇打印方式p_copies 打印份數(shù)回傳值：p_pdate 制表日期p_towhom 報(bào)表收受單位或人員p_lang 選擇打印語(yǔ)言別p_bgjob 是否延后執(zhí)行本作業(yè)p_time 執(zhí)行時(shí)間p_prtway 選擇打印方式p_copies 打印份數(shù)用法：CALL cl_repcon(p_row,p_col,p_pdate,p_towhom,p_lang,p_bgjob,p_time,p_prtway,p_copies) Returning p_row,p_col,p_pdate,p_towhom,p_lang,p_bgjob,p_time,p_prtway,p_copies函式名稱(chēng)：cl_replace_str程序名稱(chēng)：cl_replace_str.4gl用途：取代字符串傳入?yún)?shù)：ps_source STRING 來(lái)源字符串ps_old STRING 要被換掉的舊字符串ps_new STRING 要換成的新字符串回傳值：ls_result STRING 取代后的新字符串用法：CALL cl_replace_str(abcdefg, cde, WXYZ) RETURNINGls_new函式名稱(chēng)：cl_replace_str_by_index程序名稱(chēng)：cl_replace_str_by_index.4gl用途：依據(jù)索引位置取代字符串傳入?yún)?shù)：ps_source STRING 來(lái)源字符串pi_from SMALLINT 起始索引位置pi_end SMALLINT 結(jié)束索引位置ps_new STRING 要換成的新字符串回傳值：ls_result STRING 取代后的新字符串用法：CALL cl_replace_str_by_index(abcdefg, 3, 5, WXYZ)RETURNING ls_new函式名稱(chēng)：cl_say程序名稱(chēng)：cl_say.4gl用途：將金額類(lèi)數(shù)值轉(zhuǎn)換成SAY TOTAL傳入?yún)?shù)：p_amt (Decimal value of money)p_len (String length of SAY1 and SAY2)回傳值：l_say1 (Say total string-1 of p_amt)l_say2 (Say total string-2 of p_amt)用法：CALL cl_say(p_amt,p_len)RETURNING l_say1,l_say2函式名稱(chēng)：cl_set_act_visible程序名稱(chēng)：cl_set_act_visible.4gl用途：動(dòng)態(tài)顯現(xiàn)/隱藏畫(huà)面上的Action傳入?yún)?shù)：ps_act_names 要顯示或隱藏的字段名稱(chēng)字符串（以逗號(hào)分隔）pi_visible TRUE：顯現(xiàn)，F(xiàn)ALSE：隱藏回傳值：none用法：CALL cl_set_act_visible(accept,cancel, FALSE)函式名稱(chēng)：cl_set_action_active程序名稱(chēng)：cl_set_action_active.4gl用途：動(dòng)態(tài)開(kāi)啟或關(guān)閉畫(huà)面上的Action不隱藏只是不可使用傳入?yún)?shù)：ps_actions 要顯示或隱藏的字段名稱(chēng)字符串（以逗號(hào)分隔）pi_active TRUE：active，F(xiàn)ALSE：deactive回傳值：none用法：CALL cl_set_action_active(act1,act2, TRUE)函式名稱(chēng)：cl_set_check_text程序名稱(chēng)：cl_set_check_text.4gl用途：設(shè)定CHECKBOX 的顯示文字傳入?yún)?shù)：ps_field STRING 要設(shè)定的字段名稱(chēng)ps_text STRING 要設(shè)定的TEXT回傳值：none用法：CALL cl_set_check_text(aza04, 新的文字卷標(biāo))函式名稱(chēng)：cl_set_combo_items程序名稱(chēng)：cl_set_combo_items.4gl用途：動(dòng)態(tài)設(shè)定ComboBox 的Item傳入?yún)?shù)：ps_field_name ComboBox 所對(duì)應(yīng)的字段名稱(chēng)ps_values Item 所對(duì)應(yīng)的儲(chǔ)存值字符串（以逗號(hào)分隔）ps_items Item 字符串（以逗號(hào)分隔）回傳值：None用法：CALL cl_set_combo_items(oea08, 1,2, Local Order,ExportOrder)函式名稱(chēng)：cl_set_combo_lang程序名稱(chēng)：cl_set_combo_lang.4gl用途：動(dòng)態(tài)設(shè)定有選擇語(yǔ)言別的ComboBox 語(yǔ)言選項(xiàng)傳入?yún)?shù)：ps_field_name ComboBox 所對(duì)應(yīng)的字段名稱(chēng)回傳值：None用法：CALL cl_set_combo_lang(oea08)函式名稱(chēng)：cl_set_combo_module程序名稱(chēng)：cl_set_combo_module.4gl用途：動(dòng)態(tài)設(shè)定有選擇模塊數(shù)據(jù)的ComboBox 選項(xiàng)傳入?yún)?shù)：ps_field_name ComboBox 所對(duì)應(yīng)的字段名稱(chēng)pi_type pi_type = 1 時(shí)輸出大寫(xiě)數(shù)據(jù)回傳值：None用法：CALL cl_set_combo_module(oea08,0)函式名稱(chēng)：cl_set_comments程序名稱(chēng)：cl_set_comments.4gl用途：設(shè)定字段的comments傳入?yún)?shù)：ps_fields 欲轉(zhuǎn)換哪個(gè)字段（以字符串代表）ps_att_value 欲轉(zhuǎn)換的字符串回傳值：none用法：CALL cl_set_comments(oea01,oea02,string1|string2)函式名稱(chēng)：cl_set_comp_att_text程序名稱(chēng)：cl_set_comp_att_text.4gl用途：設(shè)定字段的顯示名稱(chēng)（組件前面Label 的text）傳入?yún)?shù)：ps_fields 欲轉(zhuǎn)換的字段ps_att_value 欲轉(zhuǎn)換的字符串回傳值：None用法：CALL cl_set_comp_att_text(oma16”,”O(jiān)rder Number”)函式名稱(chēng)：cl_set_comp_entry程序名稱(chēng)：cl_set_comp_entry.4gl用途：動(dòng)態(tài)設(shè)定組件是否可輸入傳入?yún)?shù)：ps_fields 字段名稱(chēng)字符串（中間以逗號(hào)分隔）pi_entry TRUE：可輸入，F(xiàn)ALSE：不可輸入回傳值：None用法：CALL cl_set_comp_entry(m01,m03,m07, FALSE)函式名稱(chēng)：cl_set_comp_font_color程序名稱(chēng)：cl_set_comp_font_color.4gl用途：設(shè)定組件字型顏色傳入?yún)?shù)：ps_fields 字段名稱(chēng)字符串（中間以逗號(hào)分隔）ps_color 要設(shè)定的顏色（black,blue,cyan,.）回傳值：None用法：CALL cl_set_comp_font_color(oea01,oea04, red)函式名稱(chēng)：cl_set_comp_lab_text程序名稱(chēng)：cl_set_comp_lab_text.4gl用途：設(shè)定Static Label (dummy) 的顯示名稱(chēng)傳入?yún)?shù)：ps_fields 欲轉(zhuǎn)換的字段ps_att_value 欲轉(zhuǎn)換的字符串回傳值：none用法：CALL cl_set_comp_att_text(oma16”,”O(jiān)rder Number”)函式名稱(chēng)：cl_set_comp_required程序名稱(chēng)：cl_set_comp_required.4gl用途：動(dòng)態(tài)設(shè)定字段是否必須輸入值傳入?yún)?shù)：ps_fields 字段名稱(chēng)字符串（中間以逗號(hào)分隔）pi_required TRUE：必須輸入值，F(xiàn)ALSE：非必須輸入值回傳值：None用法：CALL cl_set_comp_required(m01,m03,m07, TRUE)函式名稱(chēng)：cl_set_comp_visible程序名稱(chēng)：cl_set_comp_visible.4gl用途：動(dòng)態(tài)顯現(xiàn)/隱藏畫(huà)面上的組件傳入?yún)?shù)：ps_fields 字段名稱(chēng)字符串（中間以逗號(hào)分隔）pi_visible TRUE：顯現(xiàn)，F(xiàn)ALSE：隱藏回傳值：None用法：CALL cl_set_comp_visible(oea01,oea04, FALSE)函式名稱(chēng)：cl_set_docno_format程序名稱(chēng)：cl_set_docno_format.4gl用途：依照系統(tǒng)參數(shù)(aoos010)設(shè)定單據(jù)編號(hào)字段格式傳入?yún)?shù)：ps_field 字段名稱(chēng)回傳值