gz.sql

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

ALTER TABLE [dbo].[tGZ_GZItem] WITH NOCHECK ADD 
	CONSTRAINT [DF__tGZ_GZIte__IsUse__73852659] DEFAULT (0) FOR [IsUsed],
	CONSTRAINT [DF__tGZ_GZIte__IsSys__74794A92] DEFAULT (0) FOR [IsSysDef],
	CONSTRAINT [DF__tGZ_GZIte__ISTAKETAX__AS92] DEFAULT (0) FOR [ISTAKETAX],
	 PRIMARY KEY  CLUSTERED 
	(
		[ItemID]
	)  ON [PRIMARY] 
;

CREATE TABLE [dbo].[tGZ_GZItemSet] (
	[GZLBid] [int] NOT NULL ,
	[AccountYear] [char] (4) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[AccountPeriod] [smallint] NOT NULL ,
	[OrderNum] [smallint] NOT NULL ,
	[ItemID] [int] NOT NULL ,
	[ItemName] [varchar] (30) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[IsShow] [smallint] NULL ,
	[IsPrint] [smallint] NULL ,
	[ItemIsUsed] [smallint] NULL ,
	[YMQL] [decimal](2, 0) NULL ,
	[YLQL] [decimal](2, 0) NULL ,
	[FORMULA] [char] (60) COLLATE Chinese_PRC_CI_AS NULL ,
	[ISHZ] [decimal](2, 0) NULL 
) ON [PRIMARY]
;
ALTER TABLE [dbo].[tGZ_GZItemSet] WITH NOCHECK ADD 
	CONSTRAINT [DF__tGZ_GZIte__IsSho__76619304] DEFAULT (0) FOR [IsShow],
	CONSTRAINT [DF__tGZ_GZIte__IsPri__7755B73D] DEFAULT (0) FOR [IsPrint],
	CONSTRAINT [DF__tGZ_GZIte__ItemI__7849DB76] DEFAULT (0) FOR [ItemIsUsed],
	CONSTRAINT [DF__tGZ_GZItem__YMQL__793DFFAF] DEFAULT (0) FOR [YMQL],
	CONSTRAINT [DF__tGZ_GZItem__YLQL__7A3223E8] DEFAULT (0) FOR [YLQL],
	CONSTRAINT [DF__tGZ_GZItem__ISHZ__7B264821] DEFAULT (0) FOR [ISHZ],
	CONSTRAINT [PK_GZ_GZItemSet] PRIMARY KEY  NONCLUSTERED 
	(
		[GZLBid],
		[AccountYear],
		[AccountPeriod],
		[ItemID]
	)  ON [PRIMARY] 
;


CREATE TABLE [dbo].[tGZ_GZLB] (
	[GZLBid] [int] NOT NULL ,
	[GZLBname] [varchar] (40) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[BeginDate] [datetime] NOT NULL ,
	[BeginYear] [char] (4) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[BeginPeriod] [smallint] NOT NULL ,
	[CurrentYear] [char] (4) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[CurrentPeriod] [smallint] NOT NULL ,
	[CurrencyName] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL ,
	[IsBank] [smallint] NULL ,
	[IsTax] [smallint] NULL ,
	[TailType] [varchar] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[TAXBASE] [decimal](15, 0) not null,
  	[ISCOUNT] [smallint] not null
) ON [PRIMARY]
;

ALTER TABLE [dbo].[tGZ_GZLB] WITH NOCHECK ADD 
	CONSTRAINT [DF__tGZ_GZLB__IsBank__6FB49575] DEFAULT (0) FOR [IsBank],
	CONSTRAINT [DF__tGZ_GZLB__IsTax__70A8B9AE] DEFAULT (0) FOR [IsTax],
	CONSTRAINT [DF__tGZ_GZLB__TAXBASE__70A89AE] DEFAULT (0) FOR [TAXBASE],
	CONSTRAINT [DF__tGZ_GZLB__ISCOUNT__70AB9AE] DEFAULT (0) FOR [ISCOUNT],
	 PRIMARY KEY  CLUSTERED 
	(
		[GZLBid]
	)  ON [PRIMARY] 
;

CREATE TABLE [dbo].[tGZ_HelpInfoShow] (
	[GZLBid] [int] NOT NULL ,
	[HelpType] [varchar] (40) COLLATE Chinese_PRC_CI_AS NOT NULL ,
	[OrderNum] [smallint] NOT NULL ,
	[InfoSource] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL ,
	[FieldNameEng] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL ,
	[FieldName] [varchar] (30) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY]
;
ALTER TABLE [dbo].[tGZ_HelpInfoShow] WITH NOCHECK ADD 
	CONSTRAINT [PK_GZ_HelpInfoShow] PRIMARY KEY  NONCLUSTERED 
	(
		[GZLBid],
		[HelpType],
		[OrderNum]
	)  ON [PRIMARY] 
;


CREATE TABLE [dbo].[tGZ_PersonInfoShow] (
	[GZLBid] [int] NOT NULL ,
	[OrderNum] [smallint] NOT NULL ,
	[FieldNameEng] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL ,
	[FieldName] [varchar] (30) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY]
;
ALTER TABLE [dbo].[tGZ_PersonInfoShow] WITH NOCHECK ADD 
	CONSTRAINT [PK_GZ_PersonInfoShow] PRIMARY KEY  NONCLUSTERED 
	(
		[GZLBid],
		[OrderNum]
	)  ON [PRIMARY] 
;


CREATE TABLE [dbo].[tGZ_RYLB] (
	[ID] [decimal](2, 0) NOT NULL ,
	[LBMC] [char] (20) COLLATE Chinese_PRC_CI_AS NOT NULL 
) ON [PRIMARY]
;
ALTER TABLE [dbo].[tGZ_RYLB] WITH NOCHECK ADD 
	CONSTRAINT [PK_tGZ_RYLB] PRIMARY KEY  NONCLUSTERED 
	(
		[ID]
	)  ON [PRIMARY] 
