【正文】 護(hù) ? 個(gè)股分類控制表維護(hù) ? 交易代碼對照表維護(hù) ? 交 易規(guī)則對應(yīng)表維護(hù) ? 交易代碼描述表維護(hù) ? 證券代碼映射表維護(hù) ? 基金對敲控制表維護(hù) ? 數(shù)據(jù)定義表維護(hù) ? 分類方法表維護(hù) ：查詢分析 ? 凈值與指數(shù)據(jù)走趨 ? 多個(gè)個(gè)股表現(xiàn) ? 個(gè)股表現(xiàn) ：業(yè)績考評 ? 對基金經(jīng)理考評 ? 對交易員考評 ：資產(chǎn)管理 ? 基金信息設(shè)置 ? 資金調(diào)配組管理 ? 資金調(diào)配組資金調(diào)整 39。, ? 證券變動信息查詢 ? 證券凍結(jié)信息查詢 ? 資金凍結(jié)信息查詢 ? 拆借流水信息查詢 ? 操作日志查詢 ? 出錯(cuò)日志查詢 ? 自動委托指示查詢 ? 簡單證券持倉查詢 ? 交易匯總查詢 ? 行業(yè)比重報(bào)表 ? 地區(qū)比重報(bào)表 ? 證券類別比重報(bào)表 ? 每股收益階段報(bào)表 ? 總股本比重報(bào)表 ? 流通股本比重報(bào)表 ：安全管理 ? 操作員管理 ? 操作員組管理 ? 操作員分組 ? 崗位權(quán)限設(shè)置 ? 交易控制管理 ? 登錄終端管理 ? 登錄權(quán)限設(shè)置 ? 查詢權(quán)限設(shè)置 ? 操作員移交管理 ? 拆借權(quán)限設(shè)置 ? 證券資金查詢控制 ：委托管理 ? 普通委托 ? 自動委托 ? 日間補(bǔ)委托 . BALPRO 說明 BALPro 將 BEATUXEDO 的 ATMI 接口作了封裝，為前后臺應(yīng)用提供了更為簡單的接口調(diào)用。對應(yīng)用開發(fā)人員來說，只需要實(shí)現(xiàn)以下五個(gè)函數(shù)就可以了。 . 應(yīng)用初始化函數(shù) (BAPSrvInit) 1) 功能描述 此函數(shù)會在應(yīng)用啟動的時(shí)候執(zhí)行一次。通常應(yīng)用在此處可以作一些全局變量的初始化。 BALPro 通過函數(shù)指 針 BAPSrvInit 引用此函數(shù)。調(diào)用時(shí)，與數(shù)據(jù)庫聯(lián)接仍保持。 BALPro通過函數(shù)指針 BAPSrvDone引用此函數(shù)。應(yīng)用可以作一些數(shù)據(jù)檢查和權(quán)限檢查等預(yù)處理工作。 2) 函數(shù)接口 函數(shù)名 :BAPSvcBegin 參數(shù) : rqst:上傳消息包體指針 len:上傳消息包體長度 返回值 : 0：成功 1：失敗 . 應(yīng)用服務(wù)完成函數(shù) (BAPSvcEnd) 1) 功能描述 此函數(shù)在每次應(yīng)用服務(wù)完成以后調(diào)用。BALPro 通過函數(shù)指針 BAPSvcEnd 引用函數(shù)。 BALPro 將服務(wù)請求通過函數(shù)參數(shù)傳給應(yīng)用。 BALPro通過函數(shù)指針 BAPService 應(yīng)用函數(shù)。這些函數(shù)的實(shí)現(xiàn)在動態(tài)庫 。早版本的 BAL 通過設(shè)置環(huán)境變量WSNADDR設(shè)置主機(jī)應(yīng)用網(wǎng)絡(luò)地址，這種方法仍然有效。但是新設(shè)置的主機(jī)地址只有在下一次作 BPWInit()才起作用。該調(diào)用將根據(jù)主機(jī)端的安全認(rèn)證級別將有關(guān)應(yīng)用和用戶認(rèn)證信息傳給主機(jī)。 2) 函數(shù)接口 函數(shù)名 :BPWInit 參數(shù) : cltname:主機(jī)名或主機(jī) IP 地址 usrname:端口號 grpname:組名 authkey:認(rèn)證信息 passwd:密碼 返回值 : 0：成功 1：失敗 . 開始事務(wù) (BPWBegin) 1) 功能描述 開始一個(gè)新事務(wù)。 2) 函數(shù)接口 函數(shù)名 :BPWBegin 參數(shù) :無 返回值 : 0：成功 1：失敗 . 同步發(fā)送請求 (BPWCall) 1) 功能描述 此函數(shù)向主機(jī)應(yīng)用發(fā)送請求，并等待應(yīng)答返回 2) 函數(shù)接口 函數(shù)名 :BPWCall 參數(shù) : svame:服務(wù)名 req:請求消息包指針 reqlen:請求消息包長度 rpl:應(yīng)答消息包指針 prpllen:應(yīng)答消息包長度指針 flag:保留標(biāo)志 返回值 : 0：成功 1：失敗 . 異步發(fā)送請求 (BPWACall) 1) 功能描述 應(yīng)用調(diào)用 BPWACall()發(fā)送請求，請求送出后，函數(shù)立即返回。應(yīng)用可以在適當(dāng)?shù)臅r(shí)候調(diào)用 BPWGetRply()來獲取應(yīng)答。 2) 函數(shù)接口 函數(shù)名 :BPWCommit 參數(shù) :無 返回值 : 0：成功 1：失敗 . 回滾事務(wù) (BPWAbort) 1) 功能描述 回滾一個(gè)事務(wù)。應(yīng)用可以多次建立與主機(jī)應(yīng)用的聯(lián)接。而且在建立新聯(lián)接 之前必須調(diào)用該函數(shù)斷開原來的聯(lián)接。 sCaption: String。 . 輸入值 ? sText:對話框中顯示的信息 ? sCaption:對話框中的標(biāo)題 ? mbType:對話框的按鈕類型 . 返回值 1:ID_OK 2:ID_CANCEL 3:ID_ABORT 4:ID_RETRY 5:ID_IGNORE 6:ID_YES 7:ID_NO 8:ID_CLOSE 9:ID_HELP . 程序流程 ? 取激活窗口的 Handle ? API 調(diào)用 MessageBox InputInteger . 過程說明 控制鍵盤輸入只能為整型的數(shù)字 . 過程原形 procedure InputInteger(var Key: Char)。 . 輸入值 ? Key:輸入的鍵值 . 程序流程 ? 過濾輸入的 KEY 值 CmbAddDAD . 過程說明 根據(jù)輸入的段編號從數(shù)據(jù)字典中出數(shù)據(jù)添加到指定下拉框中 . 過程原形 procedure CmbAddDAD(cmb: TComboBox。 sCon: String = 39。 bAll: Boolean = False)。 procedure CmbAddDAD(cmb: TCheckComboBox。 sCon: String = 39。)。 . 輸入值 ? cmb:指定的下拉框 ? sCode:段編號 ? sCon:指定的條件 ? bAll:是否添加一條空行數(shù)據(jù)以表示全部 . 程序流程 ? 過濾數(shù)據(jù)字典的 ClientDataSet ? 在指字下拉框中添加過濾出的數(shù)據(jù) CmbAdd . 過程說明 根據(jù)指定的字段名從指定數(shù)據(jù)結(jié)構(gòu)中取出數(shù)據(jù)添加到指定下拉框中 . 過程原形 procedure CmbAdd(cmb: TComboBox。 sID, sName: String。 overload。 var tbl: TQryTable。 bAll: Boolean = False)。 procedure CmbAdd(cmb: TComboBox。 sID: String。 overload。 var cds: TClientDataSet。 overload。 var cds: TClientDataSet。 overload。 scmb: String)。 . 輸入值 ? sText:下位框的文本 . 返回值 ? 返回定符串 . 程序流程 ? 定位左數(shù)第一個(gè)空格 ? 取出空格左邊的字符串返回 CmbLTrim . 函數(shù)說明 取出下拉框中的文本中右數(shù)第一個(gè)空格右邊的數(shù)據(jù) . 函數(shù)原形 function CmbLTrim(sText: String): String。 var SmartGrid: TSmartGrid。 . 輸入值 ? sFileName:文件 名字 ? dbg:指定的數(shù)據(jù)網(wǎng)格 . 程序流程 ? 打開指定的 Excel文件 ? 在這個(gè)文件插入報(bào)表標(biāo)題、操作員、打印時(shí)間 ? 保存 ? 打開或直接打印 GetDADDesc . 函數(shù)說明 根據(jù)指定的段編號、編號取出相應(yīng)的編號值 function GetDADDesc(sCode: String。 . 輸入值 ? sCode:段編號 ? sVal:編號 . 返回值 ? 編號值 . 程序流程 ? 根據(jù)指定的段編號、編號在數(shù)據(jù)字典中定位相應(yīng)的記錄 ? 取出編號值并返回 GetFieldValue . 函數(shù)說明 根據(jù)指定的字段名、記錄號在指定的數(shù)據(jù)結(jié)構(gòu)中取出相應(yīng)的字段值 function GetFieldValue( tbl: TQryTable。 iRecNo: Integer): String。 . 輸入值 ? sIP:網(wǎng)卡上的 IP 地址 . 返回值 ? 網(wǎng)卡的 MAC 地址 . 程序流程 ? MakeSQL . 過程說明 組成 SQL 語句 procedure MakeSQL(var sSQL: String。 iValue: Integer)。 procedure MakeSQL(var sSQL: String。 overload。 . 輸入值 ? tm:定時(shí)器 . 程序流程 ? 顯示對話框 ? 設(shè)置定時(shí)器的刷新間隔 SetReportTitle . 過程說明 顯示設(shè)置報(bào)表標(biāo)題的對話框 procedure SetReportTitle(var dbg: TSmartGrid )。 bPrint: Boolean = False)。 dbg: TSmartGrid)。 dbg: TSmartGrid)。 . 輸入值 ? sDateTime:時(shí)間 . 程序流程 ? 組織指定的時(shí)間格式 ? API 調(diào)用 SetLocalTime 設(shè)置本地系統(tǒng)時(shí)間 GetCurTime . 函數(shù)說明 取出當(dāng)前本地的系統(tǒng)時(shí)間 function GetCurTime: String。 . 輸入值 ? sDate:日期 . 返回值 ? True:合法 ? False:不合法 . 程序流程 ? 判斷長度 ? 組織指定的日期格式 ? 判斷是否合法并返回 CheckTime . 函數(shù)說明 檢查時(shí)間是否合法 function CheckTime(const sTime: String): Boolean。 bCanNull: Boolean = False): Boolean。 bCanNull: Boolean = False): Boolean。 const sCaption: String): Boolean。 function CheckString(var cmb: TComboBox。 overload。 const sCaption: String = 39。): Boolean。 function CheckInteger(var cmb: TComboBox。39。 overload。 const sCaption: String = 39。): Boolean。 . 輸入值 ? edt:指定的輸入框 ? cmb:指定的下拉框 ? sCaption:輸入的內(nèi)容的名稱 . 返回值 ? True:是 ? False:不是 . 程序流程 ? 調(diào)用 StrToInt64Def 判斷輸入內(nèi)容是否為整型數(shù)字 CheckFloat . 函數(shù)說明 檢查輸入內(nèi)容是否為 0 function CheckFloat(var edt: TMoneyEdit。 overload。 const f: Double。 . 輸入值 ? sMoney:目標(biāo)內(nèi)存區(qū)域 ? f:金額型的數(shù)字 ? iDec:小數(shù)點(diǎn)位數(shù) . 程序流程 ? 把目標(biāo)內(nèi)存區(qū)域都賦值為‘ 0’ ? 將金額型的數(shù)據(jù)轉(zhuǎn)換為字符串 ? 去除小數(shù)點(diǎn) ? 從右 至左的復(fù)制字符串到目標(biāo)內(nèi)存區(qū)域 CopyNum . 過程說明 將指定浮點(diǎn)型的數(shù)字以字符串的形式復(fù)制到指定的內(nèi)存區(qū)域 procedure CopyNum(var sMoney: array of Char。 . 輸入值 ? sMoney: 目標(biāo)內(nèi)存區(qū)域 ? f:金額型的數(shù)字 . 程序流程 ? 把目標(biāo)內(nèi)存區(qū)域都賦值為‘ 0’ ? 將浮點(diǎn)型的數(shù)據(jù)轉(zhuǎn)換為字符串 ? 去除小數(shù)點(diǎn) ? 從右至左的復(fù)制字符串到目標(biāo)內(nèi)存區(qū)域 Encrypt . 函數(shù)說明 加密函數(shù) function Encrypt(const s: String): String。 . 輸入值 ? s:密文 . 返回值 ? 明文 . 程序流程 ? FormatMoney . 函數(shù)說明 將浮點(diǎn)型字符串格式為金額型字符串 function FormatMoney(sMoney: String): String。 . 輸入值 ? sMoney:浮點(diǎn)型字符串 . 返回值 ? 金額型字符串 . 程序流程 ? 分別取出小數(shù)點(diǎn)前的部分和小數(shù)點(diǎn)后的部分 ? 以‘，’格式化小數(shù)點(diǎn)前的部分 ? 并合字符串并返回 FormatMoney . 函數(shù)說明 將浮點(diǎn)型的數(shù)字轉(zhuǎn)換為金額型字符串 function FormatMoney(fMoney: Double): String。 . 輸入值 ? fMoney:浮點(diǎn)型數(shù)字 . 返回值 ? 金額型字符串 . 程序流程 ? 將浮點(diǎn)型數(shù)字轉(zhuǎn)換為字符串 ? 分別取出小數(shù)點(diǎn)前的部分和小數(shù)點(diǎn)后的部分 ?