【正文】 aa[3]:=39。 計(jì)劃內(nèi)外 : 39。+(39。工程項(xiàng)目名稱 39。 :=true。)。where 工程項(xiàng)目名稱 =:aa139。 (39。)。SELECT 工程項(xiàng)目名稱 , 招標(biāo)編號(hào) , 計(jì)劃內(nèi)外 , 設(shè)備類別 , 設(shè)備名稱 , 規(guī)格型號(hào) , 圖號(hào) , 數(shù)量 , 招標(biāo)方式 , 39。 then //事件 begin 。 var //數(shù)據(jù)類型定義 i:integer。 圖 5－ 2 主窗體布局 上述控件分別 按鈕在“ standard”控件組中添加，數(shù)據(jù) 頁 在“ win32”控件組中添加，數(shù)據(jù)控件在“ BDE” 、“ Data Access”、“ Data controls” 中增加。設(shè)置工程標(biāo)題“ Title” 為“招標(biāo)信息管理系統(tǒng)”，這樣將在 Windows 任務(wù)欄中顯示；圖標(biāo)為選定的圖標(biāo)，最后的結(jié)果如圖 5－ 1所示。 ? 廠商基本情況表 CREATE TABLE SCOTT.廠商基本情況表 ( 廠商 ID NUMBER(*) NOT NULL, 廠商名稱 VARCHAR2(50), 廠商類別 ID NUMBER(*), 地址 VARCHAR2(50), 城市 VARCHAR2(20), 省份 ID NUMBER(*), 地區(qū) ID NUMBER(*), 郵編 VARCHAR2(50), 營業(yè)執(zhí)照注冊號(hào) VARCHAR2(50), 稅號(hào) VARCHAR2(50), 開戶銀行 VARCHAR2(50), 帳號(hào) VARCHAR2(50), 電話 VARCHAR2(50), 傳真 VARCHAR2(50), 法人代表 VARCHAR2(20), 委托代理人 VARCHAR2(20), 企業(yè)簡介 VARCHAR2(255), 固定資產(chǎn) NUMBER(*), 流動(dòng)資產(chǎn) NUMBER(*), 企業(yè)總?cè)藬?shù) NUMBER(*), 上年產(chǎn)值 NUMBER(*), 上年凈利潤 NUMBER(*), 高級(jí)技工人數(shù) NUMBER(*), 中級(jí)職稱人數(shù) NUMBER(*), 高級(jí)職稱人數(shù) NUMBER(*), 質(zhì)量認(rèn)證體系 VARCHAR2(50), 廠商基本情況 VARCHAR2(255), 銀行資信 VARCHAR2(50), 證明出具單位 VARCHAR2(50), 廠家簡稱 VARCHAR2(20), 網(wǎng)內(nèi)網(wǎng)外 VARCHAR2(10) ) ? 廠商類別表 26 CREATE TABLE SCOTT.廠商類別表 ( 廠商類別 ID NUMBER(*) NOT NULL, 廠商類別 VARCHAR2(20) ) ? 廠商聯(lián)系人表 CREATE TABLE SCOTT.廠商聯(lián)系人表 ( 編號(hào) NUMBER(10, 0) NOT NULL, 類別 ID NUMBER(10, 0), 姓名 VARCHAR2(40), 職務(wù) VARCHAR2(40), 職稱 VARCHAR2(40), 辦公室電話 VARCHAR2(60), 住宅電話 VARCHAR2(40), 手機(jī) VARCHAR2(40), 傳呼 VARCHAR2(40), 電子郵件地址 VARCHAR2(60), 傳真 VARCHAR2(40), 廠商 ID NUMBER(10, 0) ) ? 廠商 業(yè)績表 CREATE TABLE SCOTT.廠商業(yè)績表 ( 廠商業(yè)績 ID NUMBER(*) NOT NULL, 序號(hào) NUMBER(*), 設(shè)備名稱 VARCHAR2(100), 型號(hào)規(guī)格 VARCHAR2(100), 數(shù)量 NUMBER(*), 業(yè)績分類 ID NUMBER(*), 質(zhì)量情況 VARCHAR2(100), 廠商 ID NUMBER(*) ) ? 地區(qū)表 CREATE TABLE SCOTT.地區(qū)表 ( 地區(qū) ID NUMBER(*) NOT NULL, 地區(qū) VARCHAR2(16) ) ? 工程項(xiàng)目表 CREATE TABLE SCOTT.工程項(xiàng)目表 ( 27 序號(hào) VARCHAR2(8), 工程項(xiàng)目名稱 VARCHAR2(40), 工程項(xiàng)目 ID VARCHAR2(8) NOT NULL ) ? 競標(biāo)信息表 CREATE TABLE SCOTT.競標(biāo)信息表 ( 工程項(xiàng)目名稱 VARCHAR2(40), 工程小項(xiàng) VARCHAR2(10), 競標(biāo)單位 VARCHAR2(40), 招標(biāo)編號(hào) VARCHAR2(30), 設(shè)備名稱 VARCHAR2(40), 設(shè)備類別 VARCHAR2(8), 規(guī)格型號(hào) VARCHAR2(40), 數(shù)量 VARCHAR2(8), 重量 VARCHAR2(8), 競標(biāo)單位報(bào)價(jià) VARCHAR2(10), 交標(biāo)時(shí)間 VARCHAR2(14), 開標(biāo)時(shí)間 VARCHAR2(14), 承諾書 VARCHAR2(8), 報(bào)價(jià)方式 VARCHAR2(8), 運(yùn)保費(fèi) VARCHAR2(10), 設(shè)備報(bào)價(jià) VARCHAR2(10), 安裝調(diào)試費(fèi) VARCHAR2(10), 中標(biāo)金額 VARCHAR2(10), 序號(hào) NUMBER(*) NOT NULL, 中標(biāo)時(shí)間 VARCHAR2(10), 其它費(fèi)用 VARCHAR2(10) ) ? 廠商考核情況表 CREATE TABLE SCOTT.考核情況表 ( 考核 ID NUMBER(10, 0) NOT NULL, 年度 VARCHAR2(44), 訂貨量 NUMBER(10, 0), 交貨情況 VARCHAR2(80), 設(shè)備質(zhì)量 VARCHAR2(80), 現(xiàn)場服務(wù) VARCHAR2(80), 質(zhì)量事故 VARCHAR2(80), 廠商 ID NUMBER(*) ) 28 ? 聯(lián)系人類別表 CREATE TABLE SCOTT.聯(lián)系人類別表 ( 類別 ID NUMBER(*) NOT NULL, 聯(lián)系人類別 VARCHAR2(20) ) ? 招標(biāo)計(jì)劃表 CREATE TABLE SCOTT.招標(biāo)計(jì)劃表 ( 工程項(xiàng)目名 稱 VARCHAR2(30), 設(shè)備類別 VARCHAR2(16), 招標(biāo)編號(hào) VARCHAR2(30), 設(shè)備名稱 VARCHAR2(40), 規(guī)格型號(hào) VARCHAR2(40), 圖號(hào) VARCHAR2(40), 數(shù)量 VARCHAR2(12), 推薦投標(biāo)人 1 VARCHAR2(50), 推薦投標(biāo)人 2 VARCHAR2(50), 推薦投標(biāo)人 3 VARCHAR2(50), 推薦投標(biāo)人 4 VARCHAR2(50), 推薦 投標(biāo)人 5 VARCHAR2(50), 技術(shù)協(xié)議完成時(shí)間 VARCHAR2(28), 編制標(biāo)書發(fā)標(biāo) VARCHAR2(28), 組織答疑會(huì)議 VARCHAR2(28), 開標(biāo) VARCHAR2(28), 評(píng)標(biāo) VARCHAR2(28), 簽訂合同 VARCHAR2(28), 發(fā)放圖紙 VARCHAR2(28), 主持人 VARCHAR2(20), 主持人電話 VARCHAR2(16), 計(jì)劃內(nèi)外 VARCHAR2(16), 工程序號(hào) VARCHAR2(16), 招標(biāo)方式 VARCHAR2(40) ) ? 省份表 CREATE TABLE SCOTT.省份表 ( 省份 ID NUMBER(*) NOT NULL, 省份 VARCHAR2(40) ) 29 ? 特種資質(zhì)證書表 CREATE TABLE SCOTT.特種資質(zhì)證書表 ( 特種資質(zhì)證書 ID NUMBER(*) NOT NULL, 序號(hào) NUMBER(*), 特種資質(zhì)證書 VARCHAR2(200), 有效期 VARCHAR2(60), 廠商 ID NUMBER(*) ) ? 項(xiàng)目設(shè)備概算表 CREATE TABLE SCOTT.項(xiàng)目設(shè)備概算表 ( 工程項(xiàng)目名稱 VARCHAR2(40), 招標(biāo)編號(hào) VARCHAR2(30) NOT NULL, 設(shè)備名稱 VARCHAR2(40), 設(shè)備類別 VARCHAR2(8), 規(guī)格型號(hào) VARCHAR2(40), 預(yù)訂數(shù)量 VARCHAR2(6), 預(yù)訂重量 VARCHAR2(6), 概算 VARCHAR2(10) ) ? 業(yè)績分類表 CREATE TABLE SCOTT.業(yè)績分類表 ( 業(yè)績分類 ID NUMBER(*) NOT NULL, 業(yè)績分類 VARCHAR2(20) ) ? 職稱類別表 CREATE TABLE SCOTT.職務(wù)類別表 ( 類別 ID NUMBER(10, 0) NOT NULL, 職務(wù)類別 VARCHAR2(100) ) ? 中表信息表 CREATE TABLE SCOTT.中標(biāo)信息表 ( 工程項(xiàng)目名稱 VARCHAR2(40), 工程小項(xiàng) VARCHAR2(10), 招標(biāo)編號(hào) VARCHAR2(30) NOT NULL, 設(shè)備名稱 VARCHAR2(40), 設(shè)備類別 VARCHAR2(8), 規(guī)格型號(hào) VARCHAR2(40), 30 數(shù)量 VARCHAR2(6), 重量 VARCHAR2(6), 中標(biāo)廠家 VARCHAR2(40), 中標(biāo)時(shí)間 VARCHAR2(14), 中標(biāo)金額 VARCHAR2(8), 中標(biāo)方式 VARCHAR2(8), 承諾書 VARCHAR2(6), 合同號(hào) VARCHAR2(40) ) ? 主要產(chǎn)品表 CREATE TABLE SCOTT.主要產(chǎn)品表 ( 主要產(chǎn)品 ID NUMBER(*) NOT NULL, 序號(hào) NUMBER(*), 產(chǎn)品名稱 VARCHAR2(40), 型號(hào)規(guī)格 VARCHAR2(60), 參考單價(jià) VARCHAR2(20), 廠商 ID NUMBER(*) ) ? 主要裝備表 CREATE TABLE SCOTT.主要裝備表 ( 裝備 ID NUMBER(10, 0) NOT NULL, 序號(hào) NUMBER(10, 0), 設(shè)備名稱 VARCHAR2(200), 加工檢測范圍 VARCHAR2(200), 廠商 ID NUMBER(10, 0) ) ? 資料交付表 CREATE TABLE SCOTT.資料交付表 ( 序號(hào) VARCHAR2(10) NOT NULL, 工程名稱 VARCHAR2(40), 賣方名稱 VARCHAR2(60), 招標(biāo)文件 VARCHAR2(30), 投標(biāo)文件 VARCHAR2(30), 商務(wù)評(píng)價(jià)表 VARCHAR2(30), 技術(shù)評(píng)價(jià)報(bào)告及匯總表 VARCHAR2(30), 綜合評(píng)價(jià)報(bào)告 VARCHAR2(30), 中標(biāo)通知書 VARCHAR2(30), 合同號(hào) VARCHAR2(40), 考察報(bào)告 VARCHAR2(30), 31 工作聯(lián)系單 VARCHAR2(30), 技術(shù)協(xié)議 VARCHAR2(30), 文本合同 VARCH