醫(yī)院信息系統(tǒng)軟件總體項目設(shè)計方案

1、醫(yī)院信息系統(tǒng)軟件總 體項目設(shè)計方案第二章：相關(guān)技術(shù)指標(biāo)描述第三章：前端控件的開發(fā)3。1 ldbase_FRM 控件3。11 ldbase_FRM 控件總體說明把操作提示區(qū)放到一起，如操作員，日期，終端，提示區(qū)和操作提示區(qū)。 提供幾個更新方法：SetUsrName(Usrname:string)通過基本的 API: getargv( usrname' ); 得到SetDate(DateStr:string)通過基本的 date 函數(shù)得到SetTrmno(Trmno:string)通過基本的 API: getargv( trmno') 得到 SetCopyright(CopyRig

2、htStr:string)通過基本的 API: getargv( trmno') 得到SetHelp(HelpStr:string)通過基本的 txt_control.help 得到注意把每個 edit 控件， combo 控件的 hint=helpster,showhint=true.能否把控件分成一組一組的，便于控制？增加以下方法 :Focusfirst(grp:string)grp= control object group name,if=nil indicate current group.If currentgrp =-1 find first group.Focusbyn

3、ame(ctlname:string)Ctlname 表示控件名稱FocusLast(grd:string)grp=konggroup name,if=nil indicate current group.FocusPrev(grp:string)grp=control object group name,if=nil indicate current group. FocusNext(grp:string)grp=control object group name,if=nil indicate current group. UpdCtlByStr(Grp:String,Updstr:str

4、ing)grp=control object group name,if=nil indicate current group.UpdStr 格式如' ctyno=abcdef;ctyname=972397; 。' . 參見 grid string一般他用 grid.getstr 得到, 在 grid.onclick 事件中調(diào)用 為了實現(xiàn)以上功能，每個控件必須有一個 group 屬性 ,表示控件所屬的組。3。 2 ldtext控件3。 21 ldtext控件總體說明增加屬性：Group 表示控件所屬的組 ,如” luo ” 一般任何控件都需要本屬性TabStop 表示控件是否可

5、以得到焦點 一般任何控件都需要本屬性TabOrder 表示控件得到焦點的順序HelpStr 表示控件得到焦點后的提示字符串MatchStr表示 grid 中的容字符串要更新的 edit 或其他控件的容匹配字符串 如 grid 中得到' ctyno=abcdef;ctyname=972397; 。 。'.而 屏 幕 上 有 一 個 txt_bdctyf_ctyno.matchstr=' ctyno ', 則txt_bdxtyf_ctyno.text= ' abcdef '他通過 ldbase_frm 的 ctlupdate 方法更新，具體說明見 l

6、dbase_frm 說明FmtStr 表示編輯的容的數(shù)據(jù)格式 , 如: # V(n) 自由格式 , 長度為 n, 數(shù)據(jù)庫用 varchar # Z(n) 自由格式 , 長度為 n, 數(shù)據(jù)庫用 char# S(n) 'a'-'z' '0'-'9' 'A'-'Z'和漢字 字符串格式 , 長度為 n# A(n) 'a'-'z' '0'-'9' 'A'-'Z'字符串格式 , 長度為 n# C(n) 漢字字符串格式

7、 , 長度為 n# G(n) '0'-'9' 字符串格式 , 長度為 n# P(n) '0'-'9' 字符串格式 , 前端顯示用密碼方式顯示dnsn# D(yn,mn,dn)日期字符串格式 , 年份長度為 yn, 月份長度為 mn, 天的長度為# T(hn,mn,sn)時間字符串格式 , 小時長度為 hn, 分鐘長度為 mn, 秒的長度為# I(n) 整型格式長度為 n# F(n1,n2)浮點格式 , 小數(shù)點前面為 n1 位,小數(shù)為 n2 位# $(n1,n2)金額格式 , 小數(shù)點前面為 n1 位,小數(shù)為 n2 位minlen表示

8、輸入數(shù)據(jù)的最小長度 , 一般 >=0maxlen 表示輸入數(shù)據(jù)的最大長度 , 一般 >0,0 和負(fù)數(shù)表示不限制keystr 表示編輯容是否關(guān)鍵字字段 , 如 : p'表示唯一的 primary key f '表示和主表對應(yīng)的組合 primary 之一 c'表示不和主表對應(yīng)的組合其他primary key t '表示本字段為不可以修改字段'n'表示本字段為一般字段BackAttr 表示在控件的首字符前按 backspace 的處理 : 如 false 表示無動作 ,true 表示進入前一個控件FullAttr 表示在控件輸入滿字符后的處

9、理 , 如 false 表示無動作 ,true 表示進入下一個控件FullFlag 表示該控件必須輸入滿字符 , 如 false- 表示無需輸入滿 ,true- 表示必須輸入滿Backcolor 表示該控件的提示字符顏色Forecolor 表示該控件的輸入字符在失去焦點后的顏色EditBackColor 表示該控件的在輸入時輸入框的顏色EditForeColor 表示該控件的在輸入時輸入字符的顏色FontNo 表示該字符字體 , 如建立常見的幾種字體Layout 表示標(biāo)簽的位置關(guān)系 , 如 left/right 表示左右 ,top/bottom 表示上下LabelWidth 表示標(biāo)簽的長度Te

10、xtWidth 表示輸入框的長度缺省的 passwordchar 為 *, 無需在外部指定 缺省的 AllowHeadNull 為 false缺省的 showhint 為 true缺省的 hint 為 helpstr3。 3 ldgrid控件3。 31 ldgrid 控件總體說明增加以下屬性attr: 表示唯一定位時的列屬性'p' , ' f' , ' c'表示唯一定位時要用到的列進行比較和匹配 'n'和t'及其他表示不需要dispf: 表示列的顯示和非顯示屬性 , ' d' orh'True 表示

11、列顯示 ,False 表示列不顯示增加以下方法LdGrid.SetCols(ColFmtStr:string) 按列描述字符串格式初始化 grid 的列.ColFmtStr 格式如下：” name;width;fmt;attr;cption# 。 。”Name格式如：ctynoWidth 格式如 :widthFmt 格式如：V(8),C(8),I(6),G(6),A(20),D(4,2,2),T(2,2,2),F(10,2),$(10.2)等Attr 格式如 ：null,disp,print,disp&printCaption 格式如：國家編碼RowFirst() 把光標(biāo)定位到第一行上

12、RowEmpty()清除所有容RowLocate(Locstr：string)Locstr定位容字符串，格式如下：'ctyno=abcdef;ctyname=972397; 。 。RowAppend(Appstr：string)Appstr刪除容字符串，格式如下：'ctyno=abcdef;ctyname=972397; 。 。Appstr=nil or ''表示空行在當(dāng)前行之前添加 , 光標(biāo)定位在剛添加的一行。RowInsert(Insstr：string)Insstr 插入容字符串，格式如下：' ctyno=abcdef;ctyname=972397

13、; 。Insstr=nil or '表示空行 在當(dāng)前行之前插入 , 光標(biāo)定位在剛插入的一行。RowUpdate(Updstr:string)Updstr 修改容字符串，格式如下：RowDelete(Delstr:string)Delstr 刪除容字符串，格式如下：RowGetStr(Getstr:string)Getstr 取得容字符串，格式如下：RowPrev()把光標(biāo)定位到上一行上RowNext()把光標(biāo)定位到下一行上RowLast()把光標(biāo)定位到最后一行上AddTitle(TitleStr:string)把打印標(biāo)題字符串加到 GRID中ctyno=abcdef;ctyname=9

14、72397;ctyno=abcdef;ctyname=972397;ctyno=abcdef;ctyname=972397;。'。'。'AddPage(PageHeaderLStr, PageHeaderCStr, PageHeaderRStr:string)把打印表頭字符串加到GRID中AddPage(PageFooterLStr, PageFooterCStr, PageFooterRStr:string)把打印表尾字符串加到GRID中PreView()打印預(yù)覽OnClick()一般本函數(shù)由用戶編寫 , 他負(fù)責(zé)把選中的行或列的容寫到畫面的 edit 控件上3。 4

15、ldreport控件3。 5 ldcombo 控件參見 ldedit3。 6 button 控件參見 ldedit第四章：終端授權(quán)接口描述4。1 終端授權(quán)接口總體說明終端授權(quán)主要用于管理客戶端的終端的合法性授權(quán)， 只有通過軟件的檢查并得到授權(quán)的 終端才可以和后端系統(tǒng)進行交易， 終端授權(quán)文件和系統(tǒng)的運行目錄在同一個目錄下， 它的名 字叫 ldtrmapp.ini ，同時系統(tǒng)提供一個處理終端授權(quán)的庫函數(shù)，他和系統(tǒng)的運行目錄在同 一個目錄下，它的名字叫 ldtrmapp.dll 。其中 ldtrmapp.ini 文件格式如下： hostname trmno=”000001”key=” acfdefg

16、hh ”為了保證一個配置文件可以重復(fù)使用在多個終端上， 上述容可以重復(fù)， 以上容表示一個 終端的配置文件， 系統(tǒng)支持每個終端一個文件， 其容各不一樣。 其 hostname 為本機 hostname 。 但為了管理方便，可以把系統(tǒng)所有的終端配置文件寫在同一個文件中，因此本文本有多個 SECTION。Trmno 表示主機上終端數(shù)據(jù)庫中描述的終端名稱。Key 表示通過用 hostname 經(jīng)過 trmno 和前端系統(tǒng)的特殊可控制變量變換后的結(jié)果，一 般用hash和DES算法實現(xiàn)。其中 ldtrmapp.dll 提供以下動態(tài)庫函數(shù)：取得終端名稱 GetHostName() 檢查終端的合法性 ChkT

17、rmValid()4。2 終端授權(quán)接口的詳細(xì)描述4。 2。1 GetHostName()函數(shù)調(diào)用原型說明：int GetHostname(hostname);/ 表示要返回的主機名稱函數(shù)接口參數(shù)說明：char*hostname;函數(shù)返回值說明：0-表示成功， 1- 表示失敗。 函數(shù)調(diào)用說明：無 系統(tǒng)實現(xiàn)說明：無4。2。2 ChkTrmValid()函數(shù)調(diào)用原型說明：int ChkTrmValid(trmid);函數(shù)接口參數(shù)說明：char *trmid; / 表示返回的終端代號。 函數(shù)返回值說明：0-表示合法， 1- 表示非法 ,2- 讀授權(quán)文件失敗。 函數(shù)調(diào)用說明：無系統(tǒng)實現(xiàn)說明：系統(tǒng)自動取得

18、 hostname ，檢查終端的合法性，返回合法的終端代號。第五章：三層式交易接口描述5。1 交易接口總體說明交易接口屬于開發(fā)層面的容， 以下主要通過提供客戶端的動態(tài)庫實現(xiàn)客戶端訪問的透明 性，客戶端的動態(tài)庫和客戶端的運行程序在同一個用戶目錄下，文件名為 ldmidc.dll 。同 時提供編程的頭文件 ldmidch.pas 供程序員參考。 同時為了服務(wù)器端的訪問透明， 服務(wù)器端 提供相關(guān)動態(tài)庫函數(shù)，文件名為 ldmids.dll 。同時提供編程的頭文件 ldmidsh.pas 供程序該客戶端動態(tài)庫 ldmidc.dll 提供以下函數(shù)：和中間件核心連接函數(shù) ConnectMidKernel()

19、 交易請求函數(shù) DoMidTx() 和中間件核心斷鏈函數(shù) DisconnectMidKernel() 取得當(dāng)前返回錯誤提示函數(shù) GetTxMsgDefault() 取得任意返回錯誤提示函數(shù) GetTxMsgByInt()該服務(wù)器端動態(tài)庫 ldmids.dll 提供以下函數(shù)：取得系統(tǒng)變量函數(shù) GetSvrVar()5。2 客戶端交易接口的詳細(xì)描述formload 時處理，同時系統(tǒng)允許在每次調(diào) DisconnectMidKernel() 嵌套調(diào)用。5。2。1 ConnectMidKernel()constchar*midware;/表示連接的 MIDWAR的名字，女口 tuxedo,cstalk等

20、constchar*midwarehost;/表示連接的 MIDWAR核心主機的別名或 IP地址constchar*trmid;/表示連接的 CLIENT 的 終端 代號 , 一般 用hostname 表示constchar*usrid;/表示連接的 CLIENT 的用戶代號,一般用 usrid表示constchar*usrpasswd; /連接的CLIENT的用戶口令，一般用passwd表示.函數(shù)調(diào)用原型說明：int ConnectMidKernel(midware,midwarehost,trmid,usrid,usrpasswd);函數(shù)接口參數(shù)說明：函數(shù)返回值說明：0-表示成功， 1-

21、表示失敗。對于具體錯誤返回提示用 GetErrMsgDedefult 得到。 函數(shù)調(diào)用說明：本函數(shù)一般在系統(tǒng)初始化時調(diào)用，如在用 DoMidTx 時及時調(diào)用本函數(shù)，允許和 系統(tǒng)實現(xiàn)說明：當(dāng)發(fā)現(xiàn)已經(jīng)連接了以后，系統(tǒng)不在做連接動作，而只把連接的次數(shù)加1, 在斷連接 時自動把連接次數(shù)減一，實現(xiàn)系統(tǒng)的嵌套式調(diào)用。3。1。2 DoMidTx ()函數(shù)調(diào)用原型說明：int DoMidTx(txc,tic,tid,toc,trc,tod);函數(shù)接口參數(shù)說明：TXC *txc;/ 表示交易控制塊結(jié)構(gòu)TIC*tic;/ 表示交易請求控制塊結(jié)構(gòu)Char*tid;/ 表示交易請求數(shù)據(jù)塊,由用戶自己定義,/ 一般和交

22、易接口文檔的容一致。Char*trc;/ 表示交易請求和應(yīng)答往返控制塊。 由用戶設(shè)置和系統(tǒng)返回。/ 在調(diào)用時為本次往返的起始條件,一般首次由用戶設(shè)置。/ 在返回時為下次往返的起始條件。TOC*toc;/ 表示交易應(yīng)答控制塊Char*tod;/ 表示交易應(yīng)答數(shù)據(jù)塊/ 一般和交易接口文檔的容一致交易控制塊一般包括如下容typedef structchartimeout6;chartrmid6;chartrmsno6;charusrid6;charusrsno6;chartxtoken24;/ 表示交易延時，以秒為單位/ 終端代號/ 終端流水號/ 用戶代號/ 用戶流水號/ 交易令牌/ 表示服務(wù)名稱/

23、 表示交易代號/ 表示交易沖正標(biāo)志正常狀態(tài)表示取消狀態(tài)，表示不留痕跡 表示沖正狀態(tài)，表示留痕跡/ 表示交易請求期望得到的結(jié)果類型表示期望得到單筆返回結(jié)果 表示期望得到多筆往返返回 / 表示需要設(shè)置數(shù)據(jù)庫事務(wù)標(biāo)志char hseqno6; char txcnt6;char txmax6;char txfee12; char txamt12;char tidlen6;char trclen6;char todlen6; TIC; 交易返回控制塊包括如下容：TXC; 交易請求控制塊一般包括如下容： typedef structchar svrname24; char txno6;char hcode

24、1;/'0'-/'1'- /'2'- char txtype1;/'0'- /'1'- char commitf1;/ 更改數(shù)據(jù)庫用 '1'/ 查詢數(shù)據(jù)庫用 '0'/ 其他標(biāo)志由用戶自己控制/ 沖正或取消交易的原流水號。/ 本次交易上送 tid 記錄數(shù)/ 本次交易可以返回的最大記錄數(shù)/ 如果為 0 表示：/ 由服務(wù)器端按 tid.todlen 決定返回最大記錄數(shù) / 交易手續(xù)費/ 交易金額/ 交易請求數(shù)據(jù)塊長度/ 交易往返控制塊長度/ 交易返回數(shù)據(jù)塊長度typedef structc

25、hartxrst8;/ 交易返回代碼chartxmsg80;/ 交易錯誤提示。chartxhlp80;/ 交易返回處理提示。chartrmseqno6;/ 返回終端流水號charusrseqno6;/ 返回用戶流水號，一般由主機生成，chartxtype1;/ 表示交易返回結(jié)果類型 /'0'- 表示單筆返回結(jié)果 /'1'- 表示多筆往返返回/'0'-/'1'-chartxcnt6;/ 本次交易返回記錄數(shù)/ 在非往返交易情況下為 1chartxmax6;/ 本次交易可以返回的最大記錄數(shù)/ 在非往返交易情況下為 1/ 如果大于交易返回

26、記錄數(shù)表示交易結(jié)束chartodlen6;/ 返回數(shù)據(jù)長度TOC;函數(shù)返回值說明：得到。0-表示成功， 1- 表示失敗。對于具體錯誤返回提示用GetErrMsgDedefult函數(shù)調(diào)用說明：本函數(shù)一般在交易請求時調(diào)用。 系統(tǒng)實現(xiàn)說明：當(dāng)發(fā)現(xiàn)未連接時，系統(tǒng)自動做連接動作。3。 1。3 DisconnectMidKernel()函數(shù)調(diào)用原型說明：int DisconnectMidKernel(); 函數(shù)接口參數(shù)說明：無函數(shù)返回值說明：得到。0-表示成功， 1- 表示失敗。對于具體錯誤返回提示用GetErrMsgDedefult函數(shù)調(diào)用說明：本函數(shù)一般在退出系統(tǒng)時調(diào)用，注意要和 ConnectMid

27、Kernel() 匹配。 系統(tǒng)實現(xiàn)說明：如果減當(dāng)發(fā)現(xiàn)未連接時，系統(tǒng)不做連接動作。當(dāng)系統(tǒng)連接數(shù)不為0時，自動減一， 一為 0,真實 Disconnect。和 ConnectMidKernel 實現(xiàn)嵌套。3。 1。4 GetTxMsgByInt()函數(shù)調(diào)用原型說明：void GetTxMsgByInt(errcode,errmsg);函數(shù)接口參數(shù)說明：int errcode;/ 錯誤代碼char *errmsg;/ 錯誤提示緩沖區(qū)函數(shù)返回值說明：函數(shù)調(diào)用說明： 本函數(shù)一般在取得系統(tǒng)各種錯誤代碼的提示時使用。系統(tǒng)實現(xiàn)說明：無3。1。 5 GetTxMsgDefault()函數(shù)調(diào)用原型說明：voidG

28、etTxMsgDefault(errmsg);函數(shù)接口參數(shù)說明：/ 錯誤提示緩沖區(qū)char*errmsg;函數(shù)返回值說明： 無 函數(shù)調(diào)用說明： 本函數(shù)一般在上次調(diào)用發(fā)生錯誤時使用。系統(tǒng)實現(xiàn)說明：無5。3 服務(wù)器端交易接口的詳細(xì)描述5。3。 1 GetSvrVar()函數(shù)調(diào)用原型說明： int GetSvrVar(int varid,TXC *txc,TIC *tic,char *varstr);/變量代號見TXC描述/ 見 TIC 描述/ 返回結(jié)果字符串函數(shù)接口參數(shù)說明： int varid; TXC *txc; TIC *tic; Char*varstr;函數(shù)返回值說明：0- 成功， 1-

29、失敗(無此變量)函數(shù)調(diào)用說明：varid 描述的各個 txc,tic 變量見相關(guān)的 include 頭文件 ldmidsh.pas 系統(tǒng)實現(xiàn)說明：無5。3。 2 CmpSvrVar()函數(shù)調(diào)用原型說明：int CmpSvrVar(int varid,TXC *txc,TIC *tic,char *str);/ 變量代號II見TXC描述TIC *tic;Char*str;II 見 TIC 描述II 比較字符串函數(shù)返回值說明：0-匹配， 1-不匹配， 2- 無此變量 函數(shù)調(diào)用說明：varid 描述的各個 txc,tic 變量見相關(guān)的 include 頭文件 ldmidsh.pas 匹配不區(qū)分大小寫

30、。系統(tǒng)實現(xiàn)說明：無第六章：數(shù)據(jù)庫訪問接口描述6。1 數(shù)據(jù)庫接口總體說明數(shù)據(jù)訪問接口主要用于處理數(shù)據(jù)庫的數(shù)據(jù)訪問，每個數(shù)據(jù)庫都有相關(guān)的數(shù)據(jù)庫訪問函 數(shù)，一般包括插入，刪除，修改，運算，選擇，加鎖，最小，最大等。為了實現(xiàn)以上功能， 必須提供一個項目數(shù)據(jù)庫描述腳本和數(shù)據(jù)庫的原始描述腳本， 通過 這兩個最基本的腳本自動產(chǎn)生數(shù)據(jù)庫訪問的程序代碼和項目工程文件， 再通過該項目工程文 件產(chǎn)生相關(guān)的動態(tài)連接庫，具體的原始文檔命名和格式規(guī)見下面容：項目描述文件： dba 項目名 .pjt 數(shù)據(jù)庫表描述文件： dba 表名 .gen 項目數(shù)據(jù)庫腳本： dba 項目名 .sql 表初始化數(shù)據(jù)庫腳本： dba 表名

31、.sql 項目工程文件： dba 項目名 .dpr 數(shù)據(jù)庫訪問結(jié)構(gòu)的頭文件： dbs 項目名 .pas 數(shù)據(jù)庫表訪問結(jié)構(gòu)的頭文件：dbs 表名 .pas每個表對應(yīng)的數(shù)據(jù)訪問文件：dba 表名 .pas項目過程中應(yīng)該產(chǎn)生的必要文檔： dba 項目名 .dfm ，。由項目工程文件產(chǎn)生的數(shù)據(jù)庫訪問的動態(tài)庫函數(shù)：dba項目名.dll在項目名 .dll 中包含如下函數(shù)： 數(shù)據(jù)庫連接函數(shù) dbconnect() 數(shù)據(jù)庫連接函數(shù) dbdisconnect() 數(shù)據(jù)庫訪問函數(shù)dba表名();詳細(xì)容請見相關(guān)章節(jié)。函數(shù)接口參數(shù)說明： int varid; TXC *txc;6。2 文件格式詳細(xì)描述6。2。1 項目

32、描述文件項目描述文件的文件名為： dba 項目名。 Pjt 文件格式如下：DATABASE dbserver= dbname= usrid= usrpasswd=TABLE表 1 ：表的中文注釋表 2 ：表的中文注釋 COMMENT 項目注釋其中表的中文注釋可以沒有6。2。2 數(shù)據(jù)庫表描述文件數(shù)據(jù)庫表描述文件的文件名為： dba 表名 .gen文件格式如下：PURPOSE分割描述數(shù)據(jù)庫表的作用，其中用“”作為注釋符，可以支持多行，每行用 如果在文檔中要自動回行用“ n ”表示換行a/”“ purpose 1 ”TABLEname="中文表名”FIELD#描述表中的各個字段，其中數(shù)據(jù)類

33、型見以下表#數(shù)據(jù)類型包括 ,c(char),vc(varchar),i(integer),$(decimal) #數(shù)據(jù)類型格式見下 :c(6),vc(6),i(6),$(10,2) #英文名稱中文名稱 字段類型及長度 字段備注fid1“字段 1”char(6)本字段為關(guān)鍵字字段INDEX#索引約束類型包括 :"pk","uk","k"#索引物理類型包括 :"c(luster)"-聚簇 ,"n(oncluster)"-非聚簇#相關(guān)字段：描述關(guān)鍵字的各個相關(guān)字段，如果有多個用"，"

34、; 分隔#索引字索引約束類型 索引物理類型 相關(guān)字段?！眛ab_idx1 pk“ c”“ fld1,fld2,CONSTRAINT#現(xiàn)在暫時不用LOAD DATA#輸入要建立的原始數(shù)據(jù)，在產(chǎn)生的*.sql 中體現(xiàn)TABLE RELATIONSHIP #現(xiàn)在暫時不用 LIFE CYCLE 描述數(shù)據(jù)庫表的生命周期，其中用“”作為注釋符 可以支持多行，每行用“” “分割 如果在文檔中要自動回行用“ n ”表示換行TRIGGER暫不用STORE PROCEDURE#暫不用TRANSACATION RELATIONSHIP#服務(wù)代號 交易代碼 交易中文名 交易訪問數(shù)據(jù)庫說明 reg_svr 0101 門

35、診掛號 “更新，刪除，修改，查詢等”以上文件格式未明確部分有待進一步明確。6。2。3 項目數(shù)據(jù)庫腳本數(shù)據(jù)庫表描述文件的文件名為： dba 項目名 .sql 文件格式如下：andif exists (select * from sysobjects where id = object_id('t_Action') OBJECTPROPERTY(id, N'IsUserTable') = 1)drop table t_Action - Create Table t_Action科技活動- Create table t_Action 科技活動Create Table

36、t_Action (FIdint identity(1,1) not null primary key,類別時間- 編號FActionTypeId int not null default 0,FDate char(8) not null default '',FAddressvarChar(48) not null default '', -地點FMastervarChar(48) not null default '',-主辦位編FActionTitlevarChar(48) not null unique,-主題FActionContvar

37、Char(1024) not null default '', -活動容FNotevarChar(255) not null default ''-備注重點項目鑒定);- Create Table t_ProjCheckCreate Table t_ProjCheck (FId int identity(1,1) not null primary key,- 編號FProjName varChar(48) not null, -項目名稱FDatechar(8) not null default '',-鑒定日期FCheckerVarChar(48

38、) not null default '', -鑒定單位FCheckIdvarChar(32) not null unique, -鑒定號FPersonsVarChar(48) not null default '', -參加人員FNotevarChar(255) not null default '' -備注);6。 2。4 表初始化數(shù)據(jù)庫腳本數(shù)據(jù)庫表描述文件的文件名為： dba 表名 .sql 文件格式如下：if exists (select * from sysobjects where id = object_id('t_Proj

39、Check') and OBJECTPROPERTY(id, N'IsUserTable') = 1)drop table t_ProjCheck - Create Table t_ProjCheck重點項目鑒定Create Table t_ProjCheck (FId int identity(1,1) not null primary key, - 編號FProjName varChar(48) not null, -項目名稱FDatechar(8) not null default '',-鑒定日期FCheckerVarChar(48) not n

40、ull default '', -鑒定單位FCheckIdvarChar(32) not null unique, -鑒定號FPersonsVarChar(48) not null default '', -參加人員FNotevarChar(255) not null default '' -備注);6。 2。5 數(shù)據(jù)庫訪問項目工程文件數(shù)據(jù)庫表描述文件的文件名為： dba 表名 .dpr 文件格式如下： program 項目名 ;usesForms,PolMain_Frm in 'PolMain_Frm.pas' frmPolMa

41、in,LDSysIntDef_u in 'LDSysIntDef_u.pas'。$R *.RESbeginApplication.Initialize;Application.CreateForm(TfrmPolMain, frmPolMain); Application.Run;end.參見 dephi 的工程文件格式，容一定要包含每個表的程序文件！ ！6。 2。6 項目表結(jié)構(gòu)頭文件數(shù)據(jù)庫表描述文件的文件名為： dbs 項目名 .pas 文件格式如下： 宏定義 : DBA_INSERT DBA_DELETE DBA_UPDATE DBA_KEYSEL DBA_KEYLOC D

42、BA_CALCUL DBA_MINSEL DBA_MAXSELtypestr_ 表名 = record字段 : 字段類型 ;end;。6。 2。7 數(shù)據(jù)庫表結(jié)構(gòu)頭文件數(shù)據(jù)庫表描述文件的文件名為： dbs 表名 .pas文件格式如下：typestr_ 表名 = record 字段 : 字段類型 ;end;6。 2。8 表訪問程序文件數(shù)據(jù)庫表描述文件的文件名為： dba 表名 .pas 文件格式如下：具體格式為 pas 格式的文件6。 2。9 項目過程中應(yīng)該產(chǎn)生的必要文檔數(shù)據(jù)庫表描述文件的文件名為： dba?.pas ，數(shù)據(jù)庫描述文檔， 文件格式如下：一般包括 dbaconnect,dbdisco

43、nnect 等處理的程序代碼， 。6。 2。10 數(shù)據(jù)庫訪問動態(tài)庫數(shù)據(jù)庫表描述文件的文件名為： dba 項目名 .dll 文件格式為動態(tài)庫格式。6。 2 數(shù)據(jù)庫訪問接口的詳細(xì)描述6。 2。1 DbaConnect()函數(shù)調(diào)用原型說明：int Dbaconnect(dbsvrname,dbname,connname);char char char*dbsvrname;*dbname;*connname;函數(shù)返回值說明：0-表示成功，1- 表示失敗。函數(shù)調(diào)用說明：無函數(shù)接口參數(shù)說明：系統(tǒng)實現(xiàn)說明：/ 表示要連接的數(shù)據(jù)庫服務(wù)器/ 表示要連接的數(shù)據(jù)庫/ 表示連接的名字6。 2。2 DbaDisconn

44、ect()函數(shù)調(diào)用原型說明：int DbaDisconnect(connname); 函數(shù)接口參數(shù)說明：char*connname;函數(shù)返回值說明：0-表示合法， 1- 表示失敗。 函數(shù)調(diào)用說明：/ 表示連接的名字無系統(tǒng)實現(xiàn)說明：系統(tǒng)自動切斷和數(shù)據(jù)庫的連接。6。2。3 Dba 表名 ()函數(shù)調(diào)用原型說明：int Dba函數(shù)接口參數(shù)說明：char*connname;int dbamode;表名 (char *connname,dbamode,dbastr);/ 表示連接的名字/ 表示數(shù)據(jù)訪問的方式/ 它有如下方式定義在項目頭文件中/DBA_INSERT/DBA_DELETE/DBA_UPDATE

45、/DBA_KEYSEL/DBA_KEYLOC/DBA_MINSEL/DBA_MAXSEL, 具體見下/DBA_RECADDDBA_RECSST數(shù)據(jù)庫源減數(shù)據(jù)DBA_RECTSS數(shù)據(jù)源減數(shù)據(jù)庫表結(jié)構(gòu) *dbastr;函數(shù)返回值說明：/ 表示數(shù)據(jù)訪問數(shù)據(jù)結(jié)構(gòu)正數(shù)或 0-表示訪問記錄條數(shù)，負(fù)數(shù) - 表示失敗。 函數(shù)調(diào)用說明：無 系統(tǒng)實現(xiàn)說明：系統(tǒng)要把數(shù)據(jù)庫訪問失敗的錯誤代碼轉(zhuǎn)化為負(fù)數(shù)返回。第七章：交易接口數(shù)據(jù)結(jié)構(gòu)7。1 交易接口數(shù)據(jù)結(jié)構(gòu)總體說明交易接口數(shù)據(jù)結(jié)構(gòu)主要用于處理交易接口數(shù)據(jù)結(jié)構(gòu)的自動代碼生成， 他生成訪問的交易 接口數(shù)據(jù)結(jié)構(gòu)程序文檔，供程序訪問時快速編程，便于系統(tǒng)文檔和程序的一致性。為了實

46、現(xiàn)以上功能，必須提供一個交易接口項目描述腳本和交易接口的原始描述腳本， 通過這兩個最基本的腳本自動產(chǎn)生交易接口的數(shù)據(jù)結(jié)構(gòu)。 具體的原始文檔命名和格式規(guī)見下 面容：交易接口項目描述文件： txi 項目名 .pjt 交易接口描述文件： txi 交易代號 .gen 交易接口數(shù)據(jù)結(jié)構(gòu)的頭文件： txi 項目名 .pas 詳細(xì)細(xì)節(jié)請見相關(guān)章節(jié)。7。2 文件格式詳細(xì)描述7。2。1 交易接口項目描述文件項目描述文件的文件名為： txi 項目名。 Pjt 文件格式如下：SERVER NAME svrname= usrid= usrpasswd=INTERFACE交易接口代號 1：交易接口的中文注釋 交易接口代

47、號 2：交易接口的中文注釋 COMMENT 項目注釋其易接口的中文注釋可以沒有7。2。2 交易接口描述文件數(shù)據(jù)庫表描述文件的文件名為： txi 交易接口 .gen文件格式如下：ATTRIBUTEserver=svr_deftxno=$filename(4,8)PURPOSE分割描述交易接口的作用，其中用“”作為注釋符，可以支持多行，每行用“” 如果在文檔中要自動回行用“ n ”表示換行a/”“ purpose 1 ”。TRANSCATION CONTROL BLOCK #描述交易接口易控制塊的各個字段，其中數(shù)據(jù)類型見以下表#英文名稱 中文名稱 字段類型及長度 字段備注fid1 “字段 1”ch

48、ar(6) 本字段為關(guān)鍵字字段。TRANSCATION REQUEST CONTROL BLOCK #描述交易接口易請求控制塊的各個字段，其中數(shù)據(jù)類型見以下表#英文名稱 中文名稱 字段類型及長度 字段備注fid1 “字段 1”char(6) 本字段為關(guān)鍵字字段。TRANSCATION REPEAT CONTROL BLOCK #描述交易接口易往返控制塊的各個字段，其中數(shù)據(jù)類型見以下表#英文名稱 中文名稱 字段類型及長度 字段備注fid1 “字段 1”char(6) 本字段為關(guān)鍵字字段。TRANSCATION INPUT DATA #描述交易接口易輸入數(shù)據(jù)塊的各個字段，其中數(shù)據(jù)類型見以下表#英文

49、名稱 中文名稱 字段類型及長度 字段備注fid1 “字段 1”char(6) 本字段為關(guān)鍵字字段。TRANSCATION OUTPUT CONTROL BLOCK #描述交易接口易返回控制塊的各個字段，其中數(shù)據(jù)類型見以下表#英文名稱 中文名稱 字段類型及長度 字段備注fid1 “字段 1”char(6) 本字段為關(guān)鍵字字段。TRANSCATION OUTPUT DATA #描述交易接口易輸出數(shù)據(jù)塊塊的各個字段，其中數(shù)據(jù)類型見以下表#英文名稱 中文名稱 字段類型及長度 字段備注fid1 “字段 1”char(6) 本字段為關(guān)鍵字字段PROCESS LOGIC描述交易接口的處理邏輯，其中用“”作為

50、注釋符可以支持多行，每行用“” “分割如果在文檔中要自動回行用“ n ”表示換行CLIENT CALLER描述交易接口的前端界面調(diào)用者和調(diào)用主要參數(shù)，其中用“”作為注釋符 英文名 中文名 調(diào)用備注ACCESS TABLE描述交易接口的訪問的數(shù)據(jù)庫表名和訪問方式，其中用“”作為注釋符#svrname txno txname dbaccess#服務(wù)名稱交易代號 交易名稱#數(shù)據(jù)庫訪問格式如 :tab1.insert;tab2.delete, 割svr_def 0101 $txname(0101)以上文件格式未明確部分有待進一步明確。數(shù)據(jù)庫訪問如果一個交易對多個表更改， 用分號分"tab1.

51、insert;tab2.delete"第八章：通用報表開發(fā)工具8。1 通用報表開發(fā)工具總體說明終端授權(quán)主要用于管理客戶端的終端的合法性授權(quán)， 只有通過軟件的檢查并得到授權(quán)的 終端才可以和后端系統(tǒng)進行交易， 終端授權(quán)文件和系統(tǒng)的運行目錄在同一個目錄下， 它的名 字叫 ldtrmapp.ini ，同時系統(tǒng)提供一個處理終端授權(quán)的庫函數(shù)，他和系統(tǒng)的運行目錄在同 一個目錄下，它的名字叫 ldtrmapp.dll 。其中 ldtrmapp.ini 文件格式如下： hostname trmno=”000001”key=” acfdefghh ”為了保證一個配置文件可以重復(fù)使用在多個終端上， 上述容

52、可以重復(fù)， 以上容表示一個 終端的配置文件， 系統(tǒng)支持每個終端一個文件， 其容各不一樣。 其 hostname 為本機 hostname 。 但為了管理方便，可以把系統(tǒng)所有的終端配置文件寫在同一個文件中，因此本文本有多個 SECTION。Trmno 表示主機上終端數(shù)據(jù)庫中描述的終端名稱。Key 表示通過用 hostname 經(jīng)過 trmno 和前端系統(tǒng)的特殊可控制變量變換后的結(jié)果，一 般用hash和DES算法實現(xiàn)。其中 ldtrmapp.dll 提供以下動態(tài)庫函數(shù)：取得終端名稱 GetHostName() 檢查終端的合法性 ChkTrmValid()8。2 通用報表描述文件8。2。1 通用報表

53、格式描述通用報表文件可以存儲在數(shù)據(jù)庫中 , 也可以存放在文件中 , 它主要分為以下幾個 SECTION： PURPOSE- 表示報表的用途ATTRIBUTE - 表示報表的屬性TITLE - 表示報表的大標(biāo)題HEAD COMMENT - 表示報表的大標(biāo)題以下表體之上的說明文字BODY HEAD DETAIL - 表示報表的表體末級表頭字段描述BODY HEAD GROUP -表示報表的表體非末級表頭字段描述TAIL COMMENT - 表示報表的表體以下的說明文字CONST PARAMETER -表示報表使用的報表常量通用報表格式文件的文件格式如下PURPOSE本報表用于市行之間的儲蓄通存通兌

54、資金清算ATTRIBUTERPTENAME= rpt0101RPTCNAME門診收費日報RPTSTYLE=1TITLEATTR=1HEADATTR=1BODYATTR=1TAILATTR=1LEFTSIZE=0TOPSIZE=0BODYLEFTSIZE=0BODYRIGHTSIZE=0FULLPAGESIZE=10FULLPAGEPROCESS=1;SUBTOTALPROCESS=1TOTALPROCESS=1; 報表英文名稱; 報表中文名稱;0- 無表體表， 1- 有表體表;0- 正常標(biāo)題 ,1- 倍高倍寬標(biāo)題;0- 正常表頭說明 ,1- 帶線框表頭說明;0- 行和行之間有分隔符， 1- 行

55、和行之間無分隔符;0- 正常表尾說明 ,1- 帶線框表尾說明; 報表左邊空; 報表上邊空; 報表表體左邊空; 報表表體右邊空；報表每頁行數(shù)，0表示不處理表格滿情況;0- 不處理， 1-按換頁處理 ,2- 加空行;0- 不處理， 1-按換頁處理 ,2- 加空行;0- 不處理， 1-按換頁處理 ,2- 加空行#SECTION="" ;section=(1-yes,0-no).TITLE#align=L:LEFT,C=CENTRE,R=RIGHT,F=FOLLOW LAST FIELD.# alignname captionformatC0,0 T01 "$RPTNAME"SRC0,0T02 "$UNITFNAME"SRC0,0 T03 "$UNITALIAS"SRC0,0 T04 "$UNEXIST"SRL0,0T05 "SYSCDATE=$SYSCDATE"SRC0,0T06 "SYSFDATE=$SYSFDATE"SRC0,0T07 "SYSEDATE=$SYSEDATE"SRC0,0T08 "SYSCTIM