zw.sql

一个用VB写的财务软件源码

     DLMONPLUS10 NUMBER(15,2) default 0 not null,
     DLMONPLAN11 NUMBER(15,2) default 0 not null,
     DLMONPLUS11 NUMBER(15,2) default 0 not null,
     DLMONPLAN12 NUMBER(15,2) default 0 not null,
     DLMONPLUS12 NUMBER(15,2) default 0 not null
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   alter table TZW_PLAN<<YEAR>>
     add constraint PK_ZW_PROPLAN<<YEAR>> primary key (ID)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   create table TZW_PLUS<<YEAR>>
   (
     ID             NUMBER default 0 not null,
     IACCOUNTPERIOD NUMBER default 1 not null,
     DMAKEDATE      DATE not null,
     CSUMMARY       VARCHAR2(60) not null,
     DEPLUS         NUMBER(15,2) default 0 not null,
     ISTATE         NUMBER default 0 not null
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   alter table TZW_PLUS<<YEAR>>
     add constraint PK_ZW_PLUS<<YEAR>> primary key (ID)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   create table TZW_PZSJ<<YEAR>>
   (
     ID            CHAR(8),
     KJQJ          NUMBER not null,
     PZZL          VARCHAR2(4) not null,
     PZBH          CHAR(4) not null,
     JLHM          NUMBER not null,
     PZRQ          DATE,
     FJZS          NUMBER,
     ZDRMCODE      VARCHAR2(4),
     ZDRM          CHAR(8),
     FHRMCODE      VARCHAR2(4),
     FHRM          CHAR(8),
     ZGRMCODE      VARCHAR2(4),
     ZGRM          CHAR(8),
     XGBZ          CHAR(1) not null,
     BSPECIAL      NUMBER,
     BCASHFLOW     NUMBER,
     BSPLITREC     NUMBER,
     PZZY          VARCHAR2(200),
     KMDM          VARCHAR2(40),
     KMMC          VARCHAR2(255),
     FX            CHAR(2),
     JE            NUMBER(15,2),
     SL            NUMBER(15,4),
     DJ            NUMBER(15,2),
     WB            NUMBER(15,2),
     HL            NUMBER(15,8),
     BZ            VARCHAR2(10),
     YHDZ_JSFSCODE CHAR(3),
     YHDZ_JSFS     CHAR(12),
     YHDZ_BILL     CHAR(12),
     YHDZ_DATE     DATE,
     YHDZ_LQBZ     NUMBER,
     YHDZ_HXBZ     NUMBER default 0,
     YHDZ_ID       NUMBER
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   alter table TZW_PZSJ<<YEAR>>
     add constraint PK_ZW_PZSJ<<YEAR>> primary key (KJQJ,PZZL,PZBH,JLHM)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 170K
       next 160K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   create index IND_PZSJ_ID<<YEAR>> on TZW_PZSJ<<YEAR>> (ID)
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents unlimited
       pctincrease 0
     );
   create table TZW_TEMPLETDETAIL<<YEAR>>
   (
     CCODE         CHAR(3) not null,
     JLHM          NUMBER not null,
     PZZY          VARCHAR2(200),
     KMDM          VARCHAR2(40),
     KMMC          VARCHAR2(255),
     FX            CHAR(2),
     JE            NUMBER(15,2) default 0,
     SL            NUMBER(15,4) default 0,
     DJ            NUMBER(15,2) default 0,
     WB            NUMBER(15,2) default 0,
     HL            NUMBER(15,8),
     YHDZ_JSFSCODE CHAR(3),
     YHDZ_JSFS     CHAR(12),
     YHDZ_BILL     CHAR(12),
     YHDZ_DATE     DATE,
     YHDZ_LQBZ     NUMBER,
     YHDZ_HXBZ     NUMBER default 0,
     YHDZ_ID       NUMBER,
     GRWL_CODE     CHAR(20),
     GRWL_NAME     CHAR(20),
     GRWL_BILL     CHAR(12),
     GRWL_DATE     DATE,
     GRWL_LQFLG    NUMBER,
     GRWL_QCFLG    NUMBER default 0,
     KHWL_CODE     CHAR(12),
     KHWL_NAME     CHAR(60),
     KHWL_BILL     CHAR(12),
     KHWL_DATE     DATE,
     KHWL_CBDCODE  CHAR(20),
     KHWL_CBDNAME  CHAR(20),
     KHWL_LQFLG    NUMBER,
     KHWL_QCFLG    NUMBER default 0,
     GYSWL_CODE    CHAR(12),
     GYSWL_NAME    CHAR(60),
     GYSWL_BILL    CHAR(12),
     GYSWL_DATE    DATE,
     GYSWL_CBDCODE CHAR(20),
     GYSWL_CBDNAME CHAR(20),
     GYSWL_LQFLG   NUMBER,
     GYSWL_QCFLG   NUMBER default 0,
     BMDM          CHAR(12),
     BMMC          CHAR(20),
     XMDM          CHAR(30),
     XMMC          CHAR(50)
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create unique index PK_ZW_TEMPLETDETAIL<<YEAR>> on TZW_TEMPLETDETAIL<<YEAR>> (CCODE,JLHM)
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_TEMPLETMAIN<<YEAR>>
   (
     CCODE     CHAR(3) not null,
     VCCOMMENT VARCHAR2(50),
     CPZZL     VARCHAR2(4) not null,
     TIFJZS    NUMBER default 0               /*附件张数*/
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_TEMPLETMAIN<<YEAR>>
     add constraint PK_ZW_TEMPLETMAIN<<YEAR>> primary key (CCODE)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_TYPE<<YEAR>>
   (
     SIGNID   NUMBER not null,
     SIGN     VARCHAR2(4) not null,
     SIGNTEXT CHAR(40) not null,
     JFBYKM   CHAR(255),
     JFBWKM   CHAR(255),
     DFBYKM   CHAR(255),
     DFBWKM   CHAR(255),
     PZBYKM   CHAR(255),
     PZBWKM   CHAR(255),
     OTHERUSE NUMBER default 0              /*是否已使用*/
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_TYPE<<YEAR>>
     add constraint PK_ZW_TYPE<<YEAR>> primary key (SIGNID)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_VENDOR<<YEAR>>
   (
     CVENCODE     CHAR(12) not null,
     CVENNAME     CHAR(60) not null,
     CVENABBNAME  CHAR(30),
     CVCCODE      CHAR(12) not null,
     CDCCODE      CHAR(6),
     CVENHEADCODE CHAR(12),
     CTRADE       CHAR(40),
     CVENREGCODE  CHAR(18),
     CVENLPERSON  CHAR(10),
     CVENBANK     CHAR(30),
     CVENACCOUNT  CHAR(40),
     CVENADDRESS  CHAR(80),
     CVENPOSTCODE CHAR(6),
     CVENPERSON   CHAR(10),
     CVENPHONE    CHAR(20),
     CVENFAX      CHAR(20),
     CVENEMAIL    CHAR(30),
     CVENBP       CHAR(20),
     CVENHAND     CHAR(20),
     CVENIADDRESS CHAR(40),
     CVENITYPE    CHAR(10),
     CVENWHCODE   CHAR(20),
     IARMONEY     NUMBER(9,2),
     IVENDISRATE  NUMBER(5,2),
     CVENCREGRADE CHAR(6),
     CVENPAYCOND  CHAR(20),
     IVENCRELINE  NUMBER(9,2),
     IVENCREDATE  NUMBER(9,2),
     DLASTDATE    DATE,
     ILASTMONEY   NUMBER(9,2),
     DLRDATE      DATE,
     ILRMONEY     NUMBER(9,2),
     BVENTAX      NUMBER default 0,
     CVENDEPART   CHAR(12),
     CVENPPERSON  CHAR(10),
     DVENDEVDATE  DATE,
     DENDDATE     DATE,
     IFREQUENCY   NUMBER
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_VENDOR<<YEAR>>
     add constraint PK_ZW_VENDOR<<YEAR>> primary key (CVENCODE)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_VENDORCLASS<<YEAR>>
   (
     CVCCODE  CHAR(12) not null,
     CVCNAME  CHAR(20),
     IVCGRADE NUMBER,
     BVCEND   NUMBER default 0               /*末级标志*/
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_VENDORCLASS<<YEAR>>
     add constraint PK_ZW_VENDORCLASS<<YEAR>> primary key (CVCCODE)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_VENDORSHOWSET<<YEAR>>
   (
     ID      NUMBER,
     FIELD   CHAR(15) not null,
     DETIALS CHAR(20) not null,
     SHOW    NUMBER default 0   /*显示状态*/
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_YHDZD<<YEAR>>
   (
     ID       NUMBER not null,
     RQ       DATE,
     KMDM     VARCHAR2(40),
     JSFSCODE CHAR(3),
     JSFSNAME CHAR(12),
     BILL     CHAR(12),
     FX       CHAR(2),
     JE       NUMBER(15,2),
     LQBZ     NUMBER,
     QCBZ     NUMBER,
     HXBZ     NUMBER default 0,
     ZY       VARCHAR2(200)
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_YHDZD<<YEAR>>
     add constraint PK_ZW_YHDZD<<YEAR>> primary key (ID)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_YHDZQYRQ
   (
     KMDM VARCHAR2(40) not null,
     QYRQ DATE not null,
     JZRQ DATE
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_YHDZQYRQ
     add constraint PK_ZW_YHDZQYRQ primary key (KMDM)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   create table TZW_ZYWH
   (
     DMID VARCHAR2(10) not null,
     NAME VARCHAR2(200),
     KMDM VARCHAR2(40)
   )
   tablespace CW_TS
     pctfree 10
     pctused 40
     initrans 1
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     );
   alter table TZW_ZYWH
     add constraint PK_ZW_ZYWH primary key (DMID)
     using index 
     tablespace CW_TS
     pctfree 10
     initrans 2
     maxtrans 255
     storage
     (
       initial 10K
       next 10K
       minextents 1
       maxextents 121
       pctincrease 0
     ); 
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('01 ', '支票', 1, 1, 0);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('011', '现金支票', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('012', '转账支票', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('02 ', '银行本票', -1, 1, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('03 ', '商业汇票', 1, 1, 0);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('04 ', '银行汇票', -1, 1, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('031', '商业承兑汇票', -1, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('032', '银行承兑汇票', -1, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('05 ', '汇兑', 0, 1, 0);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('051', '信汇', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('052', '电汇', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('06 ', '委托收款', 0, 1, 0);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('061', '委收邮划', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('062', '委收电划', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('07 ', '托收承付', 0, 1, 0);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('071', '托收邮划', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('072', '托收电划', 0, 2, -1);
insert into TZW_JSFS<<YEAR>> (CCODE, CNAME, BFLAG, IGRADE, BEND)
values ('08 ', '现金交款单', 0, 1, -1);