GENERO语法知识总结.docxVIP

GENERO語法知識總結文件組成結構原始程序編譯後的程序可執行程MODULE 程序文件 *.4gl*.42m*.42rFORM文件 *.per*.42f其他各式 命名規則組成部份詳細內容程序命名規則S_XXXXXXXX : 一般子程序 存于 $top/subCL_XXXXXXXX : 共享子程序 存于 $top/libQ_XXXXXXXX : 查詣子程序 存于 $top/qry函數命名規則XXXX_yy : 程序代碼簡稱_函數功能名如: i010_a 為i010作業的新增函數數 i010_tmp 函數名字變量命名規則G_xxxxxx : 全局變量L_xxxxxx : 區域性變量P_xxxxxx : 傳遞變量S_xxxxxx : 屏幕變量文件命名規則文件名稱(TABLE NAME) : xxx_file 數據庫字段名稱(FIELD NAME) : xxx99 99代表流水號上面兩項內容 需于 p_zta中注冊後, 方可使用存于UNIX的外部名稱(SCH FILE) : c_xxx.sch Program的組成 : MODULE + FORM1. MODULE組成部份詳細內容DatabaseDatabase dbname # 編譯時參考的schema數據庫, 炅是實際數據庫GLOBALSGlobals “../config/top.global” #全部程序共用的全局變量Ddfine var_Nmae DATATYPE #定義變量Constant cons_anme datatype #定義常量MAINMAIN……..……..END MAINFUNCTIONFUNCTION funName()…….……END FUNCTIONREPORTREPORT Rep_Name(sr)……… FORMATPAGE HEADER BEFORE GROUP ON EVERY ROW AFTER GROUP…….END REPORT2. FormSCKEMASchema ds #表示設計畫面時所參考的數據庫, 默認為FORMONLY表示與數據庫無關:為了與舊版本兼容 SCHEMA可以用DATABASE指令代替.Actiondefault不使用, 用其他方式設定(參考TIPTOP GP技術手冊)必須緊接在SCHEMA下面做Action Defaults Action add(text=”Append”,accelerator=control-v) Action del(text=”delete”,accelerator=shift-F2) Action zoom(text=”Zoom”,comment=”Open zoom window”) Action quit(text=quit”,accelerator=Shift-F5,image=”quit”END第二種處理方式:在程序 act.4gl中去呼叫CALL ui_interface.loadActionDefaults(“act”) 傳得參數是act.4ad檔名, 附檔名可不寫,則產生的結果也可能在per檔編輯(ACTION DEFAULTS的結果一樣編寫下面的xml文檔 “ACT.4ad”ActionDefaultList ActionDefault name=add text=Append acceleratorName=CONTROL-V / ActionDefault name=del text=Delete acceleratorName=SHIFT-F2/ ActionDefault name=zoom text=Zoom comment=Open zoom window / ActionDefault name=quit text=Quit acceleratorName=SHIFT-F5 image=quit //ActionDefaultListMAIN #呼叫並載入默認 ACTION 項 CALL ui.interface.loadActionDefaults(“act”) …… MENU “” ON ACTION add CALL act_a() ON ACTION del … ON ACTION zoom .. ON ACTION quit .. Exit programEND MENUTOPMENU不使用, 用其他設定(參考TIPTOP GP技術手冊)TOPMENU MenuName GROUP form(TEXT=”Form”) COMMAND help(TEXT=”Form”,IMAGE=”quest”) COMMAND quit(TEXT=”quit”) END GROUP Edit(T