【正文】 OD(+B2+).=+39。 SELECT 1 KZ1 = DO CXPZKHC2 WITH PZLXQ , KZ1 IF KZ1 LOOP ENDIF DO CXPZKHC3 WITH PZLXQ CASE CH=6 KMBM1 = RQ1 = 0 RQ2 = 0 DO WHILE .T. ACTI WIND PZCX1 0 , 1 SAY 請輸入查詢科目代碼 : GET KMBM1 PICTURE 9999999 READ DEAC WIND PZCX1 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 29 頁 共 85 頁 IF KMBM1= LOOP ELSE EXIT ENDIF ENDDO SELECT 3 SEEK KMBM1 IF EOF() ACTI WIND PZCX1 0 , 0 SAY 查無此科目碼 !按任一鍵返回 ! WAIT DEAC WIND PZCX1 LOOP ENDIF DO WHILE .T. ACTI WIND PZCX1 0 , 0 SAY 請輸入查詢期限從 日至 日 0 , 17 GET RQ1 PICTURE 99 VALID RQ1==31 0 , 24 GET RQ2 PICTURE 99 VALID RQ2==31 READ DEAC WIND PZCX1 IF RQ1==0 LOOP ELSE EXIT ENDIF ENDDO DO CXPZKHC4 CASE CH=7 RETURN ENDCASE ENDDO RETURN *: EOF: ******************* * 查詢憑證子程序 * ******************* PARAMETERS PZLXQ , KZ1 DEFI WIND PZCX21 FROM 18,20 TO 20,60 SHAD COLO SCHE 12 SELECT 1 GO TOP LOCA FOR amp。+STR(A112,4,0)+39。 SELECT 1 KZ1 = DO CXPZKHC2 WITH PZLXQ , KZ1 IF KZ1 LOOP 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 28 頁 共 85 頁 ENDIF DO CXPZKHC3 WITH PZLXQ CASE CH=5 DO WHILE .T. A111 = 0 A112 = 0 C11 = C12 = 0 ACTI WIND PZCX1 0 , 0 SAY 輸入查詢要求 :日期 日至 日 1 , 0 SAY 憑證號 號至 號 0 , 17 GET B11 0 , 27 GET B12 1 , 17 GET A111 PICTURE 9999 1 , 27 GET A112 PICTURE 9999 READ DEAC WIND PZCX1 IF A111==0 LOOP ELSE EXIT ENDIF ENDDO B0 = 39。.(PZRB)=39。 B2 = 39。第一屏 39。 不受時間、過程的限制。 。 “ 修改科目 ” 模 塊的程序。 ３、自動銀行對帳。 ２、第二類自動轉(zhuǎn)帳分錄其金額的大小與本月發(fā)生的業(yè)務(wù)有關(guān)，稱為相關(guān)自動分錄。 ２、增加科目的內(nèi)容及注意事項 應(yīng)包括的內(nèi)容主要有：科目代碼、科目名稱、科目級別、科目類別、余額 方向，年初余額、期初余額、借方發(fā)生額、貸方發(fā)生額、借方累計發(fā)生額、 貸方累計發(fā)生額。 ５、口令輸入出錯時的處理要恰當。KL,1,1))50)+CHR (ASC(SUBS(amp。KL、 1))+40)TO amp。KL STORE SPACE(30)TO amp。 內(nèi)容提要 第一節(jié) 系統(tǒng)人員管理及口令設(shè)置 一、系統(tǒng)人員管理 １、系統(tǒng)人員管理的意義 ２、在帳務(wù)處理系統(tǒng)可設(shè)立如下一些崗位，各自具有一定的權(quán)限范圍： (1)系統(tǒng)管理：可進行科目代碼設(shè)置，系統(tǒng)人員管理、結(jié)帳、數(shù)據(jù)管理 等功能的操作。 ENDCASE ４、提供快速返回鍵。 ５、圖標式菜單（類 WINDOWS 風格）。使不熟練的的用戶熟練軟件，即表述其功能和特性 ３、表格工具，用表格來表示詳細處理過程，這類工具適于處理邏輯十分復(fù)雜 的條件和活動間的關(guān)聯(lián)。 ２、采用詳細設(shè)計工具對程序模塊進行過程描述。 ４、通用性設(shè)計。 第二節(jié) 系統(tǒng)規(guī)劃 一、系統(tǒng)規(guī)劃的任務(wù) 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 2 頁 共 85 頁 根據(jù)現(xiàn)狀調(diào)查所獲得的資料，首先應(yīng)歸納出用戶的基本 需求，除滿足用戶提 出的要求外，應(yīng)說明還有哪些附加功能，對于不能滿足的用戶要求要說明原 因，所有的系統(tǒng)功能要清楚，在計算機系統(tǒng)的配置，會計數(shù)據(jù)處理方法，系 統(tǒng)開發(fā)的初步安排等方面進行規(guī)劃，編寫需求分析說明書。 本章以系統(tǒng)開發(fā)過程為主線，簡要介紹各過程的任務(wù)、要求及注意事項。 ４、處理方式方面的 調(diào)查。 二、概要設(shè)計的內(nèi)容 １、系統(tǒng)要求 。 第四節(jié) 詳細設(shè)計 一、詳細設(shè)計的任務(wù) １、對概要設(shè)計的功能模塊進行過程描述，開發(fā)一個可以直接轉(zhuǎn)換成程序語言 代碼的軟件表 示，這種表示應(yīng)當是無歧義且高度結(jié)構(gòu)化的。 ２、確定了模塊內(nèi)的算法及數(shù)據(jù)結(jié)構(gòu)。 ２、用戶界面設(shè)計時應(yīng)考慮的一般原則： 必須集成于系統(tǒng)設(shè)計之中，而不最后加上；減少擊鍵次數(shù)來提高用戶效率； 預(yù)測用戶的下一步動作；提供錯誤信息來幫助糾正錯誤； 提供文檔來減少培訓(xùn)時間；帶有幫助信息；支持其它的輸入裝置。 ２、 豎直上托式。 四、菜單設(shè)計原則 １、菜單設(shè)計所使用的名稱要前后一致。 二、口令的 設(shè)置與修改。KL、 1))+50)+CHR(ASC(SUBS(amp。KL ＠ 8,32 SAY“ 繼續(xù)修改 ?”GET JX PICTUREY READ STORE TRIM(amp。 ２、口 令輸入允許一定的出錯次數(shù)。 二、科目代碼的設(shè)置要求和編碼方式 １、科目代碼設(shè)置要求 適合計算機處理；簡明實用；要有系 統(tǒng)性（一級科目代碼位長 3 位，代碼 首位為 1表示資產(chǎn)類科目； 2表示負債類科目； 3 表示所有者權(quán)益類科目； 4 表示成本類科目； 5 表示損益類科目）；要有擴展性；單義性。 (總帳科目 )或控制性科目，則要求該科目本身， 及其所 屬的所有明細科目都沒有余額和發(fā)生額，且該一級科目或控制性科目被 刪除后，其所屬的所有明細科目也自動被刪除。通過此功能，把銀行給企事業(yè)單位的對帳單輸入計算機， 存入 “ 對帳單文件 ” 。 4.“ 對帳單文件 ” 中多條業(yè)務(wù)記錄和 “ 銀行日記帳未達帳項文件 ” 中 多條業(yè)務(wù)記錄相同。 。 ３、查詢校驗法 利用數(shù)據(jù)的相對穩(wěn)定性 ４、關(guān)聯(lián)校驗法 利用憑證數(shù)據(jù)的對應(yīng)不可能性 ５、重復(fù)校驗法 利用概率統(tǒng)計的原理 第四節(jié) 憑證處理程序的設(shè)計 一、系統(tǒng)應(yīng)滿足的要求 系統(tǒng)應(yīng)能保證所有的處理穩(wěn)定、處理的結(jié)果不隨時間波動，僅僅依賴于輸入。BH1+S IF .() ACTI WIND PZSR1 0 , 1 SAY 重號 ,按任意鍵重新輸入 WAIT DEAC WIND PZSR1 LOOP ENDIF ENDIF SELE 1 IF LEN(TRIM(BH1))4 ACTI WIND PZSR1 0 , 1 SAY 編號長度不夠 4 位 ,按任鍵重新輸入 ! WAIT DEAC WIND PZSR1 LOOP ENDIF SELECT 3 IF JFKM1= LOOP ELSE SEEK JFKM1 IF .() ACTI WIND PZSR2 0 , 1 SAY 借方科目名稱 : +TRIM(KMMC)+ 按任意鍵繼續(xù) WAIT DEAC WIND PZSR2 ENDIF IF EOF().(KMRB)=H ACTI WIND PZSR1 0 , 1 SAY 借方科目錯 ,按任意鍵重新輸入 WAIT DEAC WIND PZSR1 LOOP ENDIF ENDIF 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 19 頁 共 85 頁 I = 1 DO WHILE I=25 IF DFKM(I) MHJ2 = MHJ2+JE(I) MHJ1 = MHJ2 ENDIF I = I+1 ENDDO 15 , 61 GET MHJ1 PICTURE . READ IF MHJ1MHJ2 ACTI WIND PZSR1 0 , 1 SAY 輸入金額錯 ,按任意鍵繼續(xù) WAIT DEAC WIND PZSR1 MHJ2 = MHJ LOOP ENDIF FLAG = 0 SELECT 3 J = 1 DO WHILE J=25 IF JE(J) IF TRIM(DFKM(J)) SEEK TRIM(DFKM(J)) IF .() MKMDM = TRIM(DFKM(J)) KMMC1 = DO ZW_KMMC WITH MKMDM , KMMC1 IF LEN(TRIM(KMMC1))0 ACTI WIND PZSR2 0 , 1 SAY 貸方科目名稱 : +TRIM(KMMC1)+ 按任意 鍵繼續(xù) WAIT DEAC WIND PZSR2 ENDI ENDIF IF EOF().(KMRB)=H FLAG = 1 EXIT ENDIF ENDIF ENDIF J = J+1 ENDDO 中國最大的管 理 資料下載中心 (收集 \整理 . 大量免費資源共享 ) 第 20 頁 共 85 頁 IF FLAG=1 ACTI WIND PZSR1 0 , 1 SAY TRIM(DFKM(J))+貸方科目代碼錯 ,按任意鍵重新輸入 WAIT DEAC WIND PZSR1 MHJ2 = MHJ LOOP ENDIF FLAG3 = 0 SELECT 4 I = 1 DO WHILE I=25 IF LEN(TRIM(XMH(I)))0 SEEK TRIM(XMH(I)) IF EOF() ACTI WIND PZSR1 0 , 1 SAY 編號 :+TRIM(XMH(I))+錯 ,按任意鍵重新輸入 WAIT DEAC WIND PZSR1 FLAG3 = 1 EXIT ENDIF IF LEN(TRIM(XMH(I)))LEN(TRIM(PJH)) ACTI WIND PZSR1 0 , 1 SAY 編號 :+TRIM(XMH