mr.sql

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

create table TMR_BILLPARAMETER
(
  CODE VARCHAR2(10) not null,
  NAME VARCHAR2(200)
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
alter table TMR_BILLPARAMETER
  add constraint PK_MR_BILLPARAMETER primary key (CODE)
  using index 
  tablespace CW_TS
  pctfree 10
  initrans 2
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
create table TMR_COLLATEFORMULA
(
  CODE VARCHAR2(10) not null,
  JF   VARCHAR2(200) default ' ' not null,
  DF   VARCHAR2(200) default ' ' 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 TMR_COLLATEFORMULA
  add constraint PK_MR_COLLATEFORMULA primary key (CODE)
  using index 
  tablespace CW_TS
  pctfree 10
  initrans 2
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
create table TMR_COMPANY
(
  CYEAR  CHAR(4) not null,
  VCCODE VARCHAR2(10) not null,
  VCNAME VARCHAR2(50) not null,
  CTYPE  CHAR(4) default '二级' not null,
  BMERGE NUMBER default 0 not null,
  STOCK  VARCHAR2(4) default '全资' 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 TMR_COMPANY
  add constraint PK_MR_COMPANY primary key (VCCODE,CYEAR)
  using index 
  tablespace CW_TS
  pctfree 10
  initrans 2
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
create table TMR_DRAFT<<YEAR>>
(
  ID             NUMBER not null,
  VCREPORTCODE   VARCHAR2(10) not null,
  MONTH          VARCHAR2(2) default '00' not null,
  MERGECOLID     NUMBER default 0 not null,
  OFFSETITEMID   NUMBER default 0 not null,
  REPORTITEMNAME CHAR(100) default ' ' not null,
  TOTAL          FLOAT default 0 not null,
  JF             FLOAT default 0 not null,
  DF             FLOAT default 0 not null,
  GQ             FLOAT default 0 not null,
  MERGE          FLOAT default 0 not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_DRAFT<<YEAR>>
  add constraint PK_MR_DRAFT<<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 TMR_DRAFTASSISTANT<<YEAR>>
(
  ID                NUMBER not null,
  DRAFTID           NUMBER default 0 not null,
  MANUSCRIPTCOLID   NUMBER default 0 not null,
  MANUSCRIPTCOLNAME VARCHAR2(100) default ' ' not null,
  DATA              FLOAT default 0 not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_DRAFTASSISTANT<<YEAR>>
  add constraint PK_MR_DRAFTASSISTANT<<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 TMR_LOCKREPORT
(
  VCREPORTCODE VARCHAR2(10) not null,
  IMONTH       NUMBER not null,
  IYEAR        NUMBER not null,
  COMPANYCODE  VARCHAR2(10) 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 TMR_LOCKREPORT
  add constraint PK_MR_LOCKREPORT primary key (VCREPORTCODE,IMONTH,IYEAR,COMPANYCODE)
  using index 
  tablespace CW_TS
  pctfree 10
  initrans 2
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
create table TMR_MANUSCRIPTDESIGN
(
  ID     NUMBER not null,
  VCYEAR VARCHAR2(4) default ' ' not null,
  ICOL   NUMBER default 0 not null,
  VCWORD VARCHAR2(100) default ' ' not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_MANUSCRIPTDESIGN
  add constraint PK_MR_MANUSCRIPTDESIGN 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 TMR_MERGECOL
(
  ID           NUMBER not null,
  VCREPORTCODE VARCHAR2(10) not null,
  VCYEAR       VARCHAR2(4) default ' ' not null,
  VCNAME       VARCHAR2(30) default ' ' not null,
  VCCOL        VARCHAR2(30) default ' ' not null,
  VCFORMULA    VARCHAR2(200) default ' ' not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_MERGECOL
  add constraint PK_MR_MERGECOL 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 TMR_OFFSET<<YEAR>>
(
  CMONTH       CHAR(2) default '00' not null,
  CNUMBER      CHAR(4) default '0000' not null,
  VCREPORTCODE VARCHAR2(10) default ' ' not null,
  DMAKEDATE    DATE not null,
  CUSERID      VARCHAR2(4) default ' ' not null,
  CUSERNAME    VARCHAR2(8) default ' ' not null,
  VCCOMMENT    VARCHAR2(100) default ' ' not null,
  ID           NUMBER not null,
  COWNER       VARCHAR2(10) not null,
  CCOMPANY     VARCHAR2(10),
  BAUTO        NUMBER default 0 not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_OFFSET<<YEAR>>
  add constraint PK_MR_OFFSET<<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 TMR_OFFSETBILL
(
  ID     VARCHAR2(4) default 0 not null,
  KJNF   NUMBER not null,
  KJQJ   NUMBER not null,
  XMBH   VARCHAR2(10),
  XMMC   VARCHAR2(200),
  DWBH   VARCHAR2(10) not null,
  DWMC   VARCHAR2(50) not null,
  DFDWBH VARCHAR2(10),
  DFDWMC VARCHAR2(50),
  PM     VARCHAR2(40),
  SL     NUMBER(15,3),
  JE     NUMBER(15,2) default 0 not null,
  QRJE   NUMBER(15,2) default 0 not null,
  DZKM   VARCHAR2(10),
  BZ     VARCHAR2(40),
  BH     VARCHAR2(4) not null,
  JLHM   NUMBER not null,
  XGBZ   NUMBER default 0 not null,
  DZKMMC VARCHAR2(200),
  PROFIT 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
  );
comment on column TMR_OFFSETBILL.ID
  is '标示';
comment on column TMR_OFFSETBILL.KJNF
  is '会计年份';
comment on column TMR_OFFSETBILL.KJQJ
  is '会计期间';
comment on column TMR_OFFSETBILL.XMBH
  is '项目编号';
comment on column TMR_OFFSETBILL.XMMC
  is '项目名称';
comment on column TMR_OFFSETBILL.DWBH
  is '单位编号';
comment on column TMR_OFFSETBILL.DWMC
  is '单位名称';
comment on column TMR_OFFSETBILL.DFDWBH
  is '对方单位编号';
comment on column TMR_OFFSETBILL.DFDWMC
  is '对方单位名称';
comment on column TMR_OFFSETBILL.PM
  is '品名';
comment on column TMR_OFFSETBILL.SL
  is '数量';
comment on column TMR_OFFSETBILL.JE
  is '金额';
comment on column TMR_OFFSETBILL.QRJE
  is '确认金额';
comment on column TMR_OFFSETBILL.DZKM
  is '对方科目';
comment on column TMR_OFFSETBILL.BZ
  is '差异说明';
comment on column TMR_OFFSETBILL.BH
  is '交易单编号';
comment on column TMR_OFFSETBILL.JLHM
  is '记录号码';
comment on column TMR_OFFSETBILL.XGBZ
  is '对账标记';
comment on column TMR_OFFSETBILL.DZKMMC
  is '对方科目名称';
comment on column TMR_OFFSETBILL.PROFIT
  is '毛利';
alter table TMR_OFFSETBILL
  add constraint PK_MR_OFFSETBILL primary key (KJNF,KJQJ,BH,JLHM,DWBH)
  using index 
  tablespace CW_TS
  pctfree 10
  initrans 2
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
create table TMR_OFFSETBILLMODEL
(
  VCCODE VARCHAR2(4) not null,
  VCNAME VARCHAR2(40) default ' ' not null,
  VCTYPE VARCHAR2(4) default '往来' not null,
  VCITEM VARCHAR2(10) default ' ' not null,
  VCYEAR VARCHAR2(4) not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
comment on column TMR_OFFSETBILLMODEL.VCCODE
  is '标示';
comment on column TMR_OFFSETBILLMODEL.VCNAME
  is '名称';
comment on column TMR_OFFSETBILLMODEL.VCTYPE
  is '交易 or 往来';
comment on column TMR_OFFSETBILLMODEL.VCITEM
  is '抵销项目代码';
comment on column TMR_OFFSETBILLMODEL.VCYEAR
  is '年份';
alter table TMR_OFFSETBILLMODEL
  add constraint PK_MR_OFFSETBILLMODEL primary key (VCCODE,VCYEAR)
  using index 
  tablespace CW_TS
  pctfree 10
  initrans 2
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents unlimited
    pctincrease 0
  );
create table TMR_OFFSETDATA<<YEAR>>
(
  ID           NUMBER not null,
  COID         VARCHAR2(10) default '0' not null,
  OFFSETITEMID NUMBER default 0 not null,
  CUSTOMERCOID VARCHAR2(10) default '0' not null,
  DATA         FLOAT default 0 not null,
  MONTH        CHAR(2) default '00' not null,
  BUSED        NUMBER default 1 not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_OFFSETDATA<<YEAR>>
  add constraint PK_MR_OFFSETDATA<<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 TMR_OFFSETEQUAL<<YEAR>>
(
  ID           NUMBER not null,
  VCREPORTCODE VARCHAR2(10) not null,
  ISORTID      NUMBER default 0 not null,
  EQUALFORMULA VARCHAR2(200) default ' ' not null,
  EQUALRESULT  NUMBER default 0 not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_OFFSETEQUAL<<YEAR>>
  add constraint PK_MR_EQUAL<<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 TMR_OFFSETITEM<<YEAR>>
(
  ID           NUMBER not null,
  ITEMNAME     VARCHAR2(234) default ' ' not null,
  VCREPORTCODE VARCHAR2(10) default ' ' not null,
  VCREPORTITEM VARCHAR2(200) default ' ' not null,
  SIROWLABEL   NUMBER default 0 not null,
  SICOLLABEL   NUMBER default 0 not null,
  MERGECOLID   NUMBER default 0 not null,
  TYPE         NUMBER default 0 not null,
  BEXPORT      NUMBER default 1 not null,
  BENTER       NUMBER default 1 not null
)
tablespace CW_TS
  pctfree 10
  pctused 40
  initrans 1
  maxtrans 255
  storage
  (
    initial 10K
    next 10K
    minextents 1
    maxextents 121
    pctincrease 0
  );
alter table TMR_OFFSETITEM<<YEAR>>
  add constraint PK_MR_OFFSETITEM<<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