1.前期管理.sql

一个很不错的实验室设备管理系统,用PB作为开发工具,具有一定的代表性.

        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'rq',
        '添表日期',
       0 ,
        '添表日期',
       0,
       23 ,
       0 ,
       77 ,
       247 ,
       'N',
        '添表日期' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'ysbmc',
        '原设备名称',
       0 ,
        '原设备名称',
       0,
       23 ,
       0 ,
       77 ,
       983 ,
       'N',
        '原设备名称' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'ysbbh',
        '原设备编号',
       0 ,
        '原设备编号',
       0,
       23 ,
       0 ,
       77 ,
       343 ,
       'N',
        '原设备编号' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'yggxh',
        '原规格型号',
       0 ,
        '原规格型号',
       0,
       23 ,
       0 ,
       77 ,
       526 ,
       'N',
        '原规格型号' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'gxyy',
        '更新原因',
       0 ,
        '更新原因',
       0,
       23 ,
       0 ,
       77 ,
       1207 ,
       'N',
        '更新原因' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'sbmc',
        '设备名称',
       0 ,
        '设备名称',
       0,
       23 ,
       0 ,
       77 ,
       983 ,
       'N',
        '设备名称' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'ggxh',
        '规格型号',
       0 ,
        '规格型号',
       0,
       23 ,
       0 ,
       77 ,
       526 ,
       'N',
        '规格型号' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'zzc',
        '制造厂',
       0 ,
        '制造厂',
       0,
       23 ,
       0 ,
       77 ,
       983 ,
       'N',
        '制造厂' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'yqjhrq',
        '要求交货日期',
       0 ,
        '要求交货日期',
       0,
       23 ,
       0 ,
       77 ,
       293 ,
       'N',
        '要求交货日期' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_mask,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'dj',
        '单价',
       0 ,
        '单价',
       0,
       24 ,
        '[General]',
       0 ,
       77 ,
       389 ,
       'N',
        '单价' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_mask,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'sl',
        '数量',
       0 ,
        '数量',
       0,
       24 ,
        '[General]',
       0 ,
       77 ,
       389 ,
       'N',
        '数量' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_mask,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'je',
        '金额',
       0 ,
        '金额',
       0,
       24 ,
        '[General]',
       0 ,
       77 ,
       389 ,
       'N',
        '金额' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'htrq',
        '合同日期',
       0 ,
        '合同日期',
       0,
       23 ,
       0 ,
       77 ,
       247 ,
       'N',
        '合同日期' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'sjjhrq',
        '实际交货日期',
       0 ,
        '实际交货日期',
       0,
       23 ,
       0 ,
       77 ,
       247 ,
       'N',
        '实际交货日期' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'azwcrq',
        '安装完成日期',
       0 ,
        '安装完成日期',
       0,
       23 ,
       0 ,
       77 ,
       247 ,
       'N',
        '安装完成日期' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cgjh',
       'dba',
       'bz',
        '备注',
       0 ,
        '备注',
       0,
       23 ,
       0 ,
       77 ,
       1207 ,
       'N',
        '备注' ) ;
 
CREATE TABLE "dba"."cght"
        ("id" char(22) NOT NULL ,
       "hth" char(20)  ,
       "qdrq" date  ,
       "jfmc" varchar(50)  ,
       "jfqzr" char(10)  ,
       "yfmc" varchar(50)  ,
       "yfqzr" char(10)  ,
       "sbmc" varchar(40)  ,
       "ggxh" char(10)  ,
       "zzc" varchar(50)  ,
       "dj" numeric(12,2)  ,
       "sl" numeric(12,2)  ,
       "je" numeric(12,2)  ,
       "fkfs" varchar(50)  ,
       "httk" varchar(200)  ) ;
 
CREATE UNIQUE INDEX "cght"
        ON "dba"."cght"
        ("id" ) ;
 
insert into "dba".pbcattbl
       (pbt_tnam,
        pbt_ownr,
        pbd_fhgt,
        pbd_fwgt,
        pbd_fitl,
        pbd_funl,
        pbd_fchr,
        pbd_fptc,
        pbd_ffce,
        pbh_fhgt,
        pbh_fwgt,
        pbh_fitl,
        pbh_funl,
        pbh_fchr,
        pbh_fptc,
        pbh_ffce,
        pbl_fhgt,
        pbl_fwgt,
        pbl_fitl,
        pbl_funl,
        pbl_fchr,
        pbl_fptc,
        pbl_ffce,
        pbt_cmnt)
       values
       ('cght',
        'dba',
        -9,
        400,
        'N',
        'N',
        0,
        34,
        'Arial',
        -9,
        400,
        'N',
        'N',
        134,
        2,
        '宋体',
        -9,
        400 ,
        'N',
        'N',
        134,
        2,
        '宋体',
        '采购合同') ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cght',
       'dba',
       'id',
        '序列号',
       0 ,
        '序列号',
       0,
       23 ,
       0 ,
       77 ,
       567 ,
       'N',
        '序列号' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cght',
       'dba',
       'hth',
        '合同号',
       0 ,
        '合同号',
       0,
       23 ,
       0 ,
       77 ,
       526 ,
       'N',
        '合同号' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cght',
       'dba',
       'qdrq',
        '签定日期',
       0 ,
        '签定日期',
       0,
       23 ,
       0 ,
       77 ,
       247 ,
       'N',
        '签定日期' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cght',
       'dba',
       'jfmc',
        '甲方名称',
       0 ,
        '甲方名称',
       0,
       23 ,
       0 ,
       77 ,
       1207 ,
       'N',
        '甲方名称' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cght',
       'dba',
       'jfqzr',
        '甲方签字人',
       0 ,
        '甲方签字人',
       0,
       23 ,
       0 ,
       77 ,
       293 ,
       'N',
        '甲方签字人' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,
        pbc_bmap,
        pbc_cmnt )
        values
        ('cght',
       'dba',
       'yfmc',
        '乙方名称',
       0 ,
        '乙方名称',
       0,
       23 ,
       0 ,
       77 ,
       1207 ,
       'N',
        '乙方名称' ) ;
 
insert into "dba".pbcatcol
       (pbc_tnam,
        pbc_ownr,
        pbc_cnam,
        pbc_labl,
        pbc_lpos,
        pbc_hdr,
        pbc_hpos,
        pbc_jtfy,
        pbc_case,
        pbc_hght,
        pbc_wdth,