/****** Object:  ForeignKey [FK_vevo_pszlaf_BELEPES]    Script Date: 12/12/2008 15:56:01 ******/
IF  EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlaf_BELEPES]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]'))
ALTER TABLE [dbo].[vevo_pszlaf] DROP CONSTRAINT [FK_vevo_pszlaf_BELEPES]
GO
/****** Object:  ForeignKey [FK_vevo_pszlaf_deviza]    Script Date: 12/12/2008 15:56:01 ******/
IF  EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlaf_deviza]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]'))
ALTER TABLE [dbo].[vevo_pszlaf] DROP CONSTRAINT [FK_vevo_pszlaf_deviza]
GO
/****** Object:  ForeignKey [FK_vevo_pszlaf_VEVOK]    Script Date: 12/12/2008 15:56:01 ******/
IF  EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlaf_VEVOK]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]'))
ALTER TABLE [dbo].[vevo_pszlaf] DROP CONSTRAINT [FK_vevo_pszlaf_VEVOK]
GO
/****** Object:  ForeignKey [FK_vevo_pszlat_afa_kulcs]    Script Date: 12/12/2008 15:56:07 ******/
IF  EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlat_afa_kulcs]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]'))
ALTER TABLE [dbo].[vevo_pszlat] DROP CONSTRAINT [FK_vevo_pszlat_afa_kulcs]
GO
/****** Object:  ForeignKey [FK_vevo_pszlat_CIKKEK]    Script Date: 12/12/2008 15:56:08 ******/
IF  EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlat_CIKKEK]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]'))
ALTER TABLE [dbo].[vevo_pszlat] DROP CONSTRAINT [FK_vevo_pszlat_CIKKEK]
GO
/****** Object:  ForeignKey [FK_vevo_pszlat_VEVO_PSZLAF]    Script Date: 12/12/2008 15:56:08 ******/
IF  EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlat_VEVO_PSZLAF]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]'))
ALTER TABLE [dbo].[vevo_pszlat] DROP CONSTRAINT [FK_vevo_pszlat_VEVO_PSZLAF]
GO
/****** Object:  StoredProcedure [dbo].[vevo_szla_proform]    Script Date: 12/12/2008 15:55:52 ******/
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[vevo_szla_proform]') AND type in (N'P', N'PC'))
DROP PROCEDURE [dbo].[vevo_szla_proform]
GO
/****** Object:  Table [dbo].[vevo_pszlaf]    Script Date: 12/12/2008 15:56:01 ******/
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]') AND type in (N'U'))
DROP TABLE [dbo].[vevo_pszlaf]
GO
/****** Object:  Table [dbo].[vevo_pszlat]    Script Date: 12/12/2008 15:56:07 ******/
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]') AND type in (N'U'))
DROP TABLE [dbo].[vevo_pszlat]
GO
/****** Object:  Table [dbo].[vevo_pszlat]    Script Date: 12/12/2008 15:56:07 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]') AND type in (N'U'))
BEGIN
CREATE TABLE [dbo].[vevo_pszlat](
	[BIZSZAM] [dbo].[bizonylat_szam] NOT NULL,
	[TETEL] [dbo].[bizonylat_tetel] NOT NULL,
	[CIKK_SZAM] [dbo].[cikk_szam] NOT NULL,
	[CIKK_NEV] [dbo].[nev] NULL,
	[AFA_KULCS] [varchar](2) NOT NULL,
	[MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL,
	[SZORZO] [dbo].[szorzo] NOT NULL,
	[edarab] [dbo].[mennyiseg] NOT NULL,
	[darab] [dbo].[mennyiseg] NOT NULL,
	[EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL,
	[kedvezmeny] [dbo].[kedvezmeny] NOT NULL,
	[megjegyzes] [dbo].[megjegyzes] NOT NULL,
	[akcio] [char](1) NULL,
 CONSTRAINT [PK_vevo_pszlat] PRIMARY KEY CLUSTERED 
(
	[BIZSZAM] ASC,
	[TETEL] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
END
GO
SET ANSI_PADDING OFF
GO
/****** Object:  Table [dbo].[vevo_pszlaf]    Script Date: 12/12/2008 15:56:01 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]') AND type in (N'U'))
BEGIN
CREATE TABLE [dbo].[vevo_pszlaf](
	[BIZSZAM] [dbo].[bizonylat_szam] NOT NULL,
	[VEVO] [dbo].[kulcs] NOT NULL,
	[VEVO_NEV] [dbo].[nev] NULL,
	[TELJ_DATUM] [dbo].[datum] NOT NULL,
	[SZLA_DATUM] [dbo].[datum] NOT NULL,
	[FIZ_MODJA] [char](1) NOT NULL,
	[FIZ_ESED] [dbo].[datum] NOT NULL,
	[penznem] [dbo].[penznem] NOT NULL,
	[kurzus] [dbo].[kurzus] NOT NULL,
	[afamentes] [bit] NOT NULL,
	[kedvezmeny] [dbo].[kedvezmeny] NOT NULL,
	[TIPUS] [dbo].[kulcs] NOT NULL,
	[UZLETKOTO] [dbo].[kulcs] NOT NULL,
	[MEGJEGYZES] [dbo].[megjegyzes] NOT NULL,
	[TOROLT] [char](1) NOT NULL,
	[TORLO] [char](1) NOT NULL,
	[TOR_SSZ] [dbo].[bizonylat_szam] NOT NULL,
	[VISSZARU] [char](1) NOT NULL,
	[KICSODA] [dbo].[kicsoda] NOT NULL,
	[MODOSITVA] [dbo].[datum_ora] NOT NULL,
	[peldany] [int] NULL,
 CONSTRAINT [PK_vevo_pszlaf] PRIMARY KEY CLUSTERED 
(
	[BIZSZAM] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
END
GO
SET ANSI_PADDING OFF
GO
/****** Object:  StoredProcedure [dbo].[vevo_szla_proform]    Script Date: 12/12/2008 15:55:52 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[vevo_szla_proform]') AND type in (N'P', N'PC'))
BEGIN
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[vevo_szla_proform]
	@hsz bizonylat_szam, 
	@vevo kulcs,
	@szcim char(4),
	@dat datum, 
	@szdat datum, 
	@fmod char(1), 
	@fhat datum,
	@pn penznem,
	@kurz kurzus,
	@afamentes bit,
	@arcsoport kulcs,
	@akccsoport kulcs,
	@vkedv kedvezmeny,
	@megj megjegyzes,
	@tipus kulcs,
	@uzletkoto kulcs,
	@kics kicsoda

WITH RECOMPILE
 AS
begin

	SET XACT_ABORT  ON

	declare @tranznev char(32)
	declare @vnev nev
	declare @sorsz bizonylat_szam
	declare @ev char(4)
	declare @tet bizonylat_tetel
	declare @csz cikk_szam
	declare @cn nev
	declare @me menny_egyseg
	declare @szorz szorzo
	declare @ear egyseg_ar
	declare @edb mennyiseg
	declare @db mennyiseg
	declare @afak afa_kulcs
	declare @akc char(1)
	declare @tkedv kedvezmeny
	declare @tmegj megjegyzes
	declare @kulcs varchar(20)

	set @tranznev=''t_vevo_pszla_uj''+@kics
	set @ev=left(@dat,4)
	set @kulcs = @ev + ''vevo_pszla''
	set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo)

	BEGIN TRANSACTION @tranznev
		exec bizsorsz_no @kulcs, @sorsz output

		insert into vevo_pszlaf
		values(@sorsz,
				@vevo,
				@vnev,
				@dat,
				@szdat,
				@fmod,
				@fhat,
				@pn,
				@kurz,
				@afamentes,
				@vkedv,
				@tipus,
				@uzletkoto,
				@megj,
				'''', '''', '''', '''',
				@kics,
				dbo.myGetDateTime(),0)


		DECLARE kvevo_szle SCROLL CURSOR
		FOR   
		select wvevo_szlet.cikk_szam,
				wvevo_szlet.cikk_nev,
				wvevo_szlet.afa_kulcs,
				wvevo_szlet.menny_egys,
				wvevo_szlet.szorzo,
				wvevo_szlet.edarab,
				wvevo_szlet.darab,
				wvevo_szlet.egyseg_ar,
				wvevo_szlet.kedvezmeny,
				wvevo_szlet.megjegyzes,			
				wvevo_szlet.akcio
		from wvevo_szlet 
		where wvevo_szlet.kicsoda=@kics
		order by wvevo_szlet.cikk_nev

		OPEN kvevo_szle

		FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc
		set @tet=1
		WHILE (@@FETCH_STATUS <> -1)
		BEGIN
			IF (@@FETCH_STATUS <> -2)
				BEGIN 
					if @db * @szorz >0.00001
					begin  

						insert into vevo_pszlat
						values( @sorsz,
									@tet, 
									@csz,
									@cn,
									@afak,
									@me,
									@szorz,
									@edb,
									@db,
									@ear,
									@tkedv,
									@tmegj,
									@akc )

						set @tet=@tet+1  
					end
				END
				FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc
		END
		CLOSE kvevo_szle
		DEALLOCATE kvevo_szle

		delete from wvevo_szlet where kicsoda=@kics

	COMMIT TRANSACTION @tranznev

end


' 
END
GO
/****** Object:  ForeignKey [FK_vevo_pszlaf_BELEPES]    Script Date: 12/12/2008 15:56:01 ******/
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlaf_BELEPES]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]'))
ALTER TABLE [dbo].[vevo_pszlaf]  WITH CHECK ADD  CONSTRAINT [FK_vevo_pszlaf_BELEPES] FOREIGN KEY([KICSODA])
REFERENCES [dbo].[belepes] ([ROVIDNEV])
GO
ALTER TABLE [dbo].[vevo_pszlaf] CHECK CONSTRAINT [FK_vevo_pszlaf_BELEPES]
GO
/****** Object:  ForeignKey [FK_vevo_pszlaf_deviza]    Script Date: 12/12/2008 15:56:01 ******/
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlaf_deviza]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]'))
ALTER TABLE [dbo].[vevo_pszlaf]  WITH CHECK ADD  CONSTRAINT [FK_vevo_pszlaf_deviza] FOREIGN KEY([penznem])
REFERENCES [dbo].[deviza] ([penznem])
GO
ALTER TABLE [dbo].[vevo_pszlaf] CHECK CONSTRAINT [FK_vevo_pszlaf_deviza]
GO
/****** Object:  ForeignKey [FK_vevo_pszlaf_VEVOK]    Script Date: 12/12/2008 15:56:01 ******/
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlaf_VEVOK]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlaf]'))
ALTER TABLE [dbo].[vevo_pszlaf]  WITH CHECK ADD  CONSTRAINT [FK_vevo_pszlaf_VEVOK] FOREIGN KEY([VEVO])
REFERENCES [dbo].[vevok] ([VEVO_KOD])
GO
ALTER TABLE [dbo].[vevo_pszlaf] CHECK CONSTRAINT [FK_vevo_pszlaf_VEVOK]
GO
/****** Object:  ForeignKey [FK_vevo_pszlat_afa_kulcs]    Script Date: 12/12/2008 15:56:07 ******/
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlat_afa_kulcs]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]'))
ALTER TABLE [dbo].[vevo_pszlat]  WITH CHECK ADD  CONSTRAINT [FK_vevo_pszlat_afa_kulcs] FOREIGN KEY([AFA_KULCS])
REFERENCES [dbo].[afa_kulcs] ([AFAKULCS])
GO
ALTER TABLE [dbo].[vevo_pszlat] CHECK CONSTRAINT [FK_vevo_pszlat_afa_kulcs]
GO
/****** Object:  ForeignKey [FK_vevo_pszlat_CIKKEK]    Script Date: 12/12/2008 15:56:08 ******/
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlat_CIKKEK]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]'))
ALTER TABLE [dbo].[vevo_pszlat]  WITH CHECK ADD  CONSTRAINT [FK_vevo_pszlat_CIKKEK] FOREIGN KEY([CIKK_SZAM])
REFERENCES [dbo].[cikkek] ([CIKK_SZAM])
GO
ALTER TABLE [dbo].[vevo_pszlat] CHECK CONSTRAINT [FK_vevo_pszlat_CIKKEK]
GO
/****** Object:  ForeignKey [FK_vevo_pszlat_VEVO_PSZLAF]    Script Date: 12/12/2008 15:56:08 ******/
IF NOT EXISTS (SELECT * FROM sys.foreign_keys WHERE object_id = OBJECT_ID(N'[dbo].[FK_vevo_pszlat_VEVO_PSZLAF]') AND parent_object_id = OBJECT_ID(N'[dbo].[vevo_pszlat]'))
ALTER TABLE [dbo].[vevo_pszlat]  WITH CHECK ADD  CONSTRAINT [FK_vevo_pszlat_VEVO_PSZLAF] FOREIGN KEY([BIZSZAM])
REFERENCES [dbo].[vevo_pszlaf] ([BIZSZAM])
GO
ALTER TABLE [dbo].[vevo_pszlat] CHECK CONSTRAINT [FK_vevo_pszlat_VEVO_PSZLAF]
GO