;

CREATE TABLE [dbo].[TGZ_TaxSet] (
	[GzlbID] [int] NOT NULL ,
	[Dupper] [decimal](8, 2) NULL ,
	[Dlower] [decimal](8, 2) NULL ,
	[Dtax] [decimal](5, 2) NULL ,
	[Ddeduct] [decimal](8, 2) NULL ,
	[Iclass] [smallint] NOT NULL 
) ON [PRIMARY]
;
ALTER TABLE [dbo].[TGZ_TaxSet] WITH NOCHECK ADD 
	CONSTRAINT [PK_GZ_TGZ_TaxSet] PRIMARY KEY  CLUSTERED 
	(
		[GzlbID],[iClass]
	)  ON [PRIMARY] 
;

create table [dbo].[TGZ_TAXTEMP]
(
  [RYBH]  VARCHAR(20) COLLATE Chinese_PRC_CI_AS not null,
  [YSSUM] [decimal](8, 2) not null,
  [JSSUM] [decimal](8, 2) not null
);


create table [dbo].[TGZ_ZZPZLB]
(
  [ID] int not null,
  [NAME] VARCHAR(20) COLLATE Chinese_PRC_CI_AS not null,
  [ISSYSTEM] [smallint] not null
);
ALTER TABLE [dbo].[TGZ_ZZPZLB] WITH NOCHECK ADD 
	CONSTRAINT [DF__TGZ_ZZPZLB__ISSYSTEM__75] DEFAULT (0) FOR [ISSYSTEM],
	 PRIMARY KEY  CLUSTERED 
	(
		[ID]
	)  ON [PRIMARY] 
;

create table [dbo].[TGZ_ZZSETCALSS]
(
  [ID] [int] not null,
  [SETLISTID] [int] not null,
  [CKMDM] VARCHAR(40) COLLATE Chinese_PRC_CI_AS not null,
  [CBMDM] VARCHAR(4) COLLATE Chinese_PRC_CI_AS,
  [CXMDM] VARCHAR(40) COLLATE Chinese_PRC_CI_AS,
  [CFX]  CHAR(2) not null,
  [ITEMID] int not null,
  [BBMDM] VARCHAR(4) COLLATE Chinese_PRC_CI_AS,
  [CRYLB]  VARCHAR(20) COLLATE Chinese_PRC_CI_AS ,
  [JTYZ]  [decimal](5, 4) not null,
  [ZY]  VARCHAR(200) COLLATE Chinese_PRC_CI_AS
);
ALTER TABLE [dbo].[TGZ_ZZSETCALSS] WITH NOCHECK ADD 
	CONSTRAINT [DF__TGZ_ZZSETCALSS__JTYZ] DEFAULT (1) FOR [JTYZ],
	 PRIMARY KEY  CLUSTERED 
	(
		[ID]
	)  ON [PRIMARY] 
;

create table [dbo].[TGZ_ZZSETLIST]
(
  [ID] int not null,
  [GZLBID] int not null,
  [ZZLBID] int not null,
  ZZDATE [datetime],
  PZBH  CHAR(4)
);
alter table [dbo].[TGZ_ZZSETLIST]
  add constraint pk_TGZ_ZZSETLIST primary key (ID);
create unique index TGZ_ZZSETLIST_INDEX on TGZ_ZZSETLIST (ZZLBID,GZLBID);



insert into TGZ_BANK (BANKCODE, BANKNAME, ISFIXEDLEN, ZHLEN) values ('01', '工商银行', -1, 18);
insert into TGZ_BANK (BANKCODE, BANKNAME, ISFIXEDLEN, ZHLEN) values ('02', '交通银行', -1, 18);

insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '01', '壹分', .01);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '02', '贰分', .02);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '03', '伍分', .05);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '04', '壹角', .1);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '05', '贰角', .2);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '06', '伍角', .5);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '07', '壹圆', 1);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '08', '贰圆', 2);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '09', '伍圆', 5);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '10', '拾圆', 10);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '13', '贰拾圆', 20);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '11', '伍拾圆', 50);
insert into TGZ_BZMZ (BZMC, MZBH, MZMC, HSBL) values ('人民币', '12', '壹佰圆', 100);

insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (1, '应发合计', '数字', 8, 2, null, -1, -1, 0);
insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (2, '应扣合计', '数字', 8, 2, null, -1, -1, 0);
insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (3, '实发工资', '数字', 8, 2, null, -1, -1, 0);
insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (4, '上次结余', '数字', 8, 2, null, -1, -1, 0);
insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (5, '本次扣零', '数字', 8, 2, null, -1, -1, 0);
insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (6, '收入额', '数字', 8, 2, null, -1, -1, 0);
insert into TGZ_GZITEM (ITEMID, ITEMNAME, DATATYPE, FIELDLENGTH, DECIMALBITS, KJKMDM, ISUSED, ISSYSDEF, ISTAKETAX) values (7, '个人所得税', '数字', 8, 2, null, -1, -1, -1);

INSERT INTO tGZ_Rylb(id,lbmc) VALUES(1,'管理人员');
INSERT INTO tGZ_Rylb(id,lbmc) VALUES(2,'生产人员');
INSERT INTO tGZ_Rylb(id,lbmc) VALUES(3,'辅助人员');

INSERT INTO tGZ_zzPZLB(id,Name,isSystem) VALUES(1,'工资分摊',1);
INSERT INTO tGZ_zzPZLB(id,Name,isSystem) VALUES(2,'计提福利费',1);