【導(dǎo)讀】隨著生產(chǎn)的發(fā)展和生產(chǎn)規(guī)模的日益社會(huì)化，會(huì)計(jì)在不斷地發(fā)展變化。與此同時(shí)，隨著經(jīng)濟(jì)。計(jì)算機(jī)用于數(shù)據(jù)處理，徹底改變了工作的面貌。會(huì)計(jì)數(shù)據(jù)處理的集中化自動(dòng)?；潭却蟠筇岣?，采用計(jì)算機(jī)處理以后，原始數(shù)據(jù)通過各種輸入方式輸入計(jì)算機(jī)，或打印有關(guān)帳簿和報(bào)表。提高了會(huì)計(jì)信息的準(zhǔn)確性和及時(shí)性，隨著現(xiàn)代社會(huì)企業(yè)。從廣度和深度上擴(kuò)展了會(huì)計(jì)數(shù)據(jù)的領(lǐng)域，隨時(shí)得到最新的情況。主要精力放在管理和監(jiān)督上，更好地發(fā)揮財(cái)務(wù)人員的作用?，F(xiàn)在，科技的飛速發(fā)展，使各種管理向科學(xué)化、現(xiàn)代化的體制轉(zhuǎn)變。理的模式也隨之相應(yīng)的發(fā)生改變。對(duì)本單位來說是很重要的。要建立現(xiàn)代化的財(cái)務(wù)管理系統(tǒng)，計(jì)算機(jī)是本系統(tǒng)的基礎(chǔ)，也是實(shí)現(xiàn)現(xiàn)代化的。統(tǒng)”，以取代人工管理。又便于未參與開發(fā)的技術(shù)維護(hù)人員進(jìn)行補(bǔ)充、維護(hù)。對(duì)于開發(fā)財(cái)務(wù)管理系統(tǒng)進(jìn)行了認(rèn)真仔細(xì)的分析，在實(shí)施過程中不斷地加。以修改和完善，使這套財(cái)務(wù)管理系統(tǒng)能更好地運(yùn)行。據(jù)字典，為以后進(jìn)一步設(shè)計(jì)打下基礎(chǔ)。

　　

【正文】 PROMPT 其它 COLOR SCHEME 3 ON PAD _1ee14ys59 OF () ACTIVATE POPUP (a_menupops[1]) ON PAD _1ee14ys5a OF () ACTIVATE POPUP (a_menupops[2]) ON PAD _1ee14ys5b OF () ACTIVATE POPUP (a_menupops[3]) ON PAD _1ee14ys5c OF () ACTIVATE POPUP (a_menupops[4]) ON PAD _1ee14ys5d OF () ACTIVATE POPUP (a_menupops[5]) DEFINE POPUP (a_menupops[1]) MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF (a_menupops[1]) PROMPT 打開 DEFINE BAR 2 OF (a_menupops[1]) PROMPT 商品進(jìn)貨記 錄 DEFINE BAR 3 OF (a_menupops[1]) PROMPT 填寫憑證 ON SELECTION BAR 1 OF (a_menupops[1]) 。 DO _1ee14ys5e 。 IN LOCFILE(E:\財(cái)務(wù)管理系統(tǒng) \主菜單 ,MPX。MPR|FXP。PRG ,WHERE is 主菜單 ?) ON SELECTION BAR 2 OF (a_menupops[1]) do form 商品進(jìn)貨記錄 ON SELECTION BAR 3 OF (a_menupops[1]) do form 177。報(bào)帳憑證 DEFINE POPUP (a_menupops[2]) MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF (a_menupops[2]) PROMPT 打印年終報(bào)表 ON SELECTION BAR 1 OF (a_menupops[2]) do form 打印年終報(bào)表 DEFINE POPUP (a_menupops[3]) MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF (a_menupops[3]) PROMPT 按商品名稱查詢 DEFINE BAR 2 OF (a_menupops[3]) PROMPT 按驗(yàn)收員查詢 DEFINE BAR 3 OF (a_menupops[3]) PROMPT 商品銷售記錄 ON SELECTION BAR 1 OF (a_menupops[3]) do form 按名稱查詢 ON SELECTION BAR 2 OF (a_menupops[3]) do form 按驗(yàn)收員查詢 ON SELECTION BAR 3 OF (a_menupops[3]) do form 產(chǎn)品銷售記錄 DEFINE POPUP (a_menupops[4]) MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF (a_menupops[4]) PROMPT 信息 ON SELECTION BAR 1 OF (a_menupops[4]) do form 信息 DEFINE POPUP (a_menupops[5]) MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF (a_menupops[5]) PROMPT 關(guān)于 DEFINE BAR 2 OF (a_menupops[5]) PROMPT \ DEFINE BAR 3 OF (a_menupops[5]) PROMPT 退出 ON SELECTION BAR 1 OF (a_menupops[5]) do form 幫助 ON SELECTION BAR 3 OF (a_menupops[5]) 。 DO _1ee14ys5p 。 IN LOCFILE(E:\財(cái)務(wù)管理系統(tǒng) \主菜單 ,MPX。MPR|FXP。PRG ,WHERE is 主菜單 ?) ACTIVATE MENU () NOWAIT IF = C = = ENDIF * ********************************************************* * * _1EE14YS5E ON SELECTION BAR 1 OF POPUP 記錄 * * Procedure Origin: * * From Menu: 主菜單 .MPR, Record: 5 * * Called By: ON SELECTION BAR 1 OF POPUP 記錄 * * Prompt: 打開 * * Snippet: 1 * ********************************************************* *PROCEDURE _1ee14ys5e =getfile() * ********************************************************* * * _1EE14YS5P ON SELECTION BAR 3 OF POPUP 其它 * * Procedure Origin: * * From Menu: 主菜單 .MPR, Record: 24 * * Called By: ON SELECTION BAR 3 OF POPUP 其它 * * Prompt: 退出 * * Snippet: 2 * ********************************************************* *PROCEDURE _1ee14ys5p clear event clear all close all read events quit set sysmenu to default * ********************************************************* SET SYSMENU TO SET SYSMENU AUTOMATIC DEFINE PAD _0kt0z899x OF _MSYSMENU PROMPT 記錄 COLOR SCHEME 3 DEFINE PAD _0kt0z899y OF _MSYSMENU PROMPT 180。打印 COLOR SCHEME 3 DEFINE PAD _0kt0z899z OF _MSYSMENU PROMPT 查詢 175。 COLOR SCHEME 3 DEFINE PAD _0kt0z89a0 OF _MSYSMENU PROMPT 更改密碼 COLOR SCHEME 3 DEFINE PAD _0kt0z89a1 OF _MSYSMENU PROMPT 其他 COLOR SCHEME 3 ON PAD _0kt0z899x OF _MSYSMENU ACTIVATE POPUP 記錄 ON PAD _0kt0z899y OF _MSYSMENU ACTIVATE POPUP 打印 ON PAD _0kt0z899z OF _MSYSMENU ACTIVATE POPUP 查詢 ON PAD _0kt0z89a1 OF _MSYSMENU ACTIVATE POPUP 其他 DEFINE POPUP 記錄 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 記錄 PROMPT 180。打開 DEFINE BAR 2 OF 記錄 PROMPT 商品進(jìn)貨記錄 DEFINE BAR 3 OF 記錄 PROMPT 填寫憑證 ON SELECTION BAR 1 OF 記錄 。 DO _0kt0z89a2 。 IN LOCFILE(E:\財(cái)務(wù)管理系統(tǒng) \主菜單 ,MPX。MPR|FXP。PRG ,WHERE is 主菜單 ) ON SELECTION BAR 2 OF 記錄 do form 商品進(jìn)貨記錄 ON SELECTION BAR 3 OF 記錄 do form 177。168。報(bào)帳憑證 DEFINE POPUP 打印 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 打印 PROMPT 打印年終報(bào)表 237。 ON SELECTION BAR 1 OF 打印 do form 打印年終報(bào)表 DEFINE POPUP 查詢 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 查詢 PROMPT 按商品名稱查詢 DEFINE BAR 2 OF 查詢 PROMPT 按日期查詢 DEFINE BAR 3 OF 178。查詢 PROMPT 商品銷售記錄 ON SELECTION BAR 1 OF 查詢 do form 按名稱查詢 ON SELECTION BAR 2 OF 查詢 do form 按日期查詢 ON SELECTION BAR 3 OF 查詢 do form 產(chǎn)品銷售記錄 DEFINE POPUP 其它 MARGIN RELATIVE SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF 其它 PROMPT 185。關(guān)于 DEFINE BAR 2 OF 其它 PROMPT \ DEFINE BAR 3 OF 其它 PROMPT 退出 ON SELECTION BAR 3 OF 其它 。 DO _0kt0z89a4 。 IN LOCFILE(E:\財(cái)務(wù)管理系統(tǒng) \主菜單 ,MPX。MPR|FXP。PRG ,WHERE is 主菜單 ) * ********************************************************* * * _0KT0Z89A2 ON SELECTION BAR 1 OF POPUP 記錄 * * Procedure Origin: * * From Menu: 主菜單 .PRG, Record: 5 * * Called By: ON SELECTION BAR 1 OF POPUP 記錄 * * Prompt: 打開 * * Snippet: 1 * ********************************************************* PROCEDURE _0kt0z89a2 =getfile() * ********************************************************* * * _0KT0Z89A4 ON SELECTION BAR 3 OF POPUP 其它 * * Procedure Origin: * * From Menu: 主菜單 .PRG, Record: 24 * * Called By: ON SELECTION BAR 3 OF POPUP 其它 * * Prompt: 退出 * * Snippet: 2 * *************************************************