logo资料库

Tiptop GP 共用程式查询手册V1.1.doc

发布时间：2022-06-14 发布人：admin 分类：说明书 资料大小：0.23M 资料格式：doc 举报 版权申诉
第1页 / 共35页
第2页 / 共35页
第3页 / 共35页
第4页 / 共35页
第5页 / 共35页
第6页 / 共35页
第7页 / 共35页
第8页 / 共35页
资料共35页，剩余部分请下载后查看
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 類別 編號 RXXX SS-MIS-TIPTOP-XXX TipTop Function Version:1.1 Author:MIS SPACE SHUTTLE HI-TCCH CO.LTD 第 1 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD Chapter 1 TIPTOP Common Library Fuction 第 2 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 1．cl_about 程序名稱：cl_about.4gl 用 途：程序信息 傳入參數：none 回傳值 ：none 用 法 ：CALL cl_about() 2．cl_anykey 程序名稱：cl_anykey.4gl 途：按任意鍵繼續 用 傳入參數：p_sw Not used 回傳值 ：none 用 法 ：CALL cl_anykey() 3．cl_autotime 程序名稱：cl_autotime.4gl 途：自動累加時間，累加級數為 1 用 傳入參數：time1 累加起始時間 累加類型 sw lay 累加級數 H:小時 M：分鐘 S：秒鐘 Default = 1 回傳值 ：Time 時間 用 法 ：CALL cl_autotime(`09:30`,`H`,1) 4．cl_batch_proc 程序名稱：cl_batch_proc.4gl 用 途：動態產生批次數據處理畫面 傳入參數：ps_headers 回傳值 ：none (Table 的 Header 字符串，中間以逗號分隔) 用 法 ：LET ls_headers =”img01,img02,img03,img04,img09” CALL cl_batch_proc(ls_headers) 5．cl_cal 程序名稱：cl_cal.4gl 用 途：傳入當前日期，要增加的月份及天數取得計算過後的日期 傳入參數：p_date 回傳值 ：l_year,l_month,l_day 日期 p_month 月份 p_day 日 用 法 ：LET l_date = cl_cal(p_date,p_mm,p_dd) 第 3 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 6．cl_chg_comp_att 程序名稱：cl_chg_comp_att.4gl 用 途：更動原有對象的 attribute 傳入參數：ps_field STRING 欲更動字段的名稱 STRING 字段 type 屬性 ps_atts ps_values STRING 字段 type 屬性值 回傳值 ：none 用 法 ：CALL cl_chg_comp_att (“ima01”,”NOENTRY|ITEMS”,”1|(1,2,3),(red,lue,green)”) 7．cl_chg_win_title 程序名稱：cl_chg_win_title.4gl 用 途：轉換程式 Title 顯示 傳入參數：ps_str 回傳值 ：none 用 法 ：CALL cl_chg_win_title(“更改后的窗體 Title”) 顯示的字符串 8．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 … 9．cl_chk_data_continue 程序名稱：cl_chk_data_continue.4gl 用 途：檢查資料是否連續 傳入參數：p_souce STRING 來源資料 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：IF NOT cl_chk_data_continue(g_pmw.pmw01[5,10]) THEN … 第 4 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 10．cl_chk_str_correct 程序名稱：cl_chk_data_continue.4gl 途：檢查字符串是否符合 0~9，a~z 用 傳入參數：ps_source STRING 來源資料 ps_count SMALLINT 檢查幾碼，如果未傳幾碼則會以來源字 符串長度當作 ps_count 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：IF NOT cl_chk_str_correct(g_pmw01[1,3]) THEN ... 11．cl_chkym 程序名稱：cl_chkym.4gl 途：檢查文字型態變數是否為年月型臺 用 傳入參數：p_str CHAR(6) 文字型態變數 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：IF cl_cheym(p_str) THEN … 12．cl_choice 程序名稱：cl_choice.4gl 途：讓用戶輸入選擇 用 傳入參數：l_msg CHAR(100) 窗體上顯示的說明文字 回傳值 ：l_choice 用 法 ：CALL cl_choice(l_msg) RETURNING g_choice 13．cl_open_url 程序名稱：cl_client_app.4gl 途：藉由 explorer 開啟傳入的網址 用 傳入參數：p_url STRING 網址 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：CALL cl_open_url(“http://www.space-shuttle.com.tw”) 14．cl_open_doc 程序名稱：cl_client_app.4gl 用 途：開啟檔案 傳入參數：ps_doc STRING 檔案位置 第 5 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：CALL cl_open_doc(“C:/tiptop/tiptop.txt”) 15．cl_open_prog 程序名稱：cl_client_app.4gl 用 途：藉由指定的程序開啟檔案 傳入參數：ps_prog ps_arg STRING 程序工具 STRING 待開啟檔案的位置 回傳值 ：1 FOR TURE 是 0 FOR FALSE 否 用 法 ：CALL cl_open_prog (“C:/editor.exe”,”C:/toptip/toptip.txt”) 16．cl_close 程序名稱：cl_close.4gl 用 途：詢問”此筆資料是否確定結案（Y/N）：” 或”此筆資料是否取消結案（Y/N）：” 傳入參數：p_row,p_col 無作用，傳入 0，0 即可 P_old_acticode 傳入 Y 代表訊息為取消結案;N 代表確定結案 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：IF cl_close(0,0,,”Y”) 17．cl_cmdask 程序名稱：cl_cmdask.4gl 途：詢問用戶欲執行的程序，并執行之 用 傳入參數：none 回傳值 ：none 用 法 ：CALL cl_cmdask() 18．cl_cmdat 程序名稱：cl_cmdat.4gl 用 途：指定時間延後執行 UNIX 指令 傳入參數：p_time p_cmd 指定時間 UNIX 指令 回傳值 ：none 用 法 ：CALL cl_cmdat(ptime，pcmd) 第 6 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 19．cl_cmdrun 程序名稱：cl_cmdrun.4gl 途：執行 UNIX 指令 用 傳入參數：ps_cmd 回傳值 ：none 程序代碼或 UNIX 執行指令 用 法 ：CALL cl_cmdrun(‘axmq450’) 20．cl_cmdrun_wait 程序名稱：cl_cmdrun_wait.4gl 用 途：執行 UNIX 指令，需等待此指令結束后才可繼續原程序的執行 傳入參數：ps_cmd 回傳值 ：none 程序代碼或 UNIX 執行指令 用 法 ：LET l_cmd = “axmp800” CALL cl_cmd(l_cmd) 21．cl_cmmsg 程序名稱：cl_cmmsg.4gl 用 途：顯示 異動更新成功 訊息 傳入參數：p_code 訊息種類 1 及 4：代表異動更新完成 2 及 3：代表此張單據異動更新完成 回傳值 ：none 用 法 ：CALL cl_cmmsg(1) 22．cl_conf3 程序名稱：cl_conf3.4gl 用 途：根據 MESSAGE CODE 取出正確訊息，詢問 （配合發票的使用，本作業允許用戶不輸入數據） 傳入參數：p_row,p_col 無作用 P_msgcode 回傳值 ：1 FOR TURE 是 0 FOR FALSE 否 用 法 ：IF cl_conf3(0,0,mesgcode)THEN … 23．cl_confirm 程序名稱：cl_confirm.4gl 用 途：依照訊息代碼將數據顯示在畫面上，詢問”是否…” 傳入參數：ps_msg 訊息代碼或訊息字符串 第 7 頁，共 35 頁
    太空梭高傳真資訊科技股份有限公司 SPACE SHUTTLE HI-TECH CO.LTD 回傳值 ：1 FOR TRUE 是 0 FOR FALSE 否 用 法 ：IF(cl_confirm(“agl_021”))THEN… 24．cl_cont 程序名稱：cl_cont.4gl 途：詢問”是否繼續執行本作業（Y/N）:” 用 傳入參數：p_row,p_col 無作用 回傳值 ：1 FOR TURE 是 0 FOR FALSE 否 用 法 ：IF cl_cont(0,0)THEN… 25．cl_create_4sm 程序名稱：cl_create_4sm.4gl 用 途：產生 udm_tree 所需要的 StartMenu 檔案 傳入參數：pc_menu_root Pi_rebuild StartMenu 的根節點 是否需要重新覆蓋已存在的 4sm 檔案 回傳值 ：none 用 法 ：CALL cl_create_4sm(“m01”,TRUE) 26．cl_create_qry 程序名稱：cl_create_qry.4gl 途：動態產生窗口以供查詢，并回傳查詢結果 用 傳入參數：none 回傳值 ：ms_ret1,ms_ret2,ms_ret3… 回傳數目依照對應的回傳字段數 用 法 ：CALL cl_create_qry() RETURNING g_oea.oea14 27．cl_dynamic_qry 程序名稱：cl_dynamic_qry.4gl 途： 自定義行別字段動態產生開窗功能，并回傳查詢結果 用 傳入參數：none 回傳值 ：ms_ret1,ms_ret2,ms_ret3… 回傳數目依照對應的回傳字段數 用 法 ：CALL cl_dynamic_qry()RETURNING g_oea.oeaida001 28．cl_days 程序名稱：cl_days.4gl 用 途：取得該年月的天數 傳入參數：p_year 年份 第 8 頁，共 35 頁
    分享到：
    赞 收藏

    相关推荐

    资料库

    开发技术

    共收录19306份资料，累计14个分类，关注成员有19位，主要包括：Actionscript,Javascript,PHP,VB,Perl,Delphi,Python,C#,C,Java,C++,Web开发,硬件开发,其它

    热门标签

    Actionscript Javascript PHP VB Perl Delphi Python C# C Java C++ Web开发 硬件开发 其它

    最新资料