【導(dǎo)讀】{ "error_code": 17, "error_msg": "Open api daily request limit reached" }

　　

【正文】 s_id from fj_lr where =) 圖 314 未派送統(tǒng)計界面 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 27 大客戶運量統(tǒng)計：主要用于對大型客戶設(shè)計的 信息 統(tǒng)計。只要輸入相應(yīng)的客戶名 ，便可以對相應(yīng)時間段內(nèi)或者該客戶所有訂單進(jìn)行查詢。是專門為有大量業(yè)務(wù)的會員量身定做的。 相應(yīng)的 主要代碼： 。 :=39。select fj_id 39。39。派送單號 39。39。 ,station 39。39。發(fā)站 39。39。, name 39。39。品名 39。39。, weight 39。39。重量 39。39。, fjfee 39。39。派送費 39。39。,39。+ 39。 rece_person 39。39?？蛻裘Q 39。39。, ps_date 39。39。發(fā)件日期 39。39。 from fj_lr 39。 + 39。 where rece_person like+39。39。%39。39。+39。39。39。+str+39。39。39。+39。39。%39。39。 and ps_date=cast(:date1 as datetime) 39。+ 39。 and ps_date=cast(:date2 as datetime)39。 (39。date139。).Value:=formatdatetime(39。yyyymmdd39。, )。 (39。date239。).Value:=formatdatetime(39。yyyymmdd39。, )。 。 。 。 :=39。select sum(fjfee) 39。39。派送費合計 39。39。,39。+ 39。 sum(weight) 39。39?？傊亓?39。39。 from fj_lr 39。 + 39。 where rece_person like+39。39。%39。39。+39。39。39。+str+39。39。39。+39。39。%39。39。 and ps_date=cast(:date1 as datetime) 39。+ 39。 and ps_date=cast(:date2 as datetime)39。 (39。date139。).Value:=formatdatetime(39。yyyymmdd39。, )。 (39。date239。).Value:=formatdatetime(39。yyyymmdd39。, )。 。 := 。 :=39?？傊亓?39。 :=。 :=39。派送費合計 39。 end。 end。 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 28 圖 315 大客戶運量統(tǒng)計界面 統(tǒng)計打印報表設(shè)計：提取相應(yīng)的界面上和數(shù)據(jù)庫中的數(shù)據(jù)，制成一張打印報表，供發(fā)放給其他操作員，例如快遞員或業(yè)務(wù)經(jīng)理等。 主要實現(xiàn)：調(diào)用相應(yīng)的打印報表界面。在打印報表界面中實現(xiàn)，具體見報表實現(xiàn)部分。 主要代碼： procedure (Sender: TObject)。 begin try if (=false) then exit。 。 。 except (39。錯誤。 39。,39。提示！ 39。,mb_ok)。 end。 end。 圖 316 收件單統(tǒng)計打印 報表界面 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 29 信息查詢模塊設(shè)計 信息查詢模塊包括快件接收查詢、 快 件派送查詢、快件中轉(zhuǎn)查詢、客戶投訴查詢和未派送快件查詢等板塊。其 中快件接收查詢、快件派送查詢、快件中轉(zhuǎn)查詢和客戶投訴查詢是簡單的單表查詢；未派送快件查詢是多表查詢。 下面主要從 快件接收查詢 、 快件派送查詢和未派送快件查詢?yōu)槔觼斫榻B本文的信息查詢模塊設(shè)計。 快件接收查詢 select js_id ‘ 接收單號 39。,js_id ‘ 票據(jù)號 39。,station ‘ 發(fā)站 39。,send_mode ‘ 運輸方式39。,name ‘ 品名 39。,weight ‘ 重量 39。,rece_person ‘ 收貨人 39。 , fjfee ‘ 派送 費 39。,ps_date ‘ 派送日期 39。 from js_lr where ps_date=cast(:date1 as datetime) and ps_date=cast(:date2 as datetime) 圖 317快件接收查詢 圖 318 快件接收查詢 打印報表 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 30 快件派送查詢 select fj_id ‘ 派送單號 39。,js_id ‘ 票據(jù)號 39。,station ‘ 發(fā)站 39。,send_mode ‘ 運輸方式39。,name ‘ 品名 39。,weight ‘ 重量 39。,rece_person ‘ 收貨人 39。 , fjfee ‘ 派送費 39。,ps_date ‘ 派送日期 39。 from fj_lr where ps_date=cast(:date1 as datetime) and ps_date=cast(:date2 as datetime) 圖 319快件派送查詢 未派送快件查詢 select js_id ‘ 票據(jù)號 39。, send_station ‘ 發(fā)站 39。, send_mode ‘ 運輸方式 39。, name ‘ 品名 39。,weight ‘ 重量 39。,rece_person ‘ 收貨人 39。, js_date ‘ 收件日期 39。 from js_lr where js_date=cast(:date1 as datetime) and js_date=cast(:date2 as datetime) and js_id not in(select js_id from fj_lr where =) 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 31 圖 320未派送快件查詢 procedure (Sender: TObject)。 begin if then begin messagebox(,39。 起 始 日 期 不 能 大 于 終 止 日 期 39。,39。 提 示 信 息39。,mb_iconinformation)。exit。 end。 。 (39。date139。).Value:=formatdatetime(39。yyyymmdd39。,s )。 (39。date239。).Value:=formatdatetime(39。yyyymmdd39。,s )。 。 。 :=39。select sum(weight) 39。39。 總重量 39。39。 from js_lr where js_date=cast(:date1 as datetime) and js_date=cast(:date2 as datetime) and js_id not in(select js_id from fj_lr where =) 39。 。 (39。date139。).Value:=formatdatetime(39。yyyymmdd39。,s )。 (39。date239。).Value:=formatdatetime(39。yyyymmdd39。,s )。 。 := 。 :=39?？傊亓?39。 end。 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 32 資料維護(hù) 與數(shù)據(jù)庫備份 模塊設(shè)計 數(shù)據(jù)對用戶來說是非常寶貴的資產(chǎn)。數(shù)據(jù)是存放在計算機(jī)上的，但是即使是最可靠的硬件和軟件，也會出現(xiàn)系統(tǒng)等故 障。所以應(yīng)該在意外發(fā)生之前做好充分的準(zhǔn)備工作，以便在意外發(fā)生之后有相應(yīng)的措施能快速恢復(fù)數(shù)據(jù)庫運行。 圖 321 數(shù)據(jù)庫備份與恢復(fù)界面 報表設(shè)計 報表是管理系統(tǒng)中最為重要的組成部分之一，它是一種主要的數(shù)據(jù)輸出手段，可以把數(shù)據(jù)打印出來以供查詢或備份保留。 設(shè)計步驟： 。 TQuickRep 組件，即報表的主體。 implementation（實現(xiàn)部分）加語句 uses dmunit。（數(shù)據(jù)模塊窗體明）（這是關(guān)鍵一步，否則數(shù)據(jù)模塊的信息無法在他的“ Object Inspector”窗口中顯示）。 TQuickRep 組件的 DataSet 屬性為“ （數(shù)據(jù)庫中相應(yīng)表） ”報表的設(shè)計 ，也是將報表與調(diào)用它的窗體連接的關(guān)鍵，先在調(diào)用它的窗體的implementation（實現(xiàn)部分）加語句 uses 報表窗體名；再在調(diào)用它的窗體的連接按鈕（常常為打印按鈕）中加代碼：窗體名 .TQuickRep 組件名 .Preview。 說明：一個窗體可以有多個加 TQuickRep 組件，即多張統(tǒng)計報表。 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 33 圖 322 報表界面圖 數(shù)據(jù)保護(hù)設(shè)計 為了提高軟件系統(tǒng)的安 全性，本系統(tǒng)進(jìn)行了數(shù)據(jù)庫的安全性設(shè)計。 戶直接操作數(shù)據(jù)庫； 2. 權(quán)限管理設(shè)計。 防止用戶直接操作數(shù)據(jù)庫 用戶只能用帳號登陸到應(yīng)用軟件，通過應(yīng)用軟件訪問數(shù)據(jù)庫，而沒有其他途徑操作數(shù)據(jù)庫。 圖 323登陸界面 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 34 權(quán)限管理設(shè)計 權(quán)限管理是應(yīng)用項目中比較關(guān)鍵的環(huán)節(jié)，如果不建立權(quán)限管理系統(tǒng)，那么一個 “ 非法用戶 ” 可以輕而易舉通過 該程序進(jìn)行 的所有功能。因此需要權(quán)限管理系統(tǒng)進(jìn)行權(quán)限檢測，讓經(jīng)過授權(quán)的用戶可以正常合法的使用已授權(quán)的功能，而對那些未授權(quán)的非法用戶拒之門外。 一個好的權(quán)限管理系 統(tǒng)應(yīng)該對每一類或每一個用戶，分配不同的系統(tǒng)操作權(quán)限，并應(yīng)具有擴(kuò)展性，也就是它可以加入到任何一個帶有權(quán)限管理的應(yīng)用項目中，就像構(gòu)件一樣可以被重復(fù)使用。 我們 將整個系統(tǒng)細(xì)化，分解為若干個子模塊，最后組合成一個完整的應(yīng)用。也只有這樣，才容易實現(xiàn)為每一類或每一個用戶分配不同的操作權(quán)限。 本程序?qū)?quán)限細(xì)分為：‘單據(jù)錄入’、‘單據(jù)查詢’、‘統(tǒng)計報表’、‘資料維護(hù)’、‘權(quán)限管理’ 5個子模塊。 當(dāng)用戶登錄前，首先關(guān)閉所有子模塊所擁有的 action，關(guān)閉所有功能。 當(dāng)在用戶登錄后，根據(jù)用戶名在 user1 表中找到相應(yīng)的主鍵 id，接著通過外鍵找到相應(yīng) id所擁有的權(quán)限，打開相應(yīng)的 action，激活相應(yīng)的功能。 被屏蔽的功能將顯示灰色，不能點擊。 權(quán)限管理設(shè)計主要代碼： 。 。 (39。select id from 權(quán)限管理 where (id=(select id from user1 where name=39。39。39。++39。39。39。))and( 權(quán)限=39。39。39。++39。39。39。)39。)。 。 if (39。id39。).AsString39。39。 then :=true else :=false。 //刷新更新后的列表框中的權(quán)限清單 。 。 :=39。select 權(quán)限 from 權(quán)限管理 where id=(select id from user1 where name=39。39。39。++39。39。39。39。+39。)39。 。 。 while not do begin ((39。權(quán)限 39。).AsString)。 。 end。 《物流信息系統(tǒng)》課程設(shè)計報告 物流管理專業(yè) 35 圖 324 權(quán)限分配界面 圖 324 僅有查詢權(quán)限的用戶的主界面 確定每 個角色對數(shù)據(jù)庫表的操作權(quán)限。每個角色擁有剛好能夠完成任務(wù)的權(quán)限，不多也不少。在應(yīng)用時再為用戶分配角色，則每個用戶的權(quán)限等于他所兼角色的權(quán)限之和。 角色 操作權(quán)限 1 單據(jù)錄入 2 單據(jù)查詢 3 統(tǒng)計報表 4 資料維護(hù) 5 權(quán)限管理 《物流信息系統(tǒng)》課程設(shè)計報告