【文章內(nèi)容簡介】 名： 專 業(yè)： 計 算 機 信 息 管 理 類別層次： 指導教師： 目 錄 進 貨管理 ............................................................................................ 3 庫存管理 ............................................................................................ 3 銷售管理 ............................................................................................ 4 代銷管理 ............................................................................................ 4 輔助功能 ............................................................................................ 5 菜單 .................................................................................................... 6 其它程序 ............................................................................................ 8 主程序代碼 ........................................................................................ 9 開發(fā)注意事項 .................................................................................. 15 流程圖 .............................................................................................. 17 醫(yī)藥進銷存系統(tǒng)說明書 主系統(tǒng) 2 功能 進貨管理 進貨單查詢、錄入、修改、刪除、恢復。并將進貨數(shù)據(jù)傳至庫存模塊，經(jīng)庫存審核后自動錄入庫存庫。 缺貨清單查詢。 退貨（退廠）數(shù)據(jù)查詢、打印。根據(jù)庫存庫退貨出庫所 傳來的數(shù)據(jù)自動錄入。 統(tǒng)計進貨數(shù)據(jù)，查看和打印統(tǒng)計結(jié)果。統(tǒng)計的項目為： 任意時段所有商品的進貨、退貨、保修金額合計。 任意時段某一商品的進貨、退貨、保修數(shù)量、金額合計。 到目前為止尚未保修返回的金額合計。 任意時段所有供應商的進貨、退貨、保修金額合計。 任意時段某一供應商的進貨、退貨、保修金額合計。 供應商查詢、錄入、修改、刪除、恢復。 保修（保修退廠）數(shù)據(jù)查詢、打印、返回核消。根據(jù)庫存庫保修出庫所傳來的數(shù)據(jù)自動審核錄入。 庫存管理 初始化庫存，錄入商品的初始庫存數(shù)，一旦總帳中已有該商品，則不能再錄入初始數(shù) 。 進、出庫數(shù)據(jù)查詢、錄入、修改、刪除、恢復。審核及自動錄入進貨模塊和代銷模塊由于進貨、出貨、退貨及保修傳來的進出庫數(shù)據(jù)。打印進出庫單。 設(shè)定商品庫存下限。在庫存低于下限時報警，并出具下限報警商品清單給進貨模塊。 盤點。查看、打印盤點表。錄入盤盈、盤虧數(shù)據(jù)。盤虧的數(shù)據(jù)做為報費數(shù)進行統(tǒng)計。殘次品庫的盤點，盤盈、盤虧數(shù)直接在殘次品庫中處理。 （暫不使用）殘次品、報費數(shù)據(jù)的輸入。正品轉(zhuǎn)殘次品，從倉庫總帳及日記帳中做出庫處理，自動轉(zhuǎn)到殘次品庫；殘次品轉(zhuǎn)正品，則自動從殘次品庫中出庫轉(zhuǎn)向總庫，總帳及日記帳中做入庫處理。 庫存數(shù)據(jù)統(tǒng)計，查看、打印統(tǒng)計數(shù)據(jù)。統(tǒng)計的項目為： 統(tǒng)計到目前為止所有商品的數(shù)量、金額合計。 任意時段所有商品的進庫、出庫數(shù)量、金額合計。 任意時段某一商品的進庫、出庫數(shù)量、金額合計。 到目前為止殘次品的庫存金額合計。 任意時段所有商品的報費金額合計。 任意時段某一商品的報費數(shù)量、金額合計。 銷售管理 記錄每一筆銷售數(shù)據(jù)。錄入、修改、刪除、恢復、查看每一筆從總部的倉庫中直接銷售出去的數(shù)據(jù)。并將銷售數(shù)據(jù)自動傳送到庫存模塊用于審核及自動錄入。 退貨管理。錄入、修改、刪除、恢復、查看有關(guān)退貨的數(shù)據(jù)，并將退貨數(shù)據(jù)自 動傳給庫存模塊，由庫存審核后自動錄入。 保修管理。錄入、修改、刪除、恢復、查看有關(guān)保修的數(shù)據(jù)，返回核消，并將保修數(shù)據(jù)自動傳給庫存模塊，由庫存審核后自動錄入。 統(tǒng)計銷售數(shù)據(jù)，并查看和打印統(tǒng)計數(shù)據(jù)，按金額排序，標記出數(shù)量最多的商品。統(tǒng)計的項目為： 任意時段所有商品的銷售金額、合計。 任意時段某一商品的銷售數(shù)量、金額合計。 代銷管理 出貨單管理。記錄每一筆出貨給代銷商的數(shù)據(jù)。并將數(shù)據(jù)傳給庫存模塊，經(jīng)審核后自動錄入。 結(jié)算管理。根據(jù)出貨單中的金額數(shù)據(jù)記錄應付款，代銷商每付一筆款，即從結(jié)算款中減去相應的數(shù)額，余額繼續(xù) 做為應付款。 銷售管理。錄入、修改、刪除、恢復代銷商傳來的有關(guān)銷售數(shù)據(jù)，傳送的方式可用紙質(zhì)、磁盤、電話線。根據(jù)銷售數(shù)計算并自動錄入代銷點的庫存數(shù)。 退貨（退倉）數(shù)據(jù)錄入、修改、刪除、恢復、查看。并將退貨數(shù)據(jù)傳給庫存模塊，由庫存審核后自動錄入。 保修（保修退倉）數(shù)據(jù)錄入、修改、刪除、恢復、查看。并將保修數(shù)據(jù)傳給庫存模塊，由庫存審核后自動錄入。 銷售統(tǒng)計，并查看和打印統(tǒng)計數(shù)據(jù)。統(tǒng)計的范圍包括某一代銷商、全部代銷商、包括倉庫直接銷售，統(tǒng)計的項目為： 任意時段所有商品的銷售金額、成本、利潤合計。 任意時段某一商品的 銷售數(shù)量、金額、成本、利潤合計。 任意時段銷售數(shù)量、營業(yè)額、成本、利潤最多、最少的商品。 到目前為止，盤點的庫存數(shù)與上報銷售數(shù)所推算出的庫存數(shù)的差額，分別包括數(shù)量和金額。 任意時段退貨金額。 任意時段保修金額，及到目前為止尚未保修返還的商品、數(shù)量、金額。 到目前為止的各代銷商及總的應收款金額合計。 盤點。查看、打印盤點表。錄入盤點庫存數(shù)，但不用盤點數(shù)修正根據(jù)銷售數(shù)所得的庫存數(shù)，兩個數(shù)據(jù)都要，并在統(tǒng)計中做比較，以了解代銷商押總部貨款的數(shù)額。 輔助功能 工作人員管理。 備份。 取備份。 密碼管理。 整理數(shù)據(jù)。將 所有數(shù)據(jù)庫重新索引，稽核相關(guān)數(shù)據(jù)。 退出系統(tǒng)。 確認系統(tǒng)日期和時間。 菜單 系統(tǒng) [X]（系統(tǒng)本身的有關(guān)維護） 備份 ^B（ BF，用于將數(shù)據(jù)備份到軟盤上） 取備份 ^Q（ QBF，用于從軟盤上取回備份的數(shù)據(jù)） 整理數(shù)據(jù) ^Z（ ZLSJ，當發(fā)現(xiàn)數(shù)據(jù)異常時，請用此功能對數(shù)據(jù)進行整理） 退出 ^E（ TCXT，退出天時進銷存系統(tǒng)） 進貨 [J]（總部進貨管理） 進貨單錄入 F2（ JHDLR，錄入進貨的有關(guān)數(shù)據(jù)） 進貨單打開 F3（ JHDDK，打開進貨單以便查看和修改） 缺貨清單 ^A（ QHQD，打開缺貨清單） 進貨數(shù) 據(jù)統(tǒng)計（統(tǒng)計進貨的有關(guān)數(shù)據(jù)） 供貨商（ JHTJ WITH .T.，以供貨商為主進行統(tǒng)計） 商品（ JHTJ WITH .F.，以商品為主進行統(tǒng)計） 退廠退廠 ^D（ THTC，打開退貨給廠家（供貨商）的商品清單） 保修退廠（ BXTC，打開送廠家（供貨商）保修的商品清單） 供應商庫 ^F（ GHS，打開供應商清單查看和修改） 銷售 [S]（總部直接銷售管理） 銷售日記帳錄入 F4（ XSZLR，錄入銷售數(shù)據(jù)） 銷售日記帳打開 F5（ XSZDK，打開銷售日記帳以便查看和修改） 銷售退貨（ XSTH，打開銷售退貨 清單） 銷售保修（ XSBX，打開銷售保修清單） 銷售數(shù)據(jù)統(tǒng)計 ^I（ XSTJ，統(tǒng)計銷售的有關(guān)數(shù)據(jù)） 代銷 [D]（代銷商管理） 出貨單錄入 F6（ CHDLR，錄入出貨單的有關(guān)數(shù)據(jù)） 出貨單打開 F7（ CHDDK，打開出貨單以便查看和修改） 資金結(jié)算 ^K（ DZJJS，錄入及修改有關(guān)結(jié)算的金額，查看應收款數(shù)額） 銷售帳管理 ^L（ DXBDK，打開有關(guān)代銷商的銷售數(shù)據(jù)，以便查看、錄入和修改） 代銷退貨 ^N（ DXTH，查看、錄入、修改代銷商退貨回來的有關(guān)數(shù)據(jù)） 代銷保修 （ DXBX，查看、錄入、修改代銷商 保修的有關(guān)數(shù)據(jù)） 倉庫日記帳 ^O（ DXRJZ，打開代銷商倉庫日記帳） 倉庫總帳 ^P（ DXZZ，打開代銷商倉庫總帳） 代銷商盤點（對代銷商的倉庫商品進行盤點） 生成盤點表 ^S（ SCDXPDB，生成代銷商的庫存盤點表，其中有所有商品及當前的余額） 打開盤點表 ^T（ DKDXPDB，打開代銷商的庫存盤點表，并可將盤點表打印出以用于實際盤點） 代銷數(shù)據(jù)統(tǒng)計 ^R（ DXTJ，統(tǒng)計有關(guān)代銷的數(shù)據(jù)） – 代銷商庫（ DXS，打開代銷商清單查看和修改） 庫存 [K]（總部庫存管理） 倉庫日記帳 F8（ CKRJZ， 打開倉庫日記帳） 倉庫總帳 F9（ CKZZ，打開倉庫總帳查看） 盤點（對總部倉庫進行盤點） 生成盤點表 ^W（ PDBSC，產(chǎn)生目前倉庫的盤點表，其中有所有商品及當前的余額） 打開盤點表 ^X（ PDBDK，打開盤點表，還可將盤點表打印出來以用于實際盤點） 庫存數(shù)據(jù)統(tǒng)計 ^Y（ KCTJ，統(tǒng)計庫存的有關(guān)數(shù)據(jù)） 維護 [W]（工作人員、商品庫等的管理） 工作人員管理 ^G（ GZRR，增加、刪除工作人員，設(shè)定工作人員密碼） 商品庫管理（ SPK，輸入及修改商品清單庫） 顏色庫管理（ YSK，打開顏色庫，以便增添和修改顏 色） 打開日志（ CZRZ，打開操作日志庫，以查看做過何種操作） 其它程序 故障恢復： GZFF。用于當系統(tǒng)意外中止運行后，重新起動系統(tǒng)時，應能夠自動將所有數(shù)據(jù)庫重新索引并稽核相關(guān)數(shù)據(jù)。 打開數(shù)據(jù)庫： DKSJK。 關(guān)閉數(shù)據(jù)庫： GBSJK。 主程序代碼 set escape off *主程序 *程序名： JXC *變量說明 *cxlj: 本程序所在的路徑 *cxzf: 本程序所包含的字符 *dqml: 當前目錄 *p_cxlj:全局程序路徑 *p_gzrrdm:工作人員代碼 *p_gzrrxm:工作人員姓名 *mmtg:密碼通過 *xtzzyx:系統(tǒng)正在運行 *設(shè)置功能鍵 set talk off set century on set sysm off set date ansi set safety off set message to 39。39。 SET FUNCTION 39。139。 TO 39。39。 SET FUNCTION 39。239。 TO 39。39。 SET FUNCTION 39。339。 TO 39。39。 SET FUNCTION 39。439。 TO 39。39。 SET FUNCTION 39。539。 TO 39。39。 SET FUNCTION 39。639。 TO 39。39。 SET FUNCTION 39。739。 TO 39。39。 SET FUNCTION 39。839。 TO 39。39。 SET FUNCTION 39。939。 TO 39。39。 SET FUNCTION 39。1039。 TO 39。39。 close table all *設(shè)置屏幕 Declare integer Fblz In integer x,integer y x=800 y=600 xx=Fblz(x,y) amp。amp。調(diào)用成功 XX=0。 clos all WITH _SCREEN .BACKCOLOR = RGB(0,128,64) .caption=39。醫(yī)藥進銷存系統(tǒng) 39。 .BORDERSTYLE = 2 .CLOSABLE = .F. .CONTROLBOX = .T. .MAXBUTTON = .F. .MINBUTTON = .T. .MOVABLE = .F. .WINDOWSTATE = 2 .icon=39。39。 .LOCKSCREEN = .F. ENDWITH set curs off @ , SAY (LOCFILE(,BMP|ICO, 文件在哪里 ?)) BITMAP 。 SIZE , 。 STYLE T amp。amp。顯示啟動封面 set curs on *do form logo name logo linked if .not. file(39。39。) *故障恢復 dhxx=39。 上次系統(tǒng)為非正常退出，為安全起見，系統(tǒng)現(xiàn)在需 39。+chr(13)+39。要進行故障恢復！39。 do form dhk do zlsj dhxx=39。 故障恢復完畢，如仍有問題，請與軟件開發(fā)商聯(lián)系。 39。 do form dhk else erase end