【正文】
//得到背書列表后,根據(jù)單據(jù)編號可以得到對應(yīng)的票據(jù)數(shù)SELECT COUNT(*) INTO :票據(jù)數(shù) FROM PJYSKC WHERE PJYSKC_BSDJBH=:申請單據(jù)編號 。根據(jù)結(jié)果進(jìn)行處理。End if交易說明:交易碼PJYSBSYSKZ交易名稱背書申請判斷是否超預(yù)算交易功能簡述對背書申請的單據(jù)判斷是否超預(yù)算輸入的字符串單據(jù)編號|申請日期|外幣編號|金額|付款單位編號|預(yù)算項目編號|收款單位編號交易輸出的結(jié)果返回值|提示信息相關(guān)表序號表名操作1PJBSSQD(背書申請單)插入更新2LSDWZD(單位字典)查詢處理過程:u 單據(jù)提交時判斷是否超預(yù)算,然后調(diào)用預(yù)算控制的函數(shù),返回控制的結(jié)果信息。u 如果操作類型為2,表示對記錄更新,根據(jù)單據(jù)內(nèi)碼更新相應(yīng)的信息。SELECT MAX(PJBSSQD_DJBH) INTO :最大單據(jù)編號 FROM PJBSSQD WHERE SUBSTR(PJBSSQD_DJBH,2,6)=系統(tǒng)日期(YYMMDD)。6) 可以實現(xiàn)在列表中進(jìn)行排序和過濾的功能。進(jìn)入系統(tǒng)后,顯示票據(jù)的列表信息,數(shù)據(jù)為批量查詢,調(diào)用批量查詢函數(shù),每次提取100條記錄?!境袃躲y行號】:按承兌銀行號做查詢條件,用戶只輸入,無選擇。彈出查詢條件的界面中,調(diào)用交易PJYSZTCX進(jìn)行查詢數(shù)據(jù),傳遞參數(shù):機(jī)構(gòu)編號|單位編號|查詢?nèi)掌趞承兌銀行編號|票據(jù)號|票據(jù)金額|票據(jù)類型|票據(jù)狀態(tài)|操作員編號|查詢開始記錄號|查詢結(jié)束記錄號。【過濾】:在列表中實現(xiàn)過濾功能。5)、票據(jù)變動表中增加記錄信息INSERT INTO PJBDB (PJBDB_NM,PJBDB_BDZT,PJBDB_CZRQ,PJBDB_BDSM,PJBDB_PZNM, PJBDB_PZBH, PJBDB_CZY, PJBDB_BY3)VALUES (:票據(jù)內(nèi)碼,’02’,:系統(tǒng)日期,’票據(jù)入庫’,:憑證內(nèi)碼,:憑證編號,:操作員編號,:機(jī)構(gòu)編號)交易說明:交易碼PJYSZTTH交易名稱票據(jù)驗收退回處理交易功能簡述對驗收不通過的票據(jù)進(jìn)行退回處理輸入的字符串票據(jù)內(nèi)碼交易輸出的結(jié)果錯誤信息相關(guān)表序號表名操作1PJYSKC(應(yīng)收票據(jù)庫存表)更新處理過程:u 合法性檢查:票據(jù)內(nèi)碼不能為空。//需要調(diào)用函數(shù)判斷是否使用ERP系統(tǒng),如果使用需要調(diào)用函數(shù)寫接口表信息。If 是否記賬==’1’ 返回錯誤,提示“票據(jù)已經(jīng)記賬,請刷新頁面后再試”End ifif 票據(jù)類型 ==’1’ or 票據(jù)類型==‘2’if 票據(jù)戶是否為空,如果為空返回錯誤,提示“收款單位沒有對應(yīng)票據(jù)戶!”if 預(yù)算項目是否為空,如果為空返回錯誤,提示“沒有對應(yīng)預(yù)算項目!”//從系統(tǒng)參數(shù)配置表中得到結(jié)算中心的票據(jù)戶:SELECT F_VALUE INTO :結(jié)算中心賬戶 FROM LSSYCS WHERE F_JGBH=機(jī)構(gòu)編號 AND F_VKEY=’PJ_YSPJH’。6) 列表界面中可以通過票據(jù)號進(jìn)行查詢定位。調(diào)用交易PJYSZTCX,傳遞參數(shù):機(jī)構(gòu)編號|單位編號|查詢?nèi)掌趞承兌銀行編號|票據(jù)號|票據(jù)金額|票據(jù)類型|票據(jù)狀態(tài)|操作員編號|查詢開始記錄號|查詢結(jié)束記錄號?!酒睋?jù)類型】:下拉列表選擇條件,1銀行承兌,2商業(yè)承兌,3支票,4銀行匯票, 全部,默認(rèn)顯示全部?!静僮鲉T】:增加時系統(tǒng)默認(rèn)為當(dāng)前操作員,編號設(shè)置為操作員編號,隱藏,界面只顯示名稱,操作員編號為實體字段。項目編號為實體字段,界面只顯示名稱?!就惺浙y行】:輸入托收銀行。對應(yīng)設(shè)置銀行賬戶字典中的賬戶編號字段(JSYHZH_ZHBH)。【承兌銀行號】: 票據(jù)承兌的銀行,用戶輸入項,可為空。增加時默認(rèn)顯示銀行承兌。如果記錄為新增加而沒有保存時,不允許作廢,可設(shè)置不可用。保存成功后如果返回的重復(fù)標(biāo)示為‘1’,提示:票據(jù)號有重復(fù),請確認(rèn)是否輸入正確。)【保存】:對當(dāng)前的票據(jù)信息進(jìn)行保存處理。同時默認(rèn)設(shè)置付款人的內(nèi)部票據(jù)戶,需要調(diào)用交易PJDWPJH,傳遞參數(shù):單位編號|票據(jù)類型,單位編號為當(dāng)前的編號,票據(jù)類型為‘1’,得到票據(jù)戶的結(jié)果設(shè)置到收款內(nèi)部票據(jù)戶欄上編號和名稱信息,只顯示賬戶的名稱。【增加】:顯示到卡片列表(在列表界面中轉(zhuǎn)換到卡片界面),顯示空表進(jìn)行輸入。點擊按鈕后,顯示票據(jù)選擇頁面,調(diào)用交易PJYSBSZRCX,傳遞當(dāng)前操作員的機(jī)構(gòu)編號和單位編號,顯示票據(jù)選擇界面 (如下圖),顯示的信息有:票據(jù)號、出票人、出票人賬戶、票據(jù)金額、出票日期、到期日、票據(jù)類型。根據(jù)交易結(jié)果輸出。SELECT PJYSKC_NM,PJYSKC_PJBH,PJYSKC_CPRQC,PJYSKC_CPRZH,PJYSKC_PMJE, PJYSKC_CPRQ,PJYSKC_DQRQ,PJYSKC_PJLX, PJBSSQD_JGBHFROM PJYSKC,PJBSSQD WHERE PJYSKC_BSDJBH=PJBSSQD_DJBH AND PJBSSQD_SKDW=單位編號 AND PJYSKC_PJZT=’04’ AND NOT EXISTS (SELECT 1 FROM PJYSKC A WHERE = AND PJYSKC_SKDWBH=單位編號 AND PJYSKC_PJZT NOT IN (‘04’,’11’)) ORDER BY PJYSKC_PJBH ASC。判斷如果參數(shù)票據(jù)狀態(tài)不等于空,加上票據(jù)狀態(tài)的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_PJZT=’”+票據(jù)狀態(tài)+”’”,如果等于空,則只查尋在途和退回的票據(jù):pswhere = pswhere+“ AND PJYSKC_PJZT IN (‘01’,’10’) ”判斷如果操作員編號不為空,加上操作員編號的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_CZY=’”+操作員編號+”’”判斷如果參數(shù)出票人不為空,加上出票人的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_CPRQC LIKE ’%”+出票人+”%’”判斷如果參數(shù)上手背書人不為空,加上上手背書人的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_SSBSRMC LIKE ’%”+上手背書人+”%’”判斷如果參數(shù)收票日期1不為空,加上收票日期1的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_DJRQ =’”+收票日期1+”’” 判斷如果參數(shù)收票日期2不為空,加上收票日期2的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_DJRQ =’”+收票日期2+”’”判斷如果參數(shù)到期日期1不為空,加上到期日期1的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_DQRQ =’”+到期日期1+”’” 判斷如果參數(shù)到期日期2不為空,加上到期日期2的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_DQRQ =’”+到期日期2+”’”判斷如果持票性質(zhì)不為空,加上持票性質(zhì)的參數(shù)條件: pswhere = pswhere + “ AND PJYSKC_CPXZ=’”+持票性質(zhì)+”’”2)、最后組織查詢數(shù)據(jù)的語句為:SELECT PJYSKC_NM,PJYSKC_SKDWBH,F_DWMC,PJYSKC_PJBH,PJYSKC_CPRQC,PJYSKC_CPRZH, PJYSKC_PMJE,PJYSKC_CPRQ,PJYSKC_DQRQ,PJYSKC_PJLX,PJYSKC_PJZT,F_NAME,PJYSKC_CPRKHH, PJYSKC_CDYH, PJYSKC_SSBSRMC, PJYSKC_DYSKR, PJYSKC_SKRQC, PJYSKC_SKRZH, PJYSKC_SKRKHH, PJYSKC_XYBH FROM PJYSKC,LSGYZD,LSDWZD WHERE PJYSKC_CZY=F_GYBH AND PJYSKC_JGBH=機(jī)構(gòu)編號 AND PJYSKC_SKDWBH=F_DWBH + pswhere ORDER BY PJYSKC_SKDWBH ASC,PJYSKC_DQRQ ASC,PJYSKC_NM ASC。//從賬戶字典中得到幣種編號信息SELECT JSZHZD_WBBH INTO :幣種編號 FROM JSZHZD WHERE JSZHZD_BH=:收款票據(jù)戶。u 如果操作類型為2,表示對數(shù)據(jù)更新,根據(jù)票據(jù)內(nèi)碼更新相關(guān)數(shù)據(jù)。界面定義票據(jù)列表顯示界面票據(jù)卡片顯示界面(托收銀行),相關(guān)頁面信息都有調(diào)整。//查詢應(yīng)付票據(jù)賬戶SELECT F_VALUE, JSZHZD_MC INTO :應(yīng)付票據(jù)戶編號,:應(yīng)付票據(jù)戶名稱 FROM LSSYCS,JSZHZD WHERE F_VALUE=JSZHZD_BH AND F_JGBH=結(jié)構(gòu)編號 AND F_VKEY=’PJ_YFPJH’。End if//設(shè)置應(yīng)收提示天數(shù)SELECT COUNT(*) INTO :行 FROM LSSYCS WHERE F_JGBH=結(jié)構(gòu)編號 AND F_VKEY=’PJ_YSTS’。If 行0UPDATE LSSYCS SET F_VALUE=應(yīng)付票據(jù)戶編號 WHERE F_JGBH=結(jié)構(gòu)編號 AND F_VKEY=’PJ_YFPJH’。 應(yīng)付票據(jù)的管理,開票、到期兌付等。 重要空白憑證的管理,購買登記、領(lǐng)取、使用、退回、作廢等。ElseINSERT INTO LSSYCS (F_JGBH,F_VKEY,F_VALUE) VALUES (結(jié)構(gòu)編號,’PJ_YFPJH’,應(yīng)付票據(jù)戶編號)。If 行0UPDATE LSSYCS SET F_VALUE=應(yīng)收到期天數(shù) WHERE F_JGBH=結(jié)構(gòu)編號 AND F_VKEY=’PJ_YSTS’。//查詢貼現(xiàn)利息收入賬戶SELECT F_VALUE, JSZHZD_MC INTO : 貼現(xiàn)利息收入賬戶編號,: 貼現(xiàn)利息收入賬戶名稱 FROM LSSYCS,JSZHZD WHERE F_VALUE=JSZHZD_BH AND F_JGBH=結(jié)構(gòu)編號 AND F_VKEY=’PJ_TXLXSRH’。票據(jù)查詢條件界面后臺交易說明:文件名:交易說明:交易碼PJYSZTWH交易名稱應(yīng)收在途票據(jù)維護(hù)交易功能簡述對票據(jù)進(jìn)行登記、更新操作輸入的字符串操作類型|票據(jù)內(nèi)碼|出票日期|票據(jù)號碼|出票人全稱|出票人賬號|出票人開戶行|承兌銀行編號|收款票據(jù)戶|收款單位編號|收款人全稱|收款人賬號|收款人開戶行|票面金額|到期日期|承兌協(xié)議編號(托收銀行)|第一收款人|第一收款人帳號|第一收款人銀行|收票類型|上手背書人|上手背書人名稱|登記日期|交票人|預(yù)算項目編號|票據(jù)類型|票據(jù)狀態(tài)|是否記賬|備注|機(jī)構(gòu)編號|客戶ID|客戶地址ID|收付款單據(jù)格式|操作員編號交易輸出的結(jié)果票據(jù)內(nèi)碼|重復(fù)標(biāo)示(0或1)|或錯誤信息相關(guān)表序號表名操作1PJYSKC(應(yīng)收票據(jù)庫存表)插入更新2LSGYZD(操作員字典)查詢3LSJGZD(機(jī)構(gòu)字典)查詢處理過程:u 合法性檢查:出票日期、票據(jù)號碼、出票人全稱、出票人銀行賬號、收款票據(jù)戶、收款單位編號、收款人全稱、票面金額、收票類型、上手背書人名稱、到期日期、預(yù)算項目、票據(jù)類型、機(jī)構(gòu)編號、操作員編號不能為空。如果是退回的票據(jù),需要設(shè)置為在途狀態(tài)。//更新記錄(根據(jù)票據(jù)內(nèi)碼設(shè)置傳遞的參數(shù),同時根據(jù)上面得到的幣種編號更新)UPDATE PJYSKC SET …u 如果操作類型為4,表示對數(shù)據(jù)更新,根據(jù)票據(jù)內(nèi)碼更新相關(guān)數(shù)據(jù)。3)、數(shù)據(jù)為批量操作查詢,分批返回給前臺,根據(jù)查詢開始號和結(jié)束號提取相應(yīng)的數(shù)據(jù)返回。交易說明:交易碼PJYSZTPJZF交易名稱票據(jù)作廢處理交易功能簡述對登記的在途票據(jù)作廢處理輸入的字符串票據(jù)內(nèi)碼交易輸出的結(jié)果返回出錯信息相關(guān)表序號表名操作1PJYSKC(應(yīng)收票據(jù)庫存表)更新處理過程:u 合法性檢查:票據(jù)內(nèi)碼不能為空。前臺處理說明 界面顯示處理采用列表和卡片形式顯示數(shù)據(jù)。如果點擊取消,返回不做任何處理。增加時如果當(dāng)前數(shù)據(jù)沒有保存,先進(jìn)行提示“數(shù)據(jù)已經(jīng)修改是否保存?”,保存需要調(diào)用交易PJYSZTWH。【修改】:對當(dāng)前記錄進(jìn)行修改操作,如果在列表界面中,選擇記錄進(jìn)行修改時,需要切換到卡片的界面中顯示,進(jìn)行修改相關(guān)的信息。功能按鈕只有在卡片界面中才允許可用,在列表界面中設(shè)置不可用?!静樵儭浚簩ζ睋?jù)進(jìn)行重新選擇條件進(jìn)行查詢。 項目說明卡片界面中:【客戶名稱】:顯示客戶的名稱,不可編輯,通過接口函數(shù)引入信息?!臼掌鳖愋汀浚河脩粝吕斜磉x擇,1集團(tuán)外收入,2集團(tuán)內(nèi)收入?!臼湛钊藛挝幻Q】:對應(yīng)單位編號,增加時默認(rèn)顯示當(dāng)前單位的名稱,用戶不可輸入和修改,編號隱藏不顯示。如果是支票或匯票類型,不控制必須輸入?!旧鲜直硶恕浚河脩糨斎牖蜻x擇,如果收票類型選擇為1(集團(tuán)外收入),名稱需要手工輸入,也可已從外部字典中選擇,不控制必須輸入;收票類型選擇為2(集團(tuán)內(nèi)收入),要求選擇單位,不允許輸入,上手背書人的編號設(shè)置為單位編號,名稱設(shè)置為單位名稱,必須要求選擇。【票據(jù)狀態(tài)】:下拉列表顯示,01登記在途、02庫存、03背書申請、04背書、05貼現(xiàn)在途、06內(nèi)部貼現(xiàn)、07外部貼現(xiàn)、08托收在途、09托收到賬、10退回、11作廢、12拆票申請、13拆票抵押。不可編輯修改。調(diào)用交易傳遞編碼參數(shù),為1或2或3或空,選擇全部傳遞為空。其中參數(shù)機(jī)構(gòu)和單位為當(dāng)前操作員的機(jī)構(gòu)