【正文】 。調(diào)用過程MPROC2實(shí)現(xiàn)數(shù)據(jù)查詢功能。調(diào)用過程MPROC3實(shí)現(xiàn)統(tǒng)計(jì)報(bào)表功能。調(diào)用過程MPRCO4實(shí)現(xiàn)產(chǎn)品目錄維護(hù)功能。調(diào)用過程MPRCO5實(shí)現(xiàn)本系統(tǒng)運(yùn)行結(jié)束退出功能。4）程序、過程、自定義函數(shù)間的關(guān)系見圖14。 圖14 程序、過程、函數(shù)間關(guān)系 （2）產(chǎn)品出入庫數(shù)據(jù)錄入模塊 1）程序名： 2）功能：實(shí)現(xiàn)每筆產(chǎn)品出入庫數(shù)據(jù)的錄入。3）處理流程（見圖15）。圖15 處理流程4）實(shí)現(xiàn) 打開 。 若錄入入庫數(shù)據(jù)，；若錄入出庫數(shù)據(jù)。 輸入日期。 用BROW將出入庫數(shù)據(jù)錄入 。若數(shù)據(jù)不保存，則退出返回；若數(shù)據(jù)保存，（入庫）或 （出庫數(shù)據(jù)）中。 （3）每筆出入庫數(shù)據(jù)查詢模塊 1）程序名：CP 2）功能：實(shí)現(xiàn)對三個(gè)月以內(nèi)的任何一天的每筆入庫數(shù)據(jù)查詢顯示。 3）處理流程（見圖16）。 4）實(shí)現(xiàn) 打開 。 若查詢?nèi)魏我惶斓拿抗P入庫數(shù)據(jù)。 若查詢?nèi)魏我惶斓拿抗P出庫數(shù)據(jù)。 輸入要查詢的日期。 從CPRK或CPXS庫中定位滿足查詢?nèi)掌诘氖子涗?。若無數(shù)據(jù)可查到，則顯示“無數(shù)據(jù)”，否則用“過濾器技術(shù)”和BROW命令顯示查詢結(jié)果。（4）每日、月、截止期出入庫數(shù)據(jù)查詢模塊 1）程序名： 2）功能：實(shí)現(xiàn)對下述查詢條件的查詢顯示功能 查詢?nèi)齻€(gè)月以內(nèi)任何一天的各種產(chǎn)品全天累計(jì)出入庫數(shù)據(jù)。 查詢兩年內(nèi)任何一個(gè)月份的各種產(chǎn)品全月累計(jì)出入庫數(shù)據(jù)。 查詢從年初至某個(gè)截止日期的各種產(chǎn)品累計(jì)出入庫數(shù)據(jù)。 3）處理流程（見圖17）。圖17 處理流程 4）實(shí)現(xiàn) 分三種情況討論： 第一種情況（按天查詢） 打開 。 輸入查詢?nèi)掌凇? 按輸入的日期從CPRDATA庫中過濾出與輸入日期匹配的記錄。 顯示結(jié)果。 第二種情況（按月查詢） 打開 。 輸入查詢月份。 對與輸入月份匹配的該月內(nèi)各產(chǎn)品出入庫數(shù)據(jù)分別累計(jì)。 將該月累計(jì)值為零的產(chǎn)品過濾掉。 顯示結(jié)果。 第三種情況（查詢從年初至截止日期備產(chǎn)品累計(jì)出入庫數(shù)） 打開 。 輸入截止日期。 對截止日期之前的各產(chǎn)品出入庫數(shù)據(jù)分別累加。 顯示結(jié)果。 （5）某日實(shí)際庫存數(shù)據(jù)查詢模塊 1）程序名：。 2）功能：實(shí)現(xiàn)查詢某一天各種產(chǎn)品的實(shí)際庫存數(shù)量。 3）處理流程（見圖18）。 4）實(shí)現(xiàn) 打開 。 輸入查詢?nèi)掌凇? ，若沒有則顯示“無數(shù)據(jù)可查”，否則顯示查詢結(jié)果。 （6）新增產(chǎn)品代碼（目錄）模塊 1）程序名：。 2）功能：。 3）處理流程（見圖19）。圖19 處理流程4）實(shí)現(xiàn) 在命令執(zhí)行方式下，將新產(chǎn)品的單位、單位代碼、規(guī)格、。 、。 錄入新產(chǎn)品的產(chǎn)品代碼，并校驗(yàn)。 再錄入該新產(chǎn)品的其它目錄數(shù)據(jù)。 （增加新產(chǎn)品的字段）。 （7）修改產(chǎn)品的價(jià)格、儲(chǔ)備定額模塊 1）程序名：。 2）功能：修改產(chǎn)品的價(jià)格和儲(chǔ)備足額。 3）處理流程（見圖20）。圖20 處理流程4）實(shí)現(xiàn) 用BROW命令進(jìn)行修改（注意只允許修改產(chǎn)品的不變價(jià)、現(xiàn)行價(jià)、最高儲(chǔ)備和最低儲(chǔ)備）。 (8）報(bào)表計(jì)算模塊 1）程序名：。 2）功能：根據(jù)本月實(shí)際發(fā)生的數(shù)據(jù)，計(jì)算出統(tǒng)計(jì)報(bào)表（產(chǎn)品收發(fā)存報(bào)表）中的數(shù)據(jù)。 ）處理流程（見圖21）。圖21 處理流程4）實(shí)現(xiàn) 輸入報(bào)表月份。 打開 。 在CPRDATA庫中定位滿足報(bào)表日期的第一條記錄。若無數(shù)據(jù)，即eof()為真，則顯示“本月無數(shù)據(jù)”，并返回。 在本月范圍內(nèi)，按產(chǎn)品代碼分別求出各產(chǎn)品本月出入庫累計(jì)值。 ，定位到報(bào)表生成那天的各產(chǎn)品實(shí)際庫存數(shù)記錄行。 ，并物理清空。 （9）打印《產(chǎn)品收發(fā)存月匯總表》模塊 1）程序名：。 2）功能：實(shí)現(xiàn)《產(chǎn)品收發(fā)存月匯總表》的打印輸出。打印機(jī)型號為：STAR CR3240型。 3）處理流程（見圖22）。圖22 處理流程4）實(shí)現(xiàn) 輸入年份和月份。 ，并索引。 ，并過濾出符合報(bào)表月份的數(shù)據(jù)記錄。 ，則顯示“本月報(bào)表未形成”，并返回，否則如下： 打印表頭。 （10）打印《產(chǎn)品庫存報(bào)警表》模塊 1）程序名：。 2）功能：隨時(shí)打印出低于最小儲(chǔ)備定額和高于最高儲(chǔ)備定額的產(chǎn)品庫存數(shù)據(jù)。 3）處理流程（見圖23）。圖23 處理流程 4）實(shí)現(xiàn) ，并將記錄指針指向最后一行記錄。 若不足時(shí)，在JC字段填“不足”；若超儲(chǔ)，則在JC字段填“超儲(chǔ)”。 打印表頭。 打印報(bào)表內(nèi)容。 四 系統(tǒng)實(shí)施 程序框圖設(shè)計(jì) （略）程序清單 （略）試運(yùn)行及結(jié)果分析 （1）試驗(yàn)數(shù)據(jù)的準(zhǔn)備（見表1和表25） 表25 系統(tǒng)試運(yùn)行原始模擬輸入數(shù)據(jù)日期產(chǎn)品代碼入庫數(shù)量零售數(shù)量批發(fā)數(shù)量0122000 10001153000 2314000 0241500 500115 1000 2182000 0363000 231 300006112000 061 10000024 500 1273000 2204000 115 500 115 1000061 180022010000 （2）運(yùn)行結(jié)果及分析 1）打印的報(bào)表如表1012所示，與設(shè)計(jì)的格式一致，輸出數(shù)據(jù)與手工計(jì)算結(jié)果一致。 2）查詢顯示結(jié)果正確。3）其它各項(xiàng)功能運(yùn)行正常。 技術(shù)說明書、使用說明書和維護(hù)說明書（略）。 28 /