ALTER TABLE [wwvevo_szlet] DROP CONSTRAINT [FK_WWVEVO_SZLET_CIKKEK] GO ALTER TABLE [wwvevo_szlet] DROP CONSTRAINT [FK_WWVEVO_SZLET_afa_kulcs] GO ALTER TABLE [wvevo_tel] DROP CONSTRAINT [FK_WVEVO_TEL_BELEPES] GO ALTER TABLE [wvevo_szlet_td] DROP CONSTRAINT [FK_wvevo_szlet_td_belepes] GO ALTER TABLE [wvevo_szlet] DROP CONSTRAINT [FK_WVEVO_SZLET_CIKKEK] GO ALTER TABLE [wvevo_szlet] DROP CONSTRAINT [FK_WVEVO_SZLET_BELEPES] GO ALTER TABLE [wvevo_szlet] DROP CONSTRAINT [FK_WVEVO_SZLET_afa_kulcs] GO ALTER TABLE [wvevo_szlat] DROP CONSTRAINT [FK_WVEVO_SZLAT_CIKKEK] GO ALTER TABLE [wvevo_szlat] DROP CONSTRAINT [FK_WVEVO_SZLAT_BELEPES] GO ALTER TABLE [wvevo_szlat] DROP CONSTRAINT [FK_WVEVO_SZLAT_afa_kulcs] GO ALTER TABLE [wvevo_rent] DROP CONSTRAINT [FK_wvevo_rent_cikkek] GO ALTER TABLE [wvevo_rent] DROP CONSTRAINT [FK_wvevo_rent_belepes] GO ALTER TABLE [wvevo_rent] DROP CONSTRAINT [FK_wvevo_rent_afa_kulcs] GO ALTER TABLE [wvevo_arajant] DROP CONSTRAINT [FK_WVEVO_ARAJANT_CIKKEK] GO ALTER TABLE [wvevo_arajant] DROP CONSTRAINT [FK_WVEVO_ARAJANT_BELEPES] GO ALTER TABLE [wvevo_arajant] DROP CONSTRAINT [FK_WVEVO_ARAJANT_afa_kulcs] GO ALTER TABLE [wszall_szletm] DROP CONSTRAINT [FK_wszall_szletm_cikkek] GO ALTER TABLE [wszall_szletm] DROP CONSTRAINT [FK_wszall_szletm_belepes] GO ALTER TABLE [wszall_szletm] DROP CONSTRAINT [FK_wszall_szletm_afa_kulcs] GO ALTER TABLE [wszall_szlet_td] DROP CONSTRAINT [FK_wszall_szlet_td_belepes] GO ALTER TABLE [wszall_szlet] DROP CONSTRAINT [FK_wszall_szlet_cikkek] GO ALTER TABLE [wszall_szlet] DROP CONSTRAINT [FK_wszall_szlet_belepes] GO ALTER TABLE [wszall_szlet] DROP CONSTRAINT [FK_wszall_szlet_afa_kulcs] GO ALTER TABLE [wszall_szlat_td] DROP CONSTRAINT [FK_wszall_szlat_td_belepes] GO ALTER TABLE [wszall_art] DROP CONSTRAINT [FK_wszall_art_cikkek] GO ALTER TABLE [wszall_art] DROP CONSTRAINT [FK_wszall_art_belepes] GO ALTER TABLE [wrmozgast] DROP CONSTRAINT [FK_WRMOZGAST_CIKKEK] GO ALTER TABLE [wrmozgast] DROP CONSTRAINT [FK_WRMOZGAST_BELEPES] GO ALTER TABLE [wmerleg] DROP CONSTRAINT [FK_wmerleg_cikkek] GO ALTER TABLE [wleertekelest] DROP CONSTRAINT [FK_wleertekelest_FCIKKEK] GO ALTER TABLE [wleertekelest] DROP CONSTRAINT [FK_wleertekelest_CCIKKEK] GO ALTER TABLE [wleertekelest] DROP CONSTRAINT [FK_wleertekelest_BELEPES] GO ALTER TABLE [wkont_szabalyt] DROP CONSTRAINT [FK_wkont_szabalyt_belepes] GO ALTER TABLE [wkivett] DROP CONSTRAINT [FK_WKIVETT_CIKKEK] GO ALTER TABLE [wgyujtes2] DROP CONSTRAINT [FK_wgyujtes2_BELEPES] GO ALTER TABLE [wgyujtes1] DROP CONSTRAINT [FK_wgyujtes1_BELEPES] GO ALTER TABLE [wgyujtes] DROP CONSTRAINT [FK_wgyujtes_BELEPES] GO ALTER TABLE [wgyujt] DROP CONSTRAINT [FK_wgyujt_BELEPES] GO ALTER TABLE [wepu_bank_impt] DROP CONSTRAINT [FK_wepu_bank_impt_belepes] GO ALTER TABLE [webvevo_rent] DROP CONSTRAINT [FK_webvevo_rent_vevok] GO ALTER TABLE [webvevo_rent] DROP CONSTRAINT [FK_webvevo_rent_cikkek] GO ALTER TABLE [webvevo_rent] DROP CONSTRAINT [FK_webvevo_rent_afa_kulcs] GO ALTER TABLE [wbevett] DROP CONSTRAINT [FK_WBEVETT_CIKKEK] GO ALTER TABLE [wbevett] DROP CONSTRAINT [FK_WBEVETT_afa_kulcs] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_web] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_vpop_platofok] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_chips_ados] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_gycikk_szam] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_szarmazasi_hely] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_linkfile] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_menny_egys_ang] GO ALTER TABLE [wf_cikkek] DROP CONSTRAINT [DF_wf_cikkek_cikk_nev_ang] GO ALTER TABLE [wbizonylat] DROP CONSTRAINT [DF_wbizonylat_CIKK_NEV] GO DROP INDEX [IX_WWVEVO_SZLET] ON [wwvevo_szlet] GO DROP INDEX [IX_WVEVO_TEL] ON [wvevo_tel] GO DROP INDEX [IX_WVEVO_SZLET] ON [wvevo_szlet] GO DROP INDEX [IX_WVEVO_SZLAT] ON [wvevo_szlat] GO DROP INDEX [IX_wszall_art] ON [wszall_art] GO DROP INDEX [IX_WRMOZGAST] ON [wrmozgast] GO DROP INDEX [IX_wkomissio_2] ON [wkomissio] GO DROP INDEX [IX_wkomissio_1] ON [wkomissio] GO DROP INDEX [IX_wkomissio] ON [wkomissio] GO DROP INDEX [IX_WKIVETT] ON [wkivett] GO DROP INDEX [IX_WEAN_AD] ON [wean_ad] GO DROP INDEX [IX_wagy_szall_szlet] ON [wagy_szall_szlet] GO DROP INDEX [IX_wadatgyujto_arcimke_1] ON [wadatgyujto_arcimke] GO DROP INDEX [IX_wadatgyujto_arcimke] ON [wadatgyujto_arcimke] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wwvevo_szlet]') AND type in (N'U')) DROP TABLE [wwvevo_szlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wwszall_rend_jav]') AND type in (N'U')) DROP TABLE [wwszall_rend_jav] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvonal]') AND type in (N'U')) DROP TABLE [wvonal] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevoarak]') AND type in (N'U')) DROP TABLE [wvevoarak] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_tel1]') AND type in (N'U')) DROP TABLE [wvevo_tel1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_tel]') AND type in (N'U')) DROP TABLE [wvevo_tel] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szletm]') AND type in (N'U')) DROP TABLE [wvevo_szletm] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szlet_td]') AND type in (N'U')) DROP TABLE [wvevo_szlet_td] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szlet_r]') AND type in (N'U')) DROP TABLE [wvevo_szlet_r] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szlet_koros]') AND type in (N'U')) DROP TABLE [wvevo_szlet_koros] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szlet]') AND type in (N'U')) DROP TABLE [wvevo_szlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szlat]') AND type in (N'U')) DROP TABLE [wvevo_szlat] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szla_pu]') AND type in (N'U')) DROP TABLE [wvevo_szla_pu] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_szla_nyomt]') AND type in (N'U')) DROP TABLE [wvevo_szla_nyomt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_rent_term]') AND type in (N'U')) DROP TABLE [wvevo_rent_term] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_rent_gyartas1]') AND type in (N'U')) DROP TABLE [wvevo_rent_gyartas1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_rent_ellen]') AND type in (N'U')) DROP TABLE [wvevo_rent_ellen] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_rent]') AND type in (N'U')) DROP TABLE [wvevo_rent] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_rendt]') AND type in (N'U')) DROP TABLE [wvevo_rendt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_rend_akt]') AND type in (N'U')) DROP TABLE [wvevo_rend_akt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_ren_datum]') AND type in (N'U')) DROP TABLE [wvevo_ren_datum] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_koz_nyug]') AND type in (N'U')) DROP TABLE [wvevo_koz_nyug] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_kedv]') AND type in (N'U')) DROP TABLE [wvevo_kedv] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_kapcsolat]') AND type in (N'U')) DROP TABLE [wvevo_kapcsolat] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_csz]') AND type in (N'U')) DROP TABLE [wvevo_csz] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_bank]') AND type in (N'U')) DROP TABLE [wvevo_bank] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_art]') AND type in (N'U')) DROP TABLE [wvevo_art] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_arak]') AND type in (N'U')) DROP TABLE [wvevo_arak] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_arajant]') AND type in (N'U')) DROP TABLE [wvevo_arajant] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wvevo_arajanlatt]') AND type in (N'U')) DROP TABLE [wvevo_arajanlatt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wutokalk]') AND type in (N'U')) DROP TABLE [wutokalk] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtr_vevo_ar_lista]') AND type in (N'U')) DROP TABLE [wtr_vevo_ar_lista] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtr_vevo_akcio_ve]') AND type in (N'U')) DROP TABLE [wtr_vevo_akcio_ve] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtr_vevo_akcio_hh]') AND type in (N'U')) DROP TABLE [wtr_vevo_akcio_hh] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtr_vevo_akcio]') AND type in (N'U')) DROP TABLE [wtr_vevo_akcio] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtr_szall_art]') AND type in (N'U')) DROP TABLE [wtr_szall_art] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtr_szall_arf]') AND type in (N'U')) DROP TABLE [wtr_szall_arf] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtermeles1]') AND type in (N'U')) DROP TABLE [wtermeles1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wtermeles]') AND type in (N'U')) DROP TABLE [wtermeles] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wterm_elszamolas1]') AND type in (N'U')) DROP TABLE [wterm_elszamolas1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wterm_elszamolas]') AND type in (N'U')) DROP TABLE [wterm_elszamolas] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wterm_arak]') AND type in (N'U')) DROP TABLE [wterm_arak] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszbiz_ujkarton]') AND type in (N'U')) DROP TABLE [wszbiz_ujkarton] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszbiz_szlat]') AND type in (N'U')) DROP TABLE [wszbiz_szlat] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszbiz_kiv]') AND type in (N'U')) DROP TABLE [wszbiz_kiv] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszavatos_lel]') AND type in (N'U')) DROP TABLE [wszavatos_lel] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszavatos_ki]') AND type in (N'U')) DROP TABLE [wszavatos_ki] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[WSZAVATOS]') AND type in (N'U')) DROP TABLE [WSZAVATOS] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszav_nyomt]') AND type in (N'U')) DROP TABLE [wszav_nyomt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszamolt_keszlet]') AND type in (N'U')) DROP TABLE [wszamolt_keszlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszallito_bank]') AND type in (N'U')) DROP TABLE [wszallito_bank] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszallito]') AND type in (N'U')) DROP TABLE [wszallito] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szletm]') AND type in (N'U')) DROP TABLE [wszall_szletm] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szlet_td]') AND type in (N'U')) DROP TABLE [wszall_szlet_td] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szlet_r]') AND type in (N'U')) DROP TABLE [wszall_szlet_r] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szlet]') AND type in (N'U')) DROP TABLE [wszall_szlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szlat_td]') AND type in (N'U')) DROP TABLE [wszall_szlat_td] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szlat]') AND type in (N'U')) DROP TABLE [wszall_szlat] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_szla_afa]') AND type in (N'U')) DROP TABLE [wszall_szla_afa] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_rentv]') AND type in (N'U')) DROP TABLE [wszall_rentv] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_rent]') AND type in (N'U')) DROP TABLE [wszall_rent] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_rendelt]') AND type in (N'U')) DROP TABLE [wszall_rendelt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_rend_jav3]') AND type in (N'U')) DROP TABLE [wszall_rend_jav3] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_rend_jav]') AND type in (N'U')) DROP TABLE [wszall_rend_jav] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_opt]') AND type in (N'U')) DROP TABLE [wszall_opt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_koz_nyug]') AND type in (N'U')) DROP TABLE [wszall_koz_nyug] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_keszlet]') AND type in (N'U')) DROP TABLE [wszall_keszlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_art]') AND type in (N'U')) DROP TABLE [wszall_art] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wszall_arajant]') AND type in (N'U')) DROP TABLE [wszall_arajant] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wstcikk2_jell]') AND type in (N'U')) DROP TABLE [wstcikk2_jell] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wsarzs_lel]') AND type in (N'U')) DROP TABLE [wsarzs_lel] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wsarzs_ki]') AND type in (N'U')) DROP TABLE [wsarzs_ki] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wsarzs]') AND type in (N'U')) DROP TABLE [wsarzs] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wrmozgast]') AND type in (N'U')) DROP TABLE [wrmozgast] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wriasztas]') AND type in (N'U')) DROP TABLE [wriasztas] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wraktarak]') AND type in (N'U')) DROP TABLE [wraktarak] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wPriorGyarHatralek]') AND type in (N'U')) DROP TABLE [wPriorGyarHatralek] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wpenztarb]') AND type in (N'U')) DROP TABLE [wpenztarb] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wpartner]') AND type in (N'U')) DROP TABLE [wpartner] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wnyanyagsz]') AND type in (N'U')) DROP TABLE [wnyanyagsz] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wmozgasok]') AND type in (N'U')) DROP TABLE [wmozgasok] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wmozgas]') AND type in (N'U')) DROP TABLE [wmozgas] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wmerleg]') AND type in (N'U')) DROP TABLE [wmerleg] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wllot]') AND type in (N'U')) DROP TABLE [wllot] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wleltar_felv]') AND type in (N'U')) DROP TABLE [wleltar_felv] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wleltar]') AND type in (N'U')) DROP TABLE [wleltar] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wleertekelest]') AND type in (N'U')) DROP TABLE [wleertekelest] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkulso_keszlet]') AND type in (N'U')) DROP TABLE [wkulso_keszlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkontirozas]') AND type in (N'U')) DROP TABLE [wkontirozas] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkont_szabalyt]') AND type in (N'U')) DROP TABLE [wkont_szabalyt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkont_nyito]') AND type in (N'U')) DROP TABLE [wkont_nyito] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkomissio]') AND type in (N'U')) DROP TABLE [wkomissio] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkoltseg_keszletre]') AND type in (N'U')) DROP TABLE [wkoltseg_keszletre] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkivett]') AND type in (N'U')) DROP TABLE [wkivett] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkeszletsz]') AND type in (N'U')) DROP TABLE [wkeszletsz] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkeszlet_szamolt]') AND type in (N'U')) DROP TABLE [wkeszlet_szamolt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkeszlet_cikk]') AND type in (N'U')) DROP TABLE [wkeszlet_cikk] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkeszlet_argen1]') AND type in (N'U')) DROP TABLE [wkeszlet_argen1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkeszlet_argen]') AND type in (N'U')) DROP TABLE [wkeszlet_argen] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkeszlet]') AND type in (N'U')) DROP TABLE [wkeszlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkassza1]') AND type in (N'U')) DROP TABLE [wkassza1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkassza]') AND type in (N'U')) DROP TABLE [wkassza] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkarton_ki]') AND type in (N'U')) DROP TABLE [wkarton_ki] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkamatszamlak]') AND type in (N'U')) DROP TABLE [wkamatszamlak] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkamatszamitas]') AND type in (N'U')) DROP TABLE [wkamatszamitas] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wkamatok]') AND type in (N'U')) DROP TABLE [wkamatok] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[WJOV_KESZLET]') AND type in (N'U')) DROP TABLE [WJOV_KESZLET] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wjellemzo2t]') AND type in (N'U')) DROP TABLE [wjellemzo2t] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[whavi_keszlet]') AND type in (N'U')) DROP TABLE [whavi_keszlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[WGYUJTESX]') AND type in (N'U')) DROP TABLE [WGYUJTESX] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyujtes2]') AND type in (N'U')) DROP TABLE [wgyujtes2] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyujtes1]') AND type in (N'U')) DROP TABLE [wgyujtes1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyujtes]') AND type in (N'U')) DROP TABLE [wgyujtes] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyujt]') AND type in (N'U')) DROP TABLE [wgyujt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyevho1]') AND type in (N'U')) DROP TABLE [wgyevho1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyevho]') AND type in (N'U')) DROP TABLE [wgyevho] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyariszamok_ki]') AND type in (N'U')) DROP TABLE [wgyariszamok_ki] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgyariszamok]') AND type in (N'U')) DROP TABLE [wgyariszamok] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgrando_szamla]') AND type in (N'U')) DROP TABLE [wgrando_szamla] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wgrando]') AND type in (N'U')) DROP TABLE [wgrando] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[WFx_VONAL]') AND type in (N'U')) DROP TABLE [WFx_VONAL] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_SZALLITO]') AND type in (N'U')) DROP TABLE [wfx_SZALLITO] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_SZALLCSOPORT]') AND type in (N'U')) DROP TABLE [wfx_SZALLCSOPORT] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_stcikk2]') AND type in (N'U')) DROP TABLE [wfx_stcikk2] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_kivetjog]') AND type in (N'U')) DROP TABLE [wfx_kivetjog] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_gyarto]') AND type in (N'U')) DROP TABLE [wfx_gyarto] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_cikkek]') AND type in (N'U')) DROP TABLE [wfx_cikkek] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[Wfx_bevetjog]') AND type in (N'U')) DROP TABLE [Wfx_bevetjog] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfx_akcio]') AND type in (N'U')) DROP TABLE [wfx_akcio] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfolyoszamla]') AND type in (N'U')) DROP TABLE [wfolyoszamla] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wfoglalasok_ki]') AND type in (N'U')) DROP TABLE [wfoglalasok_ki] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vonal]') AND type in (N'U')) DROP TABLE [wf_vonal] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevok_csoportazon]') AND type in (N'U')) DROP TABLE [wf_vevok_csoportazon] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevok]') AND type in (N'U')) DROP TABLE [wf_vevok] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_terulet]') AND type in (N'U')) DROP TABLE [wf_vevo_terulet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_tel]') AND type in (N'U')) DROP TABLE [wf_vevo_tel] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_lanc]') AND type in (N'U')) DROP TABLE [wf_vevo_lanc] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_csoport]') AND type in (N'U')) DROP TABLE [wf_vevo_csoport] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_cegjelleg]') AND type in (N'U')) DROP TABLE [wf_vevo_cegjelleg] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_bank]') AND type in (N'U')) DROP TABLE [wf_vevo_bank] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_art]') AND type in (N'U')) DROP TABLE [wf_vevo_art] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_arf]') AND type in (N'U')) DROP TABLE [wf_vevo_arf] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_arcsoport]') AND type in (N'U')) DROP TABLE [wf_vevo_arcsoport] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_arak]') AND type in (N'U')) DROP TABLE [wf_vevo_arak] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_ar_lista]') AND type in (N'U')) DROP TABLE [wf_vevo_ar_lista] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_akcio_ve]') AND type in (N'U')) DROP TABLE [wf_vevo_akcio_ve] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_akcio_hh]') AND type in (N'U')) DROP TABLE [wf_vevo_akcio_hh] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_akcio]') AND type in (N'U')) DROP TABLE [wf_vevo_akcio] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_vevo_akc_csoport]') AND type in (N'U')) DROP TABLE [wf_vevo_akc_csoport] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_szallito]') AND type in (N'U')) DROP TABLE [wf_szallito] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_szallcsoport]') AND type in (N'U')) DROP TABLE [wf_szallcsoport] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_szall_art]') AND type in (N'U')) DROP TABLE [wf_szall_art] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_szall_arf]') AND type in (N'U')) DROP TABLE [wf_szall_arf] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_stcikk2]') AND type in (N'U')) DROP TABLE [wf_stcikk2] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_stcikk1]') AND type in (N'U')) DROP TABLE [wf_stcikk1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_osszevont_cikkek]') AND type in (N'U')) DROP TABLE [wf_osszevont_cikkek] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_orszag]') AND type in (N'U')) DROP TABLE [wf_orszag] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_kivetjog]') AND type in (N'U')) DROP TABLE [wf_kivetjog] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_gyarto]') AND type in (N'U')) DROP TABLE [wf_gyarto] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_deviza]') AND type in (N'U')) DROP TABLE [wf_deviza] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_cikkek1]') AND type in (N'U')) DROP TABLE [wf_cikkek1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_cikkek_meret]') AND type in (N'U')) DROP TABLE [wf_cikkek_meret] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_cikkek_kep]') AND type in (N'U')) DROP TABLE [wf_cikkek_kep] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_cikkek]') AND type in (N'U')) DROP TABLE [wf_cikkek] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_cikk_webaruhaz]') AND type in (N'U')) DROP TABLE [wf_cikk_webaruhaz] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_cikk_leiras]') AND type in (N'U')) DROP TABLE [wf_cikk_leiras] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wf_bevetjog]') AND type in (N'U')) DROP TABLE [wf_bevetjog] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wepu_bank_impt]') AND type in (N'U')) DROP TABLE [wepu_bank_impt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wellenorzes]') AND type in (N'U')) DROP TABLE [wellenorzes] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[webvevo_rent]') AND type in (N'U')) DROP TABLE [webvevo_rent] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wean_ad]') AND type in (N'U')) DROP TABLE [wean_ad] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcimke1]') AND type in (N'U')) DROP TABLE [wcimke1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcimke]') AND type in (N'U')) DROP TABLE [wcimke] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcikkek_kep]') AND type in (N'U')) DROP TABLE [wcikkek_kep] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcikkek_jellemzok]') AND type in (N'U')) DROP TABLE [wcikkek_jellemzok] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcikkek_jell1]') AND type in (N'U')) DROP TABLE [wcikkek_jell1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcikkek_jell]') AND type in (N'U')) DROP TABLE [wcikkek_jell] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wcikkek]') AND type in (N'U')) DROP TABLE [wcikkek] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wbizonylat]') AND type in (N'U')) DROP TABLE [wbizonylat] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wbevett]') AND type in (N'U')) DROP TABLE [wbevett] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wbekivett]') AND type in (N'U')) DROP TABLE [wbekivett] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wbankcsomagt]') AND type in (N'U')) DROP TABLE [wbankcsomagt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wbankcsomagb]') AND type in (N'U')) DROP TABLE [wbankcsomagb] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[warak_virag]') AND type in (N'U')) DROP TABLE [warak_virag] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wanyagszukseglet]') AND type in (N'U')) DROP TABLE [wanyagszukseglet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wakc_csom_szt]') AND type in (N'U')) DROP TABLE [wakc_csom_szt] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wagy_szall_szlet]') AND type in (N'U')) DROP TABLE [wagy_szall_szlet] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wadatgyujto1]') AND type in (N'U')) DROP TABLE [wadatgyujto1] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wadatgyujto_vevo_ren]') AND type in (N'U')) DROP TABLE [wadatgyujto_vevo_ren] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wadatgyujto_arcimke]') AND type in (N'U')) DROP TABLE [wadatgyujto_arcimke] GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[wadatgyujto]') AND type in (N'U')) DROP TABLE [wadatgyujto] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wadatgyujto]( [tetel] [int] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [MOZGASKOD] [varchar](20) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [oldal] [int] NOT NULL, [BESZERZ_AR] [numeric](18, 2) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wadatgyujto_arcimke]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wadatgyujto_vevo_ren]( [ren_ssz] [dbo].[bizonylat_szam] NOT NULL, [ren_tet] [dbo].[bizonylat_tetel] NOT NULL, [tetel] [int] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wadatgyujto1]( [tetel] [int] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [MOZGASKOD] [varchar](20) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [oldal] [int] NOT NULL, [BESZERZ_AR] [dbo].[egyseg_ar] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wagy_szall_szlet]( [szallito] [dbo].[kulcs] NOT NULL, [rend_szam] [dbo].[bizonylat_szam] NOT NULL, [hivszam] [varchar](50) NOT NULL, [tetel] [dbo].[bizonylat_tetel] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wagy_szall_szlet] PRIMARY KEY CLUSTERED ( [szallito] ASC, [hivszam] ASC, [tetel] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wakc_csom_szt]( [csomag_azon] [int] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [cikkcsoport] [char](18) NOT NULL, [cikkcsop_nev] [dbo].[nev] NOT NULL, [gyarto] [dbo].[kulcs] NOT NULL, [gyarto_nev] [dbo].[nev] NOT NULL, [szallito] [dbo].[kulcs] NOT NULL, [szallito_nev] [dbo].[nev] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wanyagszukseglet]( [raktar_kod] [int] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [xdb] [numeric](18, 3) NOT NULL, [acikk_szam] [dbo].[cikk_szam] NOT NULL, [acikk_nev] [dbo].[cikk_nev] NOT NULL, [MENNY_EGYS] [varchar](8) NOT NULL, [darab] [numeric](18, 4) NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NULL, [aru_szolg] [char](1) NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [warak_virag]( [cikk_szam] [dbo].[cikk_szam] NULL, [egyseg_ar] [dbo].[egyseg_ar] NULL, [egyseg_ar1] [dbo].[egyseg_ar] NULL, [egyseg_ar2] [dbo].[egyseg_ar] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wbankcsomagb]( [tetel] [int] NOT NULL, [bizszam] [varchar](50) NOT NULL, [ertek] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wbankcsomagt]( [tetel] [int] NOT NULL, [bankszamlaszam] [dbo].[kulcs] NOT NULL, [kivonat] [int] NOT NULL, [datum] [dbo].[datum] NOT NULL, [tipus] [varchar](50) NOT NULL, [partner_tip] [char](1) NOT NULL, [partner] [dbo].[kulcs] NOT NULL, [partner_nev] [dbo].[nev] NOT NULL, [p_szamlaszam] [varchar](50) NOT NULL, [osszeg] [dbo].[egyseg_ar] NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [kurzus] [dbo].[kurzus] NOT NULL, [kozlemeny1] [varchar](80) NOT NULL, [kozlemeny2] [varchar](80) NOT NULL, [kozlemeny3] [varchar](80) NOT NULL, [megjegyzes] [dbo].[megjegyzes] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wbekivett]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [BRUTTO_AR] [dbo].[egyseg_ar] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wbevett]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wbevett_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wbizonylat]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [int] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [edarab] [dbo].[mennyiseg] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [rendel_bsz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [gyariszamok] [varchar](3000) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, [biztip] [varchar](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcikkek]( [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [aru_szolg] [char](1) NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [NORM_ME] [dbo].[menny_egyseg] NOT NULL, [NORM_SZORZ] [dbo].[mennyiseg] NOT NULL, [VTSZ] [varchar](14) NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [KIFUTOTT] [char](1) NOT NULL, [RENDELHETO] [char](1) NOT NULL, [JOVEDEKI] [char](1) NOT NULL, [GONGYOLEG] [char](1) NOT NULL, [ALLANDO] [char](1) NOT NULL, [CIKKCSOP2] [char](18) NULL, [GYARTO] [dbo].[kulcs] NULL, [raktar_kod] [dbo].[kulcs] NULL, [POLC] [char](14) NOT NULL, [SZALLITO] [dbo].[kulcs] NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [ZSUGOR_DB] [int] NOT NULL, [DB_KART] [int] NOT NULL, [KART_SOR] [int] NOT NULL, [KART_RAKL] [int] NOT NULL, [MIN_RENCS] [char](10) NOT NULL, [MIN_RENSZ] [numeric](18, 3) NOT NULL, [db_sulya] [numeric](18, 3) NOT NULL, [db_br_sulya] [numeric](18, 3) NULL, [karton_hossz] [int] NOT NULL, [karton_szelesseg] [int] NOT NULL, [karton_magassag] [int] NOT NULL, [karton_sulya] [numeric](18, 3) NOT NULL, [karton_br_sulya] [numeric](18, 3) NULL, [rakat_mag] [int] NOT NULL, [TIZEDES] [tinyint] NULL, [DAT_TIPUS] [char](1) NOT NULL, [SZAV_IDO] [int] NOT NULL, [vpop_alkoholfok] [dbo].[mennyiseg] NULL, [vpop_fajtakod] [varchar](10) NULL, [vpop_urtartalom] [dbo].[mennyiseg] NULL, [termekdijas] [char](1) NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcikkek_jell]( [cikk_szam] [varchar](14) NOT NULL, [jellemzo] [dbo].[kulcs] NOT NULL, [jellemzo_nev] [varchar](50) NOT NULL, [jellemzo_ertek] [varchar](50) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcikkek_jell1]( [jellemzo] [dbo].[kulcs] NOT NULL, [jellemzo_nev] [varchar](50) NOT NULL, [jellemzo_ertek] [varchar](50) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcikkek_jellemzok]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [jellemzo] [dbo].[kulcs] NOT NULL, [jellemzo_nev] [dbo].[nev] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wcikkek_jellemzok] PRIMARY KEY CLUSTERED ( [cikk_szam] ASC, [jellemzo] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcikkek_kep]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [file_nev] [varchar](255) NOT NULL, [tfile_nev] [varchar](1000) NOT NULL, [mod] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcimke]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [AKCIO] [varchar](1) NOT NULL, [NORM_ME] [dbo].[menny_egyseg] NOT NULL, [NORM_SZORZ] [numeric](18, 3) NOT NULL, [NETTO_AR] [dbo].[mennyiseg] NOT NULL, [BRUTTO_AR] [dbo].[mennyiseg] NOT NULL, [TGON] [dbo].[cikk_szam] NULL, [TGON_CN] [dbo].[nev] NULL, [TGON_SZORZ] [numeric](18, 2) NULL, [TGON_AR] [dbo].[egyseg_ar] NULL, [vonalkod] [varchar](14) NOT NULL, [CIKKCSOP2] [varchar](18) NOT NULL, [SZALLITO] [dbo].[kulcs] NOT NULL, [GYARTO] [dbo].[kulcs] NOT NULL, [E_BRUTTO_AR] [dbo].[egyseg_ar] NOT NULL, [keszlet] [dbo].[mennyiseg] NOT NULL, [AKCIOK_DATUM] [dbo].[datum] NULL, [AKCIOV_DATUM] [dbo].[datum] NULL, [KICSODA] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wcimke1]( [vonalkod] [varchar](15) NOT NULL, [cikk_nev] [varchar](80) NOT NULL, [egyseg_ar] [numeric](18, 2) NOT NULL, [datum] [char](10) NOT NULL, [kicsoda] [varchar](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wean_ad]( [kicsoda] [dbo].[kicsoda] NOT NULL, [ean] [dbo].[kulcs] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [webvevo_rent]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EDARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [visszaig_dat] [dbo].[datum] NOT NULL, [AKCIO] [char](1) NOT NULL, [vevo] [dbo].[kulcs] NOT NULL, CONSTRAINT [PK_webvevo_rent] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [vevo] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wellenorzes]( [szamitogep] [varchar](50) NOT NULL, [ertek] [varchar](50) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wepu_bank_impt]( [kulcs] [dbo].[kulcs] NOT NULL, [forgalom_tip] [varchar](50) NOT NULL, [erteknap] [dbo].[datum] NOT NULL, [osszeg] [dbo].[egyseg_ar] NOT NULL, [szamlaszam] [varchar](26) NOT NULL, [vevo_nev] [varchar](80) NOT NULL, [vevo_kod] [dbo].[kulcs] NOT NULL, [kozlemeny] [varchar](255) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_bevetjog]( [bevetnev] [dbo].[nev] NOT NULL, [kod] [dbo].[kulcs] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_cikk_leiras]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [leiras1] [varchar](2048) NOT NULL, [leiras2] [varchar](2048) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_cikk_webaruhaz]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [domain1] [varchar](20) NOT NULL, [domain2] [varchar](20) NOT NULL, [domain3] [varchar](20) NOT NULL, [domain4] [varchar](20) NOT NULL, [domain5] [varchar](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_cikkek]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [cikk_nev_ang] [dbo].[cikk_nev] NOT NULL, [aru_szolg] [char](1) NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [menny_egys_ang] [dbo].[menny_egyseg] NOT NULL, [NORM_ME] [dbo].[menny_egyseg] NOT NULL, [NORM_SZORZ] [dbo].[mennyiseg] NOT NULL, [VTSZ] [varchar](14) NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [KIFUTOTT] [char](1) NOT NULL, [RENDELHETO] [char](1) NOT NULL, [JOVEDEKI] [char](1) NOT NULL, [GONGYOLEG] [char](1) NOT NULL, [ALLANDO] [char](1) NOT NULL, [TGON] [char](14) NOT NULL, [TGONSZOR] [int] NOT NULL, [NTGON] [char](14) NOT NULL, [NTGONSZOR] [int] NOT NULL, [CIKKCSOP2] [char](18) NOT NULL, [GYARTO] [dbo].[kulcs] NOT NULL, [raktar_kod] [dbo].[kulcs] NOT NULL, [POLC] [char](14) NOT NULL, [SZALLITO] [dbo].[kulcs] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [ZSUGOR_DB] [int] NOT NULL, [DB_KART] [int] NOT NULL, [KART_SOR] [int] NOT NULL, [KART_RAKL] [int] NOT NULL, [MIN_RENCS] [char](10) NOT NULL, [MIN_RENSZ] [numeric](18, 3) NOT NULL, [db_sulya] [numeric](18, 3) NOT NULL, [db_br_sulya] [numeric](18, 3) NULL, [karton_hossz] [int] NOT NULL, [karton_szelesseg] [int] NOT NULL, [karton_magassag] [int] NOT NULL, [karton_sulya] [numeric](18, 3) NOT NULL, [karton_br_sulya] [numeric](18, 3) NULL, [rakat_mag] [int] NOT NULL, [akt_besz_ar] [dbo].[egyseg_ar] NULL, [ut_besz_ar] [dbo].[egyseg_ar] NOT NULL, [NAPI_FOGY] [numeric](18, 3) NOT NULL, [MIN_KESZ] [numeric](18, 3) NOT NULL, [letrehozta] [dbo].[kicsoda] NOT NULL, [letrehozva] [dbo].[datum_ora] NOT NULL, [modositotta] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL, [TIZEDES] [tinyint] NULL, [DAT_TIPUS] [char](1) NOT NULL, [SZAV_IDO] [int] NOT NULL, [vpop_alkoholfok] [dbo].[mennyiseg] NULL, [vpop_fajtakod] [varchar](10) NULL, [vpop_urtartalom] [dbo].[mennyiseg] NULL, [termekdijas] [char](1) NULL, [linkfile] [varchar](500) NOT NULL, [szarmazasi_hely] [varchar](50) NOT NULL, [gycikk_szam] [dbo].[cikk_szam] NOT NULL, [chips_ados] [char](1) NOT NULL, [vpop_platofok] [dbo].[mennyiseg] NOT NULL, [web] [char](1) NULL, [fordafa] [char](1) NULL, [kockazatos] [char](1) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_cikkek_kep]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [file_nev] [varchar](255) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_cikkek_meret]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [suly] [dbo].[mennyiseg] NOT NULL, [hossz] [dbo].[mennyiseg] NOT NULL, [szelesseg] [dbo].[mennyiseg] NOT NULL, [magassag] [dbo].[mennyiseg] NOT NULL, CONSTRAINT [PK_wf_cikkek_meret] PRIMARY KEY CLUSTERED ( [cikk_szam] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_cikkek1]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [aru_szolg] [char](1) NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [NORM_ME] [dbo].[menny_egyseg] NOT NULL, [NORM_SZORZ] [dbo].[mennyiseg] NOT NULL, [VTSZ] [varchar](14) NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [KIFUTOTT] [char](1) NOT NULL, [RENDELHETO] [char](1) NOT NULL, [JOVEDEKI] [char](1) NOT NULL, [GONGYOLEG] [char](1) NOT NULL, [ALLANDO] [char](1) NOT NULL, [TGON] [char](14) NOT NULL, [TGONSZOR] [int] NOT NULL, [NTGON] [char](14) NOT NULL, [NTGONSZOR] [int] NOT NULL, [CIKKCSOP2] [char](18) NOT NULL, [GYARTO] [dbo].[kulcs] NOT NULL, [raktar_kod] [dbo].[kulcs] NOT NULL, [POLC] [char](14) NOT NULL, [SZALLITO] [dbo].[kulcs] NOT NULL, [VCIKKSZAM] [dbo].[cikk_szam] NOT NULL, [ZSUGOR_DB] [int] NOT NULL, [DB_KART] [int] NOT NULL, [KART_SOR] [int] NOT NULL, [KART_RAKL] [int] NOT NULL, [MIN_RENCS] [char](10) NOT NULL, [MIN_RENSZ] [numeric](18, 3) NOT NULL, [db_sulya] [numeric](18, 3) NOT NULL, [db_br_sulya] [numeric](18, 3) NULL, [karton_hossz] [int] NOT NULL, [karton_szelesseg] [int] NOT NULL, [karton_magassag] [int] NOT NULL, [karton_sulya] [numeric](18, 3) NOT NULL, [karton_br_sulya] [numeric](18, 3) NULL, [rakat_mag] [int] NOT NULL, [akt_besz_ar] [dbo].[egyseg_ar] NULL, [ut_besz_ar] [dbo].[egyseg_ar] NOT NULL, [NAPI_FOGY] [numeric](18, 3) NOT NULL, [MIN_KESZ] [numeric](18, 3) NOT NULL, [letrehozta] [dbo].[kicsoda] NOT NULL, [letrehozva] [dbo].[datum_ora] NOT NULL, [modositotta] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL, [TIZEDES] [tinyint] NULL, [DAT_TIPUS] [char](1) NOT NULL, [SZAV_IDO] [int] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_deviza]( [penznem] [dbo].[penznem] NOT NULL, [kurzus] [dbo].[kurzus] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_gyarto]( [nev] [dbo].[nev] NOT NULL, [kod] [dbo].[kulcs] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_kivetjog]( [kivetnev] [dbo].[nev] NOT NULL, [kod] [dbo].[kulcs] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_orszag]( [Kod] [char](3) NOT NULL, [orszag] [dbo].[nev] NOT NULL, [eu] [char](1) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_osszevont_cikkek]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [ujcikk_szam] [dbo].[cikk_szam] NOT NULL, [ujcikk_nev] [dbo].[cikk_nev] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, [modositva] [dbo].[datum_ora] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_stcikk1]( [CIKK_SZAM] [char](18) NOT NULL, [CIKK_NEV] [nvarchar](50) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_stcikk2]( [cikk_szam] [char](18) NOT NULL, [cikk_nev] [nvarchar](50) NOT NULL, [cikk_nev_eng] [varchar](50) NULL, [kicsoda] [nvarchar](10) NOT NULL, [modositva] [char](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_szall_arf]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [SZALLITO] [dbo].[kulcs] NOT NULL, [TIPUS] [char](10) NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [KDATUM] [dbo].[datum] NOT NULL, [VDATUM] [dbo].[datum] NOT NULL, [RKDATUM] [dbo].[datum] NOT NULL, [RVDATUM] [dbo].[datum] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [MEGJEGYZES] [dbo].[megjegyzes] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_szall_art]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [LISTA_AR] [dbo].[egyseg_ar] NOT NULL, [KEDVEZMENY] [dbo].[kedvezmeny] NOT NULL, [NETTO_AR] [dbo].[egyseg_ar] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_szallcsoport]( [nev] [dbo].[nev] NOT NULL, [kod] [dbo].[kulcs] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_szallito]( [SZALL_KOD] [dbo].[kulcs] NOT NULL, [SZALL_NEV] [dbo].[nev] NOT NULL, [VAROS] [dbo].[nev] NOT NULL, [IRANYITO] [dbo].[nev] NOT NULL, [CIM] [dbo].[nev] NOT NULL, [TELEFON] [dbo].[nev] NULL, [FAX] [dbo].[nev] NULL, [KAPCSOLAT] [dbo].[nev] NULL, [ADOSZAM] [dbo].[nev] NULL, [eu_adoszam] [dbo].[nev] NULL, [BANK] [dbo].[nev] NULL, [FIZMOD] [char](1) NOT NULL, [FIZHAT] [int] NOT NULL, [SZALLCSOP] [int] NOT NULL, [MAX_KESZLET] [dbo].[egyseg_ar] NOT NULL, [orszag] [dbo].[nev] NOT NULL, [jovedeki] [dbo].[nev] NOT NULL, [email] [varchar](512) NULL, [szorzo] [dbo].[egyseg_ar] NULL, [penznem] [dbo].[penznem] NULL, [modositva] [dbo].[datum_ora] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_akc_csoport]( [kod] [dbo].[kulcs] NOT NULL, [nev] [dbo].[nev] NOT NULL, [penznem] [dbo].[penznem] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_akcio]( [AKCIOCSOP] [int] NOT NULL, [akcio_tip] [int] NOT NULL, [KDATUM] [dbo].[datum] NOT NULL, [VDATUM] [dbo].[datum] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [SZOVEG] [dbo].[megjegyzes] NOT NULL, [ke_keszlet] [dbo].[mennyiseg] NOT NULL, [ke_maradek] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL, [kulcs] [timestamp] NOT NULL, [ujsag] [char](1) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_akcio_hh]( [kulcs] [numeric](18, 0) NOT NULL, [akc_csop] [int] NOT NULL, [cikk_szam] [char](14) NOT NULL, [het] [char](7) NULL, [kido] [char](5) NOT NULL, [vido] [char](5) NOT NULL, [kedvezmeny] [numeric](18, 2) NOT NULL, [megszunt] [char](1) NOT NULL, [kicsoda] [varchar](20) NOT NULL, [modido] [char](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_akcio_ve]( [kulcs] [int] NOT NULL, [akc_csop] [int] NOT NULL, [het] [char](7) NOT NULL, [kido] [char](5) NOT NULL, [vido] [char](5) NOT NULL, [limit1] [numeric](18, 3) NOT NULL, [kedvezmeny1] [numeric](18, 2) NOT NULL, [limit2] [numeric](18, 3) NOT NULL, [kedvezmeny2] [numeric](18, 2) NOT NULL, [megszunt] [char](1) NOT NULL, [kicsoda] [varchar](20) NOT NULL, [modido] [char](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_ar_lista]( [arcsoport] [int] NOT NULL, [datum] [char](10) NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [netto_ar] [dbo].[egyseg_ar] NULL, [brutto_ar] [dbo].[egyseg_ar] NULL, [beszerz_ar] [dbo].[egyseg_ar] NULL, [arres] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NULL, [modositva] [dbo].[datum_ora] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_arak]( [arcsoport] [dbo].[kulcs] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [n_beszerz_ar] [dbo].[egyseg_ar] NOT NULL, [l_beszerz_ar] [dbo].[egyseg_ar] NOT NULL, [netto_ar] [dbo].[egyseg_ar] NOT NULL, [akcios_ar] [dbo].[egyseg_ar] NOT NULL, [akcio] [char](1) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_arcsoport]( [KOD] [dbo].[kulcs] NOT NULL, [NEV] [dbo].[nev] NOT NULL, [szamitas_modja] [char](1) NULL, [penznem] [dbo].[penznem] NULL, [FelarasKod] [dbo].[kulcs] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_arf]( [ARCSOPORT] [int] NOT NULL, [IND_TIPUS] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, [modositva] [dbo].[datum_ora] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_art]( [ARCSOPORT] [int] NOT NULL, [sorrend] [int] NOT NULL, [szallito] [dbo].[kulcs] NOT NULL, [gyarto] [dbo].[kulcs] NOT NULL, [CIKK_CSOP] [char](18) NOT NULL, [FELAR] [dbo].[kedvezmeny] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_bank]( [vevo_kod] [dbo].[kulcs] NOT NULL, [bank] [dbo].[nev] NOT NULL, [torolt] [char](1) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_cegjelleg]( [kod] [dbo].[kulcs] NOT NULL, [nev] [dbo].[nev] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_csoport]( [kod] [dbo].[kulcs] NOT NULL, [nev] [dbo].[nev] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_lanc]( [kod] [dbo].[kulcs] NOT NULL, [nev] [dbo].[nev] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_tel]( [VEVO_KOD] [int] NOT NULL, [TELEP_KOD] [char](4) NOT NULL, [TELEP_NEV] [nvarchar](50) NOT NULL, [VAROS] [nvarchar](50) NOT NULL, [IRANYITO] [nvarchar](50) NOT NULL, [CIM] [nvarchar](50) NOT NULL, [kerulet] [varchar](50) NULL, [kozterulet_jellege] [varchar](50) NULL, [hazszam] [varchar](50) NULL, [epulet] [varchar](50) NULL, [lepcsohaz] [varchar](50) NULL, [szint] [varchar](50) NULL, [ajto] [varchar](50) NULL, [KAPCSOLAT] [nvarchar](50) NOT NULL, [TELEFON] [nvarchar](50) NOT NULL, [EMAIL] [nvarchar](50) NOT NULL, [KARTYA] [nvarchar](50) NOT NULL, [LIMIT] [real] NULL, [jovedeki] [nvarchar](50) NOT NULL, [TOROLT] [char](1) NULL, [vevo_csoport] [dbo].[kulcs] NULL, [vevo_lanc] [dbo].[kulcs] NULL, [vevo_cegjelleg] [dbo].[kulcs] NULL, [vevo_terulet] [dbo].[kulcs] NULL, [idokapu] [varchar](30) NULL, [iso] [char](2) NULL, [allam] [varchar](255) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevo_terulet]( [kod] [dbo].[kulcs] NOT NULL, [nev] [dbo].[nev] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevok]( [VEVO_KOD] [dbo].[kulcs] NOT NULL, [VEVO_NEV] [dbo].[nev] NOT NULL, [IRANYITO] [dbo].[nev] NOT NULL, [VAROS] [dbo].[nev] NOT NULL, [orszag] [char](3) NOT NULL, [CIM] [dbo].[nev] NOT NULL, [TELEFON] [dbo].[nev] NOT NULL, [FAX] [dbo].[nev] NOT NULL, [KAPCSOLAT] [dbo].[nev] NOT NULL, [EMAIL] [dbo].[nev] NOT NULL, [ADOSZAM] [dbo].[nev] NOT NULL, [eu_adoszam] [dbo].[nev] NULL, [BANK] [dbo].[nev] NOT NULL, [JOVEDEKI] [dbo].[nev] NOT NULL, [vevo_arcsoport] [dbo].[kulcs] NOT NULL, [vevo_akc_csoport] [dbo].[kulcs] NULL, [KEDVEZMENY] [dbo].[kedvezmeny] NOT NULL, [FIZMOD] [char](1) NOT NULL, [FIZHAT] [int] NOT NULL, [vevo_csoport] [dbo].[kulcs] NOT NULL, [vevo_lanc] [dbo].[kulcs] NOT NULL, [vevo_cegjelleg] [dbo].[kulcs] NOT NULL, [vevo_terulet] [dbo].[kulcs] NOT NULL, [vevo_cszcsoport] [dbo].[kulcs] NOT NULL, [Viszontelado] [char](1) NULL, [sajat_bolt] [char](1) NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL, [utlevel] [varchar](20) NOT NULL, [lnev] [dbo].[nev] NULL, [liranyito] [dbo].[nev] NULL, [lvaros] [dbo].[nev] NULL, [lcim] [dbo].[nev] NULL, [nyelv] [char](2) NULL, [eszamla] [char](1) NULL, [iso] [char](2) NULL, [allam] [varchar](255) NULL, [liso] [char](2) NULL, [lallam] [varchar](255) NULL, [kerulet] [varchar](50) NULL, [kozterulet_jellege] [varchar](50) NULL, [hazszam] [varchar](50) NULL, [epulet] [varchar](50) NULL, [lepcsohaz] [varchar](50) NULL, [szint] [varchar](50) NULL, [ajto] [varchar](50) NULL, [fordafa] [char](1) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vevok_csoportazon]( [vevo_kod] [dbo].[kulcs] NOT NULL, [csoport_azon] [varchar](13) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wf_vonal]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VONALKOD] [char](14) NOT NULL, [SZORZO] [dbo].[kulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [ALAP] [char](1) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfoglalasok_ki]( [kulcs] [dbo].[kulcs] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfolyoszamla]( [tipus] [int] NOT NULL, [partner_tip] [char](1) NULL, [partner_kod] [int] NULL, [bizszam] [dbo].[bizonylat_szam] NOT NULL, [kulso_bsz] [varchar](50) NULL, [telj_dat] [dbo].[datum] NULL, [szla_dat] [dbo].[datum] NULL, [fiz_mod] [char](1) NULL, [fiz_hat] [dbo].[datum] NULL, [ertek] [dbo].[egyseg_ar] NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [kurzus] [dbo].[kurzus] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_akcio]( [bolt] [int] NOT NULL, [cikk_szam] [varchar](14) NOT NULL, [fdatum] [char](10) NOT NULL, [kdatum] [char](10) NOT NULL, [vdatum] [char](10) NOT NULL, [akcios_ar] [numeric](18, 2) NOT NULL, [eredeti_ar] [numeric](18, 2) NOT NULL, [kicsoda] [varchar](20) NOT NULL, [keszult] [char](20) NOT NULL, [kiemelt] [char](1) NOT NULL, [megjegyzes] [varchar](100) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [Wfx_bevetjog]( [bevetnev] [varchar](30) NOT NULL, [kod] [varchar](12) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_cikkek]( [CIKK_SZAM] [varchar](14) NOT NULL, [CIKK_NEV] [varchar](45) NOT NULL, [MENNY_EGYS] [varchar](8) NOT NULL, [VTSZ] [varchar](14) NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [CIKKCSOP2] [varchar](18) NOT NULL, [ZSUR_DB] [numeric](18, 3) NOT NULL, [DB_KART] [numeric](18, 3) NOT NULL, [KART_SOR] [numeric](18, 3) NOT NULL, [KART_RAKL] [numeric](18, 3) NOT NULL, [TGON] [varchar](14) NOT NULL, [NTGON] [varchar](14) NOT NULL, [TGONSZOR] [numeric](18, 2) NOT NULL, [NTGONSZOR] [numeric](18, 2) NOT NULL, [NETTO_AR] [numeric](18, 2) NOT NULL, [BRUTTO_AR] [numeric](18, 2) NOT NULL, [AKCIO] [varchar](1) NOT NULL, [NORM_ME] [varchar](8) NOT NULL, [NORM_SZORZ] [numeric](18, 3) NOT NULL, [SZALLITO] [varchar](12) NOT NULL, [GYARTO] [varchar](12) NOT NULL, [ATL_FOGYAS] [numeric](18, 2) NOT NULL, [MIN_KESZLET] [numeric](18, 3) NOT NULL, [BESZERZ_AR] [numeric](18, 2) NOT NULL, [GONGYOLEG] [varchar](1) NOT NULL, [KIFUTOTT] [varchar](1) NOT NULL, [FIX_ARAS] [varchar](1) NULL, [TIZEDES] [tinyint] NULL, [WEB] [char](1) NULL, [LETREHOZTA] [varchar](20) NULL, [LETREHOZVA] [char](20) NULL, [MODOSITOTTA] [varchar](20) NULL, [MODOSITVA] [char](20) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_gyarto]( [nev] [varchar](50) NOT NULL, [kod] [varchar](12) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_kivetjog]( [kivetnev] [varchar](30) NOT NULL, [kod] [varchar](12) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_stcikk2]( [CIKK_SZAM] [varchar](18) NOT NULL, [CIKK_NEV] [varchar](45) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_SZALLCSOPORT]( [csoportnev] [varchar](30) NOT NULL, [kod] [varchar](12) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wfx_SZALLITO]( [SZALL_KOD] [varchar](12) NOT NULL, [SZALL_NEV] [varchar](50) NOT NULL, [VAROS] [varchar](30) NOT NULL, [IRANYITO] [varchar](6) NOT NULL, [CIM] [varchar](50) NOT NULL, [TELEFON] [varchar](12) NULL, [FAX] [varchar](12) NULL, [KAPCSOLAT] [varchar](30) NULL, [ADOSZAM] [varchar](13) NULL, [BANK] [varchar](26) NULL, [EDI] [varchar](13) NULL, [FIZMOD] [varchar](1) NOT NULL, [FIZHAT] [int] NOT NULL, [SZALLCSOP] [varchar](12) NOT NULL, [MAX_KESZLET] [numeric](18, 3) NOT NULL, [bank1] [varchar](26) NULL, [felir] [varchar](50) NULL, [vevo_kod] [varchar](50) NULL, [ugyf_telefon] [varchar](50) NULL, [ugyf_email] [varchar](50) NULL, [rend_telefon] [varchar](50) NULL, [rend_email] [varchar](50) NULL, [tulajdonos] [varchar](70) NULL, [tul_telefon] [varchar](50) NULL, [tul_email] [varchar](50) NULL, [kepviselo] [varchar](70) NULL, [kep_telefon] [varchar](50) NULL, [kep_email] [varchar](50) NULL, [szall_napok] [varchar](50) NULL, [rend_leadas] [varchar](50) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [WFx_VONAL]( [CIKK_SZAM] [varchar](14) NOT NULL, [VONALKOD] [varchar](14) NOT NULL, [SZORZO] [numeric](18, 2) NOT NULL, [MENNY_EGYS] [varchar](8) NOT NULL, [ALAP] [varchar](1) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgrando]( [id] [float] NULL, [familyName] [nvarchar](255) NULL, [givenName] [nvarchar](255) NULL, [email] [nvarchar](255) NULL, [phone] [nvarchar](255) NULL, [shippingFamilyName] [nvarchar](255) NULL, [shippingGivenName] [nvarchar](255) NULL, [shippingZip] [float] NULL, [shippingCity] [nvarchar](255) NULL, [shippingAddress] [nvarchar](255) NULL, [billingFamilyName] [nvarchar](255) NULL, [billingGivenName] [nvarchar](255) NULL, [billingZip] [float] NULL, [billingCity] [nvarchar](255) NULL, [billingAddress] [nvarchar](255) NULL, [info] [nvarchar](255) NULL, [shippingType] [float] NULL, [payMethod] [float] NULL, [status] [float] NULL, [flag] [float] NULL, [dateOrdered] [datetime] NULL, [productId] [nvarchar](255) NULL, [productTitle] [nvarchar](255) NULL, [productWarranty] [float] NULL, [productWeight] [float] NULL, [productPrice] [float] NULL, [productQuantity] [float] NULL, [takeoverPark] [nvarchar](255) NULL, [pickpackShopCode] [nvarchar](255) NULL, [pickpackZipCode] [nvarchar](255) NULL, [pickpackCity] [nvarchar](255) NULL, [pickpackAddress] [nvarchar](255) NULL, [payuPaid] [nvarchar](255) NULL, [takeOverParkId] [nvarchar](255) NULL, [cikk_szam] [char](14) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgrando_szamla]( [bizszam] [dbo].[bizonylat_szam] NOT NULL, [datum] [dbo].[datum] NOT NULL, [vevo] [dbo].[kulcs] NOT NULL, [telep] [char](4) NOT NULL, [fiz_modja] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyariszamok]( [xtetel] [dbo].[bizonylat_tetel] NOT NULL, [biztip] [char](20) NOT NULL, [gyariszam] [dbo].[gyari_szam] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyariszamok_ki]( [xtetel] [dbo].[bizonylat_tetel] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [biztip] [char](20) NOT NULL, [gyariszam] [dbo].[gyari_szam] NOT NULL, [bevetel_datum] [dbo].[datum] NOT NULL, [bevetel_bizszam] [dbo].[bizonylat_szam] NOT NULL, [bevetel_biztip] [varchar](50) NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyevho]( [vevo] [dbo].[kulcs] NULL, [cikk_szam] [dbo].[cikk_szam] NULL, [cikk_nev] [dbo].[cikk_nev] NULL, [db1] [dbo].[mennyiseg] NULL, [db2] [dbo].[mennyiseg] NULL, [db3] [dbo].[mennyiseg] NULL, [db4] [dbo].[mennyiseg] NULL, [db5] [dbo].[mennyiseg] NULL, [db6] [dbo].[mennyiseg] NULL, [db7] [dbo].[mennyiseg] NULL, [db8] [dbo].[mennyiseg] NULL, [db9] [dbo].[mennyiseg] NULL, [db10] [dbo].[mennyiseg] NULL, [db11] [dbo].[mennyiseg] NULL, [db12] [dbo].[mennyiseg] NULL, [adb1] [dbo].[mennyiseg] NULL, [adb2] [dbo].[mennyiseg] NULL, [adb3] [dbo].[mennyiseg] NULL, [adb4] [dbo].[mennyiseg] NULL, [adb5] [dbo].[mennyiseg] NULL, [adb6] [dbo].[mennyiseg] NULL, [adb7] [dbo].[mennyiseg] NULL, [adb8] [dbo].[mennyiseg] NULL, [adb9] [dbo].[mennyiseg] NULL, [adb10] [dbo].[mennyiseg] NULL, [adb11] [dbo].[mennyiseg] NULL, [adb12] [dbo].[mennyiseg] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyevho1]( [vevo] [dbo].[kulcs] NULL, [cikk_szam] [dbo].[cikk_szam] NULL, [cikk_nev] [dbo].[cikk_nev] NULL, [db1] [dbo].[mennyiseg] NULL, [db2] [dbo].[mennyiseg] NULL, [db3] [dbo].[mennyiseg] NULL, [db4] [dbo].[mennyiseg] NULL, [db5] [dbo].[mennyiseg] NULL, [db6] [dbo].[mennyiseg] NULL, [db7] [dbo].[mennyiseg] NULL, [db8] [dbo].[mennyiseg] NULL, [db9] [dbo].[mennyiseg] NULL, [db10] [dbo].[mennyiseg] NULL, [db11] [dbo].[mennyiseg] NULL, [db12] [dbo].[mennyiseg] NULL, [adb1] [dbo].[mennyiseg] NULL, [adb2] [dbo].[mennyiseg] NULL, [adb3] [dbo].[mennyiseg] NULL, [adb4] [dbo].[mennyiseg] NULL, [adb5] [dbo].[mennyiseg] NULL, [adb6] [dbo].[mennyiseg] NULL, [adb7] [dbo].[mennyiseg] NULL, [adb8] [dbo].[mennyiseg] NULL, [adb9] [dbo].[mennyiseg] NULL, [adb10] [dbo].[mennyiseg] NULL, [adb11] [dbo].[mennyiseg] NULL, [adb12] [dbo].[mennyiseg] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyujt]( [DATUM1] [dbo].[datum] NULL, [DATUM2] [dbo].[datum] NULL, [ERTEK1] [dbo].[egyseg_ar] NULL, [DARAB1] [dbo].[mennyiseg] NULL, [ERTEK2] [dbo].[egyseg_ar] NULL, [DARAB2] [dbo].[mennyiseg] NULL, [ERTEK3] [dbo].[egyseg_ar] NULL, [DARAB3] [dbo].[mennyiseg] NULL, [ERTEK4] [dbo].[egyseg_ar] NULL, [DARAB4] [dbo].[mennyiseg] NULL, [ERTEK5] [dbo].[egyseg_ar] NULL, [DARAB5] [dbo].[mennyiseg] NULL, [ERTEK6] [dbo].[egyseg_ar] NULL, [DARAB6] [dbo].[mennyiseg] NULL, [ERTEK7] [dbo].[egyseg_ar] NULL, [DARAB7] [dbo].[mennyiseg] NULL, [ERTEK8] [dbo].[egyseg_ar] NULL, [DARAB8] [dbo].[mennyiseg] NULL, [ERTEK9] [dbo].[egyseg_ar] NULL, [DARAB9] [dbo].[mennyiseg] NULL, [ERTEK10] [dbo].[egyseg_ar] NULL, [DARAB11] [dbo].[mennyiseg] NULL, [ERTEK12] [dbo].[egyseg_ar] NULL, [DARAB12] [dbo].[mennyiseg] NULL, [ERTEK13] [dbo].[egyseg_ar] NULL, [DARAB13] [dbo].[mennyiseg] NULL, [ERTEK14] [dbo].[egyseg_ar] NULL, [DARAB14] [dbo].[mennyiseg] NULL, [ERTEK15] [dbo].[egyseg_ar] NULL, [DARAB15] [dbo].[mennyiseg] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyujtes]( [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NULL, [CIKKCSOP] [char](18) NULL, [CSOPNEV] [dbo].[cikk_nev] NULL, [GYARTO_NEV] [dbo].[cikk_nev] NULL, [GYARTO_KOD] [dbo].[kulcs] NULL, [SZALL_KOD] [dbo].[kulcs] NULL, [SZALL_NEV] [dbo].[cikk_nev] NULL, [VEVO_KOD] [dbo].[kulcs] NULL, [VEVO_NEV] [dbo].[cikk_nev] NULL, [raktar_kod] [dbo].[kulcs] NULL, [raktar_nev] [dbo].[cikk_nev] NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [EGYSEG_AR1] [dbo].[egyseg_ar] NULL, [DARAB1] [dbo].[mennyiseg] NULL, [EGYSEG_AR2] [dbo].[egyseg_ar] NULL, [DARAB2] [dbo].[mennyiseg] NULL, [EGYSEG_AR3] [dbo].[egyseg_ar] NULL, [DARAB3] [dbo].[mennyiseg] NULL, [DATUM1] [dbo].[datum] NULL, [DATUM2] [dbo].[datum] NULL, [BIZSZAM] [dbo].[bizonylat_szam] NULL, [TETEL] [dbo].[bizonylat_tetel] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyujtes1]( [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NULL, [CIKKCSOP] [char](18) NULL, [CSOPNEV] [dbo].[cikk_nev] NULL, [GYARTO_NEV] [dbo].[cikk_nev] NULL, [GYARTO_KOD] [dbo].[kulcs] NULL, [SZALL_KOD] [dbo].[kulcs] NULL, [SZALL_NEV] [dbo].[cikk_nev] NULL, [VEVO_KOD] [dbo].[kulcs] NULL, [VEVO_NEV] [dbo].[cikk_nev] NULL, [raktar_kod] [dbo].[kulcs] NULL, [raktar_nev] [dbo].[cikk_nev] NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [EGYSEG_AR1] [dbo].[egyseg_ar] NULL, [DARAB1] [dbo].[mennyiseg] NULL, [EGYSEG_AR2] [dbo].[egyseg_ar] NULL, [DARAB2] [dbo].[mennyiseg] NULL, [EGYSEG_AR3] [dbo].[egyseg_ar] NULL, [DARAB3] [dbo].[mennyiseg] NULL, [DATUM1] [dbo].[datum] NULL, [DATUM2] [dbo].[datum] NULL, [BIZSZAM] [dbo].[bizonylat_szam] NULL, [TETEL] [dbo].[bizonylat_tetel] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wgyujtes2]( [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NULL, [CIKKCSOP] [char](18) NULL, [CSOPNEV] [dbo].[cikk_nev] NULL, [GYARTO_NEV] [dbo].[cikk_nev] NULL, [GYARTO_KOD] [dbo].[kulcs] NULL, [SZALL_KOD] [dbo].[kulcs] NULL, [SZALL_NEV] [dbo].[cikk_nev] NULL, [VEVO_KOD] [dbo].[kulcs] NULL, [VEVO_NEV] [dbo].[cikk_nev] NULL, [raktar_kod] [dbo].[kulcs] NULL, [raktar_nev] [dbo].[cikk_nev] NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [EGYSEG_AR1] [dbo].[egyseg_ar] NULL, [DARAB1] [dbo].[mennyiseg] NULL, [EGYSEG_AR2] [dbo].[egyseg_ar] NULL, [DARAB2] [dbo].[mennyiseg] NULL, [EGYSEG_AR3] [dbo].[egyseg_ar] NULL, [DARAB3] [dbo].[mennyiseg] NULL, [DATUM1] [dbo].[datum] NULL, [DATUM2] [dbo].[datum] NULL, [BIZSZAM] [dbo].[bizonylat_szam] NULL, [TETEL] [dbo].[bizonylat_tetel] NULL, [MEGJEGYZES] [varchar](250) NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [WGYUJTESX]( [CIKK_SZAM] [varchar](14) NULL, [CIKK_NEV] [varchar](80) NULL, [CIKKCSOP] [varchar](18) NULL, [CSOPNEV] [varchar](45) NULL, [GYARTO_NEV] [varchar](50) NULL, [GYARTO_KOD] [int] NULL, [SZALL_KOD] [int] NULL, [SZALL_NEV] [varchar](50) NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [MENNY_EGYS] [varchar](8) NULL, [EGYSEG_AR1] [numeric](18, 2) NULL, [DARAB1] [numeric](18, 3) NULL, [EGYSEG_AR2] [numeric](18, 2) NULL, [DARAB2] [numeric](18, 3) NULL, [EGYSEG_AR3] [numeric](18, 2) NULL, [DARAB3] [numeric](18, 3) NULL, [EGYSEG_AR4] [numeric](18, 2) NULL, [DATUM1] [char](10) NULL, [DATUM2] [char](10) NULL, [BIZSZAM] [char](10) NULL, [TETEL] [int] NULL, [KICSODA] [varchar](20) NOT NULL, [EGYSEG_AR5] [numeric](18, 2) NULL, [EGYSEG_AR6] [numeric](18, 2) NULL, [EGYSEG_AR7] [numeric](18, 2) NULL, [EGYSEG_AR8] [numeric](18, 2) NULL, [EGYSEG_AR9] [numeric](18, 2) NULL, [egyseg_ar10] [numeric](18, 2) NULL, [egyseg_ar11] [numeric](18, 2) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [whavi_keszlet]( [datum] [char](10) NOT NULL, [raktar_kod] [dbo].[kulcs] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wjellemzo2t]( [kod] [int] NOT NULL, [ertek_web_hu] [varchar](50) NOT NULL, [ertek_web_en] [varchar](50) NULL, [sorrend] [int] NULL, [kicsoda] [varchar](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [WJOV_KESZLET]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [NYITO_KESZLET] [float] NOT NULL, [BESZERZES_B] [float] NOT NULL, [BESZERZES_T] [float] NOT NULL, [BESZERZES_E] [float] NOT NULL, [BESZERZES_V] [float] NOT NULL, [ERTEKESITES_B] [float] NOT NULL, [ERTEKESITES_S] [float] NOT NULL, [ERTEKESITES_T] [float] NOT NULL, [ERTEKESITES_E] [float] NOT NULL, [ZARO_KESZLET] [float] NOT NULL, [egyeb_be] [float] NOT NULL, [egyeb_ki] [float] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkamatok]( [bizszam] [dbo].[bizonylat_szam] NULL, [datum] [dbo].[datum] NULL, [kamat_alap] [dbo].[egyseg_ar] NULL, [kamat] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkamatszamitas]( [d1] [dbo].[datum] NULL, [d2] [dbo].[datum] NULL, [napok] [int] NULL, [kamat] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkamatszamlak]( [vevo] [dbo].[kulcs] NOT NULL, [vevo_nev] [dbo].[nev] NOT NULL, [szamlaszam] [dbo].[bizonylat_szam] NOT NULL, [szla_datum] [dbo].[datum] NOT NULL, [fiz_dat] [dbo].[datum] NOT NULL, [szla_ertek] [dbo].[egyseg_ar] NOT NULL, [utal_dat] [dbo].[datum] NOT NULL, [utal_ertek] [dbo].[egyseg_ar] NOT NULL, [kamat_ertek] [dbo].[egyseg_ar] NOT NULL, [jel] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkarton_ki]( [xazon] [varchar](32) NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkassza]( [KICSODA] [dbo].[kicsoda] NOT NULL, [bizszam] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VONALKOD] [varchar](14) NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [KEDVEZMENY] [dbo].[kedvezmeny] NOT NULL, [OSSZEG] [dbo].[egyseg_ar] NOT NULL, [AKCIO] [varchar](1) NULL, [GONGYOLEG] [varchar](1) NOT NULL, [brar] [dbo].[egyseg_ar] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkassza1]( [KICSODA] [dbo].[kicsoda] NOT NULL, [bizszam] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VONALKOD] [varchar](14) NOT NULL, [VONALKOD_TEMP] [varchar](14) NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [ENGEDMENY] [dbo].[egyseg_ar] NOT NULL, [OSSZEG] [dbo].[egyseg_ar] NOT NULL, [AKCIO] [varchar](1) NOT NULL, [NGYOLEG] [varchar](1) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkeszlet]( [RAKTAR_KOD] [dbo].[kulcs] NULL, [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [GYARTO] [dbo].[kulcs] NULL, [SZALLITO] [dbo].[kulcs] NULL, [CIKKCSOP2] [char](18) NULL, [odb] [dbo].[mennyiseg] NULL, [ert] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NULL, [szav_datum] [dbo].[datum] NULL, [gyariszamok] [varchar](3000) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkeszlet_argen]( [CIKK_SZAM] [char](14) NOT NULL, [CIKK_NEV] [char](45) NOT NULL, [DARAB] [float] NOT NULL, [EGYSEG_AR] [float] NOT NULL, [RAKTAR_KOD] [int] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_WKESZLET_ARGEN] PRIMARY KEY CLUSTERED ( [CIKK_SZAM] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkeszlet_argen1]( [CIKK_SZAM] [char](14) NOT NULL, [DARAB] [float] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_WKESZLET_ARGEN1] PRIMARY KEY CLUSTERED ( [CIKK_SZAM] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkeszlet_cikk]( [RAKTAR_KOD] [dbo].[kulcs] NULL, [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [GYARTO] [dbo].[kulcs] NULL, [SZALLITO] [dbo].[kulcs] NULL, [CIKKCSOP2] [char](18) NULL, [odb] [dbo].[mennyiseg] NULL, [ert] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NULL, [szav_datum] [dbo].[datum] NULL, [gyariszamok] [varchar](3000) NULL, [RAKTAR_NEV] [dbo].[nev] NULL, [GYARTO_NEV] [dbo].[nev] NULL, [SZALLITO_NEV] [dbo].[nev] NULL, [CIKKCSOP2_NEV] [dbo].[nev] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkeszlet_szamolt]( [RAKTAR_KOD] [dbo].[kulcs] NULL, [CIKK_SZAM] [dbo].[cikk_szam] NULL, [CIKK_NEV] [dbo].[cikk_nev] NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [nyito] [dbo].[mennyiseg] NULL, [ny_ertek] [dbo].[egyseg_ar] NULL, [rakbev] [dbo].[mennyiseg] NULL, [szall_szle] [dbo].[mennyiseg] NULL, [rakkiv] [dbo].[mennyiseg] NULL, [vevo_szle] [dbo].[mennyiseg] NULL, [zaro] [dbo].[mennyiseg] NULL, [leltar] [dbo].[mennyiseg] NULL, [lelt_ertek] [dbo].[egyseg_ar] NULL, [elteres] [dbo].[mennyiseg] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkeszletsz]( [SORSZAM] [dbo].[bizonylat_szam] NOT NULL, [RAKTAR_KOD] [dbo].[kulcs] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [EDARAB] [dbo].[mennyiseg] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [szav_datum] [dbo].[datum] NOT NULL, [MOZGASKOD] [varchar](10) NOT NULL, [SZAMLA_SZ] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [NYUGTAZVA] [bit] NOT NULL, [BIZOMANYOS] [bit] NULL, [GYARI_SZAM] [dbo].[gyari_szam] NULL, [SARZS_SZAM] [varchar](20) NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkivett]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wkivett_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkoltseg_keszletre]( [terh_bizszam] [dbo].[bizonylat_szam] NOT NULL, [terh_tetel] [dbo].[bizonylat_tetel] NOT NULL, [aru_szolg] [char](1) NULL, [terh_cikk] [dbo].[cikk_szam] NOT NULL, [terh_cnev] [dbo].[cikk_nev] NOT NULL, [terh_darab] [dbo].[mennyiseg] NOT NULL, [terh_egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [kolt_egyseg] [dbo].[egyseg_ar] NULL, [kolt_ertek] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wkoltseg_keszletre] PRIMARY KEY CLUSTERED ( [terh_bizszam] ASC, [terh_tetel] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkomissio]( [rendel_bsz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tetel] [dbo].[bizonylat_tetel] NOT NULL, [raktar_kod] [dbo].[kulcs] NOT NULL, [raktar_nev] [dbo].[nev] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[nev] NOT NULL, [menny_egys] [dbo].[menny_egyseg] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkont_nyito]( [szamlaszam] [varchar](18) NOT NULL, [szamlanev] [dbo].[nev] NOT NULL, [konyvelheto] [char](1) NOT NULL, [tartozik] [dbo].[egyseg_ar] NOT NULL, [kovetel] [dbo].[egyseg_ar] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkont_szabalyt]( [kont_azon] [int] NOT NULL, [t_k] [char](1) NOT NULL, [fk_szam] [varchar](18) NOT NULL, [szamlanev] [varchar](50) NOT NULL, [konyvelheto] [char](1) NOT NULL, [felt_tablo] [nvarchar](500) NOT NULL, [felt_ertek] [nvarchar](500) NOT NULL, [felt_szures] [nvarchar](500) NOT NULL, [megjegyzes] [dbo].[megjegyzes] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, [lehet_nulla] [char](1) NULL, CONSTRAINT [PK_wkont_szabalyt] PRIMARY KEY CLUSTERED ( [kont_azon] ASC, [fk_szam] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkontirozas]( [tetel] [dbo].[bizonylat_tetel] NOT NULL, [tszamlaszam] [varchar](18) NOT NULL, [tszamlanev] [dbo].[nev] NOT NULL, [tertek] [dbo].[egyseg_ar] NOT NULL, [kszamlaszam] [varchar](18) NOT NULL, [kszamlanev] [dbo].[nev] NOT NULL, [kertek] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wkulso_keszlet]( [kapcsolat_nev] [varchar](50) NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [foglalt] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wleertekelest]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [FCIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [FCIKK_NEV] [dbo].[cikk_nev] NOT NULL, [CCIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CCIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [BEV_EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wleertekelest] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wleltar]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [raktar_kod] [dbo].[kulcs] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [fellelt] [dbo].[mennyiseg] NOT NULL, [szav_ido] [dbo].[datum] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wleltar_felv]( [raktar_kod] [dbo].[kulcs] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [szav_datum] [varchar](20) NULL, [darab1] [dbo].[mennyiseg] NULL, [darab2] [dbo].[mennyiseg] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wllot]( [azon] [int] NULL, [szint] [int] NULL, [mozgas] [varchar](80) NULL, [bizszam] [dbo].[bizonylat_szam] NULL, [tetel] [dbo].[bizonylat_tetel] NULL, [datum] [dbo].[datum] NULL, [szoveg] [varchar](100) NULL, [sarzs] [varchar](20) NULL, [darab] [dbo].[mennyiseg] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wmerleg]( [EBIZSZAM] [varchar](30) NOT NULL, [UGYFEL] [dbo].[kulcs] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [rendel_bsz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [sarzs] [varchar](50) NULL, CONSTRAINT [PK_wmerleg_1] PRIMARY KEY CLUSTERED ( [EBIZSZAM] ASC, [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wmozgas]( [MOZGASKOD] [nvarchar](10) NOT NULL, [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [SORSZAM] [dbo].[bizonylat_szam] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wmozgasok]( [sorszam] [dbo].[bizonylat_szam] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wnyanyagsz]( [azon] [dbo].[cikk_szam] NULL, [cikk_szam] [dbo].[cikk_szam] NULL, [cikk_nev] [dbo].[cikk_nev] NULL, [odb] [float] NULL, [xdb] [float] NULL, [acikk_szam] [dbo].[cikk_szam] NULL, [acikk_nev] [dbo].[cikk_nev] NULL, [adb] [float] NULL, [osszesdb] [float] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wpartner]( [tipus] [char](1) NOT NULL, [kod] [int] NOT NULL, [nev] [varchar](100) NOT NULL, [iranyito] [char](15) NOT NULL, [varos] [char](50) NOT NULL, [cim] [char](70) NOT NULL, [penznem] [char](3) NULL, [kicsoda] [varchar](20) NOT NULL, [ujkod] [int] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wpenztarb]( [tetel] [int] NOT NULL, [bizszam] [varchar](50) NOT NULL, [ertek] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wPriorGyarHatralek]( [allapot] [int] NOT NULL, [aCIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [szukseg] [decimal](18, 3) NOT NULL, [rkeszlet] [decimal](18, 3) NOT NULL, [okeszlet] [decimal](18, 3) NOT NULL, [diszpo] [decimal](18, 3) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wraktarak]( [raktar_kod] [dbo].[kulcs] NOT NULL, [raktar_nev] [dbo].[nev] NOT NULL, [email] [varchar](150) NOT NULL, [KIVALASZT] [char](10) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wriasztas]( [kulcs] [int] IDENTITY(1,1) NOT NULL, [riasztas_tip] [varchar](50) NOT NULL, [cimzett] [varchar](50) NOT NULL, [uzenet] [varchar](250) NOT NULL, CONSTRAINT [PK_wriasztas] PRIMARY KEY CLUSTERED ( [kulcs] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wrmozgast]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wrmozgast_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wsarzs]( [XTETEL] [dbo].[bizonylat_tetel] NOT NULL, [SARZS] [varchar](20) NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wsarzs_ki]( [xtetel] [dbo].[bizonylat_tetel] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [biztip] [char](20) NOT NULL, [sarzs] [varchar](20) NOT NULL, [bevetel_datum] [dbo].[datum] NOT NULL, [bevetel_bizszam] [dbo].[bizonylat_szam] NOT NULL, [bevetel_biztip] [varchar](50) NOT NULL, [edarab] [dbo].[mennyiseg] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wsarzs_lel]( [FAZIS] [int] NOT NULL, [RAKTAR_KOD] [dbo].[kulcs] NOT NULL, [XTETEL] [dbo].[bizonylat_tetel] NOT NULL, [SARZS] [varchar](20) NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wstcikk2_jell]( [cikk_szam] [varchar](18) NOT NULL, [jellemzo] [int] NOT NULL, [jellemzo_nev] [varchar](70) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_arajant]( [bizszam] [dbo].[bizonylat_szam] NOT NULL, [tetel] [dbo].[bizonylat_tetel] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NULL, [mennyiseg] [dbo].[mennyiseg] NULL, [cikk_tipus] [int] NULL, [egyseg_ar] [dbo].[egyseg_ar] NULL, [keszlet] [dbo].[mennyiseg] NULL, [szallitas_nap] [int] NULL, [cikk_nev] [dbo].[cikk_nev] NULL, [tipus_nev] [dbo].[nev] NULL, [garancia] [varchar](20) NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_art]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [LISTA_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [NETTO_AR] [dbo].[egyseg_ar] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_keszlet]( [bizszam] [dbo].[bizonylat_szam] NOT NULL, [tetel] [dbo].[bizonylat_tetel] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_koz_nyug]( [JELOLES] [char](1) NOT NULL, [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TELJ_DATUM] [dbo].[datum] NOT NULL, [PENZNEM] [dbo].[penznem] NOT NULL, [AFAMENTES] [bit] NOT NULL, [KEDVEZMENY] [numeric](18, 5) NULL, [ERTEK] [dbo].[egyseg_ar] NOT NULL, [BERTEK] [dbo].[egyseg_ar] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [RAKTAR_NEV] [dbo].[nev] NULL, [HIVSZAM] [varchar](50) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_opt]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [pszall_kod] [dbo].[kulcs] NOT NULL, [pszall_nev] [dbo].[nev] NOT NULL, [pegyseg_ar] [dbo].[egyseg_ar] NOT NULL, [jszall_kod] [dbo].[kulcs] NOT NULL, [jszall_nev] [dbo].[nev] NOT NULL, [jegyseg_ar] [dbo].[egyseg_ar] NOT NULL, [idoszak] [varchar](30) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_rend_jav]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [CIKKCSOP] [varchar](18) NOT NULL, [GYARTO] [dbo].[kulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [SZORZO] [dbo].[szorzo] NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [ZSUGOR_DB] [int] NULL, [DB_KART] [int] NULL, [KART_SOR] [int] NULL, [KART_RAKL] [int] NULL, [ATL_FOGYAS] [dbo].[mennyiseg] NULL, [MIN_RENCS] [dbo].[menny_egyseg] NULL, [MIN_RENSZ] [dbo].[mennyiseg] NULL, [MIN_KESZLET] [dbo].[mennyiseg] NULL, [NYITO_KESZ] [dbo].[mennyiseg] NULL, [BESZERZES] [dbo].[mennyiseg] NULL, [ERTEKESITES] [dbo].[mennyiseg] NULL, [KESZLET] [dbo].[mennyiseg] NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NULL, [EDARAB] [dbo].[mennyiseg] NULL, [DARAB] [dbo].[mennyiseg] NULL, [REN_KARTON] [dbo].[mennyiseg] NULL, [REN_RAKLAP] [dbo].[mennyiseg] NULL, [OKARTONOK] [dbo].[mennyiseg] NULL, [JAVASOLT] [dbo].[mennyiseg] NULL, [mar_rendelt] [dbo].[mennyiseg] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_rend_jav3]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [SZORZO] [dbo].[szorzo] NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NULL, [DARAB] [dbo].[mennyiseg] NULL, [ATL_FOGYAS] [dbo].[mennyiseg] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_rendelt]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [CIKKCSOP] [varchar](18) NOT NULL, [SZALLITO] [dbo].[kulcs] NOT NULL, [MENNY_EGYS] [varchar](8) NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [BESZERZ_AR] [decimal](18, 2) NOT NULL, [KESZLET] [decimal](18, 2) NOT NULL, [KESZLET_VALLALATI] [decimal](18, 2) NOT NULL, [EXP_KESZLET] [decimal](18, 2) NOT NULL, [MIN_KESZLET] [decimal](18, 2) NOT NULL, [HATRALEK] [decimal](18, 2) NOT NULL, [VEVOI_HATRALEK] [decimal](18, 2) NOT NULL, [EXP_HATRALEK] [decimal](18, 2) NOT NULL, [DARAB] [decimal](18, 3) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [MEGJEGYZES] [dbo].[megjegyzes] NOT NULL, [verseny_keszlet] [decimal](18, 2) NOT NULL, [verseny_hatralek] [decimal](18, 2) NOT NULL, [verseny_darab] [decimal](18, 2) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_rent]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [EDARAB] [dbo].[mennyiseg] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wszall_rent] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_rentv]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [szallito] [dbo].[kulcs] NOT NULL, [szall_nev] [dbo].[nev] NOT NULL, [penznem] [dbo].[penznem] NOT NULL, CONSTRAINT [PK_wszall_rentv] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szla_afa]( [bizszam] [dbo].[bizonylat_szam] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [netto] [decimal](18, 2) NOT NULL, [afa] [decimal](18, 2) NOT NULL, [brutto] [decimal](18, 2) NOT NULL, [fizetendo] [decimal](18, 2) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szlat]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] 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, [rendel_bsz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wszall_szlat] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szlat_td]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [E1] [dbo].[egyseg_ar] NOT NULL, [E2] [dbo].[egyseg_ar] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wszall_szlat_td] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szlet]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] 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, [rendel_bsz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wszall_szleto] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szlet_r]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [r_darab] [dbo].[mennyiseg] NOT NULL, [r_EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [r_kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [v_darab] [dbo].[mennyiseg] NOT NULL, [v_egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [v_kedv] [dbo].[kedvezmeny] NOT NULL, [akcio] [char](1) NULL, [KICSODA] [varchar](50) NOT NULL, CONSTRAINT [PK_wszall_szlet_r] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szlet_td]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [E1] [dbo].[egyseg_ar] NOT NULL, [E2] [dbo].[egyseg_ar] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wszall_szlet_td] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszall_szletm]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] 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, [rendel_bsz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wszall_szletm] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszallito]( [szall_KOD] [dbo].[kulcs] NOT NULL, [szall_NEV] [dbo].[nev] NOT NULL, [szallcsop] [dbo].[kulcs] NOT NULL, [orszag] [dbo].[nev] NOT NULL, [KIVALASZT] [char](10) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszallito_bank]( [szall_kod] [dbo].[kulcs] NOT NULL, [bank] [dbo].[nev] NOT NULL, [torolt] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszamolt_keszlet]( [cikk_szam] [varchar](14) NOT NULL, [cikk_nev] [varchar](80) NOT NULL, [nyito] [numeric](18, 2) NOT NULL, [nyito_ert] [numeric](18, 2) NOT NULL, [szall_bevet] [numeric](18, 2) NOT NULL, [szall_bevet_ert] [numeric](18, 2) NOT NULL, [bevet] [numeric](18, 2) NOT NULL, [bevet_ert] [numeric](18, 2) NOT NULL, [kivet] [numeric](18, 2) NOT NULL, [kivet_ert] [numeric](18, 2) NOT NULL, [eladas] [numeric](18, 2) NOT NULL, [eladas_ert] [numeric](18, 2) NOT NULL, [zaro] [numeric](18, 2) NOT NULL, [zaro_ert] [numeric](18, 2) NOT NULL, [kicsoda] [varchar](20) NOT NULL, CONSTRAINT [PK_wszamolt_keszlet_1] PRIMARY KEY CLUSTERED ( [cikk_szam] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszav_nyomt]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [SZAVIDO] [varchar](255) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [WSZAVATOS]( [XTETEL] [dbo].[bizonylat_tetel] NOT NULL, [SZAV_LEJAR] [dbo].[datum] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszavatos_ki]( [xtetel] [dbo].[bizonylat_tetel] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [biztip] [char](20) NOT NULL, [szav_lejar] [dbo].[datum] NOT NULL, [bevetel_datum] [dbo].[datum] NOT NULL, [bevetel_bizszam] [dbo].[bizonylat_szam] NOT NULL, [bevetel_biztip] [varchar](50) NOT NULL, [edarab] [dbo].[mennyiseg] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszavatos_lel]( [FAZIS] [int] NOT NULL, [RAKTAR_KOD] [dbo].[kulcs] NOT NULL, [XTETEL] [dbo].[bizonylat_tetel] NOT NULL, [SZAV_LEJAR] [dbo].[datum] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszbiz_kiv]( [idoszak] [varchar](25) NOT NULL, [szallito] [dbo].[kulcs] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [menny_egys] [dbo].[menny_egyseg] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [mozgaskod] [varchar](10) NOT NULL, [kbizszam] [dbo].[bizonylat_szam] NOT NULL, [ktetel] [dbo].[bizonylat_tetel] NOT NULL, [bbizszam] [dbo].[bizonylat_szam] NOT NULL, [btetel] [dbo].[bizonylat_tetel] NOT NULL, [bdarab] [dbo].[mennyiseg] NOT NULL, [raktar_k] [dbo].[kulcs] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszbiz_szlat]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] 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, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wszbiz_ujkarton]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [raktar_k] [dbo].[kulcs] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wterm_arak]( [kulcs] [dbo].[kulcs] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [sorszam] [dbo].[bizonylat_szam] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wterm_elszamolas]( [datum] [dbo].[datum] NOT NULL, [tevekenyseg] [dbo].[kulcs] NOT NULL, [irany] [int] NOT NULL, [focikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [sarzs] [varchar](50) NOT NULL, [term_kulcs] [dbo].[kulcs] NOT NULL, [term_datum] [dbo].[datum] NOT NULL, [kicsoda] [dbo].[kicsoda] NULL, [rdarab] [dbo].[mennyiseg] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wterm_elszamolas1]( [datum] [dbo].[datum] NOT NULL, [tevekenyseg] [dbo].[kulcs] NOT NULL, [irany] [int] NOT NULL, [focikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [sarzs] [varchar](50) NOT NULL, [term_kulcs] [dbo].[kulcs] NOT NULL, [term_datum] [dbo].[datum] NOT NULL, [kicsoda] [dbo].[kicsoda] NULL, [rdarab] [dbo].[mennyiseg] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtermeles]( [jel] [char](1) NOT NULL, [kulcs] [dbo].[kulcs] NOT NULL, [datum] [dbo].[datum] NOT NULL, [tevekenyseg] [dbo].[kulcs] NOT NULL, [irany] [int] NOT NULL, [focikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [ertek] [numeric](18, 2) NOT NULL, [sarzs] [varchar](50) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, [szazalek] [float] NOT NULL, [rec_szazalek] [float] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtermeles1]( [jel] [char](1) NOT NULL, [kulcs] [dbo].[kulcs] NOT NULL, [datum] [dbo].[datum] NOT NULL, [tevekenyseg] [dbo].[kulcs] NOT NULL, [irany] [int] NOT NULL, [focikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [ertek] [numeric](18, 2) NOT NULL, [sarzs] [varchar](50) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, [szazalek] [float] NOT NULL, [rec_szazalek] [float] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtr_szall_arf]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [SZALLITO] [dbo].[kulcs] NOT NULL, [TIPUS] [char](10) NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [KDATUM] [dbo].[datum] NOT NULL, [VDATUM] [dbo].[datum] NOT NULL, [RKDATUM] [dbo].[datum] NOT NULL, [RVDATUM] [dbo].[datum] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [MEGJEGYZES] [dbo].[megjegyzes] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtr_szall_art]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VCIKKSZAM] [dbo].[kicsoda] NOT NULL, [LISTA_AR] [dbo].[egyseg_ar] NOT NULL, [KEDVEZMENY] [dbo].[kedvezmeny] NOT NULL, [NETTO_AR] [dbo].[egyseg_ar] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtr_vevo_akcio]( [AKCIOCSOP] [int] NOT NULL, [akcio_tip] [int] NOT NULL, [KDATUM] [dbo].[datum] NOT NULL, [VDATUM] [dbo].[datum] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [SZOVEG] [dbo].[megjegyzes] NOT NULL, [ke_keszlet] [dbo].[mennyiseg] NOT NULL, [ke_maradek] [dbo].[mennyiseg] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [MODOSITVA] [dbo].[datum_ora] NOT NULL, [kulcs] [timestamp] NOT NULL, [ujsag] [char](1) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtr_vevo_akcio_hh]( [kulcs] [numeric](18, 0) NOT NULL, [akc_csop] [int] NOT NULL, [cikk_szam] [char](14) NOT NULL, [het] [char](7) NULL, [kido] [char](5) NOT NULL, [vido] [char](5) NOT NULL, [kedvezmeny] [numeric](18, 2) NOT NULL, [megszunt] [char](1) NOT NULL, [kicsoda] [varchar](20) NOT NULL, [modido] [char](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtr_vevo_akcio_ve]( [kulcs] [int] NOT NULL, [akc_csop] [int] NOT NULL, [het] [char](7) NOT NULL, [kido] [char](5) NOT NULL, [vido] [char](5) NOT NULL, [limit1] [numeric](18, 3) NOT NULL, [kedvezmeny1] [numeric](18, 2) NOT NULL, [limit2] [numeric](18, 3) NOT NULL, [kedvezmeny2] [numeric](18, 2) NOT NULL, [megszunt] [char](1) NOT NULL, [kicsoda] [varchar](20) NOT NULL, [modido] [char](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wtr_vevo_ar_lista]( [arcsoport] [int] NOT NULL, [datum] [char](10) NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [netto_ar] [dbo].[egyseg_ar] NULL, [brutto_ar] [dbo].[egyseg_ar] NULL, [beszerz_ar] [dbo].[egyseg_ar] NULL, [arres] [dbo].[egyseg_ar] NULL, [kicsoda] [dbo].[kicsoda] NULL, [modositva] [dbo].[datum_ora] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wutokalk]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [akt_onkolt] [dbo].[egyseg_ar] NOT NULL, [termelt_db] [dbo].[mennyiseg] NOT NULL, [termelt_ertek] [dbo].[egyseg_ar] NOT NULL, [felh_db] [dbo].[egyseg_ar] NULL, [felh_ertek] [dbo].[egyseg_ar] NOT NULL, [felh_ar] [dbo].[egyseg_ar] NOT NULL, [uj_Ar] [dbo].[egyseg_ar] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_arajanlatt]( [bizszam] [dbo].[bizonylat_szam] NOT NULL, [tetel] [dbo].[bizonylat_tetel] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [cikk_tipus] [int] NOT NULL, [tipus_nev] [dbo].[nev] NOT NULL, [mennyiseg] [dbo].[mennyiseg] NOT NULL, [belfoldi_ar] [dbo].[egyseg_ar] NOT NULL, [belfoldi_penznem] [dbo].[penznem] NOT NULL, [belfoldi_szallito] [dbo].[kulcs] NOT NULL, [belfoldi_szallito_nev] [dbo].[nev] NOT NULL, [belfoldi_keszlet] [dbo].[mennyiseg] NOT NULL, [belfoldi_szallitas_nap] [int] NOT NULL, [kozbesz_ar] [dbo].[egyseg_ar] NOT NULL, [beszerzesi_bizszam] [dbo].[bizonylat_szam] NULL, [beszerzesi_tetel] [dbo].[bizonylat_tetel] NULL, [beszerzesi_ar] [dbo].[egyseg_ar] NOT NULL, [beszerzesi_penznem] [dbo].[penznem] NOT NULL, [beszerzesi_szallito] [dbo].[kulcs] NOT NULL, [beszerzesi_szallito_nev] [dbo].[nev] NOT NULL, [beszerzesi_keszlet] [dbo].[mennyiseg] NOT NULL, [beszerzesi_kurzus] [dbo].[kurzus] NOT NULL, [beszerzesi_szallitas_nap] [int] NOT NULL, [kiajanlott_ar] [dbo].[egyseg_ar] NOT NULL, [kiajanlott_szallitas_nap] [int] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [menny_egys] [dbo].[menny_egyseg] NOT NULL, [szorzo] [dbo].[szorzo] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [megjegyzes] [dbo].[megjegyzes] NOT NULL, [garancia] [varchar](20) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_arajanlatt] PRIMARY KEY CLUSTERED ( [tetel] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_arajant]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [megjegyzes] [dbo].[megjegyzes] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_arajanlt] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_arak]( [arcsoport] [dbo].[kulcs] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [szallito] [dbo].[kulcs] NULL, [cikkcsoport] [varchar](18) NULL, [penznem] [dbo].[penznem] NULL, [n_beszerz_ar] [dbo].[egyseg_ar] NOT NULL, [l_beszerz_ar] [dbo].[egyseg_ar] NOT NULL, [netto_ar] [dbo].[egyseg_ar] NOT NULL, [akcios_ar] [dbo].[egyseg_ar] NOT NULL, [akcio] [char](1) NOT NULL, CONSTRAINT [PK_wvevo_arak] PRIMARY KEY CLUSTERED ( [arcsoport] ASC, [cikk_szam] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_art]( [ARCSOPORT] [int] NOT NULL, [sorrend] [int] NOT NULL, [szall_kod] [dbo].[kulcs] NOT NULL, [szall_nev] [dbo].[nev] NOT NULL, [gyarto_kod] [dbo].[kulcs] NULL, [gyarto_nev] [dbo].[nev] NULL, [CIKK_CSOP] [char](18) NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [FELAR] [numeric](8, 1) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_bank]( [vevo_kod] [dbo].[kulcs] NOT NULL, [bank] [dbo].[nev] NOT NULL, [torolt] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_csz]( [VEVOCSZCSOP] [dbo].[kulcs] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [VEVOCSZ] [dbo].[cikk_szam] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_kapcsolat]( [VEVO_KOD] [dbo].[kulcs] NOT NULL, [KAPCS_KOD] [dbo].[kulcs] NOT NULL, [KAPCSOLAT] [dbo].[nev] NOT NULL, [TELEFON] [dbo].[nev] NOT NULL, [EMAIL] [dbo].[nev] NOT NULL, [BEOSZTAS] [dbo].[nev] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_kedv]( [vevo_kod] [dbo].[kulcs] NOT NULL, [tipus] [int] NOT NULL, [ertek] [varchar](50) NOT NULL, [nev] [varchar](50) NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_koz_nyug]( [JELOLES] [char](1) NOT NULL, [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TELJ_DATUM] [dbo].[datum] NOT NULL, [PENZNEM] [dbo].[penznem] NOT NULL, [AFAMENTES] [bit] NOT NULL, [TIPUS] [dbo].[kulcs] NULL, [TIPUS_NEV] [dbo].[nev] NULL, [UZLETKOTO] [dbo].[kulcs] NULL, [UZLETKOTO_NEV] [dbo].[nev] NULL, [KEDVEZMENY] [dbo].[kedvezmeny] NULL, [ERTEK] [dbo].[egyseg_ar] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_ren_datum]( [bizszam] [char](10) NOT NULL, [tetel] [int] NOT NULL, [cikk_szam] [char](14) NOT NULL, [datum] [char](10) NOT NULL, [kicsoda] [varchar](20) NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_rend_akt]( [bizszam] [dbo].[bizonylat_szam] NULL, [tetel] [dbo].[bizonylat_tetel] NULL, [darab] [dbo].[mennyiseg] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_rendt]( [KICSODA] [varchar](20) NOT NULL, [BIZSZAM] [varchar](10) NOT NULL, [TETEL] [int] NOT NULL, [CIKK_SZAM] [varchar](30) NOT NULL, [VONALKOD] [varchar](14) NOT NULL, [CIKK_NEV] [varchar](60) NOT NULL, [MENNY_EGYS] [varchar](10) NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [DARAB] [decimal](18, 3) NOT NULL, [KESZLET] [decimal](18, 3) NOT NULL, [KESZLET_VALLALATI] [decimal](18, 3) NOT NULL, [MIN_KESZLET] [decimal](18, 3) NOT NULL, [RENDELT] [decimal](18, 3) NOT NULL, [VRENDELT] [decimal](18, 3) NOT NULL, [EGYSEG_AR] [decimal](18, 2) NOT NULL, [ENGEDMENY] [decimal](18, 2) NOT NULL, [OSSZEG] [decimal](18, 2) NOT NULL, [AKCIO] [varchar](1) NOT NULL, [NGYOLEG] [varchar](1) NOT NULL, [MEGRENDELVE] [char](1) NULL, [MEGJEGYZES] [varchar](100) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_rent]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EDARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [visszaig_dat] [dbo].[datum] NOT NULL, [AKCIO] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_rent] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_rent_ellen]( [bizszam] [dbo].[bizonylat_szam] NOT NULL, [tetel] [dbo].[bizonylat_tetel] NOT NULL, [cikk_szam] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [darab] [dbo].[mennyiseg] NOT NULL, [menny_egys] [dbo].[menny_egyseg] NOT NULL, [Kdarab] [dbo].[mennyiseg] NOT NULL, [Kmenny_egys] [dbo].[menny_egyseg] NOT NULL, [alap_darab] [dbo].[mennyiseg] NOT NULL, [alap_kdarab] [dbo].[mennyiseg] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_rent_gyartas1]( [raktar_kod] [dbo].[kulcs] NULL, [cikk_szam] [dbo].[cikk_szam] NULL, [cikkcsop2] [varchar](18) NULL, [gyarto] [dbo].[kulcs] NULL, [cikk_nev] [dbo].[cikk_nev] NULL, [keszlet_darab] [dbo].[mennyiseg] NULL, [foglalt_darab] [dbo].[mennyiseg] NULL, [szabad_darab] [dbo].[mennyiseg] NULL, [edarab] [dbo].[mennyiseg] NULL, [darab] [dbo].[mennyiseg] NULL, [kulcs] [dbo].[kulcs] NULL, [bizszam] [dbo].[bizonylat_szam] NULL, [tetel] [dbo].[bizonylat_tetel] NULL, [raktar_nev] [dbo].[nev] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_rent_term]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [cikk_nev] [dbo].[cikk_nev] NOT NULL, [afa_kulcs] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EDARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [visszaig_dat] [dbo].[datum] NOT NULL, [AKCIO] [char](1) NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szla_nyomt]( [bizszam] [dbo].[bizonylat_szam] NULL, [telj_datum] [dbo].[datum] NULL, [szla_datum] [dbo].[datum] NULL, [fiz_modja] [char](1) NULL, [fiz_esed] [dbo].[datum] NULL, [penznem] [dbo].[penznem] NULL, [kurzus] [dbo].[kurzus] NULL, [kedvezmeny] [dbo].[kedvezmeny] NULL, [megjegyzes] [dbo].[megjegyzes] NULL, [teljesnev] [dbo].[nev] NULL, [fizmod_nev] [varchar](20) NULL, [tetel] [dbo].[bizonylat_tetel] NULL, [cikk_szam] [dbo].[cikk_szam] NULL, [afa_kulcs] [dbo].[afakulcs] NULL, [menny_egys] [dbo].[menny_egyseg] NULL, [edarab] [dbo].[mennyiseg] NULL, [egyseg_ar] [dbo].[egyseg_ar] NULL, [tet_kedvezmeny] [dbo].[kedvezmeny] NULL, [tet_megjegyzes] [dbo].[megjegyzes] NULL, [akcio] [char](1) NULL, [afaertek] [numeric](6, 2) NULL, [cikk_nev] [dbo].[cikk_nev] NULL, [vtsz] [varchar](14) NULL, [vevo_nev] [dbo].[nev] NULL, [iranyito] [dbo].[nev] NULL, [varos] [dbo].[nev] NULL, [orszag] [dbo].[nev] NULL, [cim] [varchar](150) NULL, [adoszam] [dbo].[nev] NULL, [jovedeki] [dbo].[nev] NULL, [eu_adoszam] [dbo].[nev] NULL, [netto] [dbo].[egyseg_ar] NULL, [tafaert] [dbo].[egyseg_ar] NULL, [brutto] [dbo].[egyseg_ar] NULL, [peldany] [int] NULL, [szleszam] [dbo].[bizonylat_szam] NULL, [szle_datum] [dbo].[datum] NULL, [szle_cim] [varchar](150) NULL, [idokapu] [varchar](40) NULL, [vevo_jovedeki] [dbo].[nev] NULL, [lejar] [varchar](1000) NULL, [vevo] [dbo].[kulcs] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szla_pu]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [DARAB] [dbo].[mennyiseg] NOT NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [megjegyzes] [dbo].[megjegyzes] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_pu] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szlat]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] 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] NULL, [akcio] [nchar](1) NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [szlev_szam] [dbo].[bizonylat_szam] NULL, [szlev_tetel_szam] [dbo].[bizonylat_tetel] NULL, CONSTRAINT [PK_wvevo_szlat_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szlet]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] 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) NOT NULL, [rendel_ssz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_szlet_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szlet_koros]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] 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) NOT NULL, [rendel_ssz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szlet_r]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [SZORZO] [dbo].[szorzo] NOT NULL, [r_darab] [dbo].[mennyiseg] NOT NULL, [r_EGYSEG_AR] [dbo].[egyseg_ar] NOT NULL, [r_kedvezmeny] [dbo].[kedvezmeny] NOT NULL, [v_darab] [dbo].[mennyiseg] NOT NULL, [v_egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [v_kedv] [dbo].[kedvezmeny] NOT NULL, [akcio] [char](1) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_szlet_r_1] PRIMARY KEY CLUSTERED ( [BIZSZAM] ASC, [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szlet_td]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [E1] [dbo].[egyseg_ar] NOT NULL, [E2] [dbo].[egyseg_ar] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevo_szlet_td] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_szletm]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] 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) NOT NULL, [rendel_ssz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [ere_darab] [dbo].[mennyiseg] NULL, [ere_edarab] [dbo].[mennyiseg] NULL, CONSTRAINT [PK_wvevo_szletm_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_tel]( [VEVO_KOD] [dbo].[kulcs] NOT NULL, [TELEP_KOD] [char](4) NOT NULL, [TELEP_NEV] [dbo].[nev] NOT NULL, [VAROS] [dbo].[nev] NOT NULL, [IRANYITO] [dbo].[nev] NOT NULL, [CIM] [dbo].[nev] NOT NULL, [kerulet] [varchar](50) NULL, [kozterulet_jellege] [varchar](50) NULL, [hazszam] [varchar](50) NULL, [epulet] [varchar](50) NULL, [lepcsohaz] [varchar](50) NULL, [szint] [varchar](50) NULL, [ajto] [varchar](50) NULL, [KAPCSOLAT] [dbo].[nev] NULL, [TELEFON] [dbo].[nev] NULL, [EMAIL] [dbo].[nev] NULL, [KARTYA] [dbo].[nev] NULL, [LIMIT] [dbo].[egyseg_ar] NULL, [jovedeki] [dbo].[nev] NULL, [TOROLT] [char](1) NULL, [kicsoda] [dbo].[kicsoda] NULL, [vevo_csoport] [dbo].[kulcs] NULL, [vevo_lanc] [dbo].[kulcs] NULL, [vevo_cegjelleg] [dbo].[kulcs] NULL, [vevo_terulet] [dbo].[kulcs] NULL, [idokapu] [varchar](30) NULL, [iso] [char](2) NULL, [allam] [varchar](255) NULL, [edi] [varchar](14) NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevo_tel1]( [VEVO_KOD] [dbo].[kulcs] NOT NULL, [TELEP_KOD] [char](4) NOT NULL, [TELEP_NEV] [dbo].[nev] NOT NULL, [VAROS] [dbo].[nev] NOT NULL, [IRANYITO] [dbo].[nev] NOT NULL, [CIM] [dbo].[nev] NOT NULL, [MOZGAS] [dbo].[nev] NULL, [UJVEVO_KOD] [dbo].[kulcs] NULL, [UJTELEP_KOD] [char](4) NULL, [UJTELEP_NEV] [dbo].[nev] NULL, [kicsoda] [dbo].[kicsoda] NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvevoarak]( [cikk_szam] [dbo].[cikk_szam] NOT NULL, [datum] [char](11) NOT NULL, [vdatum] [dbo].[datum] NOT NULL, [vevo] [dbo].[kulcs] NOT NULL, [egyseg_ar] [dbo].[egyseg_ar] NOT NULL, [cikk_nev] [dbo].[nev] NOT NULL, [kicsoda] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_wvevoarak] PRIMARY KEY CLUSTERED ( [cikk_szam] ASC, [datum] ASC, [vdatum] ASC, [vevo] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wvonal]( [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [VONALKOD] [char](14) NOT NULL, [SZORZO] [dbo].[kulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NOT NULL, [ALAP] [char](10) NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, CONSTRAINT [PK_WVONAL] PRIMARY KEY CLUSTERED ( [VONALKOD] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wwszall_rend_jav]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [CIKKCSOP] [varchar](18) NOT NULL, [GYARTO] [dbo].[kulcs] NOT NULL, [MENNY_EGYS] [dbo].[menny_egyseg] NULL, [SZORZO] [dbo].[szorzo] NULL, [AFA_KULCS] [dbo].[afakulcs] NULL, [ZSUGOR_DB] [int] NULL, [DB_KART] [int] NULL, [KART_SOR] [int] NULL, [KART_RAKL] [int] NULL, [ATL_FOGYAS] [dbo].[mennyiseg] NULL, [MIN_RENCS] [dbo].[menny_egyseg] NULL, [MIN_RENSZ] [dbo].[mennyiseg] NULL, [MIN_KESZLET] [dbo].[mennyiseg] NULL, [NYITO_KESZ] [dbo].[mennyiseg] NULL, [BESZERZES] [dbo].[mennyiseg] NULL, [ERTEKESITES] [dbo].[mennyiseg] NULL, [KESZLET] [dbo].[mennyiseg] NULL, [EGYSEG_AR] [dbo].[egyseg_ar] NULL, [EDARAB] [dbo].[mennyiseg] NULL, [DARAB] [dbo].[mennyiseg] NULL, [REN_KARTON] [dbo].[mennyiseg] NULL, [REN_RAKLAP] [dbo].[mennyiseg] NULL, [OKARTONOK] [dbo].[mennyiseg] NULL, [JAVASOLT] [dbo].[mennyiseg] NULL, [mar_rendelt] [dbo].[mennyiseg] NULL, [KICSODA] [dbo].[kicsoda] NOT NULL ) ON [PRIMARY] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE TABLE [wwvevo_szlet]( [BIZSZAM] [dbo].[bizonylat_szam] NOT NULL, [TETEL] [dbo].[bizonylat_tetel] NOT NULL, [CIKK_SZAM] [dbo].[cikk_szam] NOT NULL, [CIKK_NEV] [dbo].[cikk_nev] NOT NULL, [AFA_KULCS] [dbo].[afakulcs] 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) NOT NULL, [rendel_ssz] [dbo].[bizonylat_szam] NOT NULL, [rendel_tet] [dbo].[bizonylat_tetel] NOT NULL, [KICSODA] [dbo].[kicsoda] NOT NULL, [sarzs] [varchar](50) NOT NULL, CONSTRAINT [PK_wwvevo_szlet_1] PRIMARY KEY CLUSTERED ( [TETEL] ASC, [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wadatgyujto_arcimke] ON [wadatgyujto_arcimke] ( [CIKK_SZAM] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wadatgyujto_arcimke_1] ON [wadatgyujto_arcimke] ( [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wagy_szall_szlet] ON [wagy_szall_szlet] ( [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WEAN_AD] ON [wean_ad] ( [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WKIVETT] ON [wkivett] ( [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wkomissio] ON [wkomissio] ( [rendel_bsz] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wkomissio_1] ON [wkomissio] ( [rendel_bsz] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wkomissio_2] ON [wkomissio] ( [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WRMOZGAST] ON [wrmozgast] ( [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_wszall_art] ON [wszall_art] ( [KICSODA] ASC, [CIKK_NEV] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WVEVO_SZLAT] ON [wvevo_szlat] ( [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WVEVO_SZLET] ON [wvevo_szlet] ( [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WVEVO_TEL] ON [wvevo_tel] ( [VEVO_KOD] ASC, [TELEP_KOD] ASC, [kicsoda] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO SET ANSI_PADDING ON GO CREATE NONCLUSTERED INDEX [IX_WWVEVO_SZLET] ON [wwvevo_szlet] ( [KICSODA] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] GO ALTER TABLE [wbizonylat] ADD CONSTRAINT [DF_wbizonylat_CIKK_NEV] DEFAULT ('') FOR [CIKK_NEV] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_cikk_nev_ang] DEFAULT ('') FOR [cikk_nev_ang] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_menny_egys_ang] DEFAULT ('') FOR [menny_egys_ang] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_linkfile] DEFAULT ('') FOR [linkfile] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_szarmazasi_hely] DEFAULT ('') FOR [szarmazasi_hely] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_gycikk_szam] DEFAULT ('') FOR [gycikk_szam] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_chips_ados] DEFAULT ('0') FOR [chips_ados] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_vpop_platofok] DEFAULT ((0)) FOR [vpop_platofok] GO ALTER TABLE [wf_cikkek] ADD CONSTRAINT [DF_wf_cikkek_web] DEFAULT ('') FOR [web] GO ALTER TABLE [wbevett] WITH CHECK ADD CONSTRAINT [FK_WBEVETT_afa_kulcs] FOREIGN KEY([AFA_KULCS]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wbevett] CHECK CONSTRAINT [FK_WBEVETT_afa_kulcs] GO ALTER TABLE [wbevett] WITH CHECK ADD CONSTRAINT [FK_WBEVETT_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wbevett] CHECK CONSTRAINT [FK_WBEVETT_CIKKEK] GO ALTER TABLE [webvevo_rent] WITH CHECK ADD CONSTRAINT [FK_webvevo_rent_afa_kulcs] FOREIGN KEY([afa_kulcs]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [webvevo_rent] CHECK CONSTRAINT [FK_webvevo_rent_afa_kulcs] GO ALTER TABLE [webvevo_rent] WITH CHECK ADD CONSTRAINT [FK_webvevo_rent_cikkek] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [webvevo_rent] CHECK CONSTRAINT [FK_webvevo_rent_cikkek] GO ALTER TABLE [webvevo_rent] WITH CHECK ADD CONSTRAINT [FK_webvevo_rent_vevok] FOREIGN KEY([vevo]) REFERENCES [vevok] ([VEVO_KOD]) GO ALTER TABLE [webvevo_rent] CHECK CONSTRAINT [FK_webvevo_rent_vevok] GO ALTER TABLE [wepu_bank_impt] WITH CHECK ADD CONSTRAINT [FK_wepu_bank_impt_belepes] FOREIGN KEY([kicsoda]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wepu_bank_impt] CHECK CONSTRAINT [FK_wepu_bank_impt_belepes] GO ALTER TABLE [wgyujt] WITH CHECK ADD CONSTRAINT [FK_wgyujt_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wgyujt] CHECK CONSTRAINT [FK_wgyujt_BELEPES] GO ALTER TABLE [wgyujtes] WITH CHECK ADD CONSTRAINT [FK_wgyujtes_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wgyujtes] CHECK CONSTRAINT [FK_wgyujtes_BELEPES] GO ALTER TABLE [wgyujtes1] WITH CHECK ADD CONSTRAINT [FK_wgyujtes1_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wgyujtes1] CHECK CONSTRAINT [FK_wgyujtes1_BELEPES] GO ALTER TABLE [wgyujtes2] WITH CHECK ADD CONSTRAINT [FK_wgyujtes2_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wgyujtes2] CHECK CONSTRAINT [FK_wgyujtes2_BELEPES] GO ALTER TABLE [wkivett] WITH CHECK ADD CONSTRAINT [FK_WKIVETT_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wkivett] CHECK CONSTRAINT [FK_WKIVETT_CIKKEK] GO ALTER TABLE [wkont_szabalyt] WITH CHECK ADD CONSTRAINT [FK_wkont_szabalyt_belepes] FOREIGN KEY([kicsoda]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wkont_szabalyt] CHECK CONSTRAINT [FK_wkont_szabalyt_belepes] GO ALTER TABLE [wleertekelest] WITH CHECK ADD CONSTRAINT [FK_wleertekelest_BELEPES] FOREIGN KEY([kicsoda]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wleertekelest] CHECK CONSTRAINT [FK_wleertekelest_BELEPES] GO ALTER TABLE [wleertekelest] WITH CHECK ADD CONSTRAINT [FK_wleertekelest_CCIKKEK] FOREIGN KEY([CCIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wleertekelest] CHECK CONSTRAINT [FK_wleertekelest_CCIKKEK] GO ALTER TABLE [wleertekelest] WITH CHECK ADD CONSTRAINT [FK_wleertekelest_FCIKKEK] FOREIGN KEY([FCIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wleertekelest] CHECK CONSTRAINT [FK_wleertekelest_FCIKKEK] GO ALTER TABLE [wmerleg] WITH CHECK ADD CONSTRAINT [FK_wmerleg_cikkek] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wmerleg] CHECK CONSTRAINT [FK_wmerleg_cikkek] GO ALTER TABLE [wrmozgast] WITH CHECK ADD CONSTRAINT [FK_WRMOZGAST_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wrmozgast] CHECK CONSTRAINT [FK_WRMOZGAST_BELEPES] GO ALTER TABLE [wrmozgast] WITH CHECK ADD CONSTRAINT [FK_WRMOZGAST_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wrmozgast] CHECK CONSTRAINT [FK_WRMOZGAST_CIKKEK] GO ALTER TABLE [wszall_art] WITH CHECK ADD CONSTRAINT [FK_wszall_art_belepes] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wszall_art] CHECK CONSTRAINT [FK_wszall_art_belepes] GO ALTER TABLE [wszall_art] WITH CHECK ADD CONSTRAINT [FK_wszall_art_cikkek] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wszall_art] CHECK CONSTRAINT [FK_wszall_art_cikkek] GO ALTER TABLE [wszall_szlat_td] WITH CHECK ADD CONSTRAINT [FK_wszall_szlat_td_belepes] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wszall_szlat_td] CHECK CONSTRAINT [FK_wszall_szlat_td_belepes] GO ALTER TABLE [wszall_szlet] WITH CHECK ADD CONSTRAINT [FK_wszall_szlet_afa_kulcs] FOREIGN KEY([afa_kulcs]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wszall_szlet] CHECK CONSTRAINT [FK_wszall_szlet_afa_kulcs] GO ALTER TABLE [wszall_szlet] WITH CHECK ADD CONSTRAINT [FK_wszall_szlet_belepes] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wszall_szlet] CHECK CONSTRAINT [FK_wszall_szlet_belepes] GO ALTER TABLE [wszall_szlet] WITH CHECK ADD CONSTRAINT [FK_wszall_szlet_cikkek] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wszall_szlet] CHECK CONSTRAINT [FK_wszall_szlet_cikkek] GO ALTER TABLE [wszall_szlet_td] WITH CHECK ADD CONSTRAINT [FK_wszall_szlet_td_belepes] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wszall_szlet_td] CHECK CONSTRAINT [FK_wszall_szlet_td_belepes] GO ALTER TABLE [wszall_szletm] WITH CHECK ADD CONSTRAINT [FK_wszall_szletm_afa_kulcs] FOREIGN KEY([afa_kulcs]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wszall_szletm] CHECK CONSTRAINT [FK_wszall_szletm_afa_kulcs] GO ALTER TABLE [wszall_szletm] WITH CHECK ADD CONSTRAINT [FK_wszall_szletm_belepes] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wszall_szletm] CHECK CONSTRAINT [FK_wszall_szletm_belepes] GO ALTER TABLE [wszall_szletm] WITH CHECK ADD CONSTRAINT [FK_wszall_szletm_cikkek] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wszall_szletm] CHECK CONSTRAINT [FK_wszall_szletm_cikkek] GO ALTER TABLE [wvevo_arajant] WITH CHECK ADD CONSTRAINT [FK_WVEVO_ARAJANT_afa_kulcs] FOREIGN KEY([AFA_KULCS]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wvevo_arajant] CHECK CONSTRAINT [FK_WVEVO_ARAJANT_afa_kulcs] GO ALTER TABLE [wvevo_arajant] WITH CHECK ADD CONSTRAINT [FK_WVEVO_ARAJANT_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wvevo_arajant] CHECK CONSTRAINT [FK_WVEVO_ARAJANT_BELEPES] GO ALTER TABLE [wvevo_arajant] WITH CHECK ADD CONSTRAINT [FK_WVEVO_ARAJANT_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wvevo_arajant] CHECK CONSTRAINT [FK_WVEVO_ARAJANT_CIKKEK] GO ALTER TABLE [wvevo_rent] WITH CHECK ADD CONSTRAINT [FK_wvevo_rent_afa_kulcs] FOREIGN KEY([afa_kulcs]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wvevo_rent] CHECK CONSTRAINT [FK_wvevo_rent_afa_kulcs] GO ALTER TABLE [wvevo_rent] WITH CHECK ADD CONSTRAINT [FK_wvevo_rent_belepes] FOREIGN KEY([kicsoda]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wvevo_rent] CHECK CONSTRAINT [FK_wvevo_rent_belepes] GO ALTER TABLE [wvevo_rent] WITH CHECK ADD CONSTRAINT [FK_wvevo_rent_cikkek] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wvevo_rent] CHECK CONSTRAINT [FK_wvevo_rent_cikkek] GO ALTER TABLE [wvevo_szlat] WITH CHECK ADD CONSTRAINT [FK_WVEVO_SZLAT_afa_kulcs] FOREIGN KEY([AFA_KULCS]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wvevo_szlat] CHECK CONSTRAINT [FK_WVEVO_SZLAT_afa_kulcs] GO ALTER TABLE [wvevo_szlat] WITH CHECK ADD CONSTRAINT [FK_WVEVO_SZLAT_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wvevo_szlat] CHECK CONSTRAINT [FK_WVEVO_SZLAT_BELEPES] GO ALTER TABLE [wvevo_szlat] WITH CHECK ADD CONSTRAINT [FK_WVEVO_SZLAT_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wvevo_szlat] CHECK CONSTRAINT [FK_WVEVO_SZLAT_CIKKEK] GO ALTER TABLE [wvevo_szlet] WITH CHECK ADD CONSTRAINT [FK_WVEVO_SZLET_afa_kulcs] FOREIGN KEY([AFA_KULCS]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wvevo_szlet] CHECK CONSTRAINT [FK_WVEVO_SZLET_afa_kulcs] GO ALTER TABLE [wvevo_szlet] WITH CHECK ADD CONSTRAINT [FK_WVEVO_SZLET_BELEPES] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wvevo_szlet] CHECK CONSTRAINT [FK_WVEVO_SZLET_BELEPES] GO ALTER TABLE [wvevo_szlet] WITH CHECK ADD CONSTRAINT [FK_WVEVO_SZLET_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wvevo_szlet] CHECK CONSTRAINT [FK_WVEVO_SZLET_CIKKEK] GO ALTER TABLE [wvevo_szlet_td] WITH CHECK ADD CONSTRAINT [FK_wvevo_szlet_td_belepes] FOREIGN KEY([KICSODA]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wvevo_szlet_td] CHECK CONSTRAINT [FK_wvevo_szlet_td_belepes] GO ALTER TABLE [wvevo_tel] WITH CHECK ADD CONSTRAINT [FK_WVEVO_TEL_BELEPES] FOREIGN KEY([kicsoda]) REFERENCES [belepes] ([ROVIDNEV]) GO ALTER TABLE [wvevo_tel] CHECK CONSTRAINT [FK_WVEVO_TEL_BELEPES] GO ALTER TABLE [wwvevo_szlet] WITH CHECK ADD CONSTRAINT [FK_WWVEVO_SZLET_afa_kulcs] FOREIGN KEY([AFA_KULCS]) REFERENCES [afa_kulcs] ([AFAKULCS]) GO ALTER TABLE [wwvevo_szlet] CHECK CONSTRAINT [FK_WWVEVO_SZLET_afa_kulcs] GO ALTER TABLE [wwvevo_szlet] WITH CHECK ADD CONSTRAINT [FK_WWVEVO_SZLET_CIKKEK] FOREIGN KEY([CIKK_SZAM]) REFERENCES [cikkek] ([CIKK_SZAM]) GO ALTER TABLE [wwvevo_szlet] CHECK CONSTRAINT [FK_WWVEVO_SZLET_CIKKEK] GO DROP PROCEDURE [xxafa] GO DROP PROCEDURE [wwvevo_szlet_masol] GO DROP PROCEDURE [wvevo_szletm_tolt] GO DROP PROCEDURE [wvevo_szlet_feltolt_szall] GO DROP PROCEDURE [wvevo_szlet_feltolt] GO DROP PROCEDURE [wvevo_szlat_pu_feltolt] GO DROP PROCEDURE [wvevo_szlat_feltolt] GO DROP PROCEDURE [wvevo_rent_feltolt] GO DROP PROCEDURE [wvevo_rent_arajan_feltolt] GO DROP PROCEDURE [wvevo_pszlat_feltolt] GO DROP PROCEDURE [wvevo_oszla_ny_feltolt] GO DROP PROCEDURE [wvevo_arajanlatt_tolt] GO DROP PROCEDURE [wtf_vevok_bedolgoz] GO DROP PROCEDURE [wtf_vevo_arak_bedolgoz] GO DROP PROCEDURE [wtf_vevo_akcio_bedolgoz] GO DROP PROCEDURE [wtf_torzs_bedolgoz] GO DROP PROCEDURE [wtf_szall_arak_bedolgoz] GO DROP PROCEDURE [wtf_mindent_bedolgoz] GO DROP PROCEDURE [wszbiz_szlat_tolt] GO DROP PROCEDURE [wszall_szletm_feltolt] GO DROP PROCEDURE [wszall_szlet_feltolt] GO DROP PROCEDURE [wszall_szlat_feltolt] GO DROP PROCEDURE [wszall_rentv2_feltolt] GO DROP PROCEDURE [wszall_rentv_feltolt] GO DROP PROCEDURE [wpenztarb_tolt] GO DROP PROCEDURE [wf_cikk_bedolgoz] GO DROP PROCEDURE [wbekivett_tolt] GO DROP PROCEDURE [vonalkod_general] GO DROP PROCEDURE [vonalkod_beir] GO DROP PROCEDURE [vonal_feltolt1] GO DROP PROCEDURE [vonal_feltolt] GO DROP PROCEDURE [vonal_beir] GO DROP PROCEDURE [vevoarak_vevo_tolt] GO DROP PROCEDURE [vevoarak_feltolt] GO DROP PROCEDURE [vevo_uj_notr] GO DROP PROCEDURE [vevo_uj_nemreg] GO DROP PROCEDURE [vevo_uj] GO DROP PROCEDURE [vevo_tolt] GO DROP PROCEDURE [VEVO_SZLET_TD_UJ] GO DROP PROCEDURE [vevo_szle_visszaru_egyedi_tr_nelkul] GO DROP PROCEDURE [vevo_szle_visszaru_egyedi] GO DROP PROCEDURE [vevo_szle_visszaru] GO DROP PROCEDURE [vevo_szle_uj_tr_nelkul] GO DROP PROCEDURE [vevo_szle_uj_logi] GO DROP PROCEDURE [vevo_szle_uj_koros] GO DROP PROCEDURE [vevo_szle_uj] GO DROP PROCEDURE [vevo_szle_torol_biz] GO DROP PROCEDURE [vevo_szle_tor_tranz_nelkul] GO DROP PROCEDURE [vevo_szle_tor] GO DROP PROCEDURE [vevo_szle_szetbont] GO DROP PROCEDURE [vevo_szle_osszevon] GO DROP PROCEDURE [vevo_szle_nyug_tranz_nelkul] GO DROP PROCEDURE [vevo_szle_nyug_logi] GO DROP PROCEDURE [vevo_szle_nyug_feltolt] GO DROP PROCEDURE [vevo_szle_nyug] GO DROP PROCEDURE [vevo_szle_mod_tetel] GO DROP PROCEDURE [vevo_szle_mod_kivet] GO DROP PROCEDURE [vevo_szle_mod] GO DROP PROCEDURE [vevo_szle_koz_nyug_osszevon] GO DROP PROCEDURE [vevo_szle_koz_nyug] GO DROP PROCEDURE [vevo_szle_kassza_uj1] GO DROP PROCEDURE [vevo_szle_kassza_uj] GO DROP PROCEDURE [vevo_szle_kassza_nyug_tranz_nelkul] GO DROP PROCEDURE [vevo_szle_gongy_uj] GO DROP PROCEDURE [vevo_szle_eszla_nyug] GO DROP PROCEDURE [vevo_szle_ccnyug] GO DROP PROCEDURE [vevo_szla_tor_tranz_nelkul] GO DROP PROCEDURE [vevo_szla_tor_szl_nelkul_tranz_nelkul] GO DROP PROCEDURE [vevo_szla_tor_szl_nelkul] GO DROP PROCEDURE [vevo_szla_tor] GO DROP PROCEDURE [vevo_szla_pu] GO DROP PROCEDURE [vevo_szla_proform] GO DROP PROCEDURE [vevo_szla_egyedi_tr_nelkul] GO DROP PROCEDURE [vevo_szla_egyedi] GO DROP PROCEDURE [vevo_rent_feltolt1] GO DROP PROCEDURE [vevo_rent_feltolt] GO DROP PROCEDURE [vevo_rend_tor_log] GO DROP PROCEDURE [vevo_rend_tor] GO DROP PROCEDURE [VEVO_REND_TERM_UJ] GO DROP PROCEDURE [VEVO_REND_TERM_AR_GEN_2014] GO DROP PROCEDURE [vevo_rend_hatralekbol] GO DROP PROCEDURE [vevo_ren_uj_web1] GO DROP PROCEDURE [vevo_ren_uj_web_tranz_nelkul] GO DROP PROCEDURE [vevo_ren_uj_web] GO DROP PROCEDURE [vevo_ren_uj_tranz_nelkul] GO DROP PROCEDURE [vevo_ren_uj] GO DROP PROCEDURE [vevo_ren_term_uj_tranz_nelkul] GO DROP PROCEDURE [vevo_ren_term_uj] GO DROP PROCEDURE [vevo_ren_mod_datum] GO DROP PROCEDURE [vevo_ren_mod] GO DROP PROCEDURE [vevo_ren_allapot_akt] GO DROP PROCEDURE [vevo_mod] GO DROP PROCEDURE [vevo_mit_tolt] GO DROP PROCEDURE [vevo_mire_tolt] GO DROP PROCEDURE [vevo_kassza_visszaru] GO DROP PROCEDURE [vevo_elorent_feltolt_masodszor] GO DROP PROCEDURE [vevo_elorent_feltolt] GO DROP PROCEDURE [vevo_cszam_tolt] GO DROP PROCEDURE [vevo_cszam_mod] GO DROP PROCEDURE [vevo_beir_telmeg] GO DROP PROCEDURE [vevo_arkeplet_tolt] GO DROP PROCEDURE [vevo_arkeplet_beir] GO DROP PROCEDURE [vevo_arcsop_uj] GO DROP PROCEDURE [vevo_arcsop_mod] GO DROP PROCEDURE [vevo_arak_masol_tempbe] GO DROP PROCEDURE [vevo_arajanlat_uj] GO DROP PROCEDURE [vevo_arajanlat_mod] GO DROP PROCEDURE [vevo_arajanlat_kalkulalt] GO DROP PROCEDURE [vevo_arajanlat_egyedi] GO DROP PROCEDURE [vevo_ar_lista_letrehoz_utemezett] GO DROP PROCEDURE [vevo_ar_lista_import] GO DROP PROCEDURE [vevo_ar_lista_feltolt] GO DROP PROCEDURE [vevo_ar_lista_besz_ar_kalk] GO DROP PROCEDURE [vevo_ar_kalk_rabatt] GO DROP PROCEDURE [vevo_ar_kalk_lista] GO DROP PROCEDURE [vevo_ar_kalk] GO DROP PROCEDURE [vevo_akcio_masol_tempbe] GO DROP PROCEDURE [vevo_akc_csom_szamol] GO DROP PROCEDURE [vcikk_arak_web_torol] GO DROP PROCEDURE [vcikk_arak_torol] GO DROP PROCEDURE [utnyilv_tav_mod] GO DROP PROCEDURE [uj_ean_general] GO DROP PROCEDURE [ugyletkod_ad] GO DROP PROCEDURE [torzs_kuld_eszatocsnak] GO DROP PROCEDURE [torzs_kuld_EKnak] GO DROP PROCEDURE [tolt_wcikk_arak_web] GO DROP PROCEDURE [tolt_vcikk_arak_egy] GO DROP PROCEDURE [tolt_vcikk_arak] GO DROP PROCEDURE [tolt_egy_wcikk_arak_web] GO DROP PROCEDURE [TokenExchangeRequest_sorszam] GO DROP PROCEDURE [titkos_ekaer] GO DROP PROCEDURE [termeles_uj] GO DROP PROCEDURE [termel_idoszak] GO DROP PROCEDURE [term_veglegesit] GO DROP PROCEDURE [szerviz_general_keszlet] GO DROP PROCEDURE [szavido_atir] GO DROP PROCEDURE [szav_vve] GO DROP PROCEDURE [szav_szsz] GO DROP PROCEDURE [szamla_tetel_beir_szl] GO DROP PROCEDURE [szamla_tetel_afakulcs] GO DROP PROCEDURE [szallito_uj] GO DROP PROCEDURE [szallev_kivet] GO DROP PROCEDURE [szall_szlet_feltolt] GO DROP PROCEDURE [szall_szlef_mod] GO DROP PROCEDURE [szall_szle_visszaru] GO DROP PROCEDURE [szall_szle_uj_tranz_nelkul] GO DROP PROCEDURE [szall_szle_uj_egy] GO DROP PROCEDURE [szall_szle_uj] GO DROP PROCEDURE [szall_szle_tor_notr] GO DROP PROCEDURE [szall_szle_tor] GO DROP PROCEDURE [szall_szle_nyug_tranz_nelkul] GO DROP PROCEDURE [szall_szle_nyug_feltolt] GO DROP PROCEDURE [szall_szle_nyug_felad] GO DROP PROCEDURE [szall_szle_nyug] GO DROP PROCEDURE [szall_szle_mod_tetel] GO DROP PROCEDURE [szall_szle_koz_nyug] GO DROP PROCEDURE [szall_szla_uj] GO DROP PROCEDURE [szall_szla_tor_szlev_nelkul] GO DROP PROCEDURE [szall_szla_tor_notr] GO DROP PROCEDURE [szall_szla_tor] GO DROP PROCEDURE [szall_rent_feltolt] GO DROP PROCEDURE [szall_rendeles_uj_jav3] GO DROP PROCEDURE [szall_rendeles_uj_jav1] GO DROP PROCEDURE [szall_rendeles_uj] GO DROP PROCEDURE [szall_rend_vegyesen] GO DROP PROCEDURE [szall_rend_torol] GO DROP PROCEDURE [szall_ren_vevo_renbol] GO DROP PROCEDURE [szall_ren_uj_tran_nelkul] GO DROP PROCEDURE [szall_ren_uj] GO DROP PROCEDURE [szall_ren_mod] GO DROP PROCEDURE [szall_ren_allapot_akt_log] GO DROP PROCEDURE [szall_ren_allapot_akt] GO DROP PROCEDURE [szall_biz_szle_visszaru] GO DROP PROCEDURE [szall_biz_szle_uj_egy] GO DROP PROCEDURE [szall_biz_szle_uj] GO DROP PROCEDURE [szall_biz_szle_tor_notr] GO DROP PROCEDURE [szall_biz_szle_tor] GO DROP PROCEDURE [szall_biz_szle_nyug] GO DROP PROCEDURE [szall_beir_bank] GO DROP PROCEDURE [szall_art_feltolt] GO DROP PROCEDURE [szall_arf_uj] GO DROP PROCEDURE [szall_arf_torol] GO DROP PROCEDURE [szall_arf_modosit] GO DROP PROCEDURE [Szall_arak_opt] GO DROP PROCEDURE [szall_arak_masol_tempbe] GO DROP PROCEDURE [szall_arajan_uj] GO DROP PROCEDURE [String2Db] GO DROP PROCEDURE [sarzs_atir] GO DROP PROCEDURE [rmozgas_uj_tr_nelkul] GO DROP PROCEDURE [rmozgas_uj_logi] GO DROP PROCEDURE [rmozgas_uj] GO DROP PROCEDURE [rmozgas_tolt] GO DROP PROCEDURE [rmozgas_keszlet] GO DROP PROCEDURE [ria_vevo_ajan_erk] GO DROP PROCEDURE [ria_minkeszlet] GO DROP PROCEDURE [RequestId] GO DROP PROCEDURE [RendelesVisszaigazol] GO DROP PROCEDURE [ReindexAllTable] GO DROP PROCEDURE [qszszamol_evho] GO DROP PROCEDURE [qszamolt_keszlet1] GO DROP PROCEDURE [qszamolt_keszlet] GO DROP PROCEDURE [qszamol_evho] GO DROP PROCEDURE [qmozgas_cikk] GO DROP PROCEDURE [qmin_keszlet] GO DROP PROCEDURE [qkibevet] GO DROP PROCEDURE [qkeszlet_mind] GO DROP PROCEDURE [qkeszlet] GO DROP PROCEDURE [qgyujt_felt] GO DROP PROCEDURE [qforg_sebesseg] GO DROP PROCEDURE [qfk_kivonat] GO DROP PROCEDURE [qfk_karton] GO DROP PROCEDURE [ptar_bsz_no] GO DROP PROCEDURE [penztart_lezar_tranz_nelkul] GO DROP PROCEDURE [penztart_lezar] GO DROP PROCEDURE [penztart_beir_tranz_nelkul] GO DROP PROCEDURE [penztart_beir] GO DROP PROCEDURE [penztart_atir] GO DROP PROCEDURE [penztar_honap_lezar] GO DROP PROCEDURE [partner_tolt_pr8] GO DROP PROCEDURE [partner_tolt] GO DROP PROCEDURE [osszevon_cikkek_feldolgoz] GO DROP PROCEDURE [onkolt_ar_tolt] GO DROP PROCEDURE [notebook_bedolgoz] GO DROP PROCEDURE [negativ_fogyaszt] GO DROP PROCEDURE [naplo_felhasznalo] GO DROP PROCEDURE [minkesz_szamol] GO DROP PROCEDURE [levonal_ad] GO DROP PROCEDURE [leltar_zar] GO DROP PROCEDURE [leltar_kivtolt] GO DROP PROCEDURE [leltar_indit] GO DROP PROCEDURE [leltar_iker_ellen] GO DROP PROCEDURE [leltar_felv_torol] GO DROP PROCEDURE [leltar_ertekel] GO DROP PROCEDURE [leltar_bevtolt] GO DROP PROCEDURE [leertekeles_uj] GO DROP PROCEDURE [kontir_uj] GO DROP PROCEDURE [kont_szabalyf_prior_beallit] GO DROP PROCEDURE [kont_szabalyf_pri_fel] GO DROP PROCEDURE [kont_szabaly_uj] GO DROP PROCEDURE [kont_szabaly_mod] GO DROP PROCEDURE [kont_bizsorsz_no] GO DROP PROCEDURE [koltseg_keszletre_uj] GO DROP PROCEDURE [koltseg_keszletre_torol] GO DROP PROCEDURE [kivetjog_uj] GO DROP PROCEDURE [kivet_uj_tranz_nelkul] GO DROP PROCEDURE [kivet_uj_logi] GO DROP PROCEDURE [kivet_uj] GO DROP PROCEDURE [kivet_keszlet] GO DROP PROCEDURE [keszre_torol] GO DROP PROCEDURE [Keszlet_vissza_datumra] GO DROP PROCEDURE [keszlet_kompenzal] GO DROP PROCEDURE [KESZLET_JOV] GO DROP PROCEDURE [keszlet_javit] GO DROP PROCEDURE [karton_vissza] GO DROP PROCEDURE [karton_ki_hibaval] GO DROP PROCEDURE [karton_ki] GO DROP PROCEDURE [karton_be_negativ] GO DROP PROCEDURE [karton_be_bizom] GO DROP PROCEDURE [karton_be] GO DROP PROCEDURE [karsorsz_no] GO DROP PROCEDURE [kamat_szamlak_betolt] GO DROP PROCEDURE [kamat_szamit] GO DROP PROCEDURE [jellemzo2_uj] GO DROP PROCEDURE [InsertDiszpoAuditLog] GO DROP PROCEDURE [havi_keszlet_uj] GO DROP PROCEDURE [grando_vevorend_imp] GO DROP PROCEDURE [fogyas_szamol] GO DROP PROCEDURE [fogyas_gyujt] GO DROP PROCEDURE [foglalas_uj_tranz_nelkul] GO DROP PROCEDURE [foglalas_uj] GO DROP PROCEDURE [foglalas_pri_fel] GO DROP PROCEDURE [foglalas_ki] GO DROP PROCEDURE [FELAD_KOTEG_UJ_ZEUS] GO DROP PROCEDURE [felad_koteg_uj_RLB] GO DROP PROCEDURE [felad_koteg_uj_REVOLUTION] GO DROP PROCEDURE [felad_koteg_uj_qsoft] GO DROP PROCEDURE [felad_koteg_uj_PRECIZ] GO DROP PROCEDURE [felad_koteg_uj_pr8] GO DROP PROCEDURE [felad_koteg_uj_microfox] GO DROP PROCEDURE [felad_koteg_uj_cobra] GO DROP PROCEDURE [evnyitas] GO DROP PROCEDURE [epu_vevo_otp_pontoz] GO DROP PROCEDURE [ean_ad] GO DROP PROCEDURE [diszpo_uj] GO DROP PROCEDURE [diszpo_torol] GO DROP PROCEDURE [diszpo_pri_fel] GO DROP PROCEDURE [diszpo_keszre_jelent] GO DROP PROCEDURE [cikkek_osszevonas_uj] GO DROP PROCEDURE [cikk_uj] GO DROP PROCEDURE [cikk_mod] GO DROP PROCEDURE [cikk_kep_karb1] GO DROP PROCEDURE [cikk_kep_karb] GO DROP PROCEDURE [cikk_doc_karb] GO DROP PROCEDURE [cikk_chips] GO DROP PROCEDURE [cikk_atvezetes] GO DROP PROCEDURE [bizsorsz_no] GO DROP PROCEDURE [biz_evnyitas] GO DROP PROCEDURE [bevetjog_uj] GO DROP PROCEDURE [bevet_uj_tranz_nelkul] GO DROP PROCEDURE [bevet_uj] GO DROP PROCEDURE [BESZERZES_JOV] GO DROP PROCEDURE [bankcsomt_mod] GO DROP PROCEDURE [bankcsomt_beir_cib_xls] GO DROP PROCEDURE [bankcsomt_beir] GO DROP PROCEDURE [bankcsomag_zar] GO DROP PROCEDURE [BackupDataBase] GO DROP PROCEDURE [arulog_vevo_szlaf_uj] GO DROP PROCEDURE [APOLLO_KOTEG_UJ] GO DROP PROCEDURE [anyag_idoszak] GO DROP PROCEDURE [altsorsz_no] GO DROP PROCEDURE [AKCIO_CSOMAG_UJ] GO DROP PROCEDURE [AKCIO_CSOMAG_MOD] GO DROP PROCEDURE [akc_ke_aktualizal] GO DROP PROCEDURE [agy_komissio_tetel] GO DROP PROCEDURE [agy_beszerzes_tetel] GO DROP PROCEDURE [_web_vevo_uj1] GO DROP PROCEDURE [_web_vevo_uj] GO DROP PROCEDURE [_web_vevo_ren_uj1] GO DROP PROCEDURE [_web_vevo_ren_uj_tranz_nelkul1] GO DROP PROCEDURE [_web_vevo_ren_uj_tranz_nelkul] GO DROP PROCEDURE [_web_vevo_ren_uj] GO DROP PROCEDURE [_web_vevo_mod1] GO DROP PROCEDURE [_web_vevo_mod] GO DROP PROCEDURE [_web_kosar_toroluj] GO DROP PROCEDURE [_web_kosar_torol] GO DROP PROCEDURE [_adatok_masolasa_eszatocsbol] GO DROP VIEW [xxxxx_kozosnyug] GO DROP VIEW [xxxxvvevo_ar_lis_cikk] GO DROP VIEW [XXXSZALL_SZLAF] GO DROP VIEW [vwvevo_szlet] GO DROP VIEW [vwvevo_szla_nyomt] GO DROP VIEW [vwvevo_koz_nyug_tetel] GO DROP VIEW [vwvevo_koz_nyug] GO DROP VIEW [vwvevo_kedv] GO DROP VIEW [vwugyletek] GO DROP VIEW [vwtermeles] GO DROP VIEW [vwszall_szlet] GO DROP VIEW [vwszall_szlat] GO DROP VIEW [vwkomissio_timp] GO DROP VIEW [vwkomissio_fimp] GO DROP VIEW [vwgyujtes] GO DROP VIEW [vwfolyoszamla] GO DROP VIEW [vwfolyosz_elore] GO DROP VIEW [vwagy_szall_szlet] GO DROP VIEW [vwagy_szall] GO DROP VIEW [vvonal2] GO DROP VIEW [vvonal1] GO DROP VIEW [vvonal] GO DROP VIEW [vvevotel_ker] GO DROP VIEW [vvevok_boritek] GO DROP VIEW [vVevoCikkHo] GO DROP VIEW [vvevoarak] GO DROP VIEW [vvevo_szlet_gy] GO DROP VIEW [vvevo_szlet_elabe] GO DROP VIEW [vvevo_szlet_beszert] GO DROP VIEW [vvevo_szlet] GO DROP VIEW [vvevo_szlef] GO DROP VIEW [vvevo_szle_nyomt] GO DROP VIEW [vvevo_szle_forg_gy] GO DROP VIEW [vvevo_szle_forg_ccs] GO DROP VIEW [vvevo_szle_ekaere] GO DROP VIEW [vvevo_szle_ekaer] GO DROP VIEW [vvevo_szle] GO DROP VIEW [vvevo_szlat] GO DROP VIEW [vvevo_szlaf] GO DROP VIEW [vvevo_szla_zeus] GO DROP VIEW [vvevo_szla_xml] GO DROP VIEW [vvevo_szla_rlb] GO DROP VIEW [vvevo_szla_revol] GO DROP VIEW [vvevo_szla_preciz] GO DROP VIEW [vvevo_szla_pr08] GO DROP VIEW [vvevo_szla_ol_seged3] GO DROP VIEW [vvevo_szla_ol_seged] GO DROP VIEW [vvevo_szla_nyomtgy] GO DROP VIEW [vvevo_szla_nyomt] GO DROP VIEW [vvevo_szla_infoteka] GO DROP VIEW [vvevo_szla_forgalom] GO DROP VIEW [vvevo_szla_forg_gy] GO DROP VIEW [vvevo_szla_forg_ccs] GO DROP VIEW [vvevo_szla_ford] GO DROP VIEW [vvevo_szla_ertek_kosar] GO DROP VIEW [vvevo_szla_edi_mod] GO DROP VIEW [vvevo_szla_edi] GO DROP VIEW [vvevo_szla] GO DROP VIEW [vvevo_szl_fizetve] GO DROP VIEW [vvevo_szl_fizetesek] GO DROP VIEW [vvevo_szall] GO DROP VIEW [vvevo_rent_agy] GO DROP VIEW [vvevo_renf] GO DROP VIEW [vvevo_rend_term] GO DROP VIEW [vvevo_rend_ertek] GO DROP VIEW [vvevo_rend_ekaer] GO DROP VIEW [vvevo_ren] GO DROP VIEW [vvevo_pszlat] GO DROP VIEW [vvevo_pszlaf] GO DROP VIEW [vvevo_pszla_nyomt] GO DROP VIEW [vvevo_pszla_ertek] GO DROP VIEW [vvevo_ker] GO DROP VIEW [vvevo_kedv] GO DROP VIEW [vvevo_ido_szlat] GO DROP VIEW [vvevo_ido_osszesit] GO DROP VIEW [vvevo_elabe] GO DROP VIEW [vvevo_biz_fizetve] GO DROP VIEW [vvevo_art] GO DROP VIEW [vvevo_arf] GO DROP VIEW [vvevo_arak_karb] GO DROP VIEW [vvevo_arak] GO DROP VIEW [vvevo_arajanlatt] GO DROP VIEW [vvevo_arajanlatf] GO DROP VIEW [vvevo_arajanlat_kalk] GO DROP VIEW [vvevo_arajanlat_ertek] GO DROP VIEW [vvevo_arajan_egyedi_ertek] GO DROP VIEW [vvevo_ar_lista] GO DROP VIEW [vvevo_akcior] GO DROP VIEW [vvevo_akcio_me] GO DROP VIEW [vvevo_akcio_hh] GO DROP VIEW [vvevo_akcio_arak] GO DROP VIEW [vutokalk] GO DROP VIEW [vutnyilv_tavolsag] GO DROP VIEW [vutnyilv_gk] GO DROP VIEW [vugyletek] GO DROP VIEW [vTervEsemeny] GO DROP VIEW [vterm_veszteseg] GO DROP VIEW [vterm_termeles] GO DROP VIEW [vterm_termel] GO DROP VIEW [vterm_receptura] GO DROP VIEW [vterm_anyag_felh] GO DROP VIEW [vszbiz_szlet] GO DROP VIEW [vszbiz_szlef] GO DROP VIEW [vszbiz_szle_ertek] GO DROP VIEW [vszbiz_kivb] GO DROP VIEW [vszbiz_kiv_ossz] GO DROP VIEW [vszbiz_kiv_datum] GO DROP VIEW [vszbiz_kiv] GO DROP VIEW [vszall_szlet_szallito] GO DROP VIEW [vszall_szlet] GO DROP VIEW [vszall_szlef] GO DROP VIEW [vszall_szle_ertek] GO DROP VIEW [vszall_szle_ekaer] GO DROP VIEW [vszall_szle] GO DROP VIEW [vszall_szlat] GO DROP VIEW [vszall_szlaf] GO DROP VIEW [vszall_szla_revol] GO DROP VIEW [vszall_szla_pr08] GO DROP VIEW [vszall_szla_ford] GO DROP VIEW [vszall_szla] GO DROP VIEW [vszall_szl_fizetesek] GO DROP VIEW [vszall_rent] GO DROP VIEW [vszall_renf] GO DROP VIEW [vszall_rend_ertek] GO DROP VIEW [vszall_rend_ekaer] GO DROP VIEW [vszall_ren] GO DROP VIEW [vszall_biz_fizetve] GO DROP VIEW [vszall_art] GO DROP VIEW [vszall_arf] GO DROP VIEW [vszall_arcsz] GO DROP VIEW [vszall_arajant] GO DROP VIEW [vszall_arajanf] GO DROP VIEW [vszall_arajan] GO DROP VIEW [vSzabadKeszlet] GO DROP VIEW [vrmozgast] GO DROP VIEW [vrmozgasf] GO DROP VIEW [vrmozgas_ertek] GO DROP VIEW [vqvevo_szle] GO DROP VIEW [vqszall_szle1] GO DROP VIEW [vqkivet1] GO DROP VIEW [vqkeszlet] GO DROP VIEW [vqhavi_keszlet] GO DROP VIEW [vqbevet1] GO DROP VIEW [vq_boltra_szallit] GO DROP VIEW [vq_bevet] GO DROP VIEW [vPriorGyarHatralek] GO DROP VIEW [vpop_jov_ert] GO DROP VIEW [vpenztart] GO DROP VIEW [voi_tetel3] GO DROP VIEW [voi_tetel] GO DROP VIEW [voi_otetel31] GO DROP VIEW [voi_otetel3] GO DROP VIEW [voi_otetel_tor] GO DROP VIEW [voi_otetel] GO DROP VIEW [voi_fej3] GO DROP VIEW [voi_fej] GO DROP VIEW [vneta_eladas] GO DROP VIEW [vnaplo_term] GO DROP VIEW [vmozgas_keszlet] GO DROP VIEW [vmozgas_karton] GO DROP VIEW [vleltar_felv] GO DROP VIEW [vleltar] GO DROP VIEW [vleertekeles] GO DROP VIEW [vkontirtb] GO DROP VIEW [vkontirf] GO DROP VIEW [vkont_szabalyt] GO DROP VIEW [vkont_szabalyf] GO DROP VIEW [vKonk_Figyelo_View] GO DROP VIEW [vkonk_ar_figyelo] GO DROP VIEW [vkomissiof] GO DROP VIEW [vkivett] GO DROP VIEW [vkivetf] GO DROP VIEW [vkivet_ertek] GO DROP VIEW [vkeszlet_reszletes] GO DROP VIEW [vkeszlet_beszforras] GO DROP VIEW [vkeszlet] GO DROP VIEW [vhcimke_csz] GO DROP VIEW [vfoglalasok] GO DROP VIEW [vdiszpo_keszre2] GO DROP VIEW [vdiszpo] GO DROP VIEW [vcsomagt] GO DROP VIEW [vcikkek_vonal] GO DROP VIEW [vcikkek_jellemzok] GO DROP VIEW [vcikkek_ean] GO DROP VIEW [vcikkek] GO DROP VIEW [vcikk_webaruhaz] GO DROP VIEW [vcikk_neta] GO DROP VIEW [vcikk_ker] GO DROP VIEW [vcikk_info] GO DROP VIEW [vbontas] GO DROP VIEW [vbevett] GO DROP VIEW [vbevetf] GO DROP VIEW [vbevet_ertek] GO DROP VIEW [vbankpenztar_atvezetes] GO DROP VIEW [vbankcsomagt] GO DROP VIEW [vbankcsomagb_sum] GO DROP VIEW [vbankcsomag_ertek] GO DROP VIEW [vbankcsomag] GO DROP VIEW [vanyagszukseglet1] GO DROP VIEW [vanyagszukseglet] GO DROP VIEW [vakcio_tv] GO DROP VIEW [vafa_kulcs] GO DROP VIEW [intrastat_vevo] GO DROP VIEW [intrastat_szall] GO DROP VIEW [_web_routes] GO DROP VIEW [_vwkassza] GO DROP VIEW [_vvevo_arajant] GO DROP VIEW [_vFeladVevoSzlaT] GO DROP VIEW [_vFeladVevoSzlaF] GO DROP VIEW [_vFeladVevo] GO DROP VIEW [_vcikk_arak1] GO DROP VIEW [_vcikk_arak_galatea] GO DROP VIEW [_vcikk_arak] GO DROP VIEW [__xxelabe] GO DROP VIEW [__vsupplier] GO DROP VIEW [__vsold_header] GO DROP VIEW [__vsold_detail] GO DROP VIEW [__vpurchase_header] GO DROP VIEW [__vpurchase_detail] GO DROP VIEW [__vinvoice_header] GO DROP VIEW [__vinvoice_detail] GO DROP VIEW [__vdelivery_place] GO DROP VIEW [__vclient] GO DROP VIEW [__vbrands] GO DROP VIEW [__varticles] GO DROP VIEW [__vart_groups] GO DROP VIEW [__v_stock] GO DROP FUNCTION [VevoAkciok] GO DROP FUNCTION [vcikkinfo_arak_] GO DROP FUNCTION [fvqszall_szle_szallito] GO DROP FUNCTION [fvqszall_szle_gyarto] GO DROP FUNCTION [fvqszall_szle_csz] GO DROP FUNCTION [fvqszall_szle_csop] GO DROP FUNCTION [fvqszall_szla_gyarto] GO DROP FUNCTION [fvqszall_szla_csz_pn] GO DROP FUNCTION [fvqkeszlet_szav] GO DROP FUNCTION [fvqkeszlet_raktar_szav] GO DROP FUNCTION [fvqkeszlet_raktar] GO DROP FUNCTION [fvqbevet_cikkek] GO DROP FUNCTION [ffoglalasok] GO DROP FUNCTION [fcikkek_eszatocs] GO DROP VIEW [vvevo_ar_lis_cikk] GO DROP VIEW [vvevo_arcsoport_lista] GO DROP VIEW [_vcikkinfo_arak] GO DROP FUNCTION [vcikkinfo_arak] GO DROP VIEW [vvevo_szla_napi_stat] GO DROP VIEW [vwbankpenztar_kozos] GO DROP VIEW [vwpenztar_bank] GO DROP VIEW [vwbank_penztar] GO DROP VIEW [vvevo_szle_ertek_kedv] GO DROP VIEW [vvevo_szle_ertek] GO DROP VIEW [vvevo_arajan_ertek] GO DROP VIEW [vvevo_arajanf] GO DROP VIEW [vonkoltar] GO DROP VIEW [vvevo_rent_keszlet] GO DROP VIEW [vwkomissio] GO DROP VIEW [vvevo_rent] GO DROP VIEW [vvevo_kedv_csz] GO DROP VIEW [vvevo_kedv1] GO DROP VIEW [vkeszlet_szavido] GO DROP VIEW [vdiszpo_keszre1] GO DROP VIEW [vvevo_rent_gyartas] GO DROP VIEW [vvevo_szla_online] GO DROP VIEW [voszla_naplo] GO DROP VIEW [vvevo_akcio] GO DROP VIEW [vvevo_akcio_] GO DROP VIEW [vvevo_szla_qsoft1] GO DROP VIEW [vvevo_szla_qsoft] GO DROP VIEW [vkeszlet_info_negativ] GO DROP VIEW [vkeszlet_negativ_info] GO DROP VIEW [vkeszlet_info] GO DROP VIEW [vszall_utanrend] GO DROP VIEW [vszrend_uton] GO DROP VIEW [vkeszlet_teljes] GO DROP VIEW [vkeszlet_teljes1] GO DROP VIEW [vUnion_Szall_szla] GO DROP VIEW [vszall_szla_ertek_pu] GO DROP VIEW [vszall_szla_ertek] GO DROP VIEW [_fvvevo_ar_lista] GO DROP FUNCTION [fvvevo_ar_lista] GO DROP VIEW [vkeszlet_koltseg_keszletre] GO DROP VIEW [vkoltseg_keszletre] GO DROP VIEW [vvevo_renf_kom] GO DROP VIEW [vwkomissio_tetsz] GO DROP VIEW [vwkomissio_tetsz1] GO DROP VIEW [vevo_ren_tetsz_suly] GO DROP VIEW [vcikkek_eladas] GO DROP VIEW [veladas_datum] GO DROP VIEW [vvevo_biz_fizetve3] GO DROP VIEW [vvevo_biz_fizetve2] GO DROP VIEW [vvevo_biz_fizetve1] GO DROP FUNCTION [fvqrmozgas] GO DROP FUNCTION [fvqkivet_cikkek] GO DROP VIEW [vq_rmozgas_sum] GO DROP VIEW [vq_rmozgas] GO DROP VIEW [vq_kivet_sum] GO DROP VIEW [vq_kivet] GO DROP VIEW [vUnion_Vevo_Szla] GO DROP VIEW [vpu_nyito_szla] GO DROP VIEW [vvevo_szla_ertek_pu] GO DROP VIEW [vvevo_rent_gyartas1] GO DROP VIEW [vkeszlet_osszes] GO DROP VIEW [vfoglalt_keszlet] GO DROP VIEW [vanyagszukseglet2] GO DROP VIEW [vvevo_szle_karton] GO DROP VIEW [vmozgas_keszlet1] GO DROP VIEW [vkeszlet_raktar1] GO DROP VIEW [vkeszlet_raktar] GO DROP VIEW [_vcikk_arak_cc] GO DROP FUNCTION [vcikk_arak_cc] GO DROP FUNCTION [vcikk_arak_hh] GO DROP VIEW [vvevo_szla_ertek_kedv] GO DROP VIEW [vvevo_szla_ertek] GO DROP FUNCTION [xvcikk_arak_web] GO DROP FUNCTION [xrfuggveny] GO DROP FUNCTION [xrCimsor] GO DROP FUNCTION [xrBizTetRend] GO DROP FUNCTION [xrazonosito] GO DROP FUNCTION [xk_arcsopkod] GO DROP FUNCTION [wugyletek] GO DROP FUNCTION [VevoTelCimsor] GO DROP FUNCTION [VevoSzabadHitelkerete] GO DROP FUNCTION [VevoiVisszaruUABizonylatrol] GO DROP FUNCTION [VevoCimsor1] GO DROP FUNCTION [VevoCimsor] GO DROP FUNCTION [VevoArCegreDatumra] GO DROP FUNCTION [vevoarak1] GO DROP FUNCTION [VevoArajanKalkAdottPenznemben] GO DROP FUNCTION [vevo_biz_fizetve] GO DROP FUNCTION [vevo_arak_karb] GO DROP FUNCTION [vevo_akcio_1_test] GO DROP FUNCTION [vevo_akcio_1] GO DROP FUNCTION [vcikkinfo_arak_1] GO DROP FUNCTION [vcikk_arak_webuj] GO DROP FUNCTION [vcikk_arak_web] GO DROP FUNCTION [vcikk_arak_brutto] GO DROP FUNCTION [vcikk_arak] GO DROP FUNCTION [varukeresohu] GO DROP FUNCTION [varcsop_arak] GO DROP FUNCTION [utolso_besz_ar1] GO DROP FUNCTION [utolso_besz_ar] GO DROP FUNCTION [Tetel_gyszam] GO DROP FUNCTION [TermekNettoBeszAraAdottDat] GO DROP FUNCTION [TermekListaBeszAraAdottDat] GO DROP FUNCTION [TermekBruttoEladAr] GO DROP FUNCTION [TermekBeszAraAdottDat1] GO DROP FUNCTION [TermekBeszAraAdottDat] GO DROP FUNCTION [SzlaSzamOrder] GO DROP FUNCTION [szallito_utolso_besz_ar] GO DROP FUNCTION [SzallArakVevoPenznemben] GO DROP FUNCTION [szall_biz_fizetve] GO DROP FUNCTION [SzabadKeszletAdottVevo] GO DROP FUNCTION [SzabadKeszletAdottPrior] GO DROP FUNCTION [SzabadKeszlet] GO DROP FUNCTION [strzero] GO DROP FUNCTION [rovidnev] GO DROP FUNCTION [Round59] GO DROP FUNCTION [Round5] GO DROP FUNCTION [Round_05] GO DROP FUNCTION [RaktarKeszletAdottCikk] GO DROP FUNCTION [pu_szla_kiegyenlit] GO DROP FUNCTION [PriorGyarHatralek] GO DROP FUNCTION [PartnerNev] GO DROP FUNCTION [Netto2Brutto] GO DROP FUNCTION [NegativKeszletAdottCikk] GO DROP FUNCTION [myMin] GO DROP FUNCTION [myMax] GO DROP FUNCTION [myGetTime] GO DROP FUNCTION [myGetDateTimeOFFSET] GO DROP FUNCTION [myGetDateTime] GO DROP FUNCTION [myGetDate] GO DROP FUNCTION [myDToC] GO DROP FUNCTION [myDOW] GO DROP FUNCTION [myCToD] GO DROP FUNCTION [MinValue] GO DROP FUNCTION [ListaArFelarKod] GO DROP FUNCTION [lejarat_datuma1] GO DROP FUNCTION [lejarat_datuma] GO DROP FUNCTION [Legyarthato] GO DROP FUNCTION [LastDateOfMonth] GO DROP FUNCTION [Keszlet_gyszam] GO DROP FUNCTION [keresztarfolyam] GO DROP FUNCTION [heti_atfedes_orara] GO DROP FUNCTION [fvwtermeles] GO DROP FUNCTION [fvutokalk] GO DROP FUNCTION [fvqVevoCikkHo] GO DROP FUNCTION [fvqSzallCikkHo] GO DROP FUNCTION [fvqkeszlet_negativ] GO DROP FUNCTION [fvqkeszlet_fogl_nelk] GO DROP FUNCTION [fvqkeszlet] GO DROP FUNCTION [fvevo_szla_xml] GO DROP FUNCTION [fvevo_ar_cikk] GO DROP FUNCTION [fvevo_akcio_cikk_rovid] GO DROP FUNCTION [fvevo_akcio_cikk] GO DROP FUNCTION [fuvardij] GO DROP FUNCTION [futnyilv_tavolsag] GO DROP FUNCTION [fpenztar_bank] GO DROP FUNCTION [FolyoszamlaVevo] GO DROP FUNCTION [FolyoszamlaSzall] GO DROP FUNCTION [Folyoszamla] GO DROP FUNCTION [FoglaltKeszletElozoAdottCikk] GO DROP FUNCTION [fkomissiot] GO DROP FUNCTION [fcikk_webaruhaz] GO DROP FUNCTION [ElsoMunkanap] GO DROP FUNCTION [ElabeSzleTetel] GO DROP FUNCTION [ElabeSzlaTetel] GO DROP FUNCTION [DomainSsz] GO DROP FUNCTION [DayName] GO DROP FUNCTION [DayCount] GO DROP FUNCTION [DatumTipusVevo] GO DROP FUNCTION [DatumTipus] GO DROP FUNCTION [CikkUtBeszAr] GO DROP FUNCTION [CikkRabattFelar] GO DROP FUNCTION [CikkBruttoEladAr] GO DROP FUNCTION [CikkAkciosAr] GO DROP FUNCTION [Brutto2Netto] GO DROP FUNCTION [brutto_ert] GO DROP FUNCTION [Bizszam_szam] GO DROP FUNCTION [Bizszam_keres_szovegben] GO DROP FUNCTION [bizszam_datum] GO DROP FUNCTION [Bankcsomagb_rendezve] GO DROP FUNCTION [AkciosTermek] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [AkciosTermek] ( @dat datum, @csz cikk_szam ) RETURNS int AS begin Declare @nDb int declare @rovid char(6) --select @rovid=left(dbo.rovidnev(),6) select @rovid=left(rtrim(rovidnev),6) from regisztral set @nDb=0 if @rovid='KARACS' select @nDb=count(*) from vevo_akcio where akciocsop=1 and kdatum<=@dat and @dat<=vdatum and cikk_szam=@csz return IsNull(@nDb,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Bankcsomagb_rendezve](@kulcs int,@Osszegt dbo.egyseg_ar, @tipus varchar(50)) RETURNS char(1) AS BEGIN Declare @Rendezve char(1) Declare @Osszegb dbo.egyseg_ar select @Osszegt = Abs(@Osszegt) select @Osszegb=IsNull(abs(Sum(ertek)),0) from bankcsomagb where kulcs = @kulcs if (Abs(@Osszegt - @Osszegb) > dbo.xrfuggveny('PUKiegyenlitesTolerancia')) and (@tipus='BT' or @tipus='BJ') --and @tipus <> 'ET' and @tipus <> 'EJ' and @tipus <> 'PJ' and @tipus <> 'PT' select @Rendezve = 'N' else select @Rendezve = 'I' return @Rendezve END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [bizszam_datum] (@bsz varchar(10), @mkod varchar(10)) RETURNS varchar(10) AS BEGIN declare @bizdat varchar(10) select @bizdat='' if @mkod = 'bevet' select @bizdat=datum from bevetf where bizszam = @bsz else if @mkod = 'vetel' select @bizdat=telj_datum from szall_szlef where bizszam = @bsz else if Left(@mkod,4) = 'vevo' select @bizdat=telj_datum from vevo_szlef where bizszam = @bsz else if @mkod = 'bizom' select @bizdat=telj_datum from szbiz_szlef where bizszam = @bsz RETURN @bizdat END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Bizszam_keres_szovegben](@mit varchar(50),@szoveg varchar(500)) RETURNS varchar(50) AS BEGIN Declare @pos1 int Declare @szamok char(10) Declare @elott varchar(20) Declare @Ret int select @szamok = '0123456789' select @elott = '.,;:/ ' select @Ret = 0 select @pos1 = charindex(@mit,@szoveg) if @pos1 > 0 begin select @Ret = 1 --if Len(@szoveg) > Len(@mit) --begin if charindex(substring(@szoveg,@pos1 + Len(@mit) ,1),@szamok) > 0 select @Ret = 0 else begin if @pos1 > 1 begin if charindex(substring(@szoveg,@pos1 - 1,1),@elott) = 0 select @Ret = 0 end end --end end return @Ret END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Bizszam_szam](@bizszam varchar(500)) RETURNS varchar(500) AS BEGIN Declare @Ev char(4) Declare @szam varchar(500) Declare @pelott varchar(500) Declare @putan varchar(500) Declare @sub varchar(500) Declare @pos1 int Declare @pos2 int Declare @pos3 int Declare @pos4 int Declare @c char(1) Declare @i int select @bizszam =ltrim(rtrim(@bizszam)) select @pos1 = charindex('/',@bizszam) if @pos1 = 0 -- ha nincs benn '/' karakter begin if len(@bizszam) >= 4 begin select @szam = Right(@bizszam,len(@bizszam)-4) select @c = '0' select @i = 1 while (@c='0') begin select @c = substring(@szam,@i,1) select @i = @i + 1 end select @szam = Right(@szam,len(@szam) - (@i -2)) end end else --van benne '/' katakter begin select @pelott = Left(@bizszam,@pos1 - 1) select @putan = Right(@bizszam,Len(@bizszam) - @pos1) if right(@putan,1) = 'X' begin select @szam = @pelott end else begin select @Ev = Rtrim(Ltrim(str(datepart(year,getdate())))) if charindex(@Ev,@pelott) > 0 select @szam = @putan if charindex(@Ev,@putan) > 0 select @szam = @pelott if @szam is null select @szam = @pelott end end select @szam = IsNull(@szam,'') return @szam END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [brutto_ert]( @netto decimal(18,3), @afa_kulcs afakulcs) RETURNS int AS BEGIN declare @i int declare @nAfa decimal(18,3) declare @nBrutto decimal(18,3) set @nAfa = (100 + case when @afa_kulcs='AM' or @afa_kulcs='AAM' or @afa_kulcs='ÁTK' or @afa_kulcs='EAM' or @afa_kulcs='EUFAD37' or @afa_kulcs='EUFADE' or @afa_kulcs='HO' or @afa_kulcs='KBAET' or @afa_kulcs='NAM' or @afa_kulcs='TAM' then 0 else convert(numeric(18,3), @afa_kulcs) end) / 100 set @nBrutto = @netto * @nAfa RETURN @nBrutto END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Brutto2Netto] ( @nBar dbo.egyseg_Ar, @cAfa dbo.afakulcs ) RETURNS numeric(18,2) AS begin declare @nNar dbo.egyseg_Ar declare @nAfa dbo.egyseg_Ar declare @nSzorzo dbo.egyseg_Ar select @nAfa = afaertek from afa_kulcs where afakulcs=@cAfa select @nSzorzo = 1 + (@nAfa / 100) select @nNar = @nBar / @nSzorzo return isnull(@nNar,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create fUNCTION [CikkAkciosAr] ( @csz dbo.cikk_szam, @akccs dbo.kulcs, @dat dbo.datum ) RETURNS numeric(18,3) AS begin declare @ear dbo.egyseg_ar SELECT @ear=egyseg_ar from vevo_akcio where akciocsop = @akccs and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) and kdatum>=( select max(kdatum) from vevo_akcio where akciocsop = @akccs and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) ) return isnull(@ear,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE fUNCTION [CikkBruttoEladAr] ( @csz dbo.cikk_szam, @arcs dbo.kulcs ) RETURNS numeric(18,3) AS begin declare @ear dbo.egyseg_ar declare @dat char(7) set @dat=left(replace(convert(char,getdate(), 20 ),'-','.'),7) SELECT @ear=brutto_ar from vevo_ar_lista where arcsoport = @arcs and cikk_szam=@csz and datum=( select max(datum) from vevo_ar_lista where arcsoport = @arcs and datum<=@dat ) return isnull(@ear,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [CikkRabattFelar] (@arcsop int, @csz dbo.cikk_szam) RETURNS dbo.kedvezmeny AS BEGIN declare @felar dbo.kedvezmeny select @felar=felar from vevo_art inner join cikkek on cikk_szam=@csz and (vevo_art.szallito=cikkek.szallito or vevo_art.szallito=0) and (vevo_art.gyarto=cikkek.gyarto or vevo_art.gyarto=0) and (cikkek.cikkcsop2 like rtrim(vevo_art.cikk_csop) + '%' or rtrim(vevo_art.cikk_csop)=0) where arcsoport=@arcsop and sorrend=( select max(sorrend) from vevo_art inner join cikkek on cikk_szam=@csz and (vevo_art.szallito=cikkek.szallito or vevo_art.szallito=0) and (vevo_art.gyarto=cikkek.gyarto or vevo_art.gyarto=0) and (cikkek.cikkcsop2 like rtrim(vevo_art.cikk_csop) + '%' or rtrim(vevo_art.cikk_csop)=0) where arcsoport=@arcsop ) RETURN isnull(@felar, 0) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [CikkUtBeszAr] ( @csz dbo.cikk_szam ) RETURNS numeric(18,3) AS begin declare @ear dbo.egyseg_ar declare @tkedv dbo.kedvezmeny declare @vkedv dbo.kedvezmeny SELECT @ear=besz_ar, @tkedv=tkedv, @vkedv=vkedv from dbo.utolso_besz_ar(@csz) IF dbo.xrfuggveny('UtBeszKedvezm')='I' set @ear=@ear*(100-@tkedv)*(100-@vkedv)/10000 return isnull(@ear,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create function [DatumTipus] (@dat datum, @vdat datum, @csz cikk_szam, @mai_dat datum) returns char(1) as begin declare @tip char(1) declare @maxdat datum set @maxdat='' if len(@vdat)>0 and @vdat<@mai_dat begin set @tip='3' --már lejárt end else begin if @dat>@mai_dat begin set @tip='2' --még nem kezdődött end else begin if (select count(*) from vevoarak where vevo=0 and cikk_szam=@csz and datum<=@mai_dat and (len(vdatum)=0 or (len(vdatum)>0 and @mai_dat<=vdatum)))>0 -- van ár begin select @maxdat=max(datum) from vevoarak where vevo=0 and cikk_szam=@csz and datum<=@mai_dat and (len(vdatum)=0 or (len(vdatum)>0 and @mai_dat<=vdatum)) if @dat=@maxdat set @tip='1' if @dat<@maxdat set @tip='3' end else --nincs ár begin set @tip='3' --már lejárt end end end return @tip end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [DatumTipusVevo] ( @vevo kulcs, @dat datum, @vdat datum, @csz cikk_szam, @mai_dat datum, @arcs kulcs ) returns char(1) as begin declare @tip char(1) declare @maxdat datum set @maxdat='' if len(@vdat)>0 and @vdat<@mai_dat begin set @tip='3' --már lejárt end else begin if @dat>@mai_dat begin set @tip='2' --még nem kezdődött end else begin if @dat=@mai_dat begin set @tip='1' --érvényes end else begin if (select count(*) from vevoarak where arcsoport=@arcs and vevo=@vevo and cikk_szam=@csz and datum<=@mai_dat and (len(vdatum)=0 or (len(vdatum)>0 and @mai_dat<=vdatum)))>0 -- van ár begin select @maxdat=max(datum) from vevoarak where arcsoport=@arcs and vevo=@vevo and cikk_szam=@csz and datum<=@mai_dat and (len(vdatum)=0 or (len(vdatum)>0 and @mai_dat<=vdatum)) if @dat>=@maxdat set @tip='1' if @dat<@maxdat set @tip='3' --if @dat>@maxdat set @tip='1' end else --nincs ár begin set @tip='3' --már lejárt end end end end return @tip end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [DayCount](@dayname varchar(20)) RETURNS varchar(20) AS BEGIN Declare @szam As int IF @dayname='Hétfő' select @szam = 1 ELSE IF @dayname='Kedd' select @szam = 2 ELSE IF @dayname='Szerda' select @szam = 3 ELSE IF @dayname='Csütörtök' select @szam = 4 ELSE IF @dayname='Péntek' select @szam = 5 ELSE IF @dayname='Szombat' select @szam = 6 ELSE IF @dayname='Vasárnap' select @szam = 7 ELSE select @szam = 0 Return @szam END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [DayName](@szam [int]) RETURNS varchar(20) AS BEGIN Declare @Name As varchar(20) IF @szam = 2 set @Name='Hétfő' ELSE IF @szam = 3 set @Name='Kedd' ELSE IF @szam = 4 set @Name='Szerda' ELSE IF @szam = 5 set @Name='Csütörtök' ELSE IF @szam = 6 set @Name='Péntek' ELSE IF @szam = 7 set @Name='Szombat' ELSE IF @szam = 1 set @Name='Vasárnap' ELSE set @Name = Str(@Szam); Return @Name END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [DomainSsz] (@domain varchar(50)) returns int as begin declare @domainssz int --megkeressük a domain sorszámát select @domainssz=count(*) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito like 'webshoppath%' and ertek=@domain if @domainssz=0 return 0 select @domainssz=right(azonosito,1) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito like 'webshoppath%' and ertek=@domain return @domainssz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [ElabeSzlaTetel] ( @cBsz dbo.bizonylat_szam, @nTetel dbo.bizonylat_tetel ) RETURNS dbo.egyseg_Ar AS begin Declare @Szlasz dbo.bizonylat_szam; Declare @Szlesz dbo.bizonylat_szam; Declare @nDb int; Declare @nSzleTet dbo.bizonylat_tetel; Declare @nSzleTetSum dbo.bizonylat_tetel; Declare @Va char(1); Declare @cMkod nvarchar(10) declare @nElabe dbo.egyseg_Ar select @Szlesz = vevo_szlef.bizszam, @Va = vevo_szlef.visszaru from vevo_szlat inner join vevo_szlef on vevo_szlat.bizszam = vevo_szlef.szlaszam where vevo_szlat.bizszam = @cBsz group by vevo_szlat.bizszam, vevo_szlef.bizszam, vevo_szlef.visszaru select @nDb = @@ROWCOUNT if @nDb = 1 begin select @cMkod = 'vevo_szle' Select @nElabe = dbo.ElabeSzleTetel(@cMkod,@Szlesz,@nTetel) end else begin Select @nSzleTetSum = 0; Declare Szlev CURSOR for select vevo_szlef.bizszam, vevo_szlet.tetel,vevo_szlef.visszaru from vevo_szlat inner join vevo_szlef on vevo_szlat.bizszam = vevo_szlef.szlaszam inner join vevo_szlet on vevo_szlef.bizszam = vevo_szlet.bizszam where vevo_szlef.szlaszam = @cBsz group by vevo_szlef.bizszam, vevo_szlet.tetel,vevo_szlef.visszaru order by vevo_szlef.bizszam, vevo_szlet.tetel open Szlev; fetch next from Szlev into @Szlesz, @nSzleTet, @Va while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN Select @nSzleTetSum = @nSzleTetSum + 1 select @cMkod = 'vevo_szle' if @nSzleTetSum = @nTetel Select @nElabe = dbo.ElabeSzleTetel(@cMkod,@Szlesz,@nSzleTet) end fetch next from Szlev into @Szlesz, @nSzleTet, @Va end Close Szlev; Deallocate Szlev; end return IsNull(@nElabe,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [ElabeSzleTetel] ( @cMkod nvarchar(10), @cBsz dbo.bizonylat_szam, @nTetel dbo.bizonylat_tetel ) RETURNS dbo.egyseg_Ar AS begin declare @nElabe dbo.egyseg_Ar select @nElabe = -(sum(mozgas.darab * keszlet.egyseg_ar)) from mozgas inner join keszlet on mozgas.sorszam = keszlet.sorszam where mozgas.MOZGASKOD = @cMkod and mozgas.BIZSZAM = @cBsz and Mozgas.TETEL = @nTetel return IsNull(@nElabe,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [ElsoMunkanap](@dat datetime) RETURNS varchar(20) AS BEGIN declare @d datetime set @d=@dat if DATEPART(WEEKDAY, @dat )=7 --szombat return left( dbo.myDToC(DATEADD (day , 2, @dat )) ,10) if DATEPART(WEEKDAY, @dat )=1 --vasárnap return left( dbo.myDToC(DATEADD (day , 1, @dat )) ,10) return left( dbo.myDToC( @dat ) ,10) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fcikk_webaruhaz] ( @domain varchar(50) ) -- visszadja egy adott domainben megjelenő cikkeket a csomagolási adatokkal RETURNS @xxcikk_webaruhaz TABLE ( cikk_szam cikk_szam, rend_csomag varchar(20), rend_egyseg int ) AS begin declare @domainssz int set @domainssz=dbo.DomainSsz(@domain) insert into @xxcikk_webaruhaz select cikkek.cikk_szam, case @domainssz when 1 then domain1 when 2 then domain2 when 3 then domain3 when 4 then domain4 when 5 then domain5 end, case @domainssz when 1 then case domain1 when 'darab' then 1 when 'karton' then cikkek.db_kart when 'raklap' then cikkek.db_kart*kart_rakl end when 2 then case domain2 when 'darab' then 1 when 'karton' then cikkek.db_kart when 'raklap' then cikkek.db_kart*kart_rakl end when 3 then case domain3 when 'darab' then 1 when 'karton' then cikkek.db_kart when 'raklap' then cikkek.db_kart*kart_rakl end when 4 then case domain4 when 'darab' then 1 when 'karton' then cikkek.db_kart when 'raklap' then cikkek.db_kart*kart_rakl end when 5 then case domain5 when 'darab' then 1 when 'karton' then cikkek.db_kart when 'raklap' then cikkek.db_kart*kart_rakl end end from cikk_webaruhaz inner join cikkek on cikkek.cikk_szam=cikk_webaruhaz.cikk_szam and len( case @domainssz when 1 then domain1 when 2 then domain2 when 3 then domain3 when 4 then domain4 when 5 then domain5 end)>0 return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fkomissiot](@bsz as bizonylat_szam ) Returns @tmpkomissio Table (sorrend bizonylat_tetel, tetel bizonylat_tetel, cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, szorzo szorzo, db_kart int, tizedes int, ame menny_egyseg, edarab mennyiseg, darab mennyiseg, darab_alapme mennyiseg, aru_szolg char(1), raktar_kod kulcs, raktar_nev nev, polc char(14), keszlet mennyiseg, komissiozva mennyiseg, vonalkod varchar(14), br_suly mennyiseg) As begin declare @_param as int /* visszadja a komissiózandó tételeket a készlettel, annak függvényében, hogy egy adott raktárból, vagy a termék alapértelmezett raktárából kell komissiózni */ set @_param=convert(integer, dbo.xrfuggveny('VEVO_KOMISSIO_RAKTAR')) if @_param=0 begin insert into @tmpkomissio SELECT ROW_NUMBER() OVER (ORDER BY raktarak.nev, dbo.cikkek.POLC, vvevo_rent.CIKK_NEV), dbo.vvevo_rent.TETEL, dbo.vvevo_rent.CIKK_SZAM, dbo.vvevo_rent.CIKK_NEV, dbo.vvevo_rent.MENNY_EGYS, dbo.vvevo_rent.szorzo, dbo.cikkek.db_kart, dbo.cikkek.tizedes, dbo.cikkek.menny_egys as ame, dbo.vvevo_rent.EDARAB, dbo.vvevo_rent.DARAB, dbo.vvevo_rent.DARAB*dbo.vvevo_rent.szorzo, dbo.vvevo_rent.aru_szolg, raktarak.kod, raktarak.nev, dbo.cikkek.POLC, ISNULL(SUM(dbo.keszlet.DARAB), 0) AS keszlet, ISNULL(dbo.vwkomissio.komissiozva, 0) AS komissiozva, isnull(vonal.vonalkod,''), cikkek.db_br_sulya * (dbo.vvevo_rent.szorzo * dbo.vvevo_rent.darab-ISNULL(dbo.vwkomissio.komissiozva, 0)) AS br_suly FROM dbo.vvevo_rent INNER JOIN dbo.cikkek ON dbo.vvevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM inner join raktarak on raktarak.kod=cikkek.raktar_kod left OUTER JOIN keszlet ON dbo.keszlet.CIKK_SZAM = dbo.vvevo_rent.CIKK_SZAM and keszlet.raktar_kod=cikkek.raktar_kod left outer join vonal on vvevo_rent.cikk_szam = vonal.cikk_szam and alap='1' left outer join vwkomissio on vvevo_rent.bizszam=vwkomissio.rendel_bsz and vvevo_rent.tetel=vwkomissio.rendel_tetel where dbo.vvevo_rent.BIZSZAM=@bsz and cikkek.aru_szolg='1' GROUP BY dbo.vvevo_rent.BIZSZAM, dbo.vvevo_rent.TETEL, dbo.vvevo_rent.CIKK_NEV, dbo.vvevo_rent.MENNY_EGYS, dbo.vvevo_rent.szorzo, dbo.cikkek.db_kart, dbo.cikkek.tizedes, dbo.cikkek.menny_egys, dbo.vvevo_rent.EDARAB, dbo.vvevo_rent.DARAB, dbo.vvevo_rent.DARAB*dbo.vvevo_rent.szorzo, dbo.vvevo_rent.aru_szolg, dbo.vvevo_rent.CIKK_SZAM, raktarak.kod, raktarak.nev, dbo.cikkek.POLC, vonal.vonalkod, dbo.vwkomissio.komissiozva, cikkek.db_br_sulya end else begin insert into @tmpkomissio SELECT ROW_NUMBER() OVER (ORDER BY raktarak.nev, dbo.cikkek.POLC, vvevo_rent.CIKK_NEV), dbo.vvevo_rent.TETEL, dbo.vvevo_rent.CIKK_SZAM, dbo.vvevo_rent.CIKK_NEV, dbo.vvevo_rent.MENNY_EGYS, dbo.vvevo_rent.szorzo, dbo.cikkek.db_kart, dbo.cikkek.tizedes, dbo.cikkek.menny_egys as ame, dbo.vvevo_rent.EDARAB, dbo.vvevo_rent.DARAB, dbo.vvevo_rent.DARAB*dbo.vvevo_rent.szorzo, dbo.vvevo_rent.aru_szolg, raktarak.kod, raktarak.nev, dbo.cikkek.POLC, ISNULL(SUM(dbo.keszlet.DARAB), 0) AS keszlet, ISNULL(dbo.vwkomissio.komissiozva, 0) AS komissiozva, isnull(vonal.vonalkod,''), cikkek.db_br_sulya * (dbo.vvevo_rent.szorzo * dbo.vvevo_rent.darab-ISNULL(dbo.vwkomissio.komissiozva, 0)) AS br_suly FROM dbo.vvevo_rent INNER JOIN dbo.cikkek ON dbo.vvevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM inner join raktarak on raktarak.kod=@_param left OUTER JOIN keszlet ON dbo.keszlet.CIKK_SZAM = dbo.vvevo_rent.CIKK_SZAM and keszlet.raktar_kod=@_param left outer join vonal on vvevo_rent.cikk_szam = vonal.cikk_szam and alap='1' left outer join vwkomissio on vvevo_rent.bizszam=vwkomissio.rendel_bsz and vvevo_rent.tetel=vwkomissio.rendel_tetel where dbo.vvevo_rent.BIZSZAM=@bsz and cikkek.aru_szolg='1' GROUP BY dbo.vvevo_rent.BIZSZAM, dbo.vvevo_rent.TETEL, dbo.vvevo_rent.CIKK_NEV, dbo.vvevo_rent.MENNY_EGYS, dbo.vvevo_rent.szorzo, dbo.cikkek.db_kart, dbo.cikkek.tizedes, dbo.cikkek.menny_egys, dbo.vvevo_rent.EDARAB, dbo.vvevo_rent.DARAB, dbo.vvevo_rent.DARAB*dbo.vvevo_rent.szorzo, dbo.vvevo_rent.aru_szolg, dbo.vvevo_rent.CIKK_SZAM, raktarak.kod, raktarak.nev, dbo.cikkek.POLC, vonal.vonalkod, dbo.vwkomissio.komissiozva, cikkek.db_br_sulya end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [FoglaltKeszletElozoAdottCikk](@csz cikk_szam, @raktar kulcs, @Prior int) RETURNS mennyiseg AS BEGIN /* kiszámolja, hogy adott prioritástól mennyit foglalok, BELEÉRTVE a param prioritását is */ Declare @ElozoFoglalasok dbo.mennyiseg Declare @AktFoglalas dbo.mennyiseg declare @ElozoPrior int declare @AktRaktar kulcs select @AktFoglalas=darab, @AktRaktar=raktar_kod from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and prioritas=@prior if @raktar<>0 and @AktRaktar<>0 and @AktRaktar<>@raktar set @AktFoglalas=0 select @ElozoPrior=isnull(max(prioritas),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and prioritas<@prior if @ElozoPrior=0 set @ElozoFoglalasok=0 else set @ElozoFoglalasok = dbo.FoglaltKeszletElozoAdottCikk(@csz, @raktar, @ElozoPrior) return @AktFoglalas + @ElozoFoglalasok END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [Folyoszamla] (@PartnerTip as char(1), @PartnerKod as kulcs) returns @folyoszamla table ( [tipus] [int] NOT NULL, [partner_tip] [char](1) NULL, [partner_kod] [int] NULL, [bizszam] [dbo].[bizonylat_szam] NOT NULL, [kulso_bsz] [varchar](12) NULL, [telj_dat] [dbo].[datum] NULL, [szla_dat] [dbo].[datum] NULL, [fiz_mod] [char](1) NULL, [fiz_hat] [dbo].[datum] NULL, [ertek] [dbo].[egyseg_ar] NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [kurzus] [dbo].[kurzus] NOT NULL ) as begin declare @mennyi as int declare @MPartnerKod as int if @PartnerTip='V' begin insert into @folyoszamla select * from FolyoszamlaVevo(@PartnerKod) select @mennyi=count(*) from vevo_szall where vevo_kod = @PartnerKod if @mennyi>0 begin select @MPartnerKod=szall_kod from vevo_szall where vevo_kod = @PartnerKod insert into @folyoszamla select * from FolyoszamlaSzall(@MPartnerKod) end end else begin insert into @folyoszamla select * from FolyoszamlaSzall(@PartnerKod) select @mennyi=count(*) from vevo_szall where szall_kod = @PartnerKod if @mennyi>0 begin select @MPartnerKod=vevo_kod from vevo_szall where szall_kod = @PartnerKod insert into @folyoszamla select * from FolyoszamlaVevo(@MPartnerKod) end end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [FolyoszamlaSzall] (@SzallKod as kulcs) returns @folyoszamla table ( [tipus] [int] NOT NULL, [partner_tip] [char](1) NULL, [partner_kod] [int] NULL, [bizszam] [dbo].[bizonylat_szam] NOT NULL, [kulso_bsz] [varchar](12) NULL, [telj_dat] [dbo].[datum] NULL, [szla_dat] [dbo].[datum] NULL, [fiz_mod] [char](1) NULL, [fiz_hat] [dbo].[datum] NULL, [ertek] [dbo].[egyseg_ar] NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [kurzus] [dbo].[kurzus] NOT NULL ) as begin insert into @folyoszamla select 2, 'S', @SzallKod, bizszam, '', telj_datum, szla_datum, fiz_modja, fiz_esed, brutto_ertek, penznem, kurzus from vszall_szla_ertek_pu where szallito=@SzallKod insert into @folyoszamla SELECT 4, 'S', @SzallKod, bankcsomagt.kivonat, '', bankcsomagf.datum, '', '', '', bankcsomagt.osszeg, bankcsomagt.penznem, bankcsomagt.kurzus FROM bankcsomagf INNER JOIN bankcsomagt ON bankcsomagf.kulcs = bankcsomagt.kulcs where partner_tip='S' and partner=@SzallKod insert into @folyoszamla select 6, 'S', @SzallKod, bizszam, hivszam, datum, '', '', '', osszeg, penznem, 1 from penztart where partner_tip='S' and partner=@SzallKod return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [FolyoszamlaVevo] (@VevoKod as kulcs) returns @folyoszamla table ( [tipus] [int] NOT NULL, [partner_tip] [char](1) NULL, [partner_kod] [int] NULL, [bizszam] [dbo].[bizonylat_szam] NOT NULL, [kulso_bsz] [varchar](12) NULL, [telj_dat] [dbo].[datum] NULL, [szla_dat] [dbo].[datum] NULL, [fiz_mod] [char](1) NULL, [fiz_hat] [dbo].[datum] NULL, [ertek] [dbo].[egyseg_ar] NOT NULL, [penznem] [dbo].[penznem] NOT NULL, [kurzus] [dbo].[kurzus] NOT NULL ) as begin insert into @folyoszamla select 1, 'V', @VevoKod, bizszam, '', telj_datum, szla_datum, fiz_modja, fiz_esed, brutto_ertek, penznem, kurzus from vvevo_szla_ertek_pu where vevo=@VevoKod insert into @folyoszamla SELECT 3, 'V', @VevoKod, bankcsomagt.kivonat, '', bankcsomagf.datum, '', '', '', bankcsomagt.osszeg, bankcsomagt.penznem, bankcsomagt.kurzus FROM bankcsomagf INNER JOIN bankcsomagt ON bankcsomagf.kulcs = bankcsomagt.kulcs where partner_tip='V' and partner=@VevoKod insert into @folyoszamla select 5, 'V', @VevoKod, bizszam, hivszam, datum, '', '', '', osszeg, penznem, 1 from penztart where partner_tip='V' and partner=@VevoKod return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create function [fpenztar_bank] () returns @penztar_bank table ( [datum] [dbo].[datum], [bank] [char](50) NULL, [bank_osszeg] [dbo].[egyseg_ar] NOT NULL, [bank_penznem] [dbo].[penznem] NOT NULL, [penztar] [char](50) NULL, [penztar_osszeg] [dbo].[egyseg_ar] NOT NULL, [penztar_penznem] [dbo].[penznem] NOT NULL ) as begin insert into @penztar_bank select * from vwbankpenztar_kozos insert into @penztar_bank select vwbank_penztar.datum, vwbank_penztar.nev, vwbank_penztar.osszeg, vwbank_penztar.penznem, '', 0, '' from vwbank_penztar left outer join vwbankpenztar_kozos on vwbank_penztar.datum=vwbankpenztar_kozos.datum and vwbank_penztar.osszeg=-vwbankpenztar_kozos.penztar_osszeg and vwbank_penztar.penznem=vwbankpenztar_kozos.penztar_penznem where bank_nev is null insert into @penztar_bank select vwpenztar_bank.datum, '', 0, '', vwpenztar_bank.nev, vwpenztar_bank.osszeg, vwpenztar_bank.penznem from vwpenztar_bank left outer join vwbankpenztar_kozos on vwpenztar_bank.datum=vwbankpenztar_kozos.datum and vwpenztar_bank.osszeg=-vwbankpenztar_kozos.bank_osszeg and vwpenztar_bank.penznem=vwbankpenztar_kozos.bank_penznem where bank_nev is null return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [futnyilv_tavolsag] () returns @_futnyilv_tavolsag table ( [vevo_szall] [char](1) NULL, [partner_kod] [int] NULL, [telep_kod] [char](4) NULL, [nev] [char](50) NULL, [iranyito] [char](50) NULL, [varos] [char](50) NULL, [cim] [char](50) NULL, [tavolsag] [numeric](18,1) NULL ) as begin insert into @_futnyilv_tavolsag select 'V', vevo_kod, vevo_tel.telep_kod, telep_nev, iranyito, varos, cim, isnull(tavolsag,0) from vevo_tel left outer join utnyilv_tavolsag on vevo_tel.vevo_kod= utnyilv_tavolsag.partner_kod and vevo_tel.telep_kod=utnyilv_tavolsag.telep_kod and utnyilv_tavolsag.vevo_szall='V' insert into @_futnyilv_tavolsag select 'S', szall_kod, '', szall_nev, iranyito, varos, cim, isnull(tavolsag,0) from szallito left outer join utnyilv_tavolsag on szallito.szall_kod= utnyilv_tavolsag.partner_kod and utnyilv_tavolsag.vevo_szall='S' return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fuvardij] ( @suly float, @ert float ) RETURNS float AS begin declare @ear float set @ear=0 if 0<=@suly and @suly<=1999 set @ear=700 if 2000<=@suly and @suly<=4999 set @ear=1000 if 5000<=@suly and @suly<=9999 set @ear=1100 if 10000<=@suly and @suly<=19999 set @ear=1300 if 20000<=@suly and @suly<=29999 set @ear=1600 if 30000<=@suly set @ear=10000 if @ert<=50000 set @ear=@ear + 150 else set @ear=@ear + 15000 return isnull(@ear,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fvevo_akcio_cikk] ( @tip dbo.kulcs, @nar dbo.egyseg_ar ) -- @tip=1 - @nar a beszerz_ar -- @tip=2 - ut_besz_ar a beszerz_ar RETURNS @xxfvevo_akcio_cikk TABLE ( AKCIOCSOP kulcs, akcio_tip kulcs, KDATUM datum, VDATUM datum, CIKK_SZAM cikk_szam, EGYSEG_AR egyseg_ar, SZOVEG varchar(254), ke_keszlet mennyiseg, ke_maradek mennyiseg, KICSODA kicsoda, MODOSITVA datum_ora, CIKK_NEV cikk_nev, CIKKCSOP2 char(18), GYARTO kulcs, SZALLITO kulcs, TELJESNEV nev, AFA_KULCS afakulcs, MENNY_EGYS menny_egyseg, nev nev, brutto_Ar egyseg_ar, ujsag char(1), afaertek egyseg_ar, penznem penznem, ut_besz_ar egyseg_ar, arres numeric(18,2), kifutott char(1) ) AS begin declare @kerek char(1) select @kerek = dbo.xrfuggveny('BruttoKerekit') insert into @xxfvevo_akcio_cikk SELECT vevo_akcio.AKCIOCSOP, vevo_akcio.akcio_tip, vevo_akcio.KDATUM, vevo_akcio.VDATUM, vevo_akcio.CIKK_SZAM, vevo_akcio.EGYSEG_AR, vevo_akcio.SZOVEG, vevo_akcio.ke_keszlet, vevo_akcio.ke_maradek, vevo_akcio.KICSODA, vevo_akcio.MODOSITVA, cikkek.CIKK_NEV, cikkek.CIKKCSOP2, cikkek.GYARTO, cikkek.SZALLITO, belepes.TELJESNEV, cikkek.AFA_KULCS, cikkek.MENNY_EGYS, vevo_akc_csoport.nev, case @kerek when 'I' then round(vevo_akcio.EGYSEG_AR * (100 + afa_kulcs.afaertek) / 100,0) else vevo_akcio.EGYSEG_AR * (100 + afa_kulcs.afaertek) / 100 end AS brutto_Ar, vevo_akcio.ujsag, afa_kulcs.afaertek, vevo_akc_csoport.penznem, case @tip when 1 then @nar else dbo.CikkUtBeszAr(vevo_akcio.CIKK_SZAM) end AS ut_besz_ar, 0, cikkek.kifutott FROM vevo_akcio INNER JOIN cikkek ON vevo_akcio.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN belepes ON vevo_akcio.KICSODA = belepes.ROVIDNEV INNER JOIN vevo_akc_csoport ON vevo_akcio.AKCIOCSOP = vevo_akc_csoport.kod INNER JOIN afa_kulcs ON cikkek.AFA_KULCS = afa_kulcs.AFAKULCS update @xxfvevo_akcio_cikk set arres= CASE WHEN ut_besz_ar = 0 THEN CASE WHEN egyseg_ar = 0 THEN 0 ELSE 999 END ELSE CASE WHEN (100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar) < - 999 THEN - 999 ELSE CASE WHEN (100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar) > 999 THEN 999 ELSE 100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar END END END return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fvevo_akcio_cikk_rovid]() RETURNS @xxfvevo_akcio_cikk TABLE ( AKCIOCSOP kulcs, akcio_tip kulcs, KDATUM datum, VDATUM datum, CIKK_SZAM cikk_szam, EGYSEG_AR egyseg_ar, brutto_Ar egyseg_ar, ke_keszlet mennyiseg, ke_maradek mennyiseg, nev nev ) AS begin declare @kerek char(1) select @kerek = dbo.xrfuggveny('BruttoKerekit') insert into @xxfvevo_akcio_cikk SELECT vevo_akcio.AKCIOCSOP, vevo_akcio.akcio_tip, vevo_akcio.KDATUM, vevo_akcio.VDATUM, vevo_akcio.CIKK_SZAM, vevo_akcio.EGYSEG_AR, case @kerek when 'I' then round(vevo_akcio.EGYSEG_AR * (100 + afa_kulcs.afaertek) / 100,0) else vevo_akcio.EGYSEG_AR * (100 + afa_kulcs.afaertek) / 100 end AS brutto_Ar, ke_keszlet,ke_maradek,vevo_akc_csoport.nev FROM vevo_akcio INNER JOIN cikkek ON vevo_akcio.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN afa_kulcs ON cikkek.AFA_KULCS = afa_kulcs.AFAKULCS inner join vevo_akc_csoport ON vevo_akcio.AKCIOCSOP = vevo_akc_csoport.kod return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fvevo_ar_cikk] ( @tip dbo.kulcs, @nar dbo.egyseg_ar, @dat datum, @csz cikk_szam ) -- @tip=1 - @nar a beszerz_ar -- @tip=2 - ut_besz_ar a beszerz_ar RETURNS @xxfvevo_ar_cikk TABLE (kod kulcs, arcsoport_nev nev, datum datum, cikk_szam cikk_szam, cikk_nev cikk_nev, afa_kulcs afakulcs, netto_ar egyseg_ar, brutto_ar egyseg_ar, beszerz_ar egyseg_ar, arres numeric(18,2), jav_felar kedvezmeny, modositva datum_ora, kicsoda kicsoda, teljesnev nev, szamitas_modja char(1), penznem penznem, beszerz_ar_br egyseg_ar ) AS begin insert into @xxfvevo_ar_cikk SELECT vvevo_arcsoport_lista.KOD, vvevo_arcsoport_lista.NEV AS arcsoport_nev, ISNULL(vevo_ar_lista.datum, LEFT(dbo.myGetDate(), 7)) AS datum, vvevo_arcsoport_lista.cikk_szam, vvevo_arcsoport_lista.CIKK_NEV, vvevo_arcsoport_lista.AFA_KULCS, ISNULL(vevo_ar_lista.netto_ar, 0) AS netto_ar, ISNULL(vevo_ar_lista.brutto_ar, 0) AS brutto_ar, case @tip when 1 then @nar else ISNULL(vvevo_arcsoport_lista.ut_besz_ar, 0) end AS beszerz_ar, ISNULL(vevo_ar_lista.arres, 0) AS arres, dbo.CikkRabattFelar(dbo.ListaArFelarKod(vevo_ar_lista.arcsoport), vevo_ar_lista.cikk_szam) AS jav_felar, ISNULL(vevo_ar_lista.modositva, '') AS modositva, ISNULL(vevo_ar_lista.kicsoda, '') AS kicsoda, ISNULL(belepes.TELJESNEV, '') AS teljesnev, vvevo_arcsoport_lista.szamitas_modja, vvevo_arcsoport_lista.penznem, case @tip when 1 then @nar else ISNULL(vvevo_arcsoport_lista.ut_besz_ar, 0) end * (100 + CONVERT(float, CASE WHEN afa_kulcs = 'AM' OR afa_kulcs = 'FA' THEN 0 ELSE afa_kulcs END)) / 100 AS beszerz_ar_br FROM vevo_ar_lista LEFT OUTER JOIN belepes ON vevo_ar_lista.kicsoda = belepes.ROVIDNEV RIGHT OUTER JOIN vvevo_arcsoport_lista ON vevo_ar_lista.arcsoport = vvevo_arcsoport_lista.KOD AND vevo_ar_lista.cikk_szam = vvevo_arcsoport_lista.cikk_szam where datum=@dat and vvevo_arcsoport_lista.cikk_szam=@csz update @xxfvevo_ar_cikk set arres= CASE WHEN beszerz_ar = 0 THEN CASE WHEN netto_ar = 0 THEN 0 ELSE 999 END ELSE 100 * (netto_ar - beszerz_ar) / beszerz_ar END return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvevo_szla_xml] () returns @szamla table ( [bizszam] [char](10) NOT NULL, [szla_datum] [datum] NOT NULL, [telj_datum] [datum] NOT NULL, [kadoszam] [varchar](15) NOT NULL, [keuadoszam] [varchar](20) NOT NULL, [knev] [varchar](70) NOT NULL, [kiranyito] [varchar](10) NOT NULL, [kvaros] [varchar](50) NOT NULL, [kcim] [varchar](50) NOT NULL, [vadoszam] [nev] NOT NULL, [veuadoszam] [nev] NOT NULL, [vnev] [nev] NOT NULL, [viranyito] [nev] NOT NULL, [vvaros] [nev] NOT NULL, [vcim] [nev] NOT NULL, [cikk_nev] [cikk_nev] NOT NULL, [vtsz] [varchar](14) NOT NULL, [mennyiseg] [numeric](18,3) NOT NULL, [menny_egys] [menny_egyseg] NOT NULL, [netto_ertek] [numeric](18,2) NOT NULL, [egyseg_ar] [numeric](18,2) NOT NULL, [afa_kulcs] [afakulcs] NOT NULL, [afa_ertek] [numeric](18,2) NOT NULL, [brutto_ertek] [numeric](18,2) NOT NULL, [szazalek_ertek] [numeric](18,2) NOT NULL, [kedvezmeny] [numeric](18,2) NOT NULL, [vkedvezmeny] [numeric](18,2) NOT NULL, [tkedvezmeny] [numeric](18,2) NOT NULL, [jelzo] [char](1) not null, [penznem] [char](3) not null, [modositva] [datum_ora] not null ) as begin -- declare @mennyi as int -- declare @MPartnerKod as int insert into @szamla select vevo_szlaf.BIZSZAM, vevo_szlaf.SZLA_DATUM, vevo_szlaf.TELJ_DATUM, replace(regisztral.adoszam,'Adószám:','') AS kadoszam, replace(regisztral.euadoszam,'EU adószám:','') AS keuadoszam, regisztral.felhasznalo, regisztral.iranyito, regisztral.varos, regisztral.cim, vevo_szlaf.ADOSZAM AS vadoszam, vevok.eu_adoszam AS veuadoszam, vevo_szlaf.VEVO_NEV, vevo_szlaf.IRANYITO AS viranyito, vevo_szlaf.VAROS AS vvaros, vevo_szlaf.CIM AS vcim, vevo_szlat.CIKK_NEV, cikkek.VTSZ, vevo_szlat.edarab * vevo_szlat.SZORZO AS mennyiseg, vevo_szlat.MENNY_EGYS, (100 - vevo_szlaf.kedvezmeny) * (100 - vevo_szlat.kedvezmeny) * vevo_szlat.edarab * vevo_szlat.SZORZO * vevo_szlat.EGYSEG_AR / 10000 AS netto_ertek, vevo_szlat.EGYSEG_AR, vevo_szlat.AFA_KULCS, (100 - vevo_szlaf.kedvezmeny) * (100 - vevo_szlat.kedvezmeny) * vevo_szlat.edarab * vevo_szlat.SZORZO * vevo_szlat.EGYSEG_AR * afa_kulcs.afaertek / 1000000 AS afa_ertek, ((100 - vevo_szlaf.kedvezmeny) * (100 - vevo_szlat.kedvezmeny) * vevo_szlat.edarab * vevo_szlat.SZORZO * vevo_szlat.EGYSEG_AR) * (100 + afa_kulcs.afaertek) / 1000000 AS brutto_ertek, 0, 0,vevo_szlaf.kedvezmeny,vevo_szlat.kedvezmeny, case when torolt='1' then 'T' else case when TORLO='1' then 'R' else case when visszaru='1' then 'V' else '' end end end, penznem, vevo_szlaf.modositva from vevo_szlaf INNER JOIN vevok ON vevo_szlaf.VEVO = vevok.VEVO_KOD INNER JOIN vevo_szlat ON vevo_szlaf.BIZSZAM = vevo_szlat.BIZSZAM INNER JOIN cikkek ON vevo_szlat.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN afa_kulcs ON vevo_szlat.AFA_KULCS = afa_kulcs.AFAKULCS CROSS JOIN regisztral update @szamla set kedvezmeny = 100 - ((100 - vkedvezmeny) * (100 - tkedvezmeny) / 100) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkeszlet]( @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bizom char(1) ) Returns @xxkeszlet TABLE ( cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, gyarto kulcs, szallito kulcs, cikkcsop2 char(18), odb mennyiseg, oert egyseg_ar ) As begin declare @xxtmpkeszlet table ( cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, gyarto kulcs, szallito kulcs, cikkcsop2 char(18), darab mennyiseg, ertek egyseg_ar ) -- kigyűjtés insert into @xxtmpkeszlet select keszlet.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, sum(darab) as odb, sum(darab*egyseg_ar) as oert from keszlet inner join cikkek on keszlet.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet.raktar_kod = @rkod or @rkod = 0) and (keszlet.bizomanyos = @bizom or @bizom = '2') group by keszlet.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 union all select keszlet_negativ.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, -sum(darab), -sum(darab*ut_besz_ar) from keszlet_negativ inner join cikkek on keszlet_negativ.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet_negativ.raktar_kod = @rkod or @rkod = 0) group by keszlet_negativ.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 union all select foglalasok.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, -sum(darab), -sum(darab*ut_besz_ar) from foglalasok inner join cikkek on foglalasok.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (foglalasok.raktar_kod = @rkod or @rkod = 0) and meddig >= dbo.mygetdate() group by foglalasok.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 --végleges insert into @xxkeszlet select cikk_szam, cikk_nev, menny_egys, gyarto, szallito, cikkcsop2, sum(darab) as odb, sum(ertek) as oert from @xxtmpkeszlet group by cikk_szam, cikk_nev, menny_egys, gyarto, szallito, cikkcsop2 order by cikk_nev Return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkeszlet_fogl_nelk]( @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bizom char(1) ) Returns @xxkeszlet TABLE ( cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, gyarto kulcs, szallito kulcs, cikkcsop2 char(18), odb mennyiseg, oert egyseg_ar ) As begin declare @xxtmpkeszlet table ( cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, gyarto kulcs, szallito kulcs, cikkcsop2 char(18), darab mennyiseg, ertek egyseg_ar ) -- kigyűjtés insert into @xxtmpkeszlet select keszlet.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, sum(darab) as odb, sum(darab*egyseg_ar) as oert from keszlet inner join cikkek on keszlet.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet.raktar_kod = @rkod or @rkod = 0) and (keszlet.bizomanyos = @bizom or @bizom = '2') group by keszlet.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 union all select keszlet_negativ.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, -sum(darab), -sum(darab) * cikkek.ut_besz_ar from keszlet_negativ inner join cikkek on keszlet_negativ.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet_negativ.raktar_kod = @rkod or @rkod = 0) group by keszlet_negativ.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, cikkek.ut_besz_ar /* union all select foglalasok.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, -sum(darab), -sum(darab) * cikkek.ut_besz_ar from foglalasok inner join cikkek on foglalasok.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (foglalasok.raktar_kod = @rkod or @rkod = 0) and meddig >= dbo.mygetdate() group by foglalasok.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, cikkek.ut_besz_ar */ --végleges insert into @xxkeszlet select cikk_szam, cikk_nev, menny_egys, gyarto, szallito, cikkcsop2, sum(darab) as odb, sum(ertek) as oert from @xxtmpkeszlet group by cikk_szam, cikk_nev, menny_egys, gyarto, szallito, cikkcsop2 order by cikk_nev Return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkeszlet_negativ]( @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bizom char(1) ) Returns @xxkeszlet TABLE ( cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, gyarto kulcs, szallito kulcs, cikkcsop2 char(18), odb mennyiseg, oert egyseg_ar ) As begin declare @xxtmpkeszlet table ( cikk_szam cikk_szam, cikk_nev cikk_nev, menny_egys menny_egyseg, gyarto kulcs, szallito kulcs, cikkcsop2 char(18), darab mennyiseg, ertek egyseg_ar ) -- kigyűjtés insert into @xxtmpkeszlet select keszlet.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, sum(darab) as odb, sum(darab*egyseg_ar) as oert from keszlet inner join cikkek on keszlet.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet.raktar_kod = @rkod or @rkod = 0) and (keszlet.bizomanyos = @bizom or @bizom = '2') group by keszlet.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 union all select keszlet_negativ.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, -sum(darab), 0 from keszlet_negativ inner join cikkek on keszlet_negativ.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet_negativ.raktar_kod = @rkod or @rkod = 0) group by keszlet_negativ.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 --végleges insert into @xxkeszlet select cikk_szam, cikk_nev, menny_egys, gyarto, szallito, cikkcsop2, sum(darab) as odb, sum(ertek) as oert from @xxtmpkeszlet group by cikk_szam, cikk_nev, menny_egys, gyarto, szallito, cikkcsop2 having sum(darab)<0 order by cikk_nev Return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fvqSzallCikkHo] ( @datum char(4), @szall kulcs ) RETURNS @xx_tetelek TABLE (szallito kulcs, cikk_szam cikk_szam, evho char(7), db1 mennyiseg, o1 egyseg_ar, db2 mennyiseg, o2 egyseg_ar, db3 mennyiseg, o3 egyseg_ar, db4 mennyiseg, o4 egyseg_ar, db5 mennyiseg, o5 egyseg_ar, db6 mennyiseg, o6 egyseg_ar, db7 mennyiseg, o7 egyseg_ar, db8 mennyiseg, o8 egyseg_ar, db9 mennyiseg, o9 egyseg_ar, db10 mennyiseg, o10 egyseg_ar, db11 mennyiseg, o11 egyseg_ar, db12 mennyiseg, o12 egyseg_ar ) AS begin declare @xxtmptetelek table (szallito kulcs, cikk_szam cikk_szam, evho char(7), db1 mennyiseg, o1 egyseg_ar, db2 mennyiseg, o2 egyseg_ar, db3 mennyiseg, o3 egyseg_ar, db4 mennyiseg, o4 egyseg_ar, db5 mennyiseg, o5 egyseg_ar, db6 mennyiseg, o6 egyseg_ar, db7 mennyiseg, o7 egyseg_ar, db8 mennyiseg, o8 egyseg_ar, db9 mennyiseg, o9 egyseg_ar, db10 mennyiseg, o10 egyseg_ar, db11 mennyiseg, o11 egyseg_ar, db12 mennyiseg, o12 egyseg_ar ) insert into @xxtmptetelek SELECT szallito, cikk_szam, LEFT(telj_datum, 7) AS evho, sum(szall_szlat.szorzo*darab) AS db1, sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000) AS o1, 0 AS db2, 0 AS o2, 0 AS db3, 0 AS o3, 0 AS db4, 0 AS o4, 0 AS db5, 0 AS o5, 0 AS db6, 0 AS o6, 0 AS db7, 0 AS o7, 0 AS db8, 0 AS o8, 0 AS db9, 0 AS o9, 0 AS db10, 0 AS o10, 0 AS db11, 0 AS o11, 0 AS db12, 0 AS o12 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '01' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, sum(szall_szlat.szorzo*darab) AS db2, sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000) AS o2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '02' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '03' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '04' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '05' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '06' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '07' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '08' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '09' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0, 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '10' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000), 0, 0 FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '11' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT szallito, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szall_szlat.szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - szall_szlaf.kedvezmeny) * (100 - szall_szlat.kedvezmeny) / 10000) FROM szall_szlaf INNER JOIN szallito ON szallito.szall_kod = szall_szlaf.szallito INNER JOIN szall_szlat ON szall_szlaf.bizszam = szall_szlat.bizszam AND substring(telj_datum, 6, 2) = '12' GROUP BY szallito, cikk_szam, LEFT(telj_datum, 7) --véglegesítés if @szall=0 begin insert into @xx_tetelek select 1,cikk_szam,left(evho,4),sum(db1),sum(o1),sum(db2),sum(o2),sum(db3),sum(o3),sum(db4),sum(o4),sum(db5),sum(o5), sum(db6),sum(o6),sum(db7),sum(o7),sum(db8),sum(o8),sum(db9),sum(o9),sum(db10),sum(o10),sum(db11),sum(o11),sum(db12),sum(o12) from @xxtmptetelek where left(evho,4)=@datum group by cikk_szam,left(evho,4) end else begin insert into @xx_tetelek select 1,cikk_szam,left(evho,4),sum(db1),sum(o1),sum(db2),sum(o2),sum(db3),sum(o3),sum(db4),sum(o4),sum(db5),sum(o5), sum(db6),sum(o6),sum(db7),sum(o7),sum(db8),sum(o8),sum(db9),sum(o9),sum(db10),sum(o10),sum(db11),sum(o11),sum(db12),sum(o12) from @xxtmptetelek where left(evho,4)=@datum and szallito=@szall group by cikk_szam,left(evho,4) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fvqVevoCikkHo] ( @datum char(4), @svevo kulcs, @v_cs kulcs, @v_l kulcs, @v_c kulcs, @v_t kulcs ) RETURNS @xx_tetelek TABLE (vevo kulcs, cikk_szam cikk_szam, evho char(7), db1 mennyiseg, o1 egyseg_ar, db2 mennyiseg, o2 egyseg_ar, db3 mennyiseg, o3 egyseg_ar, db4 mennyiseg, o4 egyseg_ar, db5 mennyiseg, o5 egyseg_ar, db6 mennyiseg, o6 egyseg_ar, db7 mennyiseg, o7 egyseg_ar, db8 mennyiseg, o8 egyseg_ar, db9 mennyiseg, o9 egyseg_ar, db10 mennyiseg, o10 egyseg_ar, db11 mennyiseg, o11 egyseg_ar, db12 mennyiseg, o12 egyseg_ar ) AS begin declare @xxtmptetelek table (vevo kulcs, cikk_szam cikk_szam, evho char(7), db1 mennyiseg, o1 egyseg_ar, db2 mennyiseg, o2 egyseg_ar, db3 mennyiseg, o3 egyseg_ar, db4 mennyiseg, o4 egyseg_ar, db5 mennyiseg, o5 egyseg_ar, db6 mennyiseg, o6 egyseg_ar, db7 mennyiseg, o7 egyseg_ar, db8 mennyiseg, o8 egyseg_ar, db9 mennyiseg, o9 egyseg_ar, db10 mennyiseg, o10 egyseg_ar, db11 mennyiseg, o11 egyseg_ar, db12 mennyiseg, o12 egyseg_ar, vcs kulcs, vl kulcs, vc kulcs, vt kulcs ) insert into @xxtmptetelek SELECT vevo, cikk_szam, LEFT(telj_datum, 7) AS evho, sum(szorzo*darab) AS db1, sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000) AS o1, 0 AS db2, 0 AS o2, 0 AS db3, 0 AS o3, 0 AS db4, 0 AS o4, 0 AS db5, 0 AS o5, 0 AS db6, 0 AS o6, 0 AS db7, 0 AS o7, 0 AS db8, 0 AS o8, 0 AS db9, 0 AS o9, 0 AS db10, 0 AS o10, 0 AS db11, 0 AS o11, 0 AS db12, 0 AS o12, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '01' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, sum(szorzo*darab) AS db2, sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000) AS o2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '02' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '03' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '04' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '05' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '06' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '07' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '08' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '09' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '10' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), 0, 0, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '11' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(szorzo*darab), sum(kurzus * darab * egyseg_ar * (100 - vevo_szlef.kedvezmeny) * (100 - vevo_szlet.kedvezmeny) / 10000), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet FROM vevo_szlef INNER JOIN vevok ON vevok.vevo_kod = vevo_szlef.vevo INNER JOIN vevo_szlet ON vevo_szlef.bizszam = vevo_szlet.bizszam AND substring(telj_datum, 6, 2) = '12' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7), vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet --véglegesítés if @svevo=0 begin insert into @xx_tetelek select 1,cikk_szam,left(evho,4),sum(db1),sum(o1),sum(db2),sum(o2),sum(db3),sum(o3),sum(db4),sum(o4),sum(db5),sum(o5), sum(db6),sum(o6),sum(db7),sum(o7),sum(db8),sum(o8),sum(db9),sum(o9),sum(db10),sum(o10),sum(db11),sum(o11),sum(db12),sum(o12) from @xxtmptetelek where left(evho,4)=@datum and (vcs=@v_cs or @v_cs=0) and (vl=@v_l or @v_l=0) and (vc=@v_c or @v_c=0) and (vt=@v_t or @v_t=0) group by cikk_szam,left(evho,4) end else begin insert into @xx_tetelek select 1,cikk_szam,left(evho,4),sum(db1),sum(o1),sum(db2),sum(o2),sum(db3),sum(o3),sum(db4),sum(o4),sum(db5),sum(o5), sum(db6),sum(o6),sum(db7),sum(o7),sum(db8),sum(o8),sum(db9),sum(o9),sum(db10),sum(o10),sum(db11),sum(o11),sum(db12),sum(o12) from @xxtmptetelek where left(evho,4)=@datum and vevo=@svevo group by cikk_szam,left(evho,4) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvutokalk]( @kdat char(10), @vdat char(10), @gyarto kulcs, @cikkcs varchar(18), @rakk int) Returns @xxutokalk Table (cikk_szam varchar(30), cikk_nev varchar(80), akt_onkolt numeric(18,3), termelt_db numeric(18,3), termelt_ertek numeric(18,3), felh_db numeric(18,3), felh_ertek numeric(18,3), felh_ar numeric(18,3), uj_ar numeric(18,3) ) As begin /* declare @tmputokalk Table (cikk_szam varchar(30), cikk_nev varchar(80), akt_onkolt numeric(18,3), termelt_db numeric(18,3), termelt_ertek numeric(18,3), felh_db numeric(18,3), felh_ertek numeric(18,3), felh_ar numeric(18,3), uj_ar numeric(18,3) ) */ insert into @xxutokalk --@tmputokalk select diszpo.cikk_szam, cikkek.cikk_nev, isnull(onkoltar.egyseg_ar,0) as akt_onkolt, sum(keszre1.darab) as termelt_db, sum( keszre1.darab * k1.egyseg_ar) as termelt_ertek, 0, sum(isnull(vterm_anyag_felh.ertek,0)) as ertek, 0, 0 from diszpo inner join keszre1 on diszpo.kulcs = keszre1.diszpo inner join cikkek on diszpo.cikk_szam=cikkek.cikk_szam inner join mozgas as m1 on m1.bizszam=keszre1.kulcs and m1.mozgaskod='term_be' inner join keszlet as k1 on m1.sorszam=k1.sorszam left outer join vterm_anyag_felh on diszpo.kulcs=vterm_anyag_felh.diszpo left outer join onkoltar on diszpo.cikk_szam=onkoltar.cikk_szam where left(modido,10)>=@kdat and left(modido,10)<=@vdat and (@gyarto=0 or cikkek.gyarto=@gyarto) and (@cikkcs='' or cikkek.cikkcsop2 like @cikkcs+'%') and (@rakk=0 or diszpo.raktar_kod=@rakk) group by diszpo.cikk_szam, cikkek.cikk_nev, onkoltar.egyseg_ar /* ezt vajon miért tettük be? insert into @tmputokalk select k2.cikk_szam,cikkek.cikk_nev, isnull(onkoltar.egyseg_ar,0) as akt_onkolt, 0,0, sum(-m2.darab) as felh_db, sum(k2.egyseg_ar*(-m2.darab)) as felh_ertek, sum(k2.egyseg_ar*(-m2.darab))/sum(-m2.darab) as felh_ar, 0 from diszpo inner join keszre1 on diszpo.kulcs = keszre1.diszpo inner join keszre2 on keszre1.kulcs = keszre2.kulcs inner join mozgas as m2 on m2.bizszam=keszre2.kulcs and m2.mozgaskod='term_ki' and m2.tetel=keszre2.tetel inner join keszlet as k2 on m2.sorszam=k2.sorszam inner join cikkek on k2.cikk_szam=cikkek.cikk_szam left outer join onkoltar on cikkek.cikk_szam=onkoltar.cikk_szam where left(modido,10)>=@kdat and left(modido,10)<=@vdat and (@gyarto=0 or cikkek.gyarto=@gyarto) and (@cikkcs='' or cikkek.cikkcsop2 like @cikkcs+'%') and (@rakk=0 or diszpo.raktar_kod=@rakk) group by k2.cikk_szam, cikkek.cikk_nev, onkoltar.egyseg_ar order by k2.cikk_szam insert into @xxutokalk select cikk_szam,cikk_nev,akt_onkolt,sum(termelt_db),sum(termelt_ertek), sum(felh_db),sum(felh_ertek),sum(felh_ar),sum(uj_ar) from @tmputokalk group by cikk_szam,cikk_nev,akt_onkolt */ return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [fvwtermeles] ( @alap numeric(18,2), @irany int, @fcsz cikk_szam, @kics kicsoda ) RETURNS @xx_termeles TABLE (cikk_szam cikk_szam, cikk_nev cikk_nev, darab mennyiseg, szazalek mennyiseg, egyseg_ar egyseg_ar, ertek egyseg_ar, kicsoda kicsoda ) AS begin insert into @xx_termeles select cikk_szam, cikk_nev, SUM(darab) AS darab, case @alap when 0 then 0 else SUM(darab)*100/@alap end, SUM(darab * egyseg_ar) / SUM(darab) AS egyseg_ar, SUM(darab * egyseg_ar) AS ertek, kicsoda from wtermeles group by cikk_szam, cikk_nev, kicsoda, irany, jel, focikk_szam having irany = @irany and jel = '*' and kicsoda=@kics and focikk_szam=@fcsz return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [heti_atfedes_orara] (@het1 char(7), @het2 char(7), @kido1 char(5), @vido1 char(5), @kido2 char(5), @vido2 char(5)) RETURNS int AS BEGIN declare @i int set @i=1 while @i<8 begin if len(rtrim(substring(@het1,@i,1)))>0 and len(rtrim(substring(@het2,@i,1)))>0 begin if (@kido1>=@kido2 and @kido1<=@vido2) or (@Vido1>=@kido2 and @Vido1<=@vido2) or (@kido2>=@kido1 and @kido2<=@vido1) or (@Vido2>=@kido1 and @Vido2<=@vido1) return 1 end set @i = @i +1 end RETURN 0 END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [keresztarfolyam] (@mit_pn dbo.penznem, @mire_pn dbo.penznem) RETURNS kurzus AS BEGIN declare @mit_kurzus dbo.kurzus declare @mire_kurzus dbo.kurzus declare @kurz dbo.kurzus if @mit_pn = @mire_pn set @kurz = 1 else begin select @mit_kurzus = kurzus from deviza where penznem = @mit_pn select @mire_kurzus= kurzus from deviza where penznem = @mire_pn set @kurz = @mit_kurzus / @mire_kurzus -- set @kurz = @mire_kurzus / @mit_kurzus end return @kurz END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Keszlet_gyszam]( @csz cikk_szam ) RETURNS varchar(3000) AS BEGIN Declare @gyszam As varchar(3000) Declare @gysz varchar(20) Declare @kozos varchar(20) declare @j int declare @lgysz int set @gyszam='' set @kozos='' set @lgysz=0 if (SELECT dat_tipus FROM cikkek WHERE cikk_szam=@csz ) ='X' --csak gyári számos begin if (SELECT isnull(count(*),0) FROM keszlet WHERE cikk_szam=@csz and len(ltrim(GYARI_SZAM))>0 ) >0 begin DECLARE cgyariszam CURSOR for SELECT rtrim(ltrim(GYARI_SZAM)) FROM keszlet WHERE cikk_szam=@csz and len(ltrim(GYARI_SZAM))>0 order by rtrim(ltrim(GYARI_SZAM)) open cgyariszam fetch next from cgyariszam into @gysz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if len(rtrim(@kozos))>=2 and len(@gysz) = @lgysz and len(@gysz) > 2 begin set @j=2 while @j>=2 and @j<=len(@kozos) and left(@kozos,@j)=left(@gysz,@j) begin set @j=@j + 1 end if len(@kozos)>@j begin set @kozos=@gysz set @gyszam=@gyszam + @gysz + '; ' end else begin set @kozos=left(@kozos,@j-1) set @gyszam=@gyszam + '*' + substring(@gysz,@j,len(@gysz)-@j+1) + '; ' end end else begin set @gyszam=@gyszam + @gysz + '; ' set @kozos=@gysz end set @lgysz=len(@gysz) END fetch next from cgyariszam into @gysz end close cgyariszam deallocate cgyariszam end end if len(rtrim(@gyszam))>0 set @gyszam='Gy.sz.: ' + @gyszam Return @gyszam END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO -- ============================================= -- Author: -- Create date: -- Description: -- ============================================= CREATE FUNCTION [LastDateOfMonth] (@dat char(10)) RETURNS char(10) AS BEGIN DECLARE @Month int, @MyDate datetime SET @MyDate = @dat SET @Month = MONTH(@MyDate) WHILE MONTH(@MyDate + 1) = @Month SET @MyDate = @MyDate + 1 RETURN cast(year(@MyDate) as char(4)) +'.' + dbo.strzero( month(@MyDate) ,2) + '.' + dbo.strzero ( day(@MyDate) ,2) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [Legyarthato]( @csz cikk_szam, @raktar kulcs, @Prior int ) RETURNS int AS BEGIN Declare @valasz int select @valasz=(max(allapot)) from dbo.PriorGyarHatralek(@csz,@raktar,@Prior) Return @valasz END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [lejarat_datuma] ( @bsz bizonylat_szam, @tet bizonylat_tetel ) RETURNS varchar(100) AS begin declare @lejar varchar(1000) declare @szlsz bizonylat_szam declare @db float declare @dat varchar(10) declare @dat1 varchar(10) declare @szi int set @lejar='' if (select dat_tipus from cikkek where CIKK_SZAM=(select CIKK_SZAM from vevo_szlat where BIZSZAM=@bsz and TETEL=@tet))='S' and (select left(azonosito,8) from elesito)='031-0098' begin select @szlsz=bizszam from vevo_szlef where szlaszam=@bsz DECLARE cgyariszam CURSOR for SELECT edarab,gydatum,szav_ido FROM vmozgas_keszlet WHERE bizszam=@szlsz and tetel=@tet and mozgaskod='vevo_szle' --order by rtrim(ltrim(GYARI_SZAM)) open cgyariszam fetch next from cgyariszam into @db, @dat, @szi while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if len(@dat)>0 begin --set @dat1=dbo.myctod(@dat) + @szi set @lejar=@lejar + 'Lejárat: '+left(dbo.mydtoc(dbo.myctod(@dat) + @szi) ,10)+ str( - @db,10,3)+'; ' end END fetch next from cgyariszam into @db, @dat, @szi end close cgyariszam deallocate cgyariszam end return isnull(@lejar,'') end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [lejarat_datuma1] ( @bsz bizonylat_szam, @tet bizonylat_tetel ) RETURNS varchar(100) AS begin declare @lejar varchar(1000) declare @szlsz bizonylat_szam declare @db float declare @dat varchar(10) declare @dat1 varchar(10) declare @szi int set @lejar='' if (select dat_tipus from cikkek where CIKK_SZAM=(select CIKK_SZAM from vevo_szlet where BIZSZAM=@bsz and TETEL=@tet))='S' and (select left(azonosito,8) from elesito)='031-0098' begin DECLARE cgyariszam CURSOR for SELECT edarab,gydatum,szav_ido FROM vmozgas_keszlet WHERE bizszam=@bsz and tetel=@tet and mozgaskod='vevo_szle' open cgyariszam fetch next from cgyariszam into @db, @dat, @szi while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if len(@dat)>0 begin set @lejar=@lejar + 'Lejárat: '+left(dbo.mydtoc(dbo.myctod(@dat) + @szi) ,10)+ str( - @db,10,3)+'; ' end END fetch next from cgyariszam into @db, @dat, @szi end close cgyariszam deallocate cgyariszam end return isnull(@lejar,'') end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [ListaArFelarKod] (@arcsop int) RETURNS kulcs AS BEGIN declare @FelarasKod As dbo.Kulcs select @FelarasKod = FelarasKod from vevo_arcsoport where kod = @arcsop select @FelarasKod = IsNull(@FelarasKod,0) Return @FelarasKod END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [MinValue](@v1 decimal(18,3), @v2 decimal(18,3)) RETURNS decimal(18,3) AS BEGIN Declare @ret decimal(18,3) if Abs(@v1) <= Abs(@v2) select @ret = @v1 else select @ret = @v2 return @ret END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [myCToD]( @datumido varchar(50) ) RETURNS datetime AS BEGIN RETURN cast( replace(@datumido, '.', '-') as datetime) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [myDOW]() RETURNS int AS BEGIN RETURN DATEPART(weekday, GETDATE())-1 END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [myDToC]( @datumido datetime ) RETURNS varchar(20) AS BEGIN RETURN cast(year(@datumido) as char(4)) +'.' + dbo.strzero( month(@datumido) ,2) + '.' + dbo.strzero ( day(@datumido) ,2) + ' ' + dbo.strzero(Str(datepart(hour, @datumido),2),2) + ':' + dbo.strzero(Str(datepart(minute, @datumido),2),2) + ':' + dbo.strzero(Str(datepart(second, @datumido),2),2) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [myGetDate]() RETURNS varchar(30) AS BEGIN RETURN cast(year(getdate()) as char(4)) +'.' + dbo.strzero( month(getdate()) ,2) + '.' + dbo.strzero ( day(getdate()) ,2) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [myGetDateTime]() RETURNS varchar(20) AS BEGIN RETURN dbo.mygetdate() + ' ' + dbo.myGetTime() END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [myGetDateTimeOFFSET](@dat varchar(20)) RETURNS varchar(30) AS BEGIN declare @sdat varchar(30) set @sdat=convert(char,SYSDATETIMEOFFSET(), 20 ) --2022-01-07T19:20:30.45+01:00" RETURN replace(replace(rtrim(@dat),'.','-') + '.45' + right(rtrim(@sdat),6),' ','T') END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [myGetTime]() RETURNS char(8) AS BEGIN RETURN substring(replace(convert(char,getdate(), 20 ),'-','.'),12,8) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [myMax]( @sz1 float, @sz2 float ) RETURNS float AS BEGIN declare @val float if @sz1>@sz2 set @val=@sz1 else set @val=@sz2 RETURN @val END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [myMin]( @sz1 float, @sz2 float ) RETURNS float AS BEGIN declare @val float if @sz1>@sz2 set @val=@sz2 else set @val=@sz1 RETURN @val END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [NegativKeszletAdottCikk](@csz cikk_szam,@raktar kulcs) RETURNS mennyiseg AS BEGIN Declare @valasz mennyiseg select @valasz=isnull(sum(darab),0) from keszlet_negativ where cikk_szam=@csz and darab<>0 and (@raktar=0 or (@raktar<>0 and @raktar=raktar_kod)) Return @valasz END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Netto2Brutto] ( @nNar dbo.egyseg_Ar, @cAfa dbo.afakulcs ) RETURNS numeric(18,2) AS begin declare @nBar dbo.egyseg_Ar declare @nAfa dbo.egyseg_Ar declare @nSzorzo dbo.egyseg_Ar select @nAfa = afaertek from afa_kulcs where afakulcs=@cAfa select @nSzorzo = 1 + (@nAfa / 100) select @nBar = @nNar * @nSzorzo return isnull(@nBar,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [PartnerNev](@Tipus char(1), @nPartner kulcs) RETURNS varchar(50) AS BEGIN Declare @Name As dbo.nev IF @Tipus = 'V' Select @Name = VEVO_NEV From dbo.vevok where VEVO_KOD = @nPartner ELSE Select @Name = SZALL_NEV From dbo.szallito where SZALL_KOD = @nPartner ; Return @Name END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [PriorGyarHatralek](@csz varchar(30),@raktar int, @prior int) RETURNS @xxhatralek TABLE (acikk_szam varchar(30), szukseg decimal(18,3), el_szukseg decimal(18,3), rkeszlet decimal(18,3), okeszlet decimal(18,3), diszpo decimal(18,3), allapot int, min_keszlet decimal(18,3), rendelt decimal(18,3), egy_szukseg decimal(18,3) --1 db. legyártásához szükséges ) AS BEGIN declare @acsz varchar(30); declare @pcsz varchar(30) declare @db as decimal(18,3); declare @db1 as decimal(18,3); declare @phatralek as decimal(18,3); declare @keszlet as decimal(18,3); declare @tmpGyarHatralek table ( acikk_szam varchar(30), szukseg decimal(18,3), el_szukseg decimal(18,3), rkeszlet decimal(18,3), okeszlet decimal(18,3), diszpo decimal(18,3), min_keszlet decimal(18,3), rendelt decimal(18,3), egy_szukseg decimal(18,3) --1 db. legyártásához szükséges ); declare @tmpGyarHatralek1 table ( acikk_szam varchar(30), szukseg decimal(18,3) ); declare @tmpRendelt table ( acikk_szam varchar(30), rendelt decimal(18,3) ); insert into @tmpGyarHatralek SELECT dbo.anyagszukseglet.acikk_szam, dbo.anyagszukseglet.darab * dbo.diszpo.darab / anyagszukseglet.xdb, 0, 0, 0, 0, 0, 0, dbo.anyagszukseglet.darab FROM diszpo INNER JOIN anyagszukseglet ON diszpo.cikk_szam = anyagszukseglet.cikk_szam AND diszpo.raktar_kod = anyagszukseglet.raktar_kod and prioritas=@prior --LEFT OUTER JOIN keszlet ON anyagszukseglet.raktar_kod = keszlet.raktar_kod AND anyagszukseglet.acikk_szam = keszlet.cikk_szam --where prioritas=@prior update @tmpGyarHatralek set okeszlet = (select isnull(sum(darab),0) from keszlet where [@tmpGyarHatralek].acikk_szam =keszlet.cikk_szam and raktar_kod = @raktar) insert into @tmpGyarHatralek1 SELECT dbo.anyagszukseglet.acikk_szam, sum(dbo.anyagszukseglet.darab * dbo.diszpo.darab / anyagszukseglet.xdb) FROM dbo.diszpo INNER JOIN dbo.anyagszukseglet ON dbo.diszpo.cikk_szam = dbo.anyagszukseglet.cikk_szam and diszpo.darab>0 and prioritas<@prior --where prioritas<@prior --and dbo.diszpo.darab > 0 -- and dbo.diszpo.raktar_kod = @raktar group by dbo.anyagszukseglet.acikk_szam update @tmpGyarHatralek set el_szukseg=t1.szukseg FROM @tmpGyarHatralek t0, @tmpGyarHatralek1 t1 where t0.acikk_szam = t1.acikk_szam delete from @tmpGyarHatralek1 insert into @tmpGyarHatralek1 SELECT keszlet.cikk_szam , sum(keszlet.darab) FROM keszlet group by keszlet.cikk_szam update @tmpGyarHatralek set okeszlet=t1.szukseg FROM @tmpGyarHatralek t0, @tmpGyarHatralek1 t1 where t0.acikk_szam = t1.acikk_szam delete from @tmpGyarHatralek1 insert into @tmpGyarHatralek1 SELECT diszpo.cikk_szam , sum(diszpo.darab) FROM diszpo where darab>0 and exists (select cikk_szam from anyagszukseglet where diszpo.cikk_szam=anyagszukseglet.cikk_szam) group by diszpo.cikk_szam update @tmpGyarHatralek set diszpo=t1.szukseg FROM @tmpGyarHatralek t0, @tmpGyarHatralek1 t1 where t0.acikk_szam = t1.acikk_szam update @tmpGyarHatralek set min_keszlet = c.min_kesz from cikkek c where [@tmpGyarHatralek].acikk_szam =c.cikk_szam -- a vállalati készletet nézzük!!! update @tmpGyarHatralek set rkeszlet = (select isnull(sum(darab),0) from keszlet where [@tmpGyarHatralek].acikk_szam =keszlet.cikk_szam and raktar_kod = @raktar) delete from @tmpRendelt insert into @tmpRendelt SELECT cikk_szam , sum(edarab - darab) FROM szall_rent where edarab<>darab group by cikk_szam update @tmpGyarHatralek set rendelt = r.rendelt from @tmpRendelt r where [@tmpGyarHatralek].acikk_szam =r.acikk_szam and r.rendelt > 0 insert into @xxhatralek select acikk_szam, szukseg, el_szukseg, rkeszlet, okeszlet, diszpo, case when szukseg + el_szukseg <= rkeszlet then case when min_keszlet>0 and (rkeszlet + diszpo + rendelt - el_szukseg - szukseg < min_keszlet) and (rkeszlet - el_szukseg - szukseg >=0) then 15 else 1 end when egy_szukseg + el_szukseg <= rkeszlet then 17 when szukseg + el_szukseg <= okeszlet then 20 when szukseg + el_szukseg <= okeszlet + diszpo then 30 else 50 end ,min_keszlet,rendelt,egy_szukseg from @tmpGyarHatralek /* 1 - legyártható 15 - legyártható, de min. készlet alá fog csökkenni ha legyártjuk és van min. készlet 17 - részben legyártható (nem a teljes hátralék) 20 - legyártható rmozgással 30 - legyártható gyártással 50 - nem legyártható */ Return END /* el_szukseg + szukseg >= rkeszlet - min_keszlet el_szukseg + szukseg < rkeszlet (rkeszlet - el_szukseg - szukseg >=0 - + + > - rkeszlet - el_szukseg - szukseg < min_keszlet */ GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [pu_szla_kiegyenlit] ( @PTip char(1), @Partner dbo.kulcs, @bsz varchar(50) ) RETURNS numeric(18,2) AS BEGIN -- Declare the return variable here DECLARE @ResultVar numeric(18,2); DECLARE @ResultVarBank numeric(18,2); DECLARE @ResultVarPTar numeric(18,2); --set @ResultVarPTar=0 SELECT @ResultVarBank = SUM(dbo.bankcsomagb.ertek) FROM dbo.bankcsomagb INNER JOIN dbo.bankcsomagt ON dbo.bankcsomagb.kulcs = dbo.bankcsomagt.kulcs where dbo.bankcsomagt.partner_tip = @PTip and dbo.bankcsomagt.partner = @Partner and dbo.bankcsomagb.bizszam = @bsz GROUP BY dbo.bankcsomagb.bizszam, dbo.bankcsomagt.partner_tip, dbo.bankcsomagt.partner SELECT @ResultVarPTar = SUM(dbo.penztarb.ertek) FROM dbo.penztarb INNER JOIN dbo.penztart ON dbo.penztarb.kulcs = dbo.penztart.kulcs where dbo.penztart.partner_tip = @PTip and dbo.penztart.partner = @Partner and dbo.penztarb.bizszam = @bsz GROUP BY dbo.penztarb.bizszam, dbo.penztart.partner_tip, dbo.penztart.partner set @ResultVar= isnull(@ResultVarBank,0) + isnull(@ResultVarPTar,0) RETURN @ResultVar END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [RaktarKeszletAdottCikk](@csz cikk_szam,@raktar kulcs) RETURNS mennyiseg AS BEGIN Declare @valasz mennyiseg select @valasz=isnull(sum(darab),0) from keszlet where cikk_szam=@csz and (@raktar=0 or (@raktar<>0 and @raktar=raktar_kod)) Return @valasz END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Round_05]( @fnum1 as float, @kerekit as int) RETURNS float AS BEGIN if @kerekit=0 return @fnum1 declare @fReturn as float declare @fnum as float declare @iDiff as float declare @iszorz as int declare @inum as numeric(18,0) set @fNum=Round(Abs(@fNum1),0) set @iNum=Round(Abs(@fNum1),0) set @iDiff=@iNum % 10 --set @iDiff=@fNum % 10.0 if @fnum1<0 set @iszorz=-1 else set @iszorz=1 if @iDiff>=0 and @iDiff<=2 set @fReturn=@iszorz * (@fNum - @iDiff) else begin if @iDiff>=3 and @iDiff<=7 set @fReturn=@iszorz * (@fNum - @iDiff + 5) else set @fReturn=@iszorz * (@fNum - @iDiff + 10) end RETURN @fReturn END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Round5]( @fnum1 as float) RETURNS float AS BEGIN -- kerekít 5-re declare @fReturn as float declare @iSign as int if @fnum1<0 set @iSign=-1 else set @iSign=1 set @fReturn= round(2 * abs(@fnum1), -1) / 2 RETURN @iSign * @fReturn END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [Round59]( @fnum1 as float) RETURNS float AS BEGIN -- kerekít 5-re és 9-re declare @fReturn as float declare @iSign as int declare @aNum as float if @fnum1<0 set @iSign=-1 else set @iSign=1 set @aNum=abs(@fnum1) if round(2 * @aNum, -1)/2 <> round(@aNum, -1) set @fReturn=round(2 * @aNum, -1) / 2 else set @fReturn=round(@aNum, -1) - 1 if @fReturn<0 set @fReturn=0 RETURN @iSign * @fReturn END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [rovidnev] () RETURNS varchar(10) AS BEGIN declare @nev varchar(10) select @nev=rtrim(rovidnev) from regisztral RETURN @nev END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [strzero](@szam [int], @n [int]) RETURNS varchar(250) AS BEGIN RETURN replicate('0', @n - len(rtrim(cast(@szam as char(250)))) ) + rtrim(cast(@szam as char(250))) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [SzabadKeszlet]( @csz cikk_szam, @raktar kulcs, @vevo kulcs) RETURNS mennyiseg AS BEGIN Declare @TeljesKeszlet mennyiseg Declare @ElozoFoglalasok mennyiseg Declare @SzabadKeszlet mennyiseg Declare @AktFoglalas mennyiseg set @TeljesKeszlet=dbo.RaktarKeszletAdottCikk( @csz, @raktar ) -- ez a vevő foglalása select @AktFoglalas=isnull(sum(darab),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and @raktar=raktar_kod and vevo=@vevo -- ez a cikk összes foglalása select @ElozoFoglalasok=isnull(sum(darab),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and @raktar=raktar_kod -- szabad készlet set @SzabadKeszlet = @TeljesKeszlet - @ElozoFoglalasok if @SzabadKeszlet<0 set @SzabadKeszlet=0 -- vevő által felhasználható készlet set @SzabadKeszlet=@AktFoglalas + @SzabadKeszlet Return @SzabadKeszlet END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [SzabadKeszletAdottPrior](@csz cikk_szam, @raktar kulcs, @Prior int) RETURNS mennyiseg AS BEGIN Declare @TeljesKeszlet dbo.mennyiseg declare @ElozoPrior int Declare @ElozoFoglalasok dbo.mennyiseg Declare @SzabadKeszlet dbo.mennyiseg Declare @AktFoglalas dbo.mennyiseg set @TeljesKeszlet=dbo.RaktarKeszletAdottCikk( @csz, @raktar ) select @AktFoglalas=darab from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and prioritas=@prior /* select @ElozoPrior=isnull(max(prioritas),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and prioritas<@prior if @ElozoPrior=0 set @ElozoFoglalasok=0 else set @ElozoFoglalasok = dbo.FoglaltKeszletElozoAdottCikk(@csz, @raktar, @ElozoPrior) */ select @ElozoFoglalasok=isnull(sum(darab),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and prioritas<@prior and @raktar=raktar_kod set @SzabadKeszlet = @TeljesKeszlet - @ElozoFoglalasok if @SzabadKeszlet<0 set @SzabadKeszlet=0 else if @SzabadKeszlet >= @AktFoglalas set @SzabadKeszlet=@AktFoglalas Return @SzabadKeszlet END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [SzabadKeszletAdottVevo](@csz cikk_szam, @raktar kulcs, @vevo kulcs) RETURNS mennyiseg AS BEGIN Declare @TeljesKeszlet dbo.mennyiseg Declare @ElozoFoglalasok dbo.mennyiseg Declare @SzabadKeszlet dbo.mennyiseg Declare @AktFoglalas dbo.mennyiseg set @TeljesKeszlet=dbo.RaktarKeszletAdottCikk( @csz, @raktar ) -- ez a vevő foglalása select @AktFoglalas=isnull(sum(darab),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and vevo=@vevo -- ez a cikk összes foglalása select @ElozoFoglalasok=isnull(sum(darab),0) from foglalasok where cikk_szam=@csz and meddig>=dbo.myGetDate() and darab>0 and @raktar=raktar_kod -- szabad készlet set @SzabadKeszlet = @TeljesKeszlet - @ElozoFoglalasok if @SzabadKeszlet<0 set @SzabadKeszlet=0 -- vevő által felhasználható készlet set @SzabadKeszlet=@AktFoglalas + @SzabadKeszlet Return @SzabadKeszlet END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [szall_biz_fizetve] ( ) RETURNS @xxvevo_biz_fizetve TABLE (biz_tipus char(10), bizszam varchar(50), szall_nev nev, szla_datum datum, fizmod_nev varchar(20), fiz_esed datum, brutto_ertek numeric (18,2), fizetve char(1), hatralek egyseg_ar, fizetett egyseg_ar, fiz_modja varchar(1), szallito kulcs, xbizszam bizonylat_szam, telj_datum datum, kicsoda kicsoda, teljesnev nev, keszult datum_ora, fiz_datum datum, torolt char(1), torlo char(1), penznem char(3), kurzus kurzus, ut_fizetes egyseg_ar ) AS begin insert into @xxvevo_biz_fizetve SELECT 'számla', szall_szlaf.kulsoszlasz, szall_szlaf.szall_nev, szall_szlaf.SZLA_DATUM, fizmodok.NEV AS fizmod_nev, szall_szlaf.FIZ_ESED, round(szall_szlaf.brutto_ertek,0), ISNULL(szall_szl_fizetve.fizetve, ' ') AS fizetve, round(ISNULL(szall_szl_fizetve.hatralek, szall_szlaf.brutto_ertek),0) AS hatralek, 0 AS fizetett, szall_szlaf.FIZ_MODJA, szall_szlaf.szallito, szall_szlaf.BIZSZAM AS xbizszam, szall_szlaf.TELJ_DATUM, isnull(szall_szl_fizetve.kicsoda,''), isnull(belepes.teljesnev,''), isnull(szall_szl_fizetve.keszult,''), isnull( szall_szl_fizetve.fiz_datum,''), szall_szlaf.torolt, szall_szlaf.torlo,szall_szlaf.penznem,szall_szlaf.kurzus, isnull(szall_szl_fizetve.ut_fizetes,0) FROM belepes RIGHT OUTER JOIN szall_szl_fizetve ON belepes.ROVIDNEV = szall_szl_fizetve.kicsoda RIGHT OUTER JOIN szall_szlaf ON szall_szl_fizetve.bizszam = szall_szlaf.kulsoszlasz INNER JOIN fizmodok ON szall_szlaf.FIZ_MODJA = fizmodok.KOD where (szall_szl_fizetve.biz_tipus='számla' or szall_szl_fizetve.biz_tipus is null) GROUP BY szall_szlaf.kulsoszlasz, szall_szlaf.szall_nev, szall_szlaf.SZLA_DATUM, fizmodok.NEV, szall_szlaf.FIZ_ESED, szall_szlaf.brutto_ertek, szall_szlaf.kedvezmeny, szall_szl_fizetve.fizetve, szall_szl_fizetve.hatralek, szall_szl_fizetve.fizetett, szall_szlaf.FIZ_MODJA, szall_szlaf.szallito, szall_szlaf.BIZSZAM, szall_szlaf.TELJ_DATUM, szall_szl_fizetve.kicsoda, belepes.TELJESNEV, szall_szl_fizetve.keszult, szall_szl_fizetve.biz_tipus,szall_szl_fizetve.fiz_datum, szall_szlaf.torolt, szall_szlaf.torlo,szall_szlaf.penznem,szall_szlaf.kurzus, szall_szl_fizetve.ut_fizetes insert into @xxvevo_biz_fizetve SELECT 'száll.lev.', szall_szlef.hivSZAM, szall_szlef.szall_nev, szall_szlef.TELJ_DATUM, '3-Készpénz', szall_szlef.TELJ_DATUM, round(szall_szlef.brutto_ertek,0), ISNULL(szall_szl_fizetve.fizetve, ' ') AS fizetve, round(ISNULL(szall_szl_fizetve.hatralek, szall_szlef.brutto_ertek),0) AS hatralek, 0 AS fizetett, '3', szall_szlef.szallito, szall_szlef.BIZSZAM AS xbizszam, szall_szlef.TELJ_DATUM, isnull(szall_szl_fizetve.kicsoda,''), isnull(belepes.teljesnev,''), isnull(szall_szl_fizetve.keszult,''), isnull( szall_szl_fizetve.fiz_datum,''), szall_szlef.torolt, szall_szlef.torlo,szall_szlef.penznem,szall_szlef.kurzus, isnull(szall_szl_fizetve.ut_fizetes,0) FROM belepes RIGHT OUTER JOIN szall_szl_fizetve ON belepes.ROVIDNEV = szall_szl_fizetve.kicsoda RIGHT OUTER JOIN szall_szlef ON szall_szl_fizetve.bizszam = szall_szlef.hivSZAM where (szall_szl_fizetve.biz_tipus='száll.lev.' or szall_szl_fizetve.biz_tipus is null) AND LEN(szall_szlef.SZLASZAM) = 0 GROUP BY szall_szlef.hivSZAM, szall_szlef.szall_nev, szall_szlef.kedvezmeny, szall_szl_fizetve.fizetve, szall_szl_fizetve.hatralek, szall_szl_fizetve.fizetett, szall_szlef.szallito, szall_szlef.brutto_ertek, szall_szlef.BIZSZAM, szall_szlef.TELJ_DATUM, szall_szl_fizetve.kicsoda, belepes.TELJESNEV, szall_szl_fizetve.keszult, szall_szl_fizetve.biz_tipus, szall_szl_fizetve.fiz_datum, szall_szlef.torolt, szall_szlef.torlo,szall_szlef.penznem,szall_szlef.kurzus, szall_szl_fizetve.ut_fizetes return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [SzallArakVevoPenznemben] ( @ssz dbo.bizonylat_szam, @csz dbo.cikk_szam, @vevo_pn dbo.penznem ) RETURNS @xxSzallArakVevoPenznemben TABLE ( bizszam bizonylat_szam, ugyletkod char(20), szallito_kod kulcs, aj_keres_datum datum, megjegyzes char(50), aj_erkezes_datum datum, ervenyes datum, penznem penznem, pontozas numeric(18,2), allapot int, tetel bizonylat_tetel, cikk_szam cikk_szam, mennyiseg mennyiseg, cikk_tipus kulcs, egyseg_ar egyseg_ar, keszlet mennyiseg, szallitas_nap int, cikk_nev cikk_nev, szall_NEV nev, kalk_ar egyseg_ar, kurzus numeric(9,5), tipus_nev nev, garancia varchar(20) ) AS begin declare @mennyi int declare @vkurz float declare @ugykod as char(20) select @vkurz=kurzus from deviza where penznem=@vevo_pn select @ugykod=rtrim(ugyletkod) from vvevo_arajanlatf where bizszam=@ssz if len(rtrim(@vevo_pn))>0 begin insert into @xxSzallArakVevoPenznemben select szall_arajanf.bizszam, ugyletek.ugyletkod, szall_arajanf.szallito, szall_arajanf.aj_keres_datum, szall_arajanf.megjegyzes, szall_arajanf.aj_erkezes_datum, szall_arajanf.ervenyes, szall_arajanf.penznem, szall_arajanf.pontozas, szall_arajanf.allapot, szall_arajant.tetel, szall_arajant.cikk_szam, szall_arajant.mennyiseg, szall_arajant.cikk_tipus, szall_arajant.egyseg_ar, szall_arajant.keszlet, szall_arajant.szallitas_nap, cikkek.cikk_nev, szallito.szall_NEV, szall_arajant.egyseg_ar * szall_arajanf.pontozas * deviza.kurzus/@vkurz AS kalk_ar, deviza.kurzus, cikk_tipusok.tipus_nev, szall_arajant.garancia from szall_arajanf INNER JOIN szall_arajant ON szall_arajanf.bizszam = szall_arajant.bizszam INNER JOIN cikkek ON szall_arajant.cikk_szam = cikkek.cikk_szam INNER JOIN szallito ON szall_arajanf.szallito = szallito.szall_KOD INNER JOIN ugyletek ON szall_arajanf.bizszam = ugyletek.bizszam and ugyletek.biztipus='szall_arajanlat' INNER JOIN cikk_tipusok ON szall_arajant.cikk_tipus = cikk_tipusok.kod LEFT OUTER JOIN deviza ON szall_arajanf.penznem = deviza.penznem where ugyletek.ugyletkod=@ugykod and szall_arajant.cikk_szam=@csz and szall_arajanf.allapot=22 end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [szallito_utolso_besz_ar] ( @szall kulcs, @csz cikk_szam ) RETURNS @xxbesz_arak TABLE (telj_datum datum, penznem penznem, kurzus kurzus, vkedv kedvezmeny, tkedv kedvezmeny, besz_ar egyseg_ar, szorzo szorzo ) AS begin declare @maxdat1 char(10) declare @maxdat2 char(10) select @maxdat1=isnull(max(telj_datum),'1900') from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and szallito=@szall select @maxdat2=isnull(max(telj_datum),'1900') from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and szallito=@szall if @maxdat1='1900' and @maxdat2='1900' begin --insert into @xxbesz_arak values('','HUF',1,0,0,0) insert into @xxbesz_arak -- select '','HUF',1,0,0,ut_besz_ar,1 from cikkek where cikk_szam=@csz select * from dbo.utolso_besz_ar (@csz) return end if @maxdat1>@maxdat2 begin insert into @xxbesz_arak select isnull(telj_datum,''), isnull(penznem,'HUF'), isnull(kurzus,1), isnull(szall_szlef.kedvezmeny,0),isnull(szall_szlet.kedvezmeny,0), isnull(egyseg_ar,0),isnull(szorzo,1) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and szallito=@szall and szall_szlef.BIZSZAM= (select MAX(szall_szlef.bizszam) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and szallito=@szall and telj_datum=@maxdat1) end else begin insert into @xxbesz_arak select isnull(telj_datum,''), isnull(penznem,'HUF'), isnull(kurzus,1), isnull(szbiz_szlef.kedvezmeny,0),isnull(szbiz_szlet.kedvezmeny,0),isnull(egyseg_ar,0),isnull(szorzo,1) from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and szallito=@szall and szbiz_szlef.BIZSZAM= (select MAX(szbiz_szlef.bizszam) from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and szallito=@szall and telj_datum=@maxdat2) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [SzlaSzamOrder](@bsz as bizonylat_szam) RETURNS varchar(250) AS BEGIN declare @i int declare @veg varchar(6) declare @rbsz varchar(250) set @rbsz=@bsz set @i=charindex('/',@bsz) if @i>0 begin set @veg= substring(@bsz, @i+1, len(rtrim(@bsz)) -@i ) if len(@veg)<4 set @veg='20' + @veg if right(@veg,1) >='a' set @veg=left(@veg, len(@veg)-1) set @rbsz= @veg + replicate('0', 10 - @i + 1 - len(@veg) ) + left(@bsz, @i-1) end RETURN @rbsz END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [TermekBeszAraAdottDat] ( @csz dbo.cikk_szam, @dat dbo.datum ) RETURNS @xxTermekBeszAraAdottDat TABLE (penznem penznem, lista_ar egyseg_ar, kedvezmeny kedvezmeny, netto_ar egyseg_ar, akcio char(1)) AS begin declare @mennyi int if dbo.xrfuggveny('BeszArTip')='1' --ut. besz. ár begin insert into @xxTermekBeszAraAdottDat select dbo.xrfuggveny('AlapPenznem'), ut_besz_ar, 0, ut_besz_ar, ' ' from cikkek where cikk_szam=@csz end else -- szállítói árakból veszi ki begin select @mennyi=count(*) from cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select Max(kdatum) from cikkek INNER JOIN szall_art on cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM AND cikkek.SZALLITO = szall_arf.SZALLITO where kdatum<=@dat and @dat<=vdatum and cikkek.cikk_szam=@csz and szall_arf.tipus<>'normál' ) if @mennyi=0 begin --nincs akció, NORMÁL ÁR SELECT @mennyi=count(*) FROM cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' if @mennyi=0 begin -- nincs normál ár insert into @xxTermekBeszAraAdottDat values( 'HUF', 0, 0, 0, ' ') end else begin insert into @xxTermekBeszAraAdottDat SELECT szall_arf.penznem, isnull(szall_art.lista_AR,0) as lista_ar, isnull(szall_art.kedvezmeny,0) as kedvezmeny, isnull(szall_art.NETTO_AR,0) as NETTO_AR, ' ' FROM cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' end END else begin --AKCIÓS ÁR insert into @xxTermekBeszAraAdottDat SELECT szall_arf.penznem, isnull(szall_art.lista_AR,0) as lista_ar, isnull(szall_art.kedvezmeny,0) as kedvezmeny, isnull(szall_art.NETTO_AR,0) as NETTO_AR, '1' FROM cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select Max(kdatum) from cikkek INNER JOIN szall_art on cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM AND cikkek.SZALLITO = szall_arf.SZALLITO where kdatum<=@dat and @dat<=vdatum and cikkek.cikk_szam=@csz and szall_arf.tipus<>'normál' ) end end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [TermekBeszAraAdottDat1] ( @csz dbo.cikk_szam, @dat dbo.datum ) RETURNS @xxTermekBeszAraAdottDat TABLE (penznem penznem, lista_ar egyseg_ar, kedvezmeny kedvezmeny, netto_ar egyseg_ar, akcio char(1)) AS begin declare @mennyi int select @mennyi=count(*) from cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM --AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select Max(kdatum) from cikkek INNER JOIN szall_art on cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM --AND cikkek.SZALLITO = szall_arf.SZALLITO where kdatum<=@dat and @dat<=vdatum and cikkek.cikk_szam=@csz and szall_arf.tipus<>'normál' ) if @mennyi=0 begin --nincs akció, NORMÁL ÁR SELECT @mennyi=count(*) FROM cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM --AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' if @mennyi=0 begin -- nincs normál ár insert into @xxTermekBeszAraAdottDat select dbo.xrfuggveny('AlapPenznem'), ut_besz_ar, 0, ut_besz_ar, ' ' from cikkek where cikk_szam=@csz end else begin insert into @xxTermekBeszAraAdottDat SELECT szall_arf.penznem, isnull(szall_art.lista_AR,0) as lista_ar, isnull(szall_art.kedvezmeny,0) as kedvezmeny, isnull(szall_art.NETTO_AR,0) as NETTO_AR, ' ' FROM cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM --AND cikkek.SZALLITO = szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' end END else begin --AKCIÓS ÁR insert into @xxTermekBeszAraAdottDat SELECT szall_arf.penznem, isnull(szall_art.lista_AR,0) as lista_ar, isnull(szall_art.kedvezmeny,0) as kedvezmeny, isnull(szall_art.NETTO_AR,0) as NETTO_AR, '1' FROM cikkek INNER JOIN szall_art ON cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select Max(kdatum) from cikkek INNER JOIN szall_art on cikkek.CIKK_SZAM = szall_art.CIKK_SZAM LEFT OUTER JOIN szall_arf ON szall_art.BIZSZAM = szall_arf.BIZSZAM where kdatum<=@dat and @dat<=vdatum and cikkek.cikk_szam=@csz and szall_arf.tipus<>'normál' ) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create fUNCTION [TermekBruttoEladAr] ( @csz dbo.cikk_szam, @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum ) RETURNS numeric(18,3) AS begin declare @ear dbo.egyseg_ar declare @datum char(7) set @datum=left(@dat,7) SELECT @ear=brutto_ar from vvevo_akcio where akciocsop = @akccs and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) and kdatum>=( select max(kdatum) from vevo_akcio where akciocsop = @akccs and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) ) if @ear is null SELECT @ear=brutto_ar from vevo_ar_lista where arcsoport = @arcs and cikk_szam=@csz and datum=( select max(datum) from vevo_ar_lista where arcsoport = @arcs and datum<=@datum ) return isnull(@ear,0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [TermekListaBeszAraAdottDat] ( @csz dbo.cikk_szam, @dat dbo.datum, @arcs_pn dbo.penznem ) RETURNS egyseg_ar AS begin declare @mennyi int declare @ear dbo.egyseg_ar declare @szall_pn dbo.penznem SELECT @mennyi=count(*) FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and @dat<=vdatum and szall_arf.tipus<>'normál') and szall_arf.tipus<>'normál' if @mennyi=0 begin --nincs akció, NORMÁL ÁR SELECT @mennyi=count(*) FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' if @mennyi=0 begin set @ear=0 set @szall_pn=@arcs_pn end else begin SELECT @ear=szall_art.lista_AR, @szall_pn=szall_arf.penznem FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' end END else begin --AKCIÓS ÁR SELECT @ear=szall_art.netto_AR, @szall_pn=szall_arf.penznem FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and @dat<=vdatum and szall_arf.tipus<>'normál') and szall_arf.tipus<>'normál' end return isnull(@ear, 0) * dbo.keresztarfolyam(isnull(@szall_pn,@arcs_pn), @arcs_pn) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [TermekNettoBeszAraAdottDat] ( @csz dbo.cikk_szam, @dat dbo.datum, @arcs_pn dbo.penznem ) RETURNS egyseg_ar AS begin declare @mennyi int declare @ear dbo.egyseg_ar declare @szall_pn dbo.penznem SELECT @mennyi=count(*) FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and @dat<=vdatum and szall_arf.tipus<>'normál') and szall_arf.tipus<>'normál' if @mennyi=0 begin --nincs akció, NORMÁL ÁR SELECT @mennyi=count(*) FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' if @mennyi=0 begin set @ear=0 set @szall_pn=@arcs_pn end else begin SELECT @ear=szall_art.netto_AR, @szall_pn=szall_arf.penznem FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and szall_arf.tipus='normál') and szall_arf.tipus='normál' end END else begin --AKCIÓS ÁR SELECT @ear=szall_art.netto_AR, @szall_pn=szall_arf.penznem FROM dbo.cikkek INNER JOIN dbo.szall_art ON dbo.cikkek.CIKK_SZAM = dbo.szall_art.CIKK_SZAM LEFT OUTER JOIN dbo.szall_arf ON dbo.szall_art.BIZSZAM = dbo.szall_arf.BIZSZAM AND dbo.cikkek.SZALLITO = dbo.szall_arf.SZALLITO where cikkek.cikk_szam=@csz and szall_arf.KDATUM= (select max(kdatum) from szall_arf where szall_arf.SZALLITO = cikkek.SZALLITO and kdatum<=@dat and @dat<=vdatum and szall_arf.tipus<>'normál') and szall_arf.tipus<>'normál' end return isnull(@ear, 0) * dbo.keresztarfolyam(isnull(@szall_pn,@arcs_pn), @arcs_pn) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [Tetel_gyszam]( @mk varchar(20), @ssz bizonylat_szam, @tet bizonylat_tetel ) RETURNS varchar(3000) AS BEGIN Declare @gyszam As varchar(3000) Declare @gysz varchar(20) Declare @kozos varchar(20) declare @j int declare @lgysz int set @gyszam='' set @kozos='' set @lgysz=0 if (SELECT isnull(count(*),0) FROM keszlet INNER JOIN mozgas ON keszlet.SORSZAM = mozgas.SORSZAM WHERE mozgas.MOZGASKOD=@mk and mozgas.BIZSZAM=@ssz and mozgas.TETEL=@tet and len(ltrim(keszlet.GYARI_SZAM))>0 ) >0 begin DECLARE cgyariszam CURSOR for SELECT rtrim(ltrim(keszlet.GYARI_SZAM)) FROM keszlet INNER JOIN mozgas ON keszlet.SORSZAM = mozgas.SORSZAM WHERE mozgas.MOZGASKOD=@mk and mozgas.BIZSZAM=@ssz and mozgas.TETEL=@tet and len(ltrim(keszlet.GYARI_SZAM))>0 and case mozgas.mozgaskod when 'rmozgas' then mozgas.darab else -1 end <0 order by rtrim(ltrim(keszlet.GYARI_SZAM)) open cgyariszam fetch next from cgyariszam into @gysz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if len(rtrim(@kozos))>=2 and len(@gysz) = @lgysz and len(@gysz) > 2 begin set @j=2 while @j>=2 and @j<=len(@kozos) and left(@kozos,@j)=left(@gysz,@j) begin set @j=@j + 1 end if len(@kozos)>@j begin set @kozos=@gysz set @gyszam=@gyszam + @gysz + '; ' end else begin set @kozos=left(@kozos,@j-1) set @gyszam=@gyszam + '*' + substring(@gysz,@j,len(@gysz)-@j+1) + '; ' end end else begin set @gyszam=@gyszam + @gysz + '; ' set @kozos=@gysz end set @lgysz=len(@gysz) END fetch next from cgyariszam into @gysz end close cgyariszam deallocate cgyariszam end if len(rtrim(@gyszam))>0 set @gyszam='Gy.sz.: ' + @gyszam Return @gyszam END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [utolso_besz_ar] ( @csz cikk_szam ) RETURNS @xxbesz_arak TABLE (telj_datum datum, penznem penznem, kurzus kurzus, vkedv kedvezmeny, tkedv kedvezmeny, besz_ar egyseg_ar, szorzo szorzo ) AS begin declare @maxdat1 char(10) declare @maxdat2 char(10) select @maxdat1=isnull(max(telj_datum),'1900') from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz select @maxdat2=isnull(max(telj_datum),'1900') from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz if @maxdat1='1900' and @maxdat2='1900' begin --insert into @xxbesz_arak values('','HUF',1,0,0,0) insert into @xxbesz_arak select '','HUF',1,0,0,ut_besz_ar,1 from cikkek where cikk_szam=@csz return end if @maxdat1>@maxdat2 begin insert into @xxbesz_arak select isnull(telj_datum,''), isnull(penznem,'HUF'), isnull(kurzus,1), isnull(szall_szlef.kedvezmeny,0),isnull(szall_szlet.kedvezmeny,0), isnull(egyseg_ar,0),isnull(szorzo,1) -- isnull(egyseg_ar*szall_szlef.kurzus/case when szall_szlet.szorzo=0 then 1 else szall_szlet.szorzo end,0) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and szall_szlef.BIZSZAM= (select MAX(szall_szlef.bizszam) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and telj_datum=@maxdat1) end else begin insert into @xxbesz_arak select isnull(telj_datum,''), isnull(penznem,'HUF'), isnull(kurzus,1), isnull(szbiz_szlef.kedvezmeny,0),isnull(szbiz_szlet.kedvezmeny,0),isnull(egyseg_ar,0),isnull(szorzo,1) from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and szbiz_szlef.BIZSZAM= (select MAX(szbiz_szlef.bizszam) from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and telj_datum=@maxdat2) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [utolso_besz_ar1] ( @csz cikk_szam ) RETURNS @xxbesz_arak TABLE (telj_datum datum, penznem penznem, kurzus kurzus, vkedv kedvezmeny, tkedv kedvezmeny, besz_ar egyseg_ar ) AS begin declare @maxdat1 char(10) declare @maxdat2 char(10) select @maxdat1=isnull(max(telj_datum),'1900') from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz select @maxdat2=isnull(max(telj_datum),'1900') from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz if @maxdat1='1900' and @maxdat2='1900' begin insert into @xxbesz_arak values('','HUF',1,0,0,0) return end if @maxdat1>@maxdat2 begin insert into @xxbesz_arak select isnull(telj_datum,''), isnull(penznem,'HUF'), isnull(kurzus,1), isnull(szall_szlef.kedvezmeny,0),isnull(szall_szlet.kedvezmeny,0),isnull(egyseg_ar,0) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and szall_szlef.BIZSZAM= (select MAX(szall_szlef.bizszam) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and cikk_szam=@csz and telj_datum=@maxdat1) end else begin insert into @xxbesz_arak select isnull(telj_datum,''), isnull(penznem,'HUF'), isnull(kurzus,1), isnull(szbiz_szlef.kedvezmeny,0),isnull(szbiz_szlet.kedvezmeny,0),isnull(egyseg_ar,0) from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and szbiz_szlef.BIZSZAM= (select MAX(szbiz_szlef.bizszam) from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam and cikk_szam=@csz and telj_datum=@maxdat2) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO Create FUNCTION [varcsop_arak] ( @dat dbo.datum ) RETURNS @xxvarcsop_arak TABLE (arcsoport kulcs, cikk_szam cikk_szam, netto_ar egyseg_ar ) AS begin declare @szm char(1) declare @mennyi int declare @ardatum char(7) set @ardatum = left(@dat,7) select @mennyi=isnull(count(*),0) from vevo_ar_lista where /*arcsoport=@arcs and */ datum = @ardatum if @mennyi = 0 select @ardatum = max(datum) from vevo_ar_lista where datum < @ardatum if @ardatum is not null --Már volt valamilyen listaár rögzítve insert into @xxvarcsop_arak SELECT dbo.vevo_ar_lista.arcsoport, dbo.cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar,0) FROM dbo.cikkek left outer JOIN dbo.vevo_ar_lista ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM --Left outer JOIN dbo.vevo_akcio_1(@akccs,@dat) vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM where /*dbo.vevo_ar_lista.arcsoport=@arcs and*/ dbo.vevo_ar_lista.datum = @ardatum return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [varukeresohu] ( ) RETURNS @xxvcikkek TABLE (manufacturer varchar(255), name varchar(255), category varchar(255), product_url varchar(255), price egyseg_ar, net_price egyseg_ar, identifier varchar(255), warranty varchar(255), _delivery_time varchar(255), image_url varchar(255), image_url_2 varchar(255), image_url_3 varchar(255), description varchar(5120), delivery_cost egyseg_ar, delivery_time varchar(255), ean_code varchar(255) ) AS begin declare @arcs int declare @akc int set @arcs=convert(int,dbo.xrfuggveny('BejelArcsop')) set @akc =convert(int,dbo.xrfuggveny('BejelAkccsop')) insert into @xxvcikkek select gyarto_nev, c1.cikk_nev, s1.cikk_nev + isnull('>'+ s2.cikk_nev,'')+ ' '+ isnull('>'+ s3.cikk_nev,'')+ ' '+ isnull('>'+ s4.cikk_nev,''), 'url cim', case brutto_akcios_ar when 0 then lista_brutto_ar end, case netto_akcios_ar when 0 then lista_netto_ar end, c1.cikk_szam, 0, '2 munkanap', 'img1', 'img2', 'img3', isnull(cikk_leiras.leiras1,''), 1000, '2 munkanap', vonalkod from vcikk_arak_web(@arcs,@akc,dbo.mygetdate(), 'huf',1,0) as c1 left outer join cikk_leiras on c1.cikk_szam=cikk_leiras.cikk_szam inner join stcikk2 as s1 on left(c1.cikkcsop2, 3)=s1.cikk_szam left outer join stcikk2 as s2 on left(c1.cikkcsop2, 6)=s2.cikk_szam and len(rtrim(c1.cikkcsop2))>3 left outer join stcikk2 as s3 on left(c1.cikkcsop2, 9)=s3.cikk_szam and len(rtrim(c1.cikkcsop2))>6 left outer join stcikk2 as s4 on left(c1.cikkcsop2,12)=s4.cikk_szam and len(rtrim(c1.cikkcsop2))>9 where c1.kifutott = 0 AND c1.keszlet >= 1 return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikk_arak] ( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @vevo dbo.kulcs ) RETURNS @xxvcikk_arak TABLE (arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, netto_ar egyseg_ar, akcios_ar egyseg_ar, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, menny_egys menny_egyseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), vonalkod varchar(14), fordafa char(1), keszlet egyseg_ar ) AS begin declare @szm char(1) declare @mennyi int declare @ardatum char(7) declare @ind_tipus int declare @arcs_pn penznem --az arcsoport milyen penznemben lett megadva declare @dat1 varchar(10) declare @dat2 varchar(10) declare @arcs_alap kulcs declare @arcs_alap1 kulcs declare @szorzo numeric(18,2) declare @arcs_kivalap1 kulcs declare @arcs_kivalap2 kulcs declare @rnev varchar(20) declare @tmpvevo_akcio_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) declare @tmpvevoarak_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar ) Insert into @tmpvevo_akcio_1 select * from dbo.vevo_akcio_1(@akccs,@dat) if @kurz=0 set @kurz=1 select @szm = szamitas_modja, @arcs_pn=penznem from vevo_arcsoport where kod=@arcs select @rnev=rovidnev from regisztral if @szm='L' begin --LISTA áras set @ardatum = left(@dat,7) select @mennyi=isnull(count(*),0) from vevo_ar_lista WITH (NOLOCK) where arcsoport=@arcs and datum = @ardatum if @mennyi = 0 select @ardatum = max(datum) from vevo_ar_lista where arcsoport=@arcs and datum < @ardatum if @ardatum is not null --Már volt valamilyen listaár rögzítve if @pn='HUF' and @arcs_pn<>'HUF' insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar * @kurz,0), IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), --isnull(VevoAkciok_1.egyseg_ar,0) as akcios_ar, cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where dbo.vevo_ar_lista.arcsoport=@arcs and dbo.vevo_ar_lista.datum = @ardatum else if @pn<>'HUF' and @arcs_pn='HUF' insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar / @kurz,0), IsNull(vevo_akcio_1.egyseg_Ar / @kurz,0), --isnull(VevoAkciok_1.egyseg_ar,0) as akcios_ar, cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where dbo.vevo_ar_lista.arcsoport=@arcs and dbo.vevo_ar_lista.datum = @ardatum else if @pn<>'HUF' and @arcs_pn<>'HUF' insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar,0), IsNull(vevo_akcio_1.egyseg_Ar,0), --isnull(VevoAkciok_1.egyseg_ar,0) as akcios_ar, cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where dbo.vevo_ar_lista.arcsoport=@arcs and dbo.vevo_ar_lista.datum = @ardatum else insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar * @kurz,0), IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), --isnull(VevoAkciok_1.egyseg_ar,0) as akcios_ar, cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where dbo.vevo_ar_lista.arcsoport=@arcs and dbo.vevo_ar_lista.datum = @ardatum end else if @szm='R' --RABATT tablós begin select @ind_tipus=ind_tipus from vevo_arf where arcsoport=@arcs insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull( case @ind_tipus when 1 then dbo.TermekListaBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn) when 2 then dbo.TermekNettoBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn) when 3 then dbo.cikkek.ut_besz_ar end * (100 + dbo.CikkRabattFelar (@arcs, cikkek.cikk_szam) )/(100 * @kurz), 0), IsNull(vevo_akcio_1.egyseg_Ar,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam end else --M lista ár 2 if @szm='M' begin set @arcs_kivalap1=convert(int,dbo.xrfuggveny('KivetelAlapArcsop1')) set @arcs_kivalap2=convert(int,dbo.xrfuggveny('KivetelAlapArcsop2')) if @rnev='KALMARKET' or @rnev='PESTISUK' or @rnev='BALLA' or @rnev='TRANS' insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek else insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek if (select rovidnev from regisztral)='KALMARKET' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if (select rovidnev from regisztral)='PESTISUK' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=24 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=24 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if (select rovidnev from regisztral)='BALLA' or @rnev='TRANS' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=@arcs_kivalap1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=@arcs_kivalap2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=@arcs_kivalap1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=@arcs_kivalap2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if @pn='HUF' and @arcs_pn<>'HUF' insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, --isnull(dbo.VevoArCegreDatumra (cikkek.cikk_szam, @vevo, @dat ) * @kurz,0), isnull(vevoarak_1.egyseg_ar * @kurz,0), IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM cikkek WITH (NOLOCK) Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam else if @pn<>'HUF' and @arcs_pn='HUF' insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, --isnull(dbo.VevoArCegreDatumra (cikkek.cikk_szam, @vevo, @dat ) * @kurz,0), isnull(vevoarak_1.egyseg_ar * @kurz,0), IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM cikkek WITH (NOLOCK) Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam else insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(vevoarak_1.egyseg_ar,0), IsNull(vevo_akcio_1.egyseg_Ar,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM cikkek WITH (NOLOCK) Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam end else -- százalékos begin if (select count(*) from vevo_arcs_szazalek where arcsoport=@arcs)>0 begin select @arcs_alap=alap_arcsoport, @szorzo=szorzo from vevo_arcs_szazalek where arcsoport=@arcs if (select szamitas_modja from vevo_arcsoport where kod=@arcs_alap)='L' begin --lista áras set @ardatum = left(@dat,7) select @ardatum = max(datum) from vevo_ar_lista where arcsoport=@arcs_alap and datum <= @ardatum if @ardatum is not null insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, case when @pn='HUF' and @arcs_pn<>'HUF' then isnull(dbo.vevo_ar_lista.netto_ar * @szorzo * @kurz,0) else case when @pn<>'HUF' and @arcs_pn='HUF' then isnull(dbo.vevo_ar_lista.netto_ar * @szorzo / @kurz,0) else case when @pn<>'HUF' and @arcs_pn<>'HUF' then isnull(dbo.vevo_ar_lista.netto_ar * @szorzo,0) else isnull(dbo.vevo_ar_lista.netto_ar * @szorzo,0) end end end, --isnull(dbo.vevo_ar_lista.netto_ar * @szorzo * @kurz,0), IsNull(vevo_akcio_1.egyseg_Ar,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where dbo.vevo_ar_lista.arcsoport=@arcs_alap and dbo.vevo_ar_lista.datum = @ardatum end else begin --lista ár kivételekkel insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs_alap and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek if (select rovidnev from regisztral)='KALMARKET' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if (select rovidnev from regisztral)='KOSERPIAC' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=24 --listaár update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=24 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(vevoarak_1.egyseg_ar * @szorzo,0), IsNull(vevo_akcio_1.egyseg_Ar,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM cikkek WITH (NOLOCK) Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam end end end if @pn='HUF' and @arcs_pn<>'HUF' insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, 0, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where cikkek.cikk_szam not in (select cikk_szam from @xxvcikk_arak) else if @pn<>'HUF' and @arcs_pn='HUF' insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, 0, IsNull(vevo_akcio_1.egyseg_Ar / @kurz,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where cikkek.cikk_szam not in (select cikk_szam from @xxvcikk_arak) else insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, 0, IsNull(vevo_akcio_1.egyseg_Ar,0), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, isnull(vonal.vonalkod,''), cikkek.fordafa, isnull(vkeszlet_teljes.keszlet,0) FROM dbo.cikkek WITH (NOLOCK) left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join vkeszlet_teljes on cikkek.cikk_szam=vkeszlet_teljes.cikk_szam where cikkek.cikk_szam not in (select cikk_szam from @xxvcikk_arak) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikk_arak_brutto] ( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus ) RETURNS @xxvcikk_arak_brutto TABLE (arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, netto_ar egyseg_ar, akcios_ar egyseg_ar, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, menny_egys menny_egyseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), brutto_ar egyseg_ar ) AS begin insert into @xxvcikk_arak_brutto select arcsoport, vc.cikk_nev, vc.cikk_nev_ang, vc.cikk_szam, netto_ar/@kurz, akcios_ar/@kurz, vc.aru_szolg, vc.kifutott, vc.szallito, vc.szallito_nev, vc.gyarto, gyarto_nev, vc.cikkcsop2, csoport_nev, vc.menny_egys, vc.afa_kulcs, vc.tgon, vc.ntgon, vc.tgonszor, vc.ntgonszor, vc.akt_besz_ar, vc.dat_tipus, vc.vcikkszam, vc.ut_besz_ar, vc.termekdijas, round(((100 + afaertek)/100) * case akcios_ar when 0 then netto_ar/@kurz else akcios_ar/@kurz end ,case when @pn='HUF' then 0 else 2 end) as brutto_ar from vcikk_arak(@arcs,@akccs,@dat, @pn, @kurz,0) as vc inner join cikkek on vc.cikk_szam=cikkek.cikk_szam inner join afa_kulcs on afa_kulcs.afakulcs=cikkek.afa_kulcs --where cikkek.web=1 return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikk_arak_web] ( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @vevo dbo.kulcs ) RETURNS @xxvcikk_arak TABLE (arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, lista_netto_ar egyseg_ar, lista_brutto_ar egyseg_ar, lakcios char(1), netto_akcios_ar egyseg_ar, brutto_akcios_ar egyseg_ar, akcio_kdat datum, akcio_vdat datum, mefelt_db mennyiseg, netto_meakcios_ar egyseg_ar, brutto_meakcios_ar egyseg_ar, meakcio_kdat datum, meakcio_vdat datum, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, csoport_nev_ang nev, db_kart int, db_rakl int, db_br_sulya numeric(18, 3), menny_egys menny_egyseg, menny_egys_ang menny_egyseg, norm_me menny_egyseg, norm_szorz mennyiseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), letrehozva datum, vonalkod varchar(14), keszlet mennyiseg, szarmazasi_hely char(2), nev_hu varchar(200), nev_en varchar(200) ) AS begin declare @arcs_alap kulcs declare @arcs_alap1 kulcs declare @szorzo numeric(18,2) declare @szm char(1) declare @mennyi int declare @ardatum char(7) declare @ind_tipus int declare @rakk int declare @arcs_pn penznem --az arcsoport milyen penznemben lett megadva declare @dat1 varchar(10) declare @dat2 varchar(10) declare @arcs_kivalap1 kulcs declare @arcs_kivalap2 kulcs declare @rnev varchar(20) declare @tmpvevo_akcio_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) declare @tmpvevo_akcio_me table ( cikk_szam cikk_szam, felt_db mennyiseg, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) declare @tmpvevoarak_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar ) declare @tmpkeszlet table ( cikk_szam cikk_szam, darab mennyiseg ) declare @tmpkeszlet1 table ( cikk_szam cikk_szam, darab mennyiseg ) -- a paraméterként átadott pn-t nem használjuk!! kurz pedig mindig=1 -------------------------------------------------------------------- select @szm = szamitas_modja, @arcs_pn=penznem, @pn=penznem from vevo_arcsoport where kod=@arcs set @kurz=1 select @rnev=rovidnev from regisztral Insert into @tmpvevo_akcio_1 select * from dbo.vevo_akcio_1(@akccs,@dat) Insert into @tmpvevo_akcio_me select vevo_akcio_me.cikk_szam, max(felt_db), min(akc_ar), kdatum, vdatum from vevo_akcio_me WITH (NOLOCK) where megszunt<>'1' and @akccs=akciocsop and kdatum<= @dat and @dat<=vdatum group by vevo_akcio_me.cikk_szam, kdatum, vdatum insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek set @rakk=convert(integer, isnull(dbo.xrfuggveny('WebKeszletRaktar'),0)) insert into @tmpkeszlet1 select cikk_szam, sum(darab) from keszlet where (@rakk=raktar_kod or @rakk=0) group by cikk_szam insert into @tmpkeszlet1 select cikk_szam, -sum(darab) from keszlet_negativ where (@rakk=raktar_kod or @rakk=0) group by cikk_szam insert into @tmpkeszlet1 select cikk_szam, -sum(darab) from foglalasok where (@rakk=raktar_kod or @rakk=0) and lejart<>'1' group by cikk_szam insert into @tmpkeszlet select cikk_szam, sum(darab) from @tmpkeszlet1 group by cikk_szam if @szm='L' begin --LISTA áras set @ardatum = left(@dat,7) select @mennyi=isnull(count(*),0) from vevo_ar_lista WITH (NOLOCK) where arcsoport=@arcs and datum = @ardatum if @mennyi = 0 select @ardatum = max(datum) from vevo_ar_lista where arcsoport=@arcs and datum < @ardatum if @ardatum is not null --Már volt valamilyen listaár rögzítve insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar * @kurz,0), (100+afa_kulcs.afaertek) * isnull(dbo.vevo_ar_lista.netto_ar * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM dbo.cikkek WITH (NOLOCK) inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where dbo.vevo_ar_lista.arcsoport=@arcs and dbo.vevo_ar_lista.datum = @ardatum and web=1 end else if @szm='R' --RABATT tablós begin select @ind_tipus=ind_tipus from vevo_arf where arcsoport=@arcs insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, case @ind_tipus when 1 then dbo.TermekListaBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn) when 2 then dbo.TermekNettoBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn) when 3 then dbo.cikkek.ut_besz_ar end * (100 + dbo.CikkRabattFelar (@arcs, cikkek.cikk_szam) )/(100 * @kurz), case @ind_tipus when 1 then (100+afa_kulcs.afaertek) * dbo.TermekListaBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn)/100 when 2 then (100+afa_kulcs.afaertek) * dbo.TermekNettoBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn)/100 when 3 then (100+afa_kulcs.afaertek) * dbo.cikkek.ut_besz_ar/100 end * (100 + dbo.CikkRabattFelar (@arcs, cikkek.cikk_szam) )/(100 * @kurz), case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM dbo.cikkek WITH (NOLOCK) Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 end else --M lista ár 2 if @szm='M' begin set @arcs_kivalap1=convert(int,dbo.xrfuggveny('KivetelAlapArcsop1')) set @arcs_kivalap2=convert(int,dbo.xrfuggveny('KivetelAlapArcsop2')) delete from @tmpvevoarak_1 if @rnev='KALMARKET' or @rnev='BALLA' or @rnev='TRANS' insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek else insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek insert into @tmpvevoarak_1 select cikk_szam,0 from cikkek where cikk_szam not in (select cikk_szam from @tmpvevoarak_1) if (select rovidnev from regisztral)='KALMARKET' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if (select rovidnev from regisztral)='BALLA' or @rnev='TRANS' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=@arcs_kivalap1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=@arcs_kivalap2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=@arcs_kivalap1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=@arcs_kivalap2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(vevoarak_1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * isnull(vevoarak_1.egyseg_ar * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM cikkek WITH (NOLOCK) --left outer JOIN inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 end else -- százalékos begin if (select count(*) from vevo_arcs_szazalek where arcsoport=@arcs)>0 begin select @arcs_alap=alap_arcsoport, @szorzo=szorzo from vevo_arcs_szazalek where arcsoport=@arcs if (select szamitas_modja from vevo_arcsoport where kod=@arcs_alap)='L' begin --lista áras set @ardatum = left(@dat,7) select @ardatum = max(datum) from vevo_ar_lista where arcsoport=@arcs_alap and datum <= @ardatum if @ardatum is not null insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar * @szorzo * @kurz,0), (100+afa_kulcs.afaertek) * isnull(dbo.vevo_ar_lista.netto_ar * @szorzo * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM cikkek WITH (NOLOCK) inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 and dbo.vevo_ar_lista.arcsoport=@arcs_alap and dbo.vevo_ar_lista.datum = @ardatum end else begin --lista ár kivételekkel insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs_alap and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek if (select rovidnev from regisztral)='KALMARKET' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if (select rovidnev from regisztral)='KOSERPIAC' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=24 --listaár update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=24 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(vevoarak_1.egyseg_ar * @szorzo * @kurz,0), (100+afa_kulcs.afaertek) * isnull(vevoarak_1.egyseg_ar * @szorzo * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM cikkek WITH (NOLOCK) inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs --left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 end end end insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, 0, 0, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM dbo.cikkek WITH (NOLOCK) left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 and cikkek.cikk_szam not in (select cikk_szam from @xxvcikk_arak) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikk_arak_webuj] ( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @vevo dbo.kulcs, @domain varchar(50) ) RETURNS @xxvcikk_arak TABLE (arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, lista_netto_ar egyseg_ar, lista_brutto_ar egyseg_ar, lakcios char(1), netto_akcios_ar egyseg_ar, brutto_akcios_ar egyseg_ar, akcio_kdat datum, akcio_vdat datum, mefelt_db mennyiseg, netto_meakcios_ar egyseg_ar, brutto_meakcios_ar egyseg_ar, meakcio_kdat datum, meakcio_vdat datum, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, csoport_nev_ang nev, db_kart int, db_rakl int, db_br_sulya numeric(18, 3), menny_egys menny_egyseg, menny_egys_ang menny_egyseg, norm_me menny_egyseg, norm_szorz mennyiseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), letrehozva datum, vonalkod varchar(14), keszlet mennyiseg, rend_csomag varchar(20), rend_egyseg int, szarmazasi_hely char(2), nev_hu varchar(200), nev_en varchar(200) ) AS begin insert into @xxvcikk_arak select w.arcsoport, w.cikk_nev, w.cikk_nev_ang, v.cikk_szam, w.lista_netto_ar, w.lista_brutto_ar, w.lakcios, w.netto_akcios_ar, w.brutto_akcios_ar, w.akcio_kdat, w.akcio_vdat, w.mefelt_db, w.netto_meakcios_ar, w.brutto_meakcios_ar, w.meakcio_kdat, w.meakcio_vdat, w.aru_szolg, w.kifutott, w.szallito, w.szallito_nev, w.gyarto, w.gyarto_nev, w.cikkcsop2, w.csoport_nev, w.csoport_nev_ang, w.db_kart, w.db_rakl, w.db_br_sulya, w.menny_egys, w.menny_egys_ang, w.norm_me, w.norm_szorz, w.afa_kulcs, w.tgon, w.ntgon, w.tgonszor, w.ntgonszor, w.akt_besz_ar, w.dat_tipus, w.vcikkszam, w.ut_besz_ar, w.termekdijas, w.letrehozva, w.vonalkod, w.keszlet, v.rend_csomag, v.rend_egyseg, w.szarmazasi_hely, w.nev_hu, w.nev_en from dbo.fcikk_webaruhaz(@domain) as v inner join dbo.vcikk_arak_web(@arcs, @akccs, @dat, @pn, @kurz, @vevo) as w on w.cikk_szam=v.cikk_szam return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikkinfo_arak_1]( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @artip int, @rakk int, @vevo dbo.kulcs ) RETURNS @xxvcikkinfo_arak_ TABLE ( cikk_szam cikk_szam, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, menny_egys menny_egyseg, afa_kulcs afakulcs, afaertek float, lista_ar egyseg_ar, akcios_ar egyseg_ar, aru_szolg char(1), kifutott char(1), szallito kulcs, gyarto kulcs, cikkcsop2 char(18), vcikkszam cikk_szam, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), termekdijas char(1), keszlet egyseg_ar, fordafa char(1) ) AS begin if dbo.xrfuggveny('FoglalasHasznal')='N' begin if dbo.xrfuggveny('NegativKeszletKezel')='I' insert into @xxvcikkinfo_arak_ select c.cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, afaertek, netto_ar as lista_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, ((select isnull(sum(darab),0) from keszlet where cikk_szam=c.cikk_szam and darab<>0 and (@rakk=0 or (@rakk<>0 and @rakk=raktar_kod))) - (select isnull(sum(darab),0) from keszlet_negativ where cikk_szam=c.cikk_szam and darab<>0 and (@rakk=0 or (@rakk<>0 and @rakk=raktar_kod)))) as keszlet, -- isnull(sum(k.darab),0) - isnull(sum(n.darab),0) --(select isnull(sum(darab),0) from keszlet_negativ where cikk_szam=c.cikk_szam and darab<>0 and -- (@rakk=0 or (@rakk<>0 and @rakk=raktar_kod))) c.fordafa from vcikk_arak(@arcs,@akccs,@dat,@pn,@kurz,@vevo) c inner join afa_kulcs a on c.afa_kulcs = a.afakulcs left outer join keszlet k on c.cikk_szam=k.cikk_szam and (@rakk=k.raktar_kod or @rakk=0) left outer join keszlet_negativ n on c.cikk_szam=n.cikk_szam and (@rakk=n.raktar_kod or @rakk=0) and n.darab<>0 group by c.cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, afaertek, netto_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, fordafa else insert into @xxvcikkinfo_arak_ select c.cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, afaertek, netto_ar as lista_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, isnull(sum(k.keszlet),0) as keszlet, c.fordafa from vcikk_arak(@arcs,@akccs,@dat,@pn,@kurz,@vevo) c inner join afa_kulcs a on c.afa_kulcs = a.afakulcs left outer join vkeszlet_info k on c.cikk_szam=k.cikk_szam and (@rakk=k.kod or @rakk=0) group by c.cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, afaertek, netto_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, c.fordafa end else insert into @xxvcikkinfo_arak_ select c.cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, afaertek, netto_ar as lista_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, isnull((select sum(darab) from keszlet k where c.cikk_szam=k.cikk_szam and (@rakk=raktar_kod or @rakk=0)),0) - isnull((select sum(darab) from foglalasok f where c.cikk_szam=f.cikk_szam and (@rakk=f.raktar_kod or @rakk=0) and meddig>=@dat),0) as keszlet, c.fordafa from vcikk_arak(@arcs,@akccs,@dat,@pn,@kurz,@vevo) c inner join afa_kulcs a on c.afa_kulcs = a.afakulcs Return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vevo_akcio_1] ( @akccs dbo.kulcs, @dat dbo.datum ) RETURNS @xxVevo_akcio_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) AS begin declare @inVevo_akcio_1 table ( kdatum_cikk_szam varchar(50) ) Insert into @inVevo_akcio_1 select max(kdatum) + cikk_szam from vevo_akcio WITH (NOLOCK) where akciocsop = @akccs --and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) group by Cikk_szam /* Insert into @xxVevo_akcio_1 select cikk_szam, egyseg_ar, kdatum, vdatum from vevo_akcio WITH (NOLOCK) where akciocsop = @akccs --and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) and kdatum + cikk_szam in ( select kdatum_cikk_szam from @inVevo_akcio_1 ) */ Insert into @xxVevo_akcio_1 select cikk_szam, egyseg_ar, kdatum, vdatum from vevo_akcio inner join @inVevo_akcio_1 on kdatum + cikk_szam = kdatum_cikk_szam where akciocsop = @akccs --and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO Create FUNCTION [vevo_akcio_1_test] ( @akccs dbo.kulcs, @dat dbo.datum ) RETURNS @xxVevo_akcio_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) AS begin declare @inVevo_akcio_1 table ( kdatum_cikk_szam varchar(50) ) Insert into @inVevo_akcio_1 select max(kdatum) + cikk_szam from vevo_akcio WITH (NOLOCK) where akciocsop = @akccs --and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) group by Cikk_szam Insert into @xxVevo_akcio_1 select cikk_szam, egyseg_ar, kdatum, vdatum from vevo_akcio WITH (NOLOCK) where akciocsop = @akccs --and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) and kdatum + cikk_szam in ( select kdatum_cikk_szam from @inVevo_akcio_1 ) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vevo_arak_karb] ( @dat dbo.datum, @vevo kulcs, @arcs kulcs ) RETURNS @xxvcikk_arak TABLE ( tipus char(1), datum char(10), vdatum datum, vevo kulcs, cikk_szam cikk_szam, cikk_nev cikk_nev, cikkcsop2 varchar(18), netto_ar egyseg_ar, arcsoport kulcs ) AS begin declare @alap_arcs int declare @pn varchar(3) declare @datum varchar(10) insert into @xxvcikk_arak SELECT dbo.DatumTipusVevo(@vevo,vevoarak.datum,vevoarak.vdatum,vevoarak.cikk_szam,@dat,@arcs), vevoarak.datum, vevoarak.vdatum, vevoarak.vevo, vevoarak.cikk_szam, cikkek.cikk_nev, cikkek.cikkcsop2, vevoarak.egyseg_ar,vevoarak.arcsoport FROM vevoarak INNER JOIN cikkek ON vevoarak.cikk_szam = cikkek.cikk_szam where vevo=@vevo and arcsoport=@arcs if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' set @alap_arcs=convert(int,dbo.xrfuggveny('KivetelAlapArcsop1')) else set @alap_arcs=convert(int,dbo.xrfuggveny('KivetelAlapArcsop2')) select @datum=isnull(max(datum),'2000.01') from vevo_ar_lista where arcsoport=@alap_arcs set @datum=@datum + '.01' if left(@datum,7)<>'2000.01' begin insert into @xxvcikk_arak SELECT '1', @datum, '', 0, cikk_szam, cikk_nev, cikkcsop2, netto_ar, @alap_arcs FROM vvevo_ar_lista where arcsoport=@alap_arcs and datum=left(@dat,7) and cikk_szam not in (select cikk_szam from @xxvcikk_arak) end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vevo_biz_fizetve] ( ) RETURNS @xxvevo_biz_fizetve TABLE (biz_tipus char(10), bizszam bizonylat_szam, vevo_nev nev, szla_datum datum, fizmod_nev varchar(20), fiz_esed datum, brutto_ertek numeric (18,2), fizetve char(1), hatralek egyseg_ar, fizetett egyseg_ar, fiz_modja varchar(1), vevo kulcs, xbizszam bizonylat_szam, telj_datum datum, kicsoda kicsoda, teljesnev nev, keszult datum_ora, fiz_datum datum, torolt char(1), torlo char(1), ut_fizetes egyseg_ar, penznem penznem, kurzus kurzus, modositva datum_ora, vevo_csoport kulcs, vevo_lanc kulcs, vevo_cegjelleg kulcs, vevo_terulet kulcs, uzletkoto kulcs, vevo_arcsoport kulcs ) AS begin declare @dat datum set @dat=dbo.xrfuggveny('PUKezd') if SUBSTRING(@dat,5,1)<>'.' set @dat='2000.01.01' insert into @xxvevo_biz_fizetve SELECT 'számla', dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlaf.FIZ_ESED, round(ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0),0) AS brutto_ertek, ISNULL(dbo.vevo_szl_fizetve.fizetve, ' ') AS fizetve, -- round(ISNULL(dbo.vevo_szl_fizetve.hatralek,0),0) AS hatralek, ISNULL(dbo.vevo_szl_fizetve.hatralek, ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0) ) AS hatralek, 0 AS fizetett, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.BIZSZAM AS xbizszam, dbo.vevo_szlaf.TELJ_DATUM, isnull(dbo.vevo_szl_fizetve.kicsoda,''), isnull(dbo.belepes.teljesnev,''), isnull(dbo.vevo_szl_fizetve.keszult,''), isnull( dbo.vevo_szl_fizetve.fiz_datum,''), dbo.vevo_szlaf.torolt, dbo.vevo_szlaf.torlo, isnull(vevo_szl_fizetve.ut_fizetes,0), penznem,kurzus,vevo_szlaf.modositva,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,uzletkoto, isnull(vevok.vevo_arcsoport,1) as vevo_arcsoport FROM dbo.belepes RIGHT OUTER JOIN dbo.vevo_szl_fizetve ON dbo.belepes.ROVIDNEV = dbo.vevo_szl_fizetve.kicsoda RIGHT OUTER JOIN dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS ON dbo.vevo_szl_fizetve.bizszam = dbo.vevo_szlaf.BIZSZAM inner join vevok on vevok.vevo_kod=vevo_szlaf.vevo where (dbo.vevo_szl_fizetve.biz_tipus='számla' or dbo.vevo_szl_fizetve.biz_tipus is null) --and dbo.vevo_szlaf.FIZ_MODJA<>'3' and vevo_szlaf.telj_datum>=@dat GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szl_fizetve.fizetve, dbo.vevo_szl_fizetve.hatralek, dbo.vevo_szl_fizetve.fizetett, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szl_fizetve.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_szl_fizetve.keszult, dbo.vevo_szl_fizetve.biz_tipus,dbo.vevo_szl_fizetve.fiz_datum, dbo.vevo_szlaf.torolt, dbo.vevo_szlaf.torlo, vevo_szl_fizetve.ut_fizetes,penznem,kurzus,vevo_szlaf.modositva, vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,uzletkoto,vevo_arcsoport insert into @xxvevo_biz_fizetve SELECT 'száll.lev.', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_szlef.TELJ_DATUM, '3-Készpénz', dbo.vevo_szlef.TELJ_DATUM, round(ISNULL(SUM((CASE vevo_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR)) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), 0),0) AS brutto_ertek, ISNULL(dbo.vevo_szl_fizetve.fizetve, ' ') AS fizetve, --round(ISNULL(dbo.vevo_szl_fizetve.hatralek,0), round(ISNULL(SUM((CASE vevo_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR)) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), 0),0) AS hatralek, 0 AS fizetett, '3', dbo.vevo_szlef.VEVO, dbo.vevo_szlef.BIZSZAM AS xbizszam, dbo.vevo_szlef.TELJ_DATUM, isnull(dbo.vevo_szl_fizetve.kicsoda,''), isnull(dbo.belepes.teljesnev,''), isnull(dbo.vevo_szl_fizetve.keszult,''), isnull( dbo.vevo_szl_fizetve.fiz_datum,''), dbo.vevo_szlef.torolt, dbo.vevo_szlef.torlo, isnull(vevo_szl_fizetve.ut_fizetes,0), penznem,kurzus,vevo_szlef.modositva,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,uzletkoto,arcsoport FROM dbo.belepes RIGHT OUTER JOIN dbo.vevo_szl_fizetve ON dbo.belepes.ROVIDNEV = dbo.vevo_szl_fizetve.kicsoda RIGHT OUTER JOIN dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlet.AFA_KULCS = dbo.afa_kulcs.AFAKULCS ON dbo.vevo_szl_fizetve.bizszam = dbo.vevo_szlef.BIZSZAM inner join vevok on vevok.vevo_kod=vevo_szlef.vevo where (dbo.vevo_szl_fizetve.biz_tipus='száll.lev.' or dbo.vevo_szl_fizetve.biz_tipus is null) AND LEN(dbo.vevo_szlef.SZLASZAM) = 0 and vevo_szlef.telj_datum>=@dat GROUP BY dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szl_fizetve.fizetve, dbo.vevo_szl_fizetve.hatralek, dbo.vevo_szl_fizetve.fizetett, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szl_fizetve.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_szl_fizetve.keszult, dbo.vevo_szl_fizetve.biz_tipus, dbo.vevo_szl_fizetve.fiz_datum, dbo.vevo_szlef.torolt, dbo.vevo_szlef.torlo, vevo_szl_fizetve.ut_fizetes,penznem,kurzus,vevo_szlef.modositva, vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,uzletkoto,arcsoport update @xxvevo_biz_fizetve set brutto_ertek=round(brutto_ertek,0), hatralek=round(hatralek,0) where penznem='HUF' return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [VevoArajanKalkAdottPenznemben] ( @ssz bizonylat_szam, @kics kicsoda, @vevo_pn penznem ) RETURNS @xxVevoArajanKalkAdottPenznemben TABLE ( bizszam bizonylat_szam, ugyletkod varchar(20), vevo_penznem dbo.penznem, vevo_kurzusa numeric(12,5), tetel bizonylat_tetel, cikk_szam cikk_szam, cikk_tipus kulcs, mennyiseg mennyiseg, belfoldi_ar egyseg_ar, belfoldi_penznem penznem, belfoldi_kurzus numeric(9,5), belfoldi_szallito kulcs, belfoldi_keszlet mennyiseg, belfoldi_szallitas_nap int, kozbesz_ar egyseg_ar, beszerzesi_ar egyseg_ar, beszerzesi_penznem penznem, beszerzesi_szallito kulcs, beszerzesi_keszlet mennyiseg, beszerzesi_kurzus numeric(9,5), beszerzesi_szallitas_nap int, kiajanlott_ar egyseg_ar, kiajanlott_szallitas_nap int, kiajanlott_ar_ft egyseg_ar, kiajanlott_ert egyseg_ar, beszerzesi_ar_ft egyseg_ar, beszerzesi_ertek egyseg_ar, beszerzesi_ertek_ft egyseg_ar, gap egyseg_ar, kiajan_szaz numeric (18,2), belf_szaz numeric (18,2), cikk_nev cikk_nev, tipus_nev char(20), kicsoda kicsoda ) AS begin --declare @mennyi int declare @vkurz float declare @ugykod as char(20) select @vkurz=kurzus from deviza where penznem=@vevo_pn select @ugykod=rtrim(ugyletkod) from vvevo_arajanlatf where bizszam=@ssz if len(rtrim(@vevo_pn))>0 begin insert into @xxVevoArajanKalkAdottPenznemben select wvevo_arajanlatt.bizszam, @ugykod, @vevo_pn, @vkurz AS vevo_kurzusa, wvevo_arajanlatt.tetel, wvevo_arajanlatt.cikk_szam, wvevo_arajanlatt.cikk_tipus, wvevo_arajanlatt.mennyiseg, wvevo_arajanlatt.belfoldi_ar, wvevo_arajanlatt.belfoldi_penznem, ISNULL(deviza_1.kurzus, 1) AS belfoldi_kurzus, wvevo_arajanlatt.belfoldi_szallito, wvevo_arajanlatt.belfoldi_keszlet, wvevo_arajanlatt.belfoldi_szallitas_nap, isnull(wvevo_arajanlatt.kozbesz_ar,0), wvevo_arajanlatt.beszerzesi_ar, wvevo_arajanlatt.beszerzesi_penznem, wvevo_arajanlatt.beszerzesi_szallito, wvevo_arajanlatt.beszerzesi_keszlet, wvevo_arajanlatt.beszerzesi_kurzus, wvevo_arajanlatt.beszerzesi_szallitas_nap, wvevo_arajanlatt.kiajanlott_ar, wvevo_arajanlatt.kiajanlott_szallitas_nap, wvevo_arajanlatt.kiajanlott_ar * @vkurz AS kiajanlott_ar_ft, wvevo_arajanlatt.mennyiseg * wvevo_arajanlatt.kiajanlott_ar as kiajanlott_ert, wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus AS beszerzesi_ar_ft, wvevo_arajanlatt.mennyiseg * wvevo_arajanlatt.beszerzesi_ar AS beszerzesi_ertek, wvevo_arajanlatt.mennyiseg * wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus AS beszerzesi_ertek_ft, wvevo_arajanlatt.mennyiseg * (wvevo_arajanlatt.kiajanlott_ar * @vkurz - wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) AS gap, wvevo_arajanlatt.kiajanlott_ar * @vkurz / CASE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) WHEN 0 THEN 1 ELSE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) END AS kiajan_szaz, wvevo_arajanlatt.belfoldi_ar * ISNULL(deviza_1.kurzus, 1) / CASE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) WHEN 0 THEN 1 ELSE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) END AS belf_szaz, wvevo_arajanlatt.cikk_nev, wvevo_arajanlatt.tipus_nev, wvevo_arajanlatt.kicsoda from deviza AS deviza_1 RIGHT OUTER JOIN wvevo_arajanlatt ON deviza_1.penznem = wvevo_arajanlatt.belfoldi_penznem where wvevo_arajanlatt.kicsoda=@kics end return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vevoarak1] ( @vevo dbo.kulcs, @dat dbo.datum ) RETURNS @xxvcikk_arak TABLE (cikk_szam cikk_szam, cikk_nev cikk_nev, netto_ar egyseg_ar, kifutott char(1), cikkcsop2 char(18), menny_egys menny_egyseg, afa_kulcs afakulcs, ut_besz_ar egyseg_ar ) AS begin insert into @xxvcikk_arak SELECT cikkek.cikk_szam, cikkek.CIKK_NEV, dbo.VevoArCegreDatumra (cikkek.cikk_szam, @vevo, @dat ), cikkek.kifutott, cikkek.cikkcsop2, cikkek.menny_egys, cikkek.afa_kulcs, cikkek.ut_besz_ar FROM cikkek return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create function [VevoArCegreDatumra] ( @csz cikk_szam, @vevo kulcs, @dat datum ) returns egyseg_ar as begin declare @ear egyseg_ar select top 1 @ear=egyseg_ar from vevoarak where cikk_szam=@csz and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc return isnull(@ear, 0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [VevoCimsor] ( @vk int ) RETURNS varchar(100) AS begin declare @cim varchar(100) declare @kozterulet_jellege varchar(100) declare @hazszam varchar(100) declare @epulet varchar(100) declare @lepcsohaz varchar(100) declare @szint varchar(100) declare @ajto varchar(100) declare @kitoltve_h int select @cim=rtrim(cim) , @kozterulet_jellege=rtrim(kozterulet_jellege), @hazszam=rtrim(hazszam), @epulet=rtrim(epulet), @lepcsohaz=rtrim(lepcsohaz), @szint=rtrim(szint), @ajto=rtrim(ajto) from vevok where vevo_kod= @vk set @kitoltve_h = len(@kozterulet_jellege) + len(@hazszam) + len(@epulet) + len(@lepcsohaz) + len(@szint) + len(@ajto ) if @kitoltve_h <>0 begin set @cim=@cim + ' '+@kozterulet_jellege + ' '+@hazszam + ' sz.' if len(@epulet) >0 set @cim=@cim +' '+@epulet+ ' ép.' if len(@lepcsohaz) >0 set @cim=@cim +' '+@lepcsohaz+ ' lh.' if len(@szint) >0 set @cim=@cim +' '+@szint+ ' em.' if len(@ajto) >0 set @cim=@cim +' '+@ajto end return @cim end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [VevoCimsor1] ( @biz char(10) ) RETURNS varchar(100) AS begin declare @cim varchar(100) declare @kozterulet_jellege varchar(100) declare @hazszam varchar(100) declare @epulet varchar(100) declare @lepcsohaz varchar(100) declare @szint varchar(100) declare @ajto varchar(100) declare @kitoltve_h int select @cim=rtrim(cim) , @kozterulet_jellege=rtrim(kozterulet_jellege), @hazszam=rtrim(hazszam), @epulet=rtrim(epulet), @lepcsohaz=rtrim(lepcsohaz), @szint=rtrim(szint), @ajto=rtrim(ajto) from vevo_szlaf where bizszam= @biz set @kitoltve_h = len(@kozterulet_jellege) + len(@hazszam) + len(@epulet) + len(@lepcsohaz) + len(@szint) + len(@ajto ) if @kitoltve_h <>0 begin set @cim=@cim + ' '+@kozterulet_jellege + ' '+@hazszam + ' sz.' if len(@epulet) >0 set @cim=@cim +' '+@epulet+ ' ép.' if len(@lepcsohaz) >0 set @cim=@cim +' '+@lepcsohaz+ ' lh.' if len(@szint) >0 set @cim=@cim +' '+@szint+ ' em.' if len(@ajto) >0 set @cim=@cim +' '+@ajto end return @cim end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [VevoiVisszaruUABizonylatrol] ( @bsz bizonylat_szam ) RETURNS @xxVisszaruSzamlak TABLE (bizszam bizonylat_szam ) AS begin insert into @xxVisszaruSzamlak select vevo_szlef.szlaszam from vevo_szlef inner join vevo_szlet on VEVO_szlef.bizszam=VEVO_szlet.bizszam where (VEVO_szlet.rendel_bsz in ( select --szle szám case when vaf.bizszam is null then eet.rendel_bsz else vef.bizszam end from vevo_szlaf as eaf inner join vevo_szlef as eef on eaf.bizszam=eef.szlaszam inner join vevo_szlet as eet on eef.bizszam=eet.bizszam left outer join vevo_szlaf as vaf on eet.rendel_bsz=vaf.bizszam left outer join vevo_szlef as vef on eet.rendel_bsz=vef.SZLASZAM where eaf.bizszam=@bsz ) or VEVO_szlet.rendel_bsz in ( select --szla szám case when vaf.bizszam is null then vef.szlaszam else vaf.bizszam end from vevo_szlaf as eaf inner join vevo_szlef as eef on eaf.bizszam=eef.szlaszam inner join vevo_szlet as eet on eef.bizszam=eet.bizszam left outer join vevo_szlaf as vaf on eet.rendel_bsz=vaf.bizszam left outer join vevo_szlef as vef on eet.rendel_bsz=vef.bizszam where eaf.bizszam=@bsz ) ) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [VevoSzabadHitelkerete] ( @vevo kulcs ) returns egyseg_ar as begin declare @hitelk egyseg_ar declare @szhitel egyseg_ar declare @ert egyseg_ar declare @jov egyseg_ar set @szhitel=0 if (select rtrim(ertek) from parameterek where azonosito='PURendszerTipus')<>'1' begin set @szhitel=-1 end else begin if (select count(*) from vevok_hitelkeret where vevo_kod=@vevo)=0 set @szhitel=-1 else begin select @hitelk=hitelkeret from vevok_hitelkeret where vevo_kod=@vevo select @ert=isnull(sum(brutto_ertekft),0) from vvevo_szla_ertek where fiz_modja='4' and vevo=@vevo select @jov=isnull(sum((brutto_ertek - hatralek) * kurzus),0) from vvevo_biz_fizetve where fiz_modja='4' and vevo=@vevo if @ert - @jov > @hitelk set @szhitel=0 else set @szhitel=@hitelk - (@ert - @jov) end end return isnull(@szhitel, 0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [VevoTelCimsor]( @vk int, @tk char(4) ) RETURNS varchar(100) AS begin declare @cim varchar(100) declare @kozterulet_jellege varchar(100) declare @hazszam varchar(100) declare @epulet varchar(100) declare @lepcsohaz varchar(100) declare @szint varchar(100) declare @ajto varchar(100) declare @kitoltve_h int select @cim=rtrim(cim) , @kozterulet_jellege=rtrim(kozterulet_jellege), @hazszam=rtrim(hazszam), @epulet=rtrim(epulet), @lepcsohaz=rtrim(lepcsohaz), @szint=rtrim(szint), @ajto=rtrim(ajto) from vevo_tel where vevo_kod=@vk and telep_kod=@tk set @kitoltve_h = len(@kozterulet_jellege) + len(@hazszam) + len(@epulet) + len(@lepcsohaz) + len(@szint) + len(@ajto ) if @kitoltve_h <>0 begin set @cim=@cim + ' '+@kozterulet_jellege + ' '+@hazszam + ' sz.' if len(@epulet) >0 set @cim=@cim +' '+@epulet+ ' ép.' if len(@lepcsohaz) >0 set @cim=@cim +' '+@lepcsohaz+ ' lh.' if len(@szint) >0 set @cim=@cim +' '+@szint+ ' em.' if len(@ajto) >0 set @cim=@cim +' '+@ajto end return @cim end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [wugyletek] ( @ugylet char(12) ) RETURNS @xxugylet TABLE (bizszam bizonylat_szam, biztipus varchar(30), ugyfel nev, penznem penznem, datum datum_ora, ugyintezo kicsoda, ugyintezo_nev nev, allapot kulcs, allapot_nev nev ) AS BEGIN insert into @xxugylet select vevo_arajanlatf.bizszam, 'vevői árajánlat', vevo_nev, vevo_penznem, datum, keres_rogzitette, '', allapot, allapot_nev from vevo_arajanlatf INNER JOIN ugyletek ON vevo_arajanlatf.bizszam = ugyletek.bizszam and ugyletek.biztipus='vevo_arajan' INNER JOIN vevok ON vevo_arajanlatf.vevo_kod = vevok.VEVO_KOD INNER JOIN broker_allapotok ON vevo_arajanlatf.allapot = broker_allapotok.allapot_kod where ugyletek.ugyletkod=@ugylet insert into @xxugylet select szall_arajanf.bizszam, case szall_arajanf.allapot when 21 then 'szállítói árajánlat' when 22 then 'szállítói árajánlat' end, szall_nev, szall_arajanf.penznem, aj_keres_datum, case szall_arajanf.allapot when 21 then keres_rogzitette when 22 then erkezes_rogzitette end, '', allapot,allapot_nev from szall_arajanf INNER JOIN ugyletek ON szall_arajanf.bizszam = ugyletek.bizszam and ugyletek.biztipus='szall_arajanlat' INNER JOIN szallito ON szall_arajanf.szallito = szallito.szall_kod INNER JOIN broker_allapotok ON szall_arajanf.allapot = broker_allapotok.allapot_kod where ugyletek.ugyletkod=@ugylet insert into @xxugylet select vevo_renf.bizszam,'vevői rendelés', vevo_nev, penznem, rend_dat, vevo_renf.kicsoda, '', 14,'Kiajánlott' from vevo_renf INNER JOIN ugyletek ON vevo_renf.bizszam = ugyletek.bizszam and ugyletek.biztipus='vevo_rendeles' INNER JOIN vevok ON vevo_renf.vevo = vevok.vevo_kod where ugyletek.ugyletkod=@ugylet insert into @xxugylet select szall_renf.bizszam,'szállítói rendelés', szall_nev, szall_renf.penznem, datum, szall_renf.kicsoda, '', 14,'Kiajánlott' from szall_renf INNER JOIN ugyletek ON szall_renf.bizszam = ugyletek.bizszam and ugyletek.biztipus='szall_rendeles' INNER JOIN szallito ON szall_renf.szallito = szallito.szall_kod where ugyletek.ugyletkod=@ugylet update @xxugylet set ugyintezo_nev= (select teljesnev from belepes where rovidnev=ugyintezo) Return END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [xk_arcsopkod](@szam [int]) RETURNS int AS BEGIN Declare @Name As varchar(20); Declare @RetKod As Int; Select @Name = 'Katal. ár' + lTrim(Str(@szam)); Select @RetKod = IsNull(KOD,0) from vevo_arcsoport where Nev = @Name ; Return @RetKod END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create function [xrazonosito] () returns varchar(50) as begin declare @ert varchar(50) select @ert=azonosito from elesito return @ert end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [xrBizTetRend] () returns varchar(50) as begin declare @ert varchar(50) if exists (select * from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='BizTetRend') select @ert=rtrim(ertek) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='BizTetRend' else set @ert='cikk_nev' if not (@ert='tetel' or @ert='cikk_nev' or @ert='cikk_szam') set @ert='cikk_nev' return @ert end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [xrCimsor]() RETURNS varchar(100) AS begin declare @cim varchar(100) declare @kozterulet_jellege varchar(100) declare @hazszam varchar(100) declare @epulet varchar(100) declare @lepcsohaz varchar(100) declare @szint varchar(100) declare @ajto varchar(100) declare @kitoltve_h int select @cim=rtrim(cim) , @kozterulet_jellege=rtrim(kozterulet_jellege), @hazszam=rtrim(hazszam), @epulet=rtrim(epulet), @lepcsohaz=rtrim(lepcsohaz), @szint=rtrim(szint), @ajto=rtrim(ajto) from regisztral set @kitoltve_h = len(@kozterulet_jellege) + len(@hazszam) + len(@epulet) + len(@lepcsohaz) + len(@szint) + len(@ajto ) if @kitoltve_h <>0 begin set @cim=@cim + ' '+@kozterulet_jellege + ' '+@hazszam + ' sz.' if len(@epulet) >0 set @cim=@cim +' '+@epulet+ ' ép.' if len(@lepcsohaz) >0 set @cim=@cim +' '+@lepcsohaz+ ' lh.' if len(@szint) >0 set @cim=@cim +' '+@szint+ ' em.' if len(@ajto) >0 set @cim=@cim +' '+@ajto end return @cim end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [xrfuggveny] (@par varchar(30)) returns varchar(50) as begin declare @ert varchar(50) select @ert=rtrim(ertek) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito=@par return @ert end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [xvcikk_arak_web] ( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @vevo dbo.kulcs ) RETURNS @xxvcikk_arak TABLE (arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, lista_netto_ar egyseg_ar, lista_brutto_ar egyseg_ar, lakcios char(1), netto_akcios_ar egyseg_ar, brutto_akcios_ar egyseg_ar, akcio_kdat datum, akcio_vdat datum, mefelt_db mennyiseg, netto_meakcios_ar egyseg_ar, brutto_meakcios_ar egyseg_ar, meakcio_kdat datum, meakcio_vdat datum, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, csoport_nev_ang nev, db_kart int, db_rakl int, db_br_sulya numeric(18, 3), menny_egys menny_egyseg, menny_egys_ang menny_egyseg, norm_me menny_egyseg, norm_szorz mennyiseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), letrehozva datum, vonalkod varchar(14), keszlet mennyiseg, szarmazasi_hely char(2), nev_hu varchar(200), nev_en varchar(200) ) AS begin declare @arcs_alap kulcs declare @arcs_alap1 kulcs declare @szorzo numeric(18,2) declare @szm char(1) declare @mennyi int declare @ardatum char(7) declare @ind_tipus int declare @rakk int declare @arcs_pn penznem --az arcsoport milyen penznemben lett megadva declare @dat1 varchar(10) declare @dat2 varchar(10) declare @tmpvevo_akcio_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) declare @tmpvevo_akcio_me table ( cikk_szam cikk_szam, felt_db mennyiseg, egyseg_ar egyseg_ar, kdatum dbo.datum, vdatum dbo.datum ) declare @tmpvevoarak_1 table ( cikk_szam cikk_szam, egyseg_ar egyseg_ar ) declare @tmpkeszlet table ( cikk_szam cikk_szam, darab mennyiseg ) declare @tmpkeszlet1 table ( cikk_szam cikk_szam, darab mennyiseg ) -- a paraméterként átadott pn-t nem használjuk!! kurz pedig mindig=1 -------------------------------------------------------------------- select @szm = szamitas_modja, @arcs_pn=penznem, @pn=penznem from vevo_arcsoport where kod=@arcs set @kurz=1 Insert into @tmpvevo_akcio_1 select * from dbo.vevo_akcio_1(@akccs,@dat) Insert into @tmpvevo_akcio_me select vevo_akcio_me.cikk_szam, max(felt_db), min(akc_ar), kdatum, vdatum from vevo_akcio_me WITH (NOLOCK) where megszunt<>'1' and @akccs=akciocsop and kdatum<= @dat and @dat<=vdatum group by vevo_akcio_me.cikk_szam, kdatum, vdatum insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek set @rakk=convert(integer, isnull(dbo.xrfuggveny('WebKeszletRaktar'),0)) insert into @tmpkeszlet1 select cikk_szam, sum(darab) from keszlet where (@rakk=raktar_kod or @rakk=0) group by cikk_szam insert into @tmpkeszlet1 select cikk_szam, -sum(darab) from keszlet_negativ where (@rakk=raktar_kod or @rakk=0) group by cikk_szam insert into @tmpkeszlet1 select cikk_szam, -sum(darab) from foglalasok where (@rakk=raktar_kod or @rakk=0) and lejart<>'1' group by cikk_szam insert into @tmpkeszlet select cikk_szam, sum(darab) from @tmpkeszlet1 group by cikk_szam if @szm='L' begin --LISTA áras set @ardatum = left(@dat,7) select @mennyi=isnull(count(*),0) from vevo_ar_lista WITH (NOLOCK) where arcsoport=@arcs and datum = @ardatum if @mennyi = 0 select @ardatum = max(datum) from vevo_ar_lista where arcsoport=@arcs and datum < @ardatum if @ardatum is not null --Már volt valamilyen listaár rögzítve insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar * @kurz,0), (100+afa_kulcs.afaertek) * isnull(dbo.vevo_ar_lista.netto_ar * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM dbo.cikkek WITH (NOLOCK) inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where dbo.vevo_ar_lista.arcsoport=@arcs and dbo.vevo_ar_lista.datum = @ardatum and web=1 end else if @szm='R' --RABATT tablós begin select @ind_tipus=ind_tipus from vevo_arf where arcsoport=@arcs insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, case @ind_tipus when 1 then dbo.TermekListaBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn) when 2 then dbo.TermekNettoBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn) when 3 then dbo.cikkek.ut_besz_ar end * (100 + dbo.CikkRabattFelar (@arcs, cikkek.cikk_szam) )/(100 * @kurz), case @ind_tipus when 1 then (100+afa_kulcs.afaertek) * dbo.TermekListaBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn)/100 when 2 then (100+afa_kulcs.afaertek) * dbo.TermekNettoBeszAraAdottDat(dbo.cikkek.cikk_szam, @dat, @arcs_pn)/100 when 3 then (100+afa_kulcs.afaertek) * dbo.cikkek.ut_besz_ar/100 end * (100 + dbo.CikkRabattFelar (@arcs, cikkek.cikk_szam) )/(100 * @kurz), case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM dbo.cikkek WITH (NOLOCK) Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 end else --M lista ár 2 if @szm='M' begin delete from @tmpvevoarak_1 insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek if (select rovidnev from regisztral)='KALMARKET' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(vevoarak_1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * isnull(vevoarak_1.egyseg_ar * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM cikkek WITH (NOLOCK) --left outer JOIN inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 end else -- százalékos begin if (select count(*) from vevo_arcs_szazalek where arcsoport=@arcs)>0 begin select @arcs_alap=alap_arcsoport, @szorzo=szorzo from vevo_arcs_szazalek where arcsoport=@arcs if (select szamitas_modja from vevo_arcsoport where kod=@arcs_alap)='L' begin --lista áras set @ardatum = left(@dat,7) select @ardatum = max(datum) from vevo_ar_lista where arcsoport=@arcs_alap and datum <= @ardatum if @ardatum is not null insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(dbo.vevo_ar_lista.netto_ar * @szorzo * @kurz,0), (100+afa_kulcs.afaertek) * isnull(dbo.vevo_ar_lista.netto_ar * @szorzo * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM cikkek WITH (NOLOCK) inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 and dbo.vevo_ar_lista.arcsoport=@arcs_alap and dbo.vevo_ar_lista.datum = @ardatum end else begin --lista ár kivételekkel insert into @tmpvevoarak_1 select cikk_szam,isnull( (select top 1 egyseg_ar from vevoarak where cikk_szam=cikkek.cikk_szam and arcsoport=@arcs_alap and datum<=@dat and (len(vdatum)=0 or (len(vdatum)>0 and @dat<=vdatum)) and (vevo=0 or vevo=@vevo) order by vevo desc, datum desc ),0) from cikkek if (select rovidnev from regisztral)='KALMARKET' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=1 --listaár select @dat2=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=2 --exportár if (select penznem from vevo_arcsoport where kod=@arcs)='HUF' update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=1 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 else update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat2 and a.arcsoport=2 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end if (select rovidnev from regisztral)='KOSERPIAC' begin select @dat1=MAX(datum) from vevo_ar_lista where datum<=left(@dat,7) and arcsoport=24 --listaár update @tmpvevoarak_1 set egyseg_ar=isnull( (select a.netto_ar from vevo_ar_lista a where datum=@dat1 and a.arcsoport=24 and [@tmpvevoarak_1].cikk_szam=a.cikk_szam),0) where [@tmpvevoarak_1].egyseg_ar=0 end insert into @xxvcikk_arak SELECT @arcs, cikkek.CIKK_NEV, cikkek.CIKK_NEV_ang, cikkek.cikk_szam, isnull(vevoarak_1.egyseg_ar * @szorzo * @kurz,0), (100+afa_kulcs.afaertek) * isnull(vevoarak_1.egyseg_ar * @szorzo * @kurz,0)/100, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, '') , cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM cikkek WITH (NOLOCK) inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs --left outer JOIN dbo.vevo_ar_lista WITH (NOLOCK) ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevoarak_1 vevoarak_1 ON vevoarak_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 end end end insert into @xxvcikk_arak SELECT @arcs, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKK_NEV_ang, cikkek.cikk_szam, 0, 0, case IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0) when 0 then '' else '*' end, IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_1.egyseg_Ar * @kurz,0)/100, isnull(vevo_akcio_me1.kdatum,''), isnull(vevo_akcio_me1.vdatum,''), isnull(vevo_akcio_me1.felt_db,0), IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0), (100+afa_kulcs.afaertek) * IsNull(vevo_akcio_me1.egyseg_ar * @kurz,0)/100, isnull(vevo_akcio_1.kdatum,''), isnull(vevo_akcio_1.vdatum,'') , cikkek.aru_szolg, cikkek.kifutott, cikkek.szallito, isnull(szallito.szall_nev, ''), cikkek.gyarto, isnull(gyarto.nev, ''), cikkek.cikkcsop2, stcikk2.cikk_nev, stcikk2.cikk_nev_eng, cikkek.db_kart, cikkek.db_kart*cikkek.kart_rakl, cikkek.db_br_sulya, cikkek.menny_egys, cikkek.menny_egys_ang, cikkek.norm_me, cikkek.norm_szorz, cikkek.afa_kulcs, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, cikkek.akt_besz_ar, cikkek.dat_tipus, cikkek.vcikkszam, cikkek.ut_besz_ar, cikkek.termekdijas, left(cikkek.letrehozva,10), isnull(vonal.vonalkod,''), isnull(keszlet1.darab,0), cikkek.szarmazasi_hely, isnull(orszagok.nev_hu,''), isnull(orszagok.nev_en,'') FROM dbo.cikkek WITH (NOLOCK) left outer JOIN @tmpvevo_akcio_1 vevo_akcio_1 ON vevo_akcio_1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpvevo_akcio_me vevo_akcio_me1 ON vevo_akcio_me1.cikk_szam = dbo.cikkek.CIKK_SZAM Left outer JOIN @tmpkeszlet keszlet1 ON keszlet1.cikk_szam = dbo.cikkek.CIKK_SZAM inner join afa_kulcs on cikkek.AFA_KULCS=afa_kulcs.afakulcs left outer join stcikk2 on stcikk2.cikk_szam=cikkek.cikkcsop2 left outer join gyarto on gyarto.kod=cikkek.gyarto left outer join szallito on szallito.szall_kod=cikkek.szallito left outer join vonal on vonal.cikk_szam=cikkek.cikk_szam and vonal.alap='1' left outer join orszagok on orszagok.iso=cikkek.szarmazasi_hely where cikkek.web=1 and cikkek.cikk_szam not in (select cikk_szam from @xxvcikk_arak) return end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ertek] AS SELECT dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.UZLETKOTO, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.belepes.TELJESNEV, dbo.vevo_szlaf.MODOSITVA, ISNULL(SUM((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 - dbo.vevo_szlaf.kedvezmeny) / 100, 0) AS netto_ertek, ROUND(ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, dbo.Round_05(ROUND(ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.vevo_szlaf.kurzus)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END), CASE penznem WHEN dbo.parameterek.ERTEK THEN CASE dbo.vevo_szlaf.FIZ_MODJA WHEN '3' THEN 1 ELSE 0 END ELSE 0 END) AS brutto_ertekft, ISNULL(SUM((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (dbo.vevo_szlaf.kedvezmeny / 100), 0) AS veng_ertek, dbo.parameterek.ERTEK AS alappenznem, dbo.vevo_szlaf.TIPUS, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_szlaf.KICSODA, dbo.vevo_szlaf.peldany, dbo.vevo_szlaf.VEVO_NEV, COUNT(*) AS tetel_db, dbo.vevo_szlaf.afamentes, dbo.orszagok.nev_hu AS orszag, dbo.orszagok.eu, ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.vevo_szlaf.kurzus)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0) AS brutto_ertekft_kn, dbo.vevok.vevo_arcsoport, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.Eszamla, (SELECT TOP (1) arcsoport FROM dbo.vevo_szlef WHERE (SZLASZAM = dbo.vevo_szlaf.BIZSZAM)) AS arcsoport, ISNULL(SUM((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.vevo_szlaf.kurzus) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 - dbo.vevo_szlaf.kedvezmeny) / 100, 0) AS netto_ertekft FROM dbo.fizmodok INNER JOIN dbo.vevo_szlaf INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_szlaf.KICSODA = dbo.belepes.ROVIDNEV ON dbo.fizmodok.KOD = dbo.vevo_szlaf.FIZ_MODJA INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlaf.TIPUS = dbo.ertekesit_tipus.kod INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso LEFT OUTER JOIN dbo.afa_kulcs INNER JOIN dbo.vevo_szlat ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlaf.UZLETKOTO = dbo.uzletkoto.kod CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.UZLETKOTO, dbo.uzletkoto.nev, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.belepes.TELJESNEV, dbo.vevo_szlaf.MODOSITVA, dbo.fizmodok.NEV, dbo.vevo_szlaf.VEVO, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO, dbo.vevo_szlaf.TIPUS, dbo.ertekesit_tipus.nev, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_szlaf.KICSODA, dbo.vevo_szlaf.peldany, dbo.vevo_szlaf.afamentes, dbo.orszagok.nev_hu, dbo.orszagok.eu, dbo.vevok.vevo_arcsoport, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.Eszamla HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ertek_kedv] AS SELECT BIZSZAM, TELJ_DATUM, VEVO, VEVO_NEV, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, vevo_arcsoport, 'V' AS Tipus, TIPUS AS BizTip, kedvezmeny, netto_ertek, veng_ertek AS eng_ertek FROM dbo.vvevo_szla_ertek WHERE (veng_ertek > 0) UNION all SELECT dbo.vevo_szlat.BIZSZAM + '/' + CONVERT(varchar(10), dbo.vevo_szlat.TETEL) AS bizszam, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, vevok.vevo_arcsoport, 'T' AS Tipus, dbo.vevo_szlaf.TIPUS AS BizTip, dbo.vevo_szlat.kedvezmeny, (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100 AS netto_ert, (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (dbo.vevo_szlat.kedvezmeny / 100) AS eng_ertek FROM dbo.vevo_szlat INNER JOIN dbo.vevo_szlaf ON dbo.vevo_szlat.BIZSZAM = dbo.vevo_szlaf.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD WHERE ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (dbo.vevo_szlat.kedvezmeny / 100) > 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikk_arak_hh] ( @akccs dbo.kulcs ) RETURNS TABLE AS Return select top 100 percent akc_csop,cikk_szam,kedvezmeny from vevo_akcio_hh where akc_csop = @akccs and kido <= dbo.myGetTime() and vido>= dbo.myGetTime() and len(rtrim(substring(het, dbo.myDOW(), 1)))>0 and len(rtrim(megszunt))=0 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikk_arak_cc]( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus ) RETURNS TABLE AS Return select top 100 percent arcsoport,cikk_nev,c.cikk_szam,netto_ar,aru_szolg,kifutott,szallito, gyarto,cikkcsop2, menny_egys, afa_kulcs, tgon, ntgon, tgonszor, ntgonszor, akt_besz_Ar,dat_tipus, vcikkszam,ut_besz_Ar, CASE WHEN IsNull(h.kedvezmeny,0) = 0 Then akcios_Ar ELSE netto_ar * (100-h.kedvezmeny)/100 END As akcios_Ar, CASE WHEN IsNull(h.kedvezmeny,0) != 0 Then 'hh' ELSE CASE WHEN akcios_Ar > 0 THEN 'a' ELSE '' END END As Akc_Tip, c.fordafa from vcikk_arak(@arcs,@akccs,@dat,@pn,@kurz,0) c left outer join vcikk_arak_hh(@akccs) h on c.cikk_szam = h.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vcikk_arak_cc] AS SELECT arcsoport, cikk_nev, cikk_szam, netto_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, menny_egys, afa_kulcs, tgon, ntgon, tgonszor, ntgonszor, akt_besz_Ar, dat_tipus, vcikkszam, ut_besz_Ar, akcios_Ar, Akc_Tip FROM dbo.vcikk_arak_cc(1, 1, '2011.03.01', 'HUF', 1) AS vcikk_arak_cc_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_raktar] AS SELECT raktar_kod, cikk_szam, sum(darab) AS keszlet FROM keszlet WHERE darab <> 0 GROUP BY raktar_kod, cikk_szam UNION ALL SELECT raktar_kod, cikk_szam, - sum(darab) FROM foglalasok WHERE lejart <> '1' GROUP BY raktar_kod, cikk_szam UNION ALL SELECT raktar_kod, cikk_szam, - sum(darab) FROM keszlet_negativ WHERE darab <> 0 GROUP BY raktar_kod, cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_raktar1] AS SELECT raktar_kod, cikk_szam, SUM(keszlet) AS keszlet FROM dbo.vkeszlet_raktar GROUP BY raktar_kod, cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vmozgas_keszlet1] AS SELECT TOP (100) PERCENT dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, - SUM(dbo.mozgas.DARAB) AS darab, - SUM(dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR) AS ertek FROM dbo.vevo_szlet INNER JOIN dbo.mozgas ON dbo.vevo_szlet.BIZSZAM = dbo.mozgas.BIZSZAM AND dbo.vevo_szlet.TETEL = dbo.mozgas.TETEL AND dbo.mozgas.MOZGASKOD = 'vevo_szle' INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM GROUP BY dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_karton] AS SELECT dbo.vevok.sajat_bolt, dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.edarab, dbo.vevo_szlet.darab, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny, dbo.vevo_szlet.megjegyzes, dbo.vevo_szlet.akcio, dbo.vevo_szlet.rendel_bsz, dbo.vevo_szlet.rendel_tet, CASE WHEN sajat_bolt = '1' THEN dbo.vmozgas_keszlet1.DARAB ELSE vevo_szlet.darab END AS mdb, CASE WHEN sajat_bolt = '1' THEN CASE WHEN dbo.vmozgas_keszlet1.DARAB = 0 THEN 0 ELSE vmozgas_keszlet1.ertek END ELSE vevo_szlet.darab * vevo_szlet.egyseg_ar * (100 - vevo_szlet.kedvezmeny) * (100 - vevo_szlef.kedvezmeny) / 10000 END AS mert FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlet.BIZSZAM = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.vevo_szlef.VEVO INNER JOIN dbo.vmozgas_keszlet1 ON dbo.vevo_szlet.BIZSZAM = dbo.vmozgas_keszlet1.BIZSZAM AND dbo.vevo_szlet.TETEL = dbo.vmozgas_keszlet1.TETEL GROUP BY dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.edarab, dbo.vevo_szlet.darab, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny, dbo.vevo_szlet.megjegyzes, dbo.vevo_szlet.akcio, dbo.vevo_szlet.rendel_bsz, dbo.vevo_szlet.rendel_tet, dbo.vevo_szlef.kedvezmeny, dbo.vmozgas_keszlet1.darab, dbo.vmozgas_keszlet1.ertek, dbo.vevok.sajat_bolt GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vanyagszukseglet2] AS SELECT cikk_szam, raktar_kod FROM dbo.anyagszukseglet GROUP BY cikk_szam, raktar_kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vfoglalt_keszlet] AS SELECT cikk_szam, SUM(darab) AS darab FROM dbo.foglalasok WHERE (meddig >= dbo.myGetDate()) GROUP BY cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_osszes] AS SELECT CIKK_SZAM, SUM(DARAB) AS darab, SUM(DARAB * EGYSEG_AR) / SUM(DARAB) AS egyseg_ar FROM dbo.keszlet WHERE (DARAB <> 0) GROUP BY CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rent_gyartas1] AS SELECT dbo.vevo_renf.REND_DAT, dbo.vanyagszukseglet2.raktar_kod, dbo.vevo_rent.CIKK_SZAM, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.CIKK_NEV, ISNULL(dbo.vkeszlet_osszes.darab, 0) AS keszlet_darab, ISNULL(dbo.vfoglalt_keszlet.darab, 0) AS foglalt_darab, ISNULL(dbo.vkeszlet_osszes.darab, 0) - ISNULL(dbo.vfoglalt_keszlet.darab, 0) AS szabad_darab, SUM(dbo.vevo_rent.SZORZO * dbo.vevo_rent.EDARAB) AS edarab, SUM(dbo.vevo_rent.SZORZO * dbo.vevo_rent.DARAB) AS darab, 0 AS kulcs, '' AS bizszam, 0 AS tetel, dbo.raktarak.nev AS raktar_nev FROM dbo.vevo_rent INNER JOIN dbo.vevo_renf ON dbo.vevo_renf.BIZSZAM = dbo.vevo_rent.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vanyagszukseglet2 ON dbo.vevo_rent.CIKK_SZAM = dbo.vanyagszukseglet2.cikk_szam INNER JOIN dbo.raktarak ON dbo.vanyagszukseglet2.raktar_kod = dbo.raktarak.kod LEFT OUTER JOIN dbo.vfoglalt_keszlet ON dbo.vevo_rent.CIKK_SZAM = dbo.vfoglalt_keszlet.cikk_szam LEFT OUTER JOIN dbo.vkeszlet_osszes ON dbo.vevo_rent.CIKK_SZAM = dbo.vkeszlet_osszes.CIKK_SZAM GROUP BY dbo.vevo_renf.REND_DAT, dbo.vanyagszukseglet2.raktar_kod, dbo.vevo_rent.CIKK_SZAM, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.CIKK_NEV, ISNULL(dbo.vkeszlet_osszes.darab, 0), ISNULL(dbo.vfoglalt_keszlet.darab, 0), ISNULL(dbo.vkeszlet_osszes.darab, 0) - ISNULL(dbo.vfoglalt_keszlet.darab, 0), dbo.raktarak.nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ertek_pu] AS SELECT VEVO_NEV, VEVO, BIZSZAM, TELJ_DATUM, SZLA_DATUM, FIZ_MODJA, fizmod_nev, FIZ_ESED, penznem, kurzus, kedvezmeny, UZLETKOTO, uzletkoto_nev, MEGJEGYZES, TOROLT, TORLO, VISSZARU, penzugyi, TELJESNEV, MODOSITVA, netto_ertek, brutto_ertek, dbo.pu_szla_kiegyenlit('V', VEVO, BIZSZAM) AS kiegyenlitve, peldany, Eszamla FROM dbo.vvevo_szla_ertek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vpu_nyito_szla] AS SELECT dbo.pu_nyito_szla.kulcs, dbo.pu_nyito_szla.bizszam, dbo.pu_nyito_szla.hivszam, dbo.pu_nyito_szla.partner_tip, dbo.pu_nyito_szla.partner, dbo.pu_nyito_szla.telj_datum, dbo.pu_nyito_szla.SZLA_DATUM, dbo.pu_nyito_szla.fiz_esed, dbo.pu_nyito_szla.netto_osszeg, dbo.pu_nyito_szla.brutto_osszeg, dbo.pu_nyito_szla.penznem, dbo.pu_nyito_szla.modido, dbo.pu_nyito_szla.kicsoda, dbo.belepes.TELJESNEV, dbo.pu_nyito_szla.fiz_modja, dbo.fizmodok.NEV AS fiz_modnev, dbo.PartnerNev(dbo.pu_nyito_szla.partner_tip, dbo.pu_nyito_szla.partner) AS Partner_Nev FROM dbo.pu_nyito_szla INNER JOIN dbo.belepes ON dbo.pu_nyito_szla.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.pu_nyito_szla.fiz_modja = dbo.fizmodok.KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vUnion_Vevo_Szla] AS SELECT Partner_Nev AS VEVO_NEV, partner AS VEVO, bizszam, SZLA_DATUM, telj_datum, penznem, 1 AS kurzus, TELJESNEV, modido AS MODOSITVA, netto_osszeg AS netto_ertek, brutto_osszeg AS brutto_ertek, dbo.pu_szla_kiegyenlit('V', partner, bizszam) AS kiegyenlitve, fiz_modja, fiz_modnev AS fizmod_nev, fiz_esed, '' AS torolt, '' AS torlo FROM dbo.vpu_nyito_szla WHERE (partner_tip = 'V') UNION all SELECT VEVO_NEV, VEVO, BIZSZAM, SZLA_DATUM, TELJ_DATUM, penznem, kurzus, TELJESNEV, MODOSITVA, netto_ertek, brutto_ertek, dbo.pu_szla_kiegyenlit('V', VEVO, BIZSZAM) AS kiegyenlitve, FIZ_MODJA, fizmod_nev, FIZ_ESED, torolt, torlo FROM dbo.vvevo_szla_ertek_pu WHERE telj_datum >= dbo.xrfuggveny('PUKezd') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vq_kivet] AS SELECT dbo.kivetf.BIZSZAM, dbo.kivetf.DATUM, dbo.kivetf.MEGJEGYZES, dbo.kivetf.MODIDO, dbo.raktarak.nev AS raktar_nev, dbo.kivetjog.kivetnev, dbo.belepes.TELJESNEV, dbo.kivett.TETEL, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.kivetf.KIVET_KOD, dbo.cikkek.MENNY_EGYS, dbo.kivett.DARAB, dbo.kivett.SZORZO, SUM(- (ISNULL(dbo.mozgas.DARAB, 0) * ISNULL(dbo.keszlet.EGYSEG_AR, 0))) AS besz_ert, SUM(- ((ISNULL(dbo.mozgas.DARAB, 0) * ISNULL(dbo.keszlet.EGYSEG_AR, 0)) * (100 + dbo.afa_kulcs.afaertek) / 100)) AS br_ert, dbo.cikkek.CIKK_SZAM, dbo.kivetf.RAKTAR_K, dbo.wszav_nyomt.SZAVIDO, dbo.cikkek.VCIKKSZAM, ISNULL(dbo.vonal.VONALKOD, '') AS VONALKOD, dbo.cikkek.AFA_KULCS, dbo.kivetf.hivszam, ROUND(dbo.kivett.EGYSEG_AR * (100 + CASE WHEN kivett.afa_kulcs = 'AM' THEN 0 ELSE CONVERT(float, kivett.afa_kulcs) END) / 100, 2) AS brutto_ar FROM dbo.belepes INNER JOIN dbo.kivetf INNER JOIN dbo.kivetjog ON dbo.kivetf.KIVET_KOD = dbo.kivetjog.kod INNER JOIN dbo.kivett ON dbo.kivetf.BIZSZAM = dbo.kivett.BIZSZAM ON dbo.belepes.ROVIDNEV = dbo.kivetf.KICSODA INNER JOIN dbo.raktarak ON dbo.kivetf.RAKTAR_K = dbo.raktarak.kod INNER JOIN dbo.cikkek ON dbo.kivett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS LEFT OUTER JOIN dbo.keszlet INNER JOIN dbo.mozgas ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM ON dbo.kivett.BIZSZAM = dbo.mozgas.BIZSZAM AND dbo.mozgas.MOZGASKOD = 'kivet' AND dbo.kivett.TETEL = dbo.mozgas.TETEL LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' LEFT OUTER JOIN dbo.wszav_nyomt ON dbo.kivett.TETEL = dbo.wszav_nyomt.TETEL AND dbo.kivett.BIZSZAM = dbo.wszav_nyomt.BIZSZAM GROUP BY dbo.kivetf.BIZSZAM, dbo.kivetf.DATUM, dbo.kivetf.MEGJEGYZES, dbo.kivetf.MODIDO, dbo.raktarak.nev, dbo.kivetjog.kivetnev, dbo.belepes.TELJESNEV, dbo.kivett.TETEL, dbo.cikkek.CIKK_NEV, dbo.kivett.SZORZO, dbo.kivett.DARAB, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.kivetf.KIVET_KOD, dbo.cikkek.MENNY_EGYS, dbo.cikkek.CIKK_SZAM, dbo.kivetf.RAKTAR_K, dbo.wszav_nyomt.SZAVIDO, dbo.cikkek.VCIKKSZAM, dbo.vonal.VONALKOD, dbo.cikkek.AFA_KULCS, dbo.kivetf.hivszam, dbo.kivett.AFA_KULCS, dbo.kivett.EGYSEG_AR GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vq_kivet_sum] AS SELECT BIZSZAM, DATUM, MEGJEGYZES, MODIDO, raktar_nev, kivetnev, SUM(DARAB * SZORZO) AS Darab, SUM(besz_ert) AS besz_ert, SUM(br_ert) AS br_ert, TELJESNEV, RAKTAR_K, KIVET_KOD, hivszam FROM dbo.vq_kivet GROUP BY BIZSZAM, DATUM, MEGJEGYZES, MODIDO, raktar_nev, kivetnev, TELJESNEV, RAKTAR_K, KIVET_KOD, hivszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vq_rmozgas] AS SELECT dbo.rmozgasf.BIZSZAM, dbo.rmozgasf.DATUM, raktarak_1.nev AS fraktar_nev, dbo.raktarak.nev AS craktar_nev, dbo.rmozgasf.MEGJEGYZES, dbo.belepes.TELJESNEV, dbo.rmozgasf.modido, dbo.rmozgast.TETEL, dbo.rmozgast.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.rmozgast.MENNY_EGYS, dbo.rmozgast.SZORZO, dbo.rmozgast.DARAB, - SUM(dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR) AS besz_ert, - SUM((dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 100) AS br_ert, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.rmozgasf.FRAKTAR_K, dbo.rmozgasf.CRAKTAR_K, ISNULL(dbo.wszav_nyomt.SZAVIDO, '') AS SZAVIDO, dbo.cikkek.VCIKKSZAM, ISNULL(dbo.vonal.VONALKOD, '') AS VONALKOD, dbo.rmozgasf.hivszam, - SUM(dbo.mozgas.DARAB * dbo.cikkek.db_sulya) AS nsuly, - SUM(dbo.mozgas.DARAB * dbo.cikkek.db_br_sulya) AS bsuly FROM dbo.raktarak AS raktarak_1 INNER JOIN dbo.rmozgasf INNER JOIN dbo.rmozgast ON dbo.rmozgasf.BIZSZAM = dbo.rmozgast.BIZSZAM INNER JOIN dbo.belepes ON dbo.rmozgasf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.cikkek ON dbo.rmozgast.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.mozgas INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM ON dbo.rmozgast.BIZSZAM = dbo.mozgas.BIZSZAM AND dbo.rmozgast.TETEL = dbo.mozgas.TETEL ON raktarak_1.kod = dbo.rmozgasf.FRAKTAR_K INNER JOIN dbo.raktarak ON dbo.rmozgasf.CRAKTAR_K = dbo.raktarak.kod INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' LEFT OUTER JOIN dbo.wszav_nyomt ON dbo.rmozgast.BIZSZAM = dbo.wszav_nyomt.BIZSZAM AND dbo.rmozgast.TETEL = dbo.wszav_nyomt.TETEL WHERE (dbo.mozgas.MOZGASKOD = N'rmozgas') AND (dbo.mozgas.DARAB < 0) GROUP BY raktarak_1.nev, dbo.raktarak.nev, dbo.belepes.TELJESNEV, dbo.rmozgasf.DATUM, dbo.rmozgasf.MEGJEGYZES, dbo.rmozgasf.modido, dbo.rmozgasf.BIZSZAM, dbo.rmozgast.TETEL, dbo.rmozgast.CIKK_SZAM, dbo.rmozgast.MENNY_EGYS, dbo.rmozgast.SZORZO, dbo.rmozgast.DARAB, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.rmozgasf.FRAKTAR_K, dbo.rmozgasf.CRAKTAR_K, dbo.wszav_nyomt.SZAVIDO, dbo.cikkek.VCIKKSZAM, dbo.vonal.VONALKOD, dbo.rmozgasf.hivszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vq_rmozgas_sum] AS SELECT BIZSZAM, DATUM, fraktar_nev, craktar_nev, MEGJEGYZES, TELJESNEV, modido, SUM(CONVERT(decimal(15, 3), DARAB * SZORZO)) AS Darab, SUM(besz_ert) AS besz_ert, SUM(br_ert) AS br_ert, FRAKTAR_K, CRAKTAR_K, hivszam FROM dbo.vq_rmozgas GROUP BY BIZSZAM, DATUM, fraktar_nev, craktar_nev, MEGJEGYZES, TELJESNEV, modido, FRAKTAR_K, CRAKTAR_K, hivszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkivet_cikkek]( @dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @kkod dbo.kulcs ) Returns Table As Return SELECT Top 100 percent vq_kivet.CIKK_SZAM, vq_kivet.CIKK_NEV, SUM(vq_kivet.DARAB*vq_kivet.szorzo) AS Darab, Sum(vq_kivet.besz_ert) As besz_ert from vq_kivet where (vq_kivet.datum between @dat1 and @dat2) and vq_kivet.cikkcsop2 like (RTrim(@ccs) + '%') and (vq_kivet.gyarto = @gyar or @gyar = 0) and (vq_kivet.szallito = @szall or @szall = 0)and (vq_kivet.raktar_k = @rkod or @rkod = 0) and (vq_kivet.kivet_kod = @kkod or @kkod = 0) GROUP BY vq_kivet.CIKK_SZAM, vq_kivet.CIKK_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqrmozgas]( @dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkodc dbo.kulcs, @rkodf dbo.kulcs ) Returns Table As Return SELECT Top 100 percent vq_rmozgas.CIKK_SZAM, vq_rmozgas.CIKK_NEV, SUM(vq_rmozgas.darab*vq_rmozgas.szorzo) As Darab, SUM(vq_rmozgas.besz_ert) AS ertek from vq_rmozgas where (datum between @dat1 and @dat2) and vq_rmozgas.cikkcsop2 like (RTrim(@ccs) + '%') and (vq_rmozgas.gyarto = @gyar or @gyar = 0) and (vq_rmozgas.szallito = @szall or @szall = 0)and (vq_rmozgas.craktar_k = @rkodc or @rkodc = 0) and (vq_rmozgas.fraktar_k = @rkodf or @rkodf = 0) group by vq_rmozgas.CIKK_SZAM, vq_rmozgas.CIKK_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_biz_fizetve1] AS SELECT 'számla' AS biz_tipus, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlaf.FIZ_ESED, ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0) AS brutto_ertek, ISNULL(dbo.vevo_szl_fizetve.fizetve, ' ') AS fizetve, ISNULL(dbo.vevo_szl_fizetve.hatralek, ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0)) AS hatralek, 0 AS fizetett, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.BIZSZAM AS xbizszam, dbo.vevo_szlaf.TELJ_DATUM, ISNULL(dbo.vevo_szl_fizetve.kicsoda, '') AS kicsoda, ISNULL(dbo.belepes.TELJESNEV, '') AS teljesnev, ISNULL(dbo.vevo_szl_fizetve.keszult, '') AS keszult, ISNULL(dbo.vevo_szl_fizetve.fiz_datum, '') AS fiz_datum, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, ISNULL(dbo.vevo_szl_fizetve.ut_fizetes, 0) AS ut_fizetes, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.MODOSITVA FROM dbo.belepes RIGHT OUTER JOIN dbo.vevo_szl_fizetve ON dbo.belepes.ROVIDNEV = dbo.vevo_szl_fizetve.kicsoda RIGHT OUTER JOIN dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS ON dbo.vevo_szl_fizetve.bizszam = dbo.vevo_szlaf.BIZSZAM WHERE (dbo.vevo_szl_fizetve.biz_tipus = 'számla') OR (dbo.vevo_szl_fizetve.biz_tipus IS NULL) GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szl_fizetve.fizetve, dbo.vevo_szl_fizetve.hatralek, dbo.vevo_szl_fizetve.fizetett, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szl_fizetve.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_szl_fizetve.keszult, dbo.vevo_szl_fizetve.biz_tipus, dbo.vevo_szl_fizetve.fiz_datum, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szl_fizetve.ut_fizetes, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.MODOSITVA GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_biz_fizetve2] AS SELECT 'száll.lev.' AS biz_tipus, dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_szlef.TELJ_DATUM AS szla_datum, '3-Készpénz' AS fizmod_nev, dbo.vevo_szlef.TELJ_DATUM AS fiz_esed, ISNULL(SUM((CASE vevo_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR)) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), 0) AS brutto_ertek, ISNULL(dbo.vevo_szl_fizetve.fizetve, ' ') AS fizetve, ISNULL(dbo.vevo_szl_fizetve.hatralek, ISNULL(SUM((CASE vevo_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR)) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), 0)) AS hatralek, 0 AS fizetett, '3' AS fiz_modja, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.BIZSZAM AS xbizszam, dbo.vevo_szlef.TELJ_DATUM AS telj_datum, ISNULL(dbo.vevo_szl_fizetve.kicsoda, '') AS kicsoda, ISNULL(dbo.belepes.TELJESNEV, '') AS teljesnev, ISNULL(dbo.vevo_szl_fizetve.keszult, '') AS keszult, ISNULL(dbo.vevo_szl_fizetve.fiz_datum, '') AS fiz_datum, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, ISNULL(dbo.vevo_szl_fizetve.ut_fizetes, 0) AS ut_fizetes, dbo.vevo_szlef.penznem, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.MODOSITVA FROM dbo.belepes RIGHT OUTER JOIN dbo.vevo_szl_fizetve ON dbo.belepes.ROVIDNEV = dbo.vevo_szl_fizetve.kicsoda RIGHT OUTER JOIN dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlet.AFA_KULCS = dbo.afa_kulcs.AFAKULCS ON dbo.vevo_szl_fizetve.bizszam = dbo.vevo_szlef.BIZSZAM WHERE (dbo.vevo_szl_fizetve.biz_tipus = 'száll.lev.' OR dbo.vevo_szl_fizetve.biz_tipus IS NULL) AND (LEN(dbo.vevo_szlef.SZLASZAM) = 0) GROUP BY dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szl_fizetve.fizetve, dbo.vevo_szl_fizetve.hatralek, dbo.vevo_szl_fizetve.fizetett, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szl_fizetve.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_szl_fizetve.keszult, dbo.vevo_szl_fizetve.biz_tipus, dbo.vevo_szl_fizetve.fiz_datum, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, dbo.vevo_szl_fizetve.ut_fizetes, dbo.vevo_szlef.penznem, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.MODOSITVA GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_biz_fizetve3] AS SELECT * FROM vvevo_biz_fizetve1 WHERE telj_datum >= dbo.xrfuggveny('PUKezd') UNION all SELECT * FROM vvevo_biz_fizetve2 WHERE telj_datum >= dbo.xrfuggveny('PUKezd') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [veladas_datum] AS SELECT dbo.vevo_szlet.CIKK_SZAM, MAX(dbo.vevo_szlef.TELJ_DATUM) AS elad_datum FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlet.BIZSZAM = dbo.vevo_szlef.BIZSZAM GROUP BY dbo.vevo_szlet.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikkek_eladas] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, ISNULL(dbo.veladas_datum.elad_datum, '1990.01.01') AS elad_datum, dbo.cikkek.KIFUTOTT, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod, dbo.cikkek.letrehozva FROM dbo.cikkek LEFT OUTER JOIN dbo.veladas_datum ON dbo.veladas_datum.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vonal ON dbo.vonal.CIKK_SZAM = dbo.cikkek.CIKK_SZAM AND dbo.vonal.ALAP = '1' GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vevo_ren_tetsz_suly] AS SELECT dbo.vevo_rent.BIZSZAM, COUNT(*) AS tetel_szam, SUM(dbo.vevo_rent.EDARAB * dbo.vevo_rent.SZORZO * dbo.cikkek.db_br_sulya) AS br_suly FROM dbo.vevo_rent INNER JOIN dbo.cikkek ON dbo.vevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GROUP BY dbo.vevo_rent.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwkomissio_tetsz1] AS SELECT rendel_bsz, rendel_tetel FROM dbo.wkomissio GROUP BY rendel_bsz, rendel_tetel GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwkomissio_tetsz] AS SELECT rendel_bsz, COUNT(*) AS komissiozott_tetsz FROM dbo.vwkomissio_tetsz1 GROUP BY rendel_bsz GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_renf_kom] AS SELECT dbo.vevo_renf.ALLAPOT, dbo.vevo_renf.BIZSZAM, dbo.vevok.VEVO_NEV, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.IRANYITO, dbo.vevo_tel.VAROS, dbo.vevo_tel.CIM, dbo.vevo_renf.SZALL_DAT, dbo.vevo_ren_tetsz_suly.tetel_szam, ISNULL(dbo.vwkomissio_tetsz.komissiozott_tetsz, 0) AS komissiozott_tetsz, dbo.vevo_ren_tetsz_suly.br_suly FROM dbo.vevo_renf INNER JOIN dbo.vevok ON dbo.vevo_renf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_tel ON dbo.vevo_renf.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_renf.szallcim = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.deviza ON dbo.vevo_renf.penznem = dbo.deviza.penznem INNER JOIN dbo.vevo_ren_tetsz_suly ON dbo.vevo_renf.BIZSZAM = dbo.vevo_ren_tetsz_suly.BIZSZAM LEFT OUTER JOIN dbo.vwkomissio_tetsz ON dbo.vwkomissio_tetsz.rendel_bsz = dbo.vevo_renf.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkoltseg_keszletre] AS SELECT szlek.SZALL_NEV AS kszall_nev, szlek.HIVSZAM AS khivszam, szlek.TELJ_DATUM AS ktelj_datum, dbo.koltseg_keszletre.kolt_bizszam, dbo.koltseg_keszletre.kolt_tetel, ck.CIKK_NEV AS kcikk_nev, szltk.edarab AS kdarab, szltk.EGYSEG_AR AS kegyseg_ar, szlet.SZALL_NEV AS tszall_nev, szlet.HIVSZAM AS thivszam, szlet.TELJ_DATUM AS ttelj_datum, dbo.koltseg_keszletre.terh_bizszam, dbo.koltseg_keszletre.terh_tetel, ct.CIKK_NEV AS tcikk_nev, szltt.edarab AS tdarab, szltt.EGYSEG_AR AS tegyseg_ar, dbo.koltseg_keszletre.terh_egyseg, szltt.EGYSEG_AR + dbo.koltseg_keszletre.terh_egyseg AS ujear, dbo.belepes.TELJESNEV, dbo.koltseg_keszletre.modositva, ck.CIKK_SZAM AS kcikk_szam, ct.CIKK_SZAM AS tcikk_szam, dbo.koltseg_keszletre.kulcs FROM dbo.koltseg_keszletre INNER JOIN dbo.cikkek AS ck ON dbo.koltseg_keszletre.kolt_cikk = ck.CIKK_SZAM INNER JOIN dbo.cikkek AS ct ON dbo.koltseg_keszletre.terh_cikk = ct.CIKK_SZAM INNER JOIN dbo.szall_szlef AS szlek ON dbo.koltseg_keszletre.kolt_bizszam = szlek.BIZSZAM INNER JOIN dbo.szall_szlef AS szlet ON dbo.koltseg_keszletre.terh_bizszam = szlet.BIZSZAM INNER JOIN dbo.szall_szlet AS szltk ON szltk.BIZSZAM = szlek.BIZSZAM AND dbo.koltseg_keszletre.kolt_tetel = szltk.TETEL INNER JOIN dbo.szall_szlet AS szltt ON szltt.BIZSZAM = szlet.BIZSZAM AND dbo.koltseg_keszletre.terh_tetel = szltt.TETEL INNER JOIN dbo.belepes ON dbo.koltseg_keszletre.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_koltseg_keszletre] AS SELECT dbo.keszlet.SORSZAM, dbo.keszlet.RAKTAR_KOD, dbo.keszlet.CIKK_SZAM, dbo.keszlet.EDARAB, dbo.keszlet.DARAB, dbo.keszlet.EGYSEG_AR, dbo.keszlet.szav_datum, dbo.keszlet.MOZGASKOD, dbo.keszlet.SZAMLA_SZ, dbo.keszlet.TETEL, dbo.keszlet.NYUGTAZVA, dbo.keszlet.BIZOMANYOS, dbo.keszlet.GYARI_SZAM, dbo.keszlet.SARZS_SZAM, dbo.vkoltseg_keszletre.tegyseg_ar, dbo.vkoltseg_keszletre.kolt_bizszam, dbo.vkoltseg_keszletre.kolt_tetel, dbo.vkoltseg_keszletre.kcikk_szam, dbo.vkoltseg_keszletre.tcikk_szam, dbo.vkoltseg_keszletre.terh_bizszam, dbo.vkoltseg_keszletre.terh_tetel, dbo.vkoltseg_keszletre.terh_egyseg FROM dbo.keszlet INNER JOIN dbo.vkoltseg_keszletre ON dbo.keszlet.SZAMLA_SZ = dbo.vkoltseg_keszletre.terh_bizszam AND dbo.keszlet.TETEL = dbo.vkoltseg_keszletre.terh_tetel AND dbo.keszlet.MOZGASKOD = 'vetel' GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvvevo_ar_lista](@arcsop int) Returns Table As Return SELECT vevo_ar_lista.arcsoport, vevo_ar_lista.datum, vevo_ar_lista.cikk_szam, vevo_ar_lista.netto_ar, vevo_ar_lista.brutto_ar, vevo_ar_lista.beszerz_ar, vevo_ar_lista.arres, vevo_ar_lista.kicsoda, vevo_ar_lista.modositva, belepes.TELJESNEV, cikkek.AFA_KULCS, cikkek.CIKKCSOP2, stcikk2.cikk_nev AS csoportnev, gyarto.nev AS gyartonev, cikkek.GYARTO, cikkek.CIKK_NEV, cikkek.SZALLITO, szallito.SZALL_NEV, cikkek.aru_szolg, cikkek.KIFUTOTT, dbo.CikkRabattFelar(@arcsop, vevo_ar_lista.cikk_szam) as jav_felar, vevo_ar_lista.beszerz_ar * (100 + afa_kulcs.afaertek)/100 as beszerz_ar_br FROM vevo_ar_lista INNER JOIN cikkek ON vevo_ar_lista.cikk_szam = cikkek.CIKK_SZAM INNER JOIN belepes ON vevo_ar_lista.kicsoda = belepes.ROVIDNEV INNER JOIN afa_kulcs on afa_kulcs.afakulcs=cikkek.afa_kulcs inner join stcikk2 ON cikkek.CIKKCSOP2 = stcikk2.cikk_szam LEFT OUTER JOIN szallito ON cikkek.SZALLITO = szallito.SZALL_KOD LEFT OUTER JOIN gyarto ON cikkek.GYARTO = gyarto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_fvvevo_ar_lista] AS SELECT arcsoport, datum, cikk_szam, netto_ar, brutto_ar, beszerz_ar, arres, kicsoda, modositva, TELJESNEV, AFA_KULCS, CIKKCSOP2, csoportnev, gyartonev, GYARTO, CIKK_NEV, SZALLITO, SZALL_NEV, aru_szolg, KIFUTOTT, jav_felar, beszerz_ar_br FROM dbo.fvvevo_ar_lista(1) AS fvvevo_ar_lista_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szla_ertek] AS SELECT dbo.szall_szlaf.SZALL_NEV, dbo.szall_szlaf.SZALLITO, dbo.szall_szlaf.BIZSZAM, dbo.szall_szlaf.KULSOSZLASZ, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZLA_DATUM, dbo.szall_szlaf.penznem, dbo.szall_szlaf.kurzus, dbo.szall_szlaf.kedvezmeny, dbo.szall_szlaf.MEGJEGYZES, dbo.belepes.TELJESNEV, dbo.szall_szlaf.MODOSITVA, ISNULL((100 - dbo.szall_szlaf.kedvezmeny) / 100 * SUM((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * ((100 - dbo.szall_szlat.kedvezmeny) / 100)), 0) AS netto_ertek, ROUND(ISNULL((100 - dbo.szall_szlaf.kedvezmeny) / 100 * SUM((CASE szall_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR)) * ((100 - dbo.szall_szlat.kedvezmeny) / 100)), 0), CASE szall_szlaf.penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, ISNULL((100 - dbo.szall_szlaf.kedvezmeny) / 100 * dbo.szall_szlaf.kurzus * SUM((CASE szall_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR)) * ((100 - dbo.szall_szlat.kedvezmeny) / 100)), 0) AS brutto_ertekft, dbo.parameterek.ERTEK AS alappenznem, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.FIZ_ESED, dbo.fizmodok.NEV AS fizmod_nev, dbo.szall_szlaf.TORLO, dbo.szall_szlaf.VISSZARU, dbo.szallito.SZALLCSOP, dbo.szall_szlaf.TOROLT, dbo.orszagok.nev_hu AS orszag, dbo.orszagok.eu, dbo.szall_szlaf.BRUTTO_ERTEK AS szla_brutto_ertek, dbo.szall_szlaf.BRUTTO_ERTEK * dbo.szall_szlaf.kurzus AS szla_brutto_ertekft, dbo.szall_szlaf.TOR_SSZ, ISNULL((100 - dbo.szall_szlaf.kedvezmeny) / 100 * dbo.szall_szlaf.kurzus * SUM((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * ((100 - dbo.szall_szlat.kedvezmeny) / 100)), 0) AS netto_ertekft FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.szall_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.szall_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.afa_kulcs ON dbo.szall_szlat.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.fizmodok ON dbo.szall_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.szallito ON dbo.szall_szlaf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso CROSS JOIN dbo.parameterek GROUP BY dbo.szall_szlaf.SZALL_NEV, dbo.szall_szlaf.BIZSZAM, dbo.szall_szlaf.KULSOSZLASZ, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZLA_DATUM, dbo.szall_szlaf.penznem, dbo.szall_szlaf.kurzus, dbo.szall_szlaf.kedvezmeny, dbo.szall_szlaf.MEGJEGYZES, dbo.belepes.TELJESNEV, dbo.szall_szlaf.MODOSITVA, dbo.szall_szlaf.SZALLITO, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.FIZ_ESED, dbo.fizmodok.NEV, dbo.szall_szlaf.TORLO, dbo.szall_szlaf.VISSZARU, dbo.szallito.SZALLCSOP, dbo.szall_szlaf.TOROLT, dbo.orszagok.nev_hu, dbo.orszagok.eu, dbo.szall_szlaf.BRUTTO_ERTEK, dbo.szall_szlaf.BRUTTO_ERTEK * dbo.szall_szlaf.kurzus, dbo.szall_szlaf.TOR_SSZ HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szla_ertek_pu] AS SELECT SZALL_NEV, SZALLITO, BIZSZAM, KULSOSZLASZ, TELJ_DATUM, SZLA_DATUM, penznem, kurzus, kedvezmeny, MEGJEGYZES, TELJESNEV, MODOSITVA, netto_ertek, brutto_ertek, dbo.pu_szla_kiegyenlit('S', SZALLITO, KULSOSZLASZ) AS kiegyenlitve, alappenznem, FIZ_MODJA, fizmod_nev, FIZ_ESED, TORLO, VISSZARU, TOROLT, szla_brutto_ertek FROM dbo.vszall_szla_ertek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vUnion_Szall_szla] AS SELECT Partner_Nev AS SZALL_NEV, partner AS SZALLITO, bizszam, hivszam AS KULSOSZLASZ, SZLA_DATUM, telj_datum, penznem, 1 AS kurzus, TELJESNEV, modido AS MODOSITVA, netto_osszeg AS netto_ertek, brutto_osszeg AS brutto_ertek, - dbo.pu_szla_kiegyenlit('S', partner, hivszam) AS kiegyenlitve, fiz_modja, fiz_modnev AS fizmod_nev, fiz_esed, '' AS torolt, '' AS torlo FROM dbo.vpu_nyito_szla WHERE (partner_tip = 'S') UNION all SELECT SZALL_NEV, SZALLITO, BIZSZAM, KULSOSZLASZ, SZLA_DATUM, TELJ_DATUM, penznem, kurzus, TELJESNEV, MODOSITVA, netto_ertek, szla_brutto_ertek, - dbo.pu_szla_kiegyenlit('S', SZALLITO, KULSOSZLASZ) AS kiegyenlitve, FIZ_MODJA, fizmod_nev, FIZ_ESED, torolt, torlo FROM dbo.vszall_szla_ertek_pu WHERE telj_datum >= dbo.xrfuggveny('PUKezd') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_teljes1] AS SELECT cikk_szam, sum(darab) AS keszlet FROM keszlet WHERE darab > 0 GROUP BY cikk_szam UNION all SELECT cikk_szam, - sum(darab) FROM foglalasok WHERE lejart <> '1' GROUP BY cikk_szam UNION all SELECT cikk_szam, - sum(darab) FROM keszlet_negativ WHERE darab > 0 GROUP BY cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_teljes] AS SELECT cikk_szam, SUM(keszlet) AS keszlet FROM dbo.vkeszlet_teljes1 GROUP BY cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszrend_uton] AS SELECT dbo.szall_rent.CIKK_SZAM, SUM(dbo.szall_rent.DARAB) AS darab FROM dbo.szall_renf INNER JOIN dbo.szall_rent ON dbo.szall_renf.bizszam = dbo.szall_rent.BIZSZAM GROUP BY dbo.szall_rent.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_utanrend] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.MIN_KESZ, ISNULL(dbo.vkeszlet_teljes.keszlet, 0) AS szabad_keszlet, ISNULL(dbo.vszrend_uton.darab, 0) AS szrend, dbo.cikkek.SZALLITO, dbo.cikkek.ut_besz_ar, dbo.cikkek.raktar_kod FROM dbo.cikkek LEFT OUTER JOIN dbo.vszrend_uton ON dbo.cikkek.CIKK_SZAM = dbo.vszrend_uton.CIKK_SZAM LEFT OUTER JOIN dbo.vkeszlet_teljes ON dbo.cikkek.CIKK_SZAM = dbo.vkeszlet_teljes.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_info] AS SELECT TOP (100) PERCENT dbo.raktarak.kod, dbo.raktarak.nev, dbo.keszlet.CIKK_SZAM, SUM(dbo.keszlet.DARAB) AS keszlet FROM dbo.keszlet INNER JOIN dbo.raktarak ON dbo.keszlet.RAKTAR_KOD = dbo.raktarak.kod GROUP BY dbo.raktarak.nev, dbo.keszlet.CIKK_SZAM, dbo.raktarak.kod ORDER BY dbo.raktarak.nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_negativ_info] AS SELECT raktar_kod, cikk_szam, SUM(darab) AS darab FROM dbo.keszlet_negativ WHERE (darab <> 0) GROUP BY raktar_kod, cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_info_negativ] AS SELECT dbo.vkeszlet_info.kod, dbo.vkeszlet_info.nev, dbo.vkeszlet_info.CIKK_SZAM, dbo.vkeszlet_info.keszlet - ISNULL(dbo.vkeszlet_negativ_info.darab, 0) AS keszlet FROM dbo.vkeszlet_info LEFT OUTER JOIN dbo.vkeszlet_negativ_info ON dbo.vkeszlet_negativ_info.raktar_kod = dbo.vkeszlet_info.kod AND dbo.vkeszlet_negativ_info.cikk_szam = dbo.vkeszlet_info.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_qsoft] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.KOTEG_SZ, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.cim, dbo.vevo_szlaf.iso, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.kozterulet_jellege, dbo.vevo_szlaf.hazszam, dbo.vevo_szlaf.epulet, dbo.vevo_szlaf.lepcsohaz, dbo.vevo_szlaf.szint, dbo.vevo_szlaf.ajto, dbo.vevo_szlat.TETEL, dbo.vevo_szlat.CIKK_SZAM, dbo.vevo_szlat.CIKK_NEV, dbo.vevo_szlat.AFA_KULCS, dbo.VevoCimsor(dbo.vevo_szlaf.VEVO) AS vevo_cime, dbo.vevok.ADOSZAM AS adoszamhu, dbo.vevok.eu_adoszam AS adoszameu, (dbo.vevo_szlaf.kurzus * ((100 - dbo.vevo_szlaf.kedvezmeny) * (100 - dbo.vevo_szlat.kedvezmeny))) * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR) / 10000 AS netto_ertek_ft, ((100 - dbo.vevo_szlaf.kedvezmeny) * (100 - dbo.vevo_szlat.kedvezmeny)) * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR) / 10000 AS netto_ertek, CASE WHEN afamentes = '1' THEN 0 ELSE ((100 - dbo.vevo_szlaf.kedvezmeny) * (100 - dbo.vevo_szlat.kedvezmeny)) * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR) * (afa_kulcs.afaertek) / 1000000 END AS afa_ertek, dbo.vevo_szlaf.MODOSITVA, dbo.orszagok.eu, dbo.cikkek.aru_szolg FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.orszagok ON dbo.vevo_szlaf.iso = dbo.orszagok.iso INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM WHERE (dbo.vevo_szlaf.TIPUS <> 6) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_qsoft1] AS SELECT BIZSZAM, VEVO, VEVO_NEV, TELJ_DATUM, SZLA_DATUM, FIZ_MODJA, FIZ_ESED, penznem, kurzus, afamentes, kedvezmeny, TIPUS, TOROLT, TORLO, TOR_SSZ, VISSZARU, penzugyi, KOTEG_SZ, iranyito, varos, cim, iso, adoszam, kozterulet_jellege, hazszam, epulet, lepcsohaz, szint, ajto, AFA_KULCS, vevo_cime, adoszamhu, adoszameu, SUM(netto_ertek_ft) AS netto_ertek_ft, SUM(netto_ertek) AS netto_ertek, SUM(afa_ertek) AS afa_ertek, eu, aru_szolg FROM dbo.vvevo_szla_qsoft GROUP BY BIZSZAM, VEVO, VEVO_NEV, TELJ_DATUM, SZLA_DATUM, FIZ_MODJA, FIZ_ESED, penznem, kurzus, afamentes, kedvezmeny, TIPUS, TOROLT, TORLO, VISSZARU, penzugyi, KOTEG_SZ, iranyito, varos, cim, iso, adoszam, kozterulet_jellege, hazszam, epulet, lepcsohaz, szint, ajto, AFA_KULCS, vevo_cime, adoszamhu, adoszameu, eu, aru_szolg, TOR_SSZ GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_akcio_] AS SELECT dbo.vevo_akcio.AKCIOCSOP, dbo.vevo_akcio.akcio_tip, dbo.vevo_akcio.KDATUM, dbo.vevo_akcio.VDATUM, dbo.vevo_akcio.CIKK_SZAM, dbo.vevo_akcio.EGYSEG_AR, dbo.vevo_akcio.SZOVEG, dbo.vevo_akcio.ke_keszlet, dbo.vevo_akcio.ke_maradek, dbo.vevo_akcio.KICSODA, dbo.vevo_akcio.MODOSITVA, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.belepes.TELJESNEV, dbo.cikkek.AFA_KULCS, dbo.cikkek.MENNY_EGYS, dbo.vevo_akc_csoport.nev, dbo.vevo_akcio.EGYSEG_AR * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto_Ar, dbo.vevo_akcio.ujsag, dbo.afa_kulcs.afaertek, dbo.vevo_akc_csoport.penznem, dbo.CikkUtBeszAr(dbo.vevo_akcio.CIKK_SZAM) AS ut_besz_ar, dbo.cikkek.KIFUTOTT FROM dbo.vevo_akcio INNER JOIN dbo.cikkek ON dbo.vevo_akcio.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.vevo_akcio.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.vevo_akc_csoport ON dbo.vevo_akcio.AKCIOCSOP = dbo.vevo_akc_csoport.kod INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_akcio] AS SELECT AKCIOCSOP, akcio_tip, KDATUM, VDATUM, CIKK_SZAM, EGYSEG_AR, SZOVEG, ke_keszlet, ke_maradek, KICSODA, MODOSITVA, CIKK_NEV, CIKKCSOP2, GYARTO, SZALLITO, TELJESNEV, AFA_KULCS, MENNY_EGYS, nev, CASE dbo.xrfuggveny('BruttoKerekit') WHEN 'I' THEN round(brutto_ar, 0) ELSE brutto_Ar END AS brutto_ar, ujsag, afaertek, penznem, ut_besz_ar, CASE WHEN ut_besz_ar = 0 THEN CASE WHEN egyseg_ar = 0 THEN 0 ELSE 999 END ELSE CASE WHEN (100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar) < - 999 THEN - 999 ELSE CASE WHEN (100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar) > 999 THEN 999 ELSE CASE WHEN (100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar) < - 999 THEN - 999 ELSE 100 * (egyseg_ar - ut_besz_ar) / ut_besz_ar END END END END AS arres, KIFUTOTT FROM dbo.vvevo_akcio_ GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO /*and x.statusz_int=y.statusz_int*/ CREATE VIEW [voszla_naplo] AS SELECT TOP (100) PERCENT ID, bizszam, statusz, valasz, transactionid, modositva, statusz_int FROM dbo.oszla_naplo AS a WHERE (statusz_int = (SELECT MAX(statusz_int) AS Expr1 FROM dbo.oszla_naplo AS x WHERE (bizszam = a.bizszam))) AND (modositva = (SELECT MAX(modositva) AS Expr1 FROM dbo.oszla_naplo AS y WHERE (bizszam = a.bizszam) AND (a.statusz_int = statusz_int))) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_online] AS SELECT dbo.vevo_szlaf.BIZSZAM, ISNULL(dbo.voszla_naplo.ID, 0) AS id, ISNULL(dbo.voszla_naplo.statusz, '') AS statusz, ISNULL(dbo.voszla_naplo.valasz, '') AS valasz, ISNULL(dbo.voszla_naplo.modositva, '') AS modositva, ISNULL(dbo.voszla_naplo.transactionid, '') AS transactionid, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, ISNULL(dbo.voszla_naplo.statusz_int, 0) AS statusz_int, ROUND((100 - dbo.vevo_szlaf.kedvezmeny) * SUM((100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.darab * dbo.vevo_szlat.EGYSEG_AR * dbo.afa_kulcs.afaertek / 10000) / 100, 0) AS afa_ertek, (100 - dbo.vevo_szlaf.kedvezmeny) * SUM(((100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.darab * dbo.vevo_szlat.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 10000) / 100 AS brutto_ertek, ROUND(dbo.vevo_szlaf.kurzus * (100 - dbo.vevo_szlaf.kedvezmeny) * SUM((100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.darab * dbo.vevo_szlat.EGYSEG_AR * dbo.afa_kulcs.afaertek / 10000) / 100, 0) AS afa_ertek_huf FROM dbo.voszla_naplo RIGHT OUTER JOIN dbo.vevo_szlaf ON dbo.voszla_naplo.bizszam = dbo.vevo_szlaf.BIZSZAM INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlat.BIZSZAM = dbo.vevo_szlaf.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS GROUP BY dbo.vevo_szlaf.BIZSZAM, ISNULL(dbo.voszla_naplo.ID, 0), ISNULL(dbo.voszla_naplo.statusz, ''), ISNULL(dbo.voszla_naplo.valasz, ''), ISNULL(dbo.voszla_naplo.modositva, ''), ISNULL(dbo.voszla_naplo.transactionid, ''), dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.kurzus, ISNULL(dbo.voszla_naplo.statusz_int, 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rent_gyartas] AS SELECT dbo.vevo_renf.BIZSZAM, dbo.vevo_renf.VEVO, dbo.vevo_renf.SZALL_DAT, dbo.vevo_rent.TETEL, dbo.vevo_rent.CIKK_SZAM, dbo.vevo_rent.SZORZO, dbo.vevo_rent.EDARAB, dbo.vevo_rent.DARAB, dbo.vevo_rent.EGYSEG_AR, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, ISNULL(dbo.diszpo.kulcs, 0) AS kulcs, dbo.cikkek.CIKK_NEV, dbo.vevok.VEVO_NEV, dbo.vevo_renf.REND_DAT, ISNULL(dbo.vkeszlet_osszes.darab, 0) AS keszlet_darab, ISNULL(dbo.vfoglalt_keszlet.darab, 0) AS foglalt_darab, ISNULL(dbo.vkeszlet_osszes.darab, 0) - ISNULL(dbo.vfoglalt_keszlet.darab, 0) AS szabad_darab, 0 AS raktar_kod FROM dbo.vevo_renf INNER JOIN dbo.vevo_rent ON dbo.vevo_renf.BIZSZAM = dbo.vevo_rent.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vanyagszukseglet2 ON dbo.vevo_rent.CIKK_SZAM = dbo.vanyagszukseglet2.cikk_szam INNER JOIN dbo.vevok ON dbo.vevo_renf.VEVO = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.vfoglalt_keszlet ON dbo.vevo_rent.CIKK_SZAM = dbo.vfoglalt_keszlet.cikk_szam LEFT OUTER JOIN dbo.vkeszlet_osszes ON dbo.vevo_rent.CIKK_SZAM = dbo.vkeszlet_osszes.CIKK_SZAM LEFT OUTER JOIN dbo.diszpo ON dbo.vevo_rent.BIZSZAM = dbo.diszpo.rendeles_szam AND dbo.vevo_rent.TETEL = dbo.diszpo.rendeles_tetel GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vdiszpo_keszre1] AS SELECT dbo.diszpo.kulcs, dbo.diszpo.prioritas, dbo.diszpo.raktar_kod, dbo.diszpo.cikk_szam, dbo.diszpo.edarab, dbo.diszpo.darab, dbo.diszpo.megjegyzes, dbo.diszpo.rogzitette, dbo.diszpo.rogzites, dbo.diszpo.visszaigazolas, dbo.keszre1.darab AS kesz_darab, dbo.keszre1.kicsoda AS keszrejelentette, dbo.keszre1.modido AS keszrejelentes, dbo.cikkek.CIKK_NEV, dbo.keszre1.kulcs AS keszre_kulcs, dbo.belepes.TELJESNEV, dbo.cikkek.MENNY_EGYS, dbo.diszpo.rendeles_szam, dbo.diszpo.rendeles_tetel FROM dbo.diszpo INNER JOIN dbo.keszre1 ON dbo.diszpo.kulcs = dbo.keszre1.diszpo INNER JOIN dbo.cikkek ON dbo.diszpo.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.keszre1.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_szavido] AS SELECT dbo.keszlet.SZAMLA_SZ, dbo.keszlet.RAKTAR_KOD, dbo.keszlet.CIKK_SZAM, dbo.keszlet.szav_datum, dbo.keszlet.DARAB, dbo.keszlet.SORSZAM, dbo.keszlet.SARZS_SZAM, CASE WHEN mozgaskod = 'term_be' THEN LEFT(keszrejelentes, 10) WHEN mozgaskod = 'term' THEN term_datum WHEN mozgaskod = 'bevet' THEN bevetf.datum WHEN mozgaskod = 'vetel' THEN szall_szlef.telj_datum WHEN mozgaskod = 'vevo_szle' THEN vevo_szlef.telj_datum END AS bev_datum, CASE WHEN mozgaskod LIKE 'term%' THEN 'termelés' WHEN mozgaskod = 'bevet' THEN 'raktár bevét' WHEN mozgaskod = 'vetel' OR mozgaskod = 'bizom' THEN 'szállítói bevét' WHEN mozgaskod = 'vevo_szle' THEN 'vevő visszáru' END AS mozgaskod FROM dbo.szall_szlef RIGHT OUTER JOIN dbo.vevo_szlef RIGHT OUTER JOIN dbo.keszlet INNER JOIN dbo.cikkek ON dbo.keszlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vdiszpo_keszre1 ON dbo.vdiszpo_keszre1.cikk_szam = dbo.cikkek.CIKK_SZAM AND dbo.vdiszpo_keszre1.keszre_kulcs = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.term_termeles ON dbo.cikkek.CIKK_SZAM = dbo.term_termeles.cikk_szam AND dbo.keszlet.SZAMLA_SZ = dbo.term_termeles.kulcs ON dbo.vevo_szlef.BIZSZAM = dbo.keszlet.SZAMLA_SZ ON dbo.szall_szlef.BIZSZAM = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.bevetf ON dbo.keszlet.SZAMLA_SZ = dbo.bevetf.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_kedv1] AS SELECT vevo_kedv.vevo_kod, cikkek.cikk_szam, vevo_kedv.kedvezmeny FROM cikkek INNER JOIN vevo_kedv ON vevo_kedv.tipus = 1 AND cikkek.cikkcsop2 LIKE rtrim(vevo_kedv.ertek) + '%' UNION all SELECT vevo_kedv.vevo_kod, cikkek.cikk_szam, vevo_kedv.kedvezmeny FROM cikkek INNER JOIN vevo_kedv ON vevo_kedv.tipus = 2 AND cikkek.szallito = vevo_kedv.ertek UNION all SELECT vevo_kedv.vevo_kod, cikkek.cikk_szam, vevo_kedv.kedvezmeny FROM cikkek INNER JOIN vevo_kedv ON vevo_kedv.tipus = 3 AND cikkek.gyarto = vevo_kedv.ertek UNION all SELECT vevo_kedv.vevo_kod, cikkek.cikk_szam, vevo_kedv.kedvezmeny FROM cikkek INNER JOIN vevo_kedv ON vevo_kedv.tipus = 4 AND szarmazasi_hely = vevo_kedv.ertek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_kedv_csz] AS SELECT vevo_kod, cikk_szam, MAX(kedvezmeny) AS kedvezmeny FROM dbo.vvevo_kedv1 GROUP BY vevo_kod, cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rent] AS SELECT dbo.vevo_rent.BIZSZAM, dbo.vevo_rent.TETEL, dbo.vevo_rent.CIKK_SZAM, dbo.vevo_rent.afa_kulcs, dbo.vevo_rent.MENNY_EGYS, dbo.vevo_rent.SZORZO, dbo.vevo_rent.EDARAB, dbo.vevo_rent.DARAB, dbo.vevo_rent.EGYSEG_AR, dbo.vevo_rent.kedvezmeny, dbo.vevo_rent.visszaig_dat, dbo.vevo_rent.AKCIO, dbo.cikkek.CIKK_NEV, dbo.cikkek.aru_szolg, dbo.cikkek.MENNY_EGYS AS alapme FROM dbo.vevo_rent INNER JOIN dbo.cikkek ON dbo.vevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwkomissio] AS SELECT rendel_bsz, rendel_tetel, SUM(darab) AS komissiozva FROM dbo.wkomissio GROUP BY rendel_bsz, rendel_tetel GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rent_keszlet] AS SELECT dbo.vvevo_rent.BIZSZAM, dbo.vvevo_rent.TETEL, dbo.vvevo_rent.CIKK_SZAM, dbo.vvevo_rent.CIKK_NEV, dbo.vvevo_rent.MENNY_EGYS, dbo.vvevo_rent.EDARAB, dbo.vvevo_rent.DARAB, dbo.vvevo_rent.aru_szolg, dbo.cikkek.POLC, ISNULL(SUM(dbo.keszlet.DARAB), 0) AS keszlet, ISNULL(dbo.vwkomissio.komissiozva, 0) AS komissiozva, ISNULL((dbo.vvevo_rent.DARAB - ISNULL(dbo.vwkomissio.komissiozva, 0)) * dbo.cikkek.db_br_sulya, 0) AS br_suly FROM dbo.keszlet RIGHT OUTER JOIN dbo.vvevo_rent INNER JOIN dbo.cikkek ON dbo.vvevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM ON dbo.keszlet.CIKK_SZAM = dbo.vvevo_rent.CIKK_SZAM LEFT OUTER JOIN dbo.vwkomissio ON dbo.vwkomissio.rendel_bsz = dbo.vvevo_rent.BIZSZAM AND dbo.vwkomissio.rendel_tetel = dbo.vvevo_rent.TETEL GROUP BY dbo.vvevo_rent.BIZSZAM, dbo.vvevo_rent.TETEL, dbo.vvevo_rent.CIKK_NEV, dbo.vvevo_rent.MENNY_EGYS, dbo.vvevo_rent.EDARAB, dbo.vvevo_rent.DARAB, dbo.vvevo_rent.aru_szolg, dbo.vvevo_rent.CIKK_SZAM, dbo.cikkek.POLC, dbo.vwkomissio.komissiozva, dbo.cikkek.db_br_sulya GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vonkoltar] AS SELECT dbo.onkoltar.cikk_szam, dbo.onkoltar.egyseg_ar, dbo.onkoltar.kicsoda, dbo.onkoltar.modositva, dbo.cikkek.CIKK_NEV, dbo.stcikk2.cikk_nev AS csoport_nev, dbo.stcikk2.cikk_szam AS cikkcsop, dbo.belepes.TELJESNEV FROM dbo.onkoltar INNER JOIN dbo.cikkek ON dbo.onkoltar.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam INNER JOIN dbo.belepes ON dbo.onkoltar.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.vanyagszukseglet2 ON dbo.onkoltar.cikk_szam = dbo.vanyagszukseglet2.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajanf] AS SELECT dbo.vevo_arajanf.BIZSZAM, dbo.vevo_arajanf.VEVO, dbo.vevo_arajanf.DATUM_TOL, dbo.vevo_arajanf.DATUM_IG, dbo.vevo_arajanf.FIZ_MODJA, dbo.vevo_arajanf.FIZHAT, dbo.vevo_arajanf.penznem, dbo.vevo_arajanf.afamentes, dbo.vevo_arajanf.kedvezmeny, dbo.vevo_arajanf.arcsoport, dbo.vevo_arajanf.akciocsoport, dbo.vevo_arajanf.MEGJEGYZES, dbo.vevo_arajanf.KICSODA, dbo.vevo_arajanf.MODOSITVA, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.belepes.TELJESNEV FROM dbo.vevo_arajanf INNER JOIN dbo.vevok ON dbo.vevo_arajanf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_arajanf.KICSODA = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajan_ertek] AS SELECT dbo.vvevo_arajanf.VEVO, dbo.vvevo_arajanf.BIZSZAM, dbo.vvevo_arajanf.DATUM_TOL, dbo.vvevo_arajanf.DATUM_IG, dbo.vvevo_arajanf.FIZ_MODJA, dbo.fizmodok.NEV AS fizmod_nev, dbo.vvevo_arajanf.FIZHAT, dbo.vvevo_arajanf.penznem, dbo.vvevo_arajanf.afamentes, dbo.vvevo_arajanf.MEGJEGYZES, dbo.vvevo_arajanf.TELJESNEV, dbo.vvevo_arajanf.MODOSITVA, ISNULL(SUM((dbo.vevo_arajant.darab * dbo.vevo_arajant.EGYSEG_AR) * (100 - dbo.vevo_arajant.kedvezmeny) / 100), 0) AS netto_ertek, ROUND(ISNULL(SUM((CASE vvevo_arajanf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_arajant.darab * dbo.vevo_arajant.EGYSEG_AR)) * ((100 - dbo.vevo_arajant.kedvezmeny) / 100)), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, dbo.parameterek.ERTEK AS alappenznem, dbo.vvevo_arajanf.vevo_csoport, dbo.vvevo_arajanf.vevo_lanc, dbo.vvevo_arajanf.vevo_cegjelleg, dbo.vvevo_arajanf.vevo_terulet, dbo.vvevo_arajanf.KICSODA, dbo.vevok.VEVO_NEV, dbo.parameterek.AZONOSITO, dbo.vvevo_arajanf.kedvezmeny, dbo.vvevo_arajanf.arcsoport, dbo.vvevo_arajanf.akciocsoport FROM dbo.vevo_arajant INNER JOIN dbo.afa_kulcs ON dbo.vevo_arajant.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.vvevo_arajanf INNER JOIN dbo.vevok ON dbo.vvevo_arajanf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.fizmodok ON dbo.vvevo_arajanf.FIZ_MODJA = dbo.fizmodok.KOD ON dbo.vevo_arajant.BIZSZAM = dbo.vvevo_arajanf.BIZSZAM CROSS JOIN dbo.parameterek GROUP BY dbo.vvevo_arajanf.VEVO, dbo.vvevo_arajanf.BIZSZAM, dbo.vvevo_arajanf.DATUM_TOL, dbo.vvevo_arajanf.DATUM_IG, dbo.vvevo_arajanf.FIZ_MODJA, dbo.fizmodok.NEV, dbo.vvevo_arajanf.FIZHAT, dbo.vvevo_arajanf.penznem, dbo.vvevo_arajanf.MEGJEGYZES, dbo.vvevo_arajanf.TELJESNEV, dbo.vvevo_arajanf.MODOSITVA, dbo.parameterek.ERTEK, dbo.vvevo_arajanf.vevo_csoport, dbo.vvevo_arajanf.vevo_lanc, dbo.vvevo_arajanf.vevo_cegjelleg, dbo.vvevo_arajanf.vevo_terulet, dbo.vvevo_arajanf.KICSODA, dbo.vevok.VEVO_NEV, dbo.parameterek.AZONOSITO, dbo.vvevo_arajanf.afamentes, dbo.vvevo_arajanf.kedvezmeny, dbo.vvevo_arajanf.arcsoport, dbo.vvevo_arajanf.akciocsoport HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_ertek] AS SELECT dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.HIVSZAM, dbo.vevo_szlef.RENDSZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_tel.TELEP_NEV, dbo.vevo_szlef.TIPUS, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevo_szlef.UZLETKOTO, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.raktarak.kod AS raktar_kod, dbo.raktarak.nev AS raktar_nev, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.penznem, dbo.belepes.TELJESNEV, dbo.vevo_szlef.MODOSITVA, dbo.vevo_szlef.MEGJEGYZES, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.TELEP_KOD, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.akciocsoport, dbo.vevo_szlef.arcsoport, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, dbo.vevo_szlef.TOR_SSZ, dbo.vevo_szlef.VISSZARU, dbo.vevo_szlef.KICSODA, ISNULL(SUM((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) / 100) * (100 - dbo.vevo_szlef.kedvezmeny) / 100, 0) AS netto_ertek, ISNULL(SUM((CASE vevo_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR)) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), 0) AS brutto_ertek, ISNULL(SUM((CASE vevo_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR * dbo.vevo_szlef.kurzus)) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), 0) AS brutto_ertekft, ISNULL(SUM((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR * dbo.vevo_szlef.kurzus) * (100 - dbo.vevo_szlet.kedvezmeny) / 100) * (dbo.vevo_szlef.kedvezmeny / 100), 0) AS veng_ertek, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, COUNT(*) AS Tetel_Db, dbo.vevok.vevo_arcsoport, dbo.vevok.sajat_bolt, dbo.vevo_tel.vevo_csoport AS telep_csoport, dbo.vevo_tel.vevo_lanc AS telep_lanc, dbo.vevo_tel.vevo_cegjelleg AS telep_cegjelleg, dbo.vevo_tel.vevo_terulet AS telep_terulet FROM dbo.afa_kulcs INNER JOIN dbo.vevo_szlet ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlet.AFA_KULCS RIGHT OUTER JOIN dbo.vevo_szlef INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlef.TIPUS = dbo.ertekesit_tipus.kod INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.raktarak ON dbo.vevo_szlef.RAKTAR_KOD = dbo.raktarak.kod INNER JOIN dbo.belepes ON dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV AND dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV ON dbo.vevo_szlet.BIZSZAM = dbo.vevo_szlef.BIZSZAM LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod GROUP BY dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.RENDSZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.penznem, dbo.ertekesit_tipus.nev, dbo.uzletkoto.nev, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_tel.TELEP_NEV, dbo.raktarak.nev, dbo.raktarak.kod, dbo.vevo_szlef.UZLETKOTO, dbo.vevo_szlef.TIPUS, dbo.belepes.TELJESNEV, dbo.vevo_szlef.MODOSITVA, dbo.vevo_szlef.MEGJEGYZES, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.TELEP_KOD, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.akciocsoport, dbo.vevo_szlef.arcsoport, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, dbo.vevo_szlef.TOR_SSZ, dbo.vevo_szlef.VISSZARU, dbo.vevo_szlef.KICSODA, dbo.vevo_szlef.HIVSZAM, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevok.vevo_arcsoport, dbo.vevok.sajat_bolt, dbo.vevo_tel.vevo_csoport, dbo.vevo_tel.vevo_lanc, dbo.vevo_tel.vevo_cegjelleg, dbo.vevo_tel.vevo_terulet GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_ertek_kedv] AS SELECT BIZSZAM, TELJ_DATUM, VEVO, VEVO_NEV, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, vevo_arcsoport, 'V' AS Tipus, raktar_kod, TIPUS AS BizTip, SZLASZAM, kedvezmeny, netto_ertek, veng_ertek AS eng_ertek FROM dbo.vvevo_szle_ertek WHERE (veng_ertek > 0) UNION all SELECT dbo.vevo_szlet.BIZSZAM + '/' + CONVERT(varchar(10), dbo.vevo_szlet.TETEL) AS bizszam, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.VEVO_NEV, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, vevok.vevo_arcsoport, 'T' AS Tipus, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.TIPUS AS BizTip, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlet.kedvezmeny, (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) / 100 AS netto_ert, (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (dbo.vevo_szlet.kedvezmeny / 100) AS eng_ertek FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlet.BIZSZAM = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD WHERE ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (dbo.vevo_szlet.kedvezmeny / 100) > 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwbank_penztar] AS SELECT dbo.bankszamlak.nev, dbo.bankcsomagf.datum, dbo.bankcsomagt.osszeg, dbo.bankcsomagt.penznem, dbo.bankcsomagt.kozlemeny1 FROM dbo.bankcsomagt INNER JOIN dbo.bankcsomagf ON dbo.bankcsomagt.kivonat = dbo.bankcsomagf.kivonat AND dbo.bankcsomagt.bankszamlaszam = dbo.bankcsomagf.bankszamlaszam INNER JOIN dbo.bankszamlak ON dbo.bankszamlak.kod = dbo.bankcsomagf.bankszamlaszam WHERE (dbo.bankcsomagt.tipus LIKE 'p%') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwpenztar_bank] AS SELECT dbo.penztarak.nev, dbo.penztart.datum, dbo.penztart.osszeg, dbo.penztart.penznem, dbo.penztart.megjegyzes FROM dbo.penztarak INNER JOIN dbo.penztart ON dbo.penztarak.kod = dbo.penztart.penztar_kod WHERE (dbo.penztart.tipus LIKE 'pb%') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwbankpenztar_kozos] AS SELECT dbo.vwbank_penztar.datum, dbo.vwbank_penztar.nev AS bank_nev, dbo.vwbank_penztar.osszeg AS bank_osszeg, dbo.vwbank_penztar.penznem AS bank_penznem, dbo.vwpenztar_bank.nev AS penztar_nev, dbo.vwpenztar_bank.osszeg AS penztar_osszeg, dbo.vwpenztar_bank.penznem AS penztar_penznem FROM dbo.vwbank_penztar INNER JOIN dbo.vwpenztar_bank ON dbo.vwbank_penztar.datum = dbo.vwpenztar_bank.datum AND dbo.vwbank_penztar.osszeg = - dbo.vwpenztar_bank.osszeg AND dbo.vwbank_penztar.penznem = dbo.vwpenztar_bank.penznem GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_napi_stat] AS SELECT TELJ_DATUM, SUM(CASE fiz_modja WHEN '3' THEN netto_ertek ELSE 0 END) AS Ertek_kp, SUM(CASE fiz_modja WHEN 'X' THEN netto_ertek ELSE 0 END) AS Ertek_kartya, SUM(CASE fiz_modja WHEN '9' THEN netto_ertek ELSE 0 END) AS Ertek_HK, SUM(CASE fiz_modja WHEN '4' THEN netto_ertek ELSE 0 END) AS Ertek_Atut, SUM(netto_ertek) AS Ertek_Ossz, COUNT(CASE fiz_modja WHEN '3' THEN 1 ELSE 0 END) AS DB_Kp, COUNT(CASE fiz_modja WHEN 'X' THEN 1 ELSE 0 END) AS DB_Kartya, COUNT(CASE fiz_modja WHEN '9' THEN 1 ELSE 0 END) AS DB_HK, COUNT(CASE fiz_modja WHEN '4' THEN 1 ELSE 0 END) AS DB_Atut, COUNT(*) AS DB_Ossz FROM dbo.vvevo_szla_ertek GROUP BY TELJ_DATUM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikkinfo_arak]( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @artip int, @rakk int, @vevo dbo.kulcs, @brkerekit char(1) ) RETURNS TABLE AS Return select cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, case @artip when 0 then lista_ar else case @brkerekit --dbo.xrfuggveny('BruttoKerekit') when 'I' then round(lista_ar*(100+afaertek)/100,0) else lista_ar*(100+afaertek)/100 end end as netto_brutto_ar, case @artip when 0 then akcios_ar else case @brkerekit --dbo.xrfuggveny('BruttoKerekit') when 'I' then round(akcios_ar*(100+afaertek)/100,0) else akcios_ar*(100+afaertek)/100 end end as netto_brutto_akc, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, keszlet, fordafa from vcikkinfo_arak_1(@arcs,@akccs,@dat,@pn,@kurz, @artip, @rakk, @vevo) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vcikkinfo_arak] AS SELECT cikk_szam, cikk_nev, cikk_nev_ang, menny_egys, afa_kulcs, netto_brutto_ar, netto_brutto_akc, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, keszlet, fordafa FROM dbo.vcikkinfo_arak(1, 0, '2014.01.01', 'HUF', 1, 1, 1, 0, 'I') AS vcikkinfo_arak_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arcsoport_lista] AS SELECT dbo.vevo_arcsoport.KOD, dbo.vevo_arcsoport.NEV, dbo.vevo_arcsoport.penznem, dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.AFA_KULCS, dbo.vevo_arcsoport.szamitas_modja, dbo.cikkek.ut_besz_ar FROM dbo.vevo_arcsoport CROSS JOIN dbo.cikkek WHERE (dbo.vevo_arcsoport.szamitas_modja = 'l') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_ar_lis_cikk] AS SELECT dbo.vvevo_arcsoport_lista.KOD, dbo.vvevo_arcsoport_lista.NEV AS arcsoport_nev, ISNULL(dbo.vevo_ar_lista.datum, LEFT(dbo.myGetDate(), 7)) AS datum, dbo.vvevo_arcsoport_lista.CIKK_SZAM, dbo.vvevo_arcsoport_lista.CIKK_NEV, dbo.vvevo_arcsoport_lista.AFA_KULCS, ISNULL(dbo.vevo_ar_lista.netto_ar, 0) AS netto_ar, ISNULL(dbo.vevo_ar_lista.brutto_ar, 0) AS brutto_ar, ISNULL(dbo.vevo_ar_lista.beszerz_ar, 0) AS beszerz_ar, ISNULL(dbo.vevo_ar_lista.arres, 0) AS arres, dbo.CikkRabattFelar(dbo.ListaArFelarKod(dbo.vevo_ar_lista.arcsoport), dbo.vevo_ar_lista.cikk_szam) AS jav_felar, ISNULL(dbo.vevo_ar_lista.modositva, '') AS modositva, ISNULL(dbo.vevo_ar_lista.kicsoda, '') AS kicsoda, ISNULL(dbo.belepes.TELJESNEV, '') AS teljesnev, dbo.vvevo_arcsoport_lista.szamitas_modja, dbo.vvevo_arcsoport_lista.penznem, ISNULL(dbo.vevo_ar_lista.beszerz_ar * (100 + dbo.afa_kulcs.afaertek) / 100, 0) AS beszerz_ar_br FROM dbo.vvevo_arcsoport_lista LEFT OUTER JOIN dbo.vevo_ar_lista ON dbo.vvevo_arcsoport_lista.KOD = dbo.vevo_ar_lista.arcsoport AND dbo.vvevo_arcsoport_lista.CIKK_SZAM = dbo.vevo_ar_lista.cikk_szam INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vvevo_arcsoport_lista.AFA_KULCS LEFT OUTER JOIN dbo.belepes ON dbo.vevo_ar_lista.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fcikkek_eszatocs]( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum ) Returns Table As Return select cikkek.cikk_szam,left(cikk_nev,45) as cikk_nev,menny_egys,vtsz,afa_kulcs,cikkcsop2,zsugor_db,db_kart,kart_sor,kart_rakl, tgon,ntgon,tgonszor,ntgonszor, 0 as netto_ar,dbo.TermekBruttoEladAr(cikkek.cikk_szam,@arcs,@akccs,@dat) as brutto_ar, '0' as akcio,norm_me,norm_szorz,convert(char(12),szallito) as szallito,convert(char(12),gyarto) as gyarto, 0 as atl_fogyas, 0 as min_keszlet,0 as beszerz_ar,gongyoleg,kifutott,'0' as fix_aras,tizedes,'' as web,letrehozta,letrehozva,modositotta,cikkek.modositva from cikkek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create FUNCTION [ffoglalasok]( @rakk int ) RETURNS TABLE AS Return select cikk_szam, sum(darab) as foglalt from foglalasok where (@rakk=0 or raktar_kod=@rakk) and meddig >= dbo.mygetdate() group by cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqbevet_cikkek](@dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bkod dbo.kulcs) Returns Table As Return SELECT Top 100 percent bevett.CIKK_SZAM, cikkek.CIKK_NEV, SUM(bevett.DARAB*bevett.szorzo) AS Darab, SUM(bevett.EGYSEG_AR * bevett.DARAB) AS ertek FROM bevetf INNER JOIN bevett ON bevetf.BIZSZAM = bevett.BIZSZAM INNER JOIN cikkek ON bevett.CIKK_SZAM = cikkek.CIKK_SZAM where (datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (cikkek.gyarto = @gyar or @gyar = 0) and (cikkek.szallito = @szall or @szall = 0)and (bevetf.raktar_k = @rkod or @rkod = 0) and (bevetf.bevet_kod = @bkod or @bkod = 0) GROUP BY bevett.CIKK_SZAM, cikkek.CIKK_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkeszlet_raktar](@ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bizom char(1)) Returns Table As Return select top 100 percent keszlet.raktar_kod,cikkek.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys,cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, sum(darab) as odb, sum(darab*egyseg_ar) as oert from keszlet inner join cikkek on keszlet.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet.raktar_kod = @rkod or @rkod = 0) and (keszlet.bizomanyos = @bizom or @bizom = '2') group by keszlet.raktar_kod,cikkek.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys,cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 order by keszlet.raktar_kod,cikk_nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkeszlet_raktar_szav](@ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bizom char(1) ) Returns Table As Return select top 100 percent keszlet.raktar_kod,cikkek.cikk_szam, keszlet.szav_datum, cikkek.cikk_nev, cikkek.menny_egys,cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, sum(darab) as odb, sum(darab*egyseg_ar) as oert from keszlet inner join cikkek on keszlet.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet.raktar_kod = @rkod or @rkod = 0) and (keszlet.bizomanyos = @bizom or @bizom = '2') group by keszlet.raktar_kod,cikkek.cikk_szam, keszlet.szav_datum, cikkek.cikk_nev, cikkek.menny_egys,cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 order by keszlet.raktar_kod,cikk_nev,szav_datum GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqkeszlet_szav]( @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs, @bizom char(1) ) Returns Table As Return select top 100 percent cikkek.cikk_szam, keszlet.szav_datum, cikkek.cikk_nev, cikkek.menny_egys,cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2, sum(darab) as odb, sum(darab*egyseg_ar) as oert from keszlet inner join cikkek on keszlet.cikk_szam= cikkek.cikk_szam where cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szallito = @szall or @szall = 0)and (keszlet.raktar_kod = @rkod or @rkod = 0) and (keszlet.bizomanyos = @bizom or @bizom = '2') group by cikkek.cikk_szam, keszlet.szav_datum, cikkek.cikk_nev, cikkek.menny_egys,cikkek.gyarto,cikkek.szallito, cikkek.cikkcsop2 order by cikk_nev,szav_datum GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqszall_szla_csz_pn]( @dat1 datum, @dat2 datum, @ccs char(20), @szall dbo.kulcs, @gyar dbo.kulcs, @pn char(3)) Returns Table As Return select top 100 percent cikkek.CIKK_szam, cikkek.Cikk_Nev, cikkek.aru_szolg, SUM(szall_szlat.EDARAB * szall_szlat.szorzo) AS darab, SUM(szall_szlat.edarab * szall_szlat.EGYSEG_AR * (100 - szall_szlaf.kedvezmeny)* (100 - szall_szlat.kedvezmeny) / 10000 ) AS ertek FROM szall_szlaf INNER JOIN szall_szlat ON szall_szlaf.BIZSZAM = szall_szlat.BIZSZAM INNER JOIN cikkek ON szall_szlat.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON szall_szlaf.SZALLITO = szallito.SZALL_KOD INNER JOIN stcikk2 ON cikkek.CIKKCSOP2 = stcikk2.cikk_szam LEFT OUTER JOIN gyarto ON cikkek.GYARTO = gyarto.kod where (telj_datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szall_szlaf.szallito = @szall or @szall = 0) and (szall_szlaf.penznem = @pn or @pn = '') GROUP BY cikkek.CIKK_szam, cikkek.Cikk_Nev, cikkek.aru_szolg GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqszall_szla_gyarto]( @dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs) Returns Table As Return select top 100 percent dbo.cikkek.GYARTO, dbo.gyarto.Nev, SUM(dbo.szall_szlat.EDARAB) AS darab, SUM ( dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR * dbo.szall_szlaf.kurzus * (100 - dbo.szall_szlaf.kedvezmeny) * (100 - dbo.szall_szlat.kedvezmeny) / 10000) AS Nertek, SUM( dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR * dbo.szall_szlaf.kurzus * (100 - dbo.szall_szlaf.kedvezmeny) * (100 - dbo.szall_szlat.kedvezmeny) * (1 + Convert(decimal(15,3),dbo.szall_szlat.afa_kulcs) ) /1000000) AS Bertek FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.szall_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.szallito ON dbo.szall_szlaf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod where (telj_datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szall_szlaf.szallito = @szall or @szall = 0) GROUP BY dbo.cikkek.GYARTO, dbo.gyarto.Nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqszall_szle_csop](@dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs) Returns Table As Return select top 100 percent cikkek.CIKKCSOP2, stcikk2.Cikk_Nev, SUM(szall_szlet.EDARAB*szall_szlet.szorzo) AS darab, SUM(szall_szlet.edarab * szall_szlet.EGYSEG_AR * szall_szlef.kurzus * (100 - szall_szlef.kedvezmeny) * (100 - szall_szlet.kedvezmeny) / 10000 ) AS ertek FROM szall_szlef INNER JOIN szall_szlet ON szall_szlef.BIZSZAM = szall_szlet.BIZSZAM INNER JOIN cikkek ON szall_szlet.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON szall_szlef.SZALLITO = szallito.SZALL_KOD INNER JOIN stcikk2 ON cikkek.CIKKCSOP2 = stcikk2.cikk_szam LEFT OUTER JOIN gyarto ON cikkek.GYARTO = gyarto.kod where (telj_datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szall_szlef.szallito = @szall or @szall = 0) and (szall_szlef.raktar_kod = @rkod or @rkod = 0) GROUP BY cikkek.CIKKCSOP2, stcikk2.Cikk_Nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqszall_szle_csz]( @dat1 datum, @dat2 datum, @ccs char(20), @szall dbo.kulcs, @gyar dbo.kulcs, @rkod dbo.kulcs) Returns Table As Return select top 100 percent cikkek.CIKK_szam, cikkek.Cikk_Nev, cikkek.aru_szolg, SUM(szall_szlet.EDARAB*szall_szlet.szorzo) AS darab, SUM(szall_szlet.edarab * szall_szlet.EGYSEG_AR * szall_szlef.kurzus * (100 - szall_szlef.kedvezmeny)* (100 - szall_szlet.kedvezmeny) / 10000 ) AS ertek FROM szall_szlef INNER JOIN szall_szlet ON szall_szlef.BIZSZAM = szall_szlet.BIZSZAM INNER JOIN cikkek ON szall_szlet.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON szall_szlef.SZALLITO = szallito.SZALL_KOD INNER JOIN stcikk2 ON cikkek.CIKKCSOP2 = stcikk2.cikk_szam LEFT OUTER JOIN gyarto ON cikkek.GYARTO = gyarto.kod where (telj_datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szall_szlef.szallito = @szall or @szall = 0)and (szall_szlef.raktar_kod = @rkod or @rkod = 0) GROUP BY cikkek.CIKK_szam, cikkek.Cikk_Nev, cikkek.aru_szolg GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqszall_szle_gyarto](@dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs) Returns Table As Return select top 100 percent cikkek.GYARTO, gyarto.Nev, SUM(szall_szlet.EDARAB*szall_szlet.szorzo) AS darab, SUM(szall_szlet.edarab * szall_szlet.EGYSEG_AR * szall_szlef.kurzus * (100 - szall_szlef.kedvezmeny) * (100 - szall_szlet.kedvezmeny) / 10000 ) AS ertek FROM szall_szlef INNER JOIN szall_szlet ON szall_szlef.BIZSZAM = szall_szlet.BIZSZAM INNER JOIN cikkek ON szall_szlet.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON szall_szlef.SZALLITO = szallito.SZALL_KOD INNER JOIN stcikk2 ON cikkek.CIKKCSOP2 = stcikk2.cikk_szam LEFT OUTER JOIN gyarto ON cikkek.GYARTO = gyarto.kod where (telj_datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szall_szlef.szallito = @szall or @szall = 0)and (szall_szlef.raktar_kod = @rkod or @rkod = 0) GROUP BY cikkek.GYARTO, gyarto.Nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE function [fvqszall_szle_szallito](@dat1 datum, @dat2 datum, @ccs char(20), @gyar dbo.kulcs, @szall dbo.kulcs, @rkod dbo.kulcs) Returns Table As Return select top 100 percent szall_szlef.SZALLITO, szallito.Szall_Nev, SUM(szall_szlet.EDARAB*szall_szlet.szorzo) AS darab, SUM(szall_szlet.edarab * szall_szlet.EGYSEG_AR * szall_szlef.kurzus * (100 - szall_szlef.kedvezmeny) * (100 - szall_szlet.kedvezmeny) / 10000 ) AS ertek FROM szall_szlef INNER JOIN szall_szlet ON szall_szlef.BIZSZAM = szall_szlet.BIZSZAM INNER JOIN cikkek ON szall_szlet.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON szall_szlef.SZALLITO = szallito.SZALL_KOD INNER JOIN stcikk2 ON cikkek.CIKKCSOP2 = stcikk2.cikk_szam LEFT OUTER JOIN gyarto ON cikkek.GYARTO = gyarto.kod where (telj_datum between @dat1 and @dat2) and cikkek.cikkcsop2 like (RTrim(@ccs) + '%') and (gyarto = @gyar or @gyar = 0) and (szall_szlef.szallito = @szall or @szall = 0)and (szall_szlef.raktar_kod = @rkod or @rkod = 0) GROUP BY szall_szlef.SZALLITO, szallito.Szall_Nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [vcikkinfo_arak_]( @arcs dbo.kulcs, @akccs dbo.kulcs, @dat dbo.datum, @pn dbo.penznem, @kurz dbo.kurzus, @artip int, @rakk int ) RETURNS TABLE AS Return select c.cikk_szam, cikk_nev, menny_egys, afa_kulcs, afaertek, netto_ar as lista_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas, isnull(sum(k.darab),0) as keszlet from vcikk_arak(@arcs,@akccs,@dat,@pn,@kurz,0) c left outer join afa_kulcs a on c.afa_kulcs = a.afakulcs left outer join keszlet k on c.cikk_szam=k.cikk_szam and (@rakk=raktar_kod or @rakk=0) group by c.cikk_szam, cikk_nev, menny_egys, afa_kulcs, afaertek, netto_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, vcikkszam, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, termekdijas GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE FUNCTION [VevoAkciok] ( @akccs dbo.kulcs, @dat dbo.datum ) RETURNS TABLE AS RETURN /* ekkor csak idoszakos akciok voltak SELECT cikk_szam, egyseg_ar from vevo_akcio where akciocsop = @akccs and kdatum <= @dat and @dat <= vdatum */ SELECT cikk_szam, egyseg_ar from vevo_akcio where akciocsop = @akccs and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) and kdatum=( select max(kdatum) from vevo_akcio where akciocsop = @akccs and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) ) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__v_stock] AS SELECT SORSZAM AS stock_id, CIKK_SZAM AS art_nr, RAKTAR_KOD AS warehouse_code, EDARAB AS orig_quant, DARAB AS quantity, EGYSEG_AR AS unit_price, MOZGASKOD AS source_type, SZAMLA_SZ AS source_doc_nr, TETEL AS source_doc_item FROM dbo.keszlet GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vart_groups] AS SELECT cikk_szam AS group_code, cikk_nev AS group_name, cikk_nev_eng AS group_name_eng FROM dbo.stcikk2 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__varticles] AS SELECT CIKK_SZAM AS art_nr, CIKK_NEV AS art_name, MENNY_EGYS AS art_quant_unit, AFA_KULCS AS art_vat, CIKKCSOP2 AS art_group_code, GYARTO AS art_brand, NORM_ME AS art_quant_unit_norm, NORM_SZORZ AS art_norm_multip FROM dbo.cikkek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vbrands] AS SELECT kod AS brand_code, nev AS brand_mane FROM dbo.gyarto GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vclient] AS SELECT VEVO_KOD AS client_code, VEVO_NEV AS client_name FROM dbo.vevok GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vdelivery_place] AS SELECT VEVO_KOD AS client_code, TELEP_KOD AS deliv_place_code, TELEP_NEV AS deliv_place_name FROM dbo.vevo_tel GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vinvoice_detail] AS SELECT BIZSZAM AS doc_nr, TETEL AS doc_item, CIKK_SZAM AS art_nr, AFA_KULCS AS vat, MENNY_EGYS AS quantity_unit, edarab AS quantity, EGYSEG_AR AS unit_price, kedvezmeny AS rebate_item, megjegyzes AS remark, akcio AS is_promot FROM dbo.vevo_szlat GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vinvoice_header] AS SELECT BIZSZAM AS doc_nr, VEVO AS client_code, TELJ_DATUM AS delivery_date, SZLA_DATUM AS invoice_date, FIZ_MODJA AS payment_method, FIZ_ESED AS payment_due_date, penznem AS curremcy, kurzus AS curr_rate, afamentes AS no_vat, kedvezmeny AS rebate_total, TIPUS AS type, UZLETKOTO AS sales_code, MEGJEGYZES AS remark, TOROLT AS is_deleted, TORLO AS is_deleting, TOR_SSZ AS delete_ref, VISSZARU AS is_back FROM dbo.vevo_szlaf GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vpurchase_detail] AS SELECT BIZSZAM AS doc_nr, TETEL AS item_nr, CIKK_SZAM AS art_nr, afa_kulcs AS vat, MENNY_EGYS AS quantity_unit, edarab AS quantity, EGYSEG_AR AS unit_price, kedvezmeny AS rebate_item, rendel_bsz AS order_nr, rendel_tet AS order_item FROM dbo.szall_szlet GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vpurchase_header] AS SELECT BIZSZAM AS document_nr, HIVSZAM AS reference_nr, szlaszam AS invoice_nr, SZALLITO AS supplier_code, TELJ_DATUM AS document_date, BEV_DATUM AS received_date, penznem AS currency, kurzus AS curr_rate, afamentes AS no_vat, MEGJEGYZES AS remark, kedvezmeny AS rebate_total, TOROLT AS is_deleted, TORLO AS is_deleting, TOR_SSZ AS delete_ref, VISSZARU AS is_back FROM dbo.szall_szlef GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vsold_detail] AS SELECT BIZSZAM AS doc_nr, TETEL AS doc_item, CIKK_SZAM AS art_nr, AFA_KULCS AS vat, MENNY_EGYS AS quantity_unit, edarab AS quantity, EGYSEG_AR AS unit_price, kedvezmeny AS rebate_item, megjegyzes AS remark, akcio AS is_promot, rendel_bsz AS order_nr, rendel_tet AS order_item FROM dbo.vevo_szlet GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vsold_header] AS SELECT BIZSZAM AS doc_nr, SZLASZAM AS invoice_nr, VEVO AS client_code, TELEP_KOD AS deliv_place_code, TELJ_DATUM AS delivery_date, penznem AS currency, kurzus AS curr_rate, afamentes AS no_vat, kedvezmeny AS rebate_total, akciocsoport AS prom_group, arcsoport AS price_group, MEGJEGYZES AS remark, TIPUS AS type, UZLETKOTO AS sales_code, TOROLT AS is_deleted, TORLO AS is_deleting, TOR_SSZ AS delete_ref, VISSZARU AS is_back FROM dbo.vevo_szlef GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__vsupplier] AS SELECT SZALL_KOD AS supplier_code, SZALL_NEV AS supplier_name FROM dbo.szallito GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [__xxelabe] AS SELECT dbo.keszlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.cikkek.MENNY_EGYS, SUM(dbo.mozgas.EDARAB * dbo.keszlet.EGYSEG_AR) AS besz_ert FROM dbo.keszlet INNER JOIN dbo.mozgas ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM INNER JOIN dbo.cikkek ON dbo.keszlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM WHERE (dbo.mozgas.BIZSZAM IN (SELECT BIZSZAM FROM dbo.vevo_szlef AS vevo_szlef_1)) AND (dbo.mozgas.MOZGASKOD = N'vevo_szle') GROUP BY dbo.keszlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.cikkek.MENNY_EGYS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vcikk_arak] AS SELECT arcsoport, cikk_nev, cikk_nev_ang, cikk_szam, netto_ar, akcios_ar, aru_szolg, kifutott, szallito, szallito_nev, gyarto, gyarto_nev, cikkcsop2, csoport_nev, menny_egys, afa_kulcs, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, vcikkszam, ut_besz_ar, termekdijas, vonalkod, fordafa, keszlet FROM dbo.vcikk_arak(1, 1, '2010.01.01', 'HUF', 1, 0) AS vcikk_arak_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vcikk_arak_galatea] AS SELECT vcikk_arak_1.arcsoport, vcikk_arak_1.cikk_nev, vcikk_arak_1.cikk_szam, vcikk_arak_1.netto_ar, vcikk_arak_1.akcios_ar, vcikk_arak_1.aru_szolg, vcikk_arak_1.kifutott, vcikk_arak_1.szallito, vcikk_arak_1.gyarto, vcikk_arak_1.cikkcsop2, vcikk_arak_1.menny_egys, vcikk_arak_1.afa_kulcs, vcikk_arak_1.tgon, vcikk_arak_1.ntgon, vcikk_arak_1.tgonszor, vcikk_arak_1.ntgonszor, vcikk_arak_1.akt_besz_ar, vcikk_arak_1.dat_tipus, vcikk_arak_1.vcikkszam, dbo.afa_kulcs.afaertek FROM dbo.vcikk_arak(1, 1, dbo.myGetDate(), 'HUF', 1, 0) AS vcikk_arak_1 INNER JOIN dbo.afa_kulcs ON vcikk_arak_1.afa_kulcs = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vcikk_arak1] AS SELECT TOP (100) PERCENT cikk_nev, cikk_szam, netto_ar, akcios_ar, aru_szolg, kifutott, szallito, gyarto, cikkcsop2, menny_egys, afa_kulcs, tgon, ntgon, tgonszor, ntgonszor, akt_besz_ar, dat_tipus, vcikkszam, ut_besz_ar, termekdijas, arcsoport, cikk_nev_ang, szallito_nev, gyarto_nev, csoport_nev FROM dbo.vcikk_arak(11, 1, '2012.01.15', 'HUF', 1.00000, 0) AS vcikk_arak_2 WHERE (cikk_szam = '-+-+-+-+') ORDER BY cikk_nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vFeladVevo] AS SELECT dbo.vevok.VEVO_KOD, dbo.vevok.VEVO_NEV, dbo.vevok.IRANYITO, dbo.vevok.VAROS, dbo.VevoCimsor(dbo.vevok.VEVO_KOD) AS cim, dbo.orszagok.nev_hu AS orszag, dbo.vevok.iso, dbo.vevok.allam, dbo.vevok.ADOSZAM, dbo.vevok.eu_adoszam, dbo.vevok.BANK, dbo.vevok.FIZMOD, dbo.vevok.FIZHAT FROM dbo.vevok INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vFeladVevoSzlaF] AS SELECT BIZSZAM AS VevoSzamlaSzam, VEVO AS VevoKod, TELJ_DATUM AS TeljDatum, SZLA_DATUM AS SzamlaDatum, FIZ_MODJA AS FizetesModja, FIZ_ESED AS FizetesEsed, penznem AS Penznem, kurzus AS Kurzus, CASE afamentes WHEN 1 THEN '1' ELSE '0' END AS Afamentes, kedvezmeny AS VegosszegKedvezmeny, TIPUS AS SzamlaTipus, TOROLT AS ToroltSzamlaszam, TORLO AS TorloSzamlaszam, TOR_SSZ AS HivSzamlaszam, VISSZARU AS Visszaru FROM dbo.vevo_szlaf GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vFeladVevoSzlaT] AS SELECT BIZSZAM AS VevoSzamlaSzam, AFA_KULCS AS AfaKulcs, SUM((edarab * EGYSEG_AR) * (100 - kedvezmeny) / 100) AS NettoErtek FROM dbo.vevo_szlat GROUP BY BIZSZAM, AFA_KULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vvevo_arajant] AS SELECT dbo.vevo_arajant.BIZSZAM, dbo.vevo_arajant.TETEL, dbo.vevo_arajant.CIKK_SZAM, dbo.vevo_arajant.MENNY_EGYS, dbo.vevo_arajant.SZORZO, dbo.vevo_arajant.darab, dbo.vevo_arajant.AFA_KULCS, dbo.vevo_arajant.kedvezmeny, dbo.cikkek.CIKK_NEV, dbo.vevo_arajanf.DATUM_TOL, dbo.vevo_arajanf.DATUM_IG, dbo.vevo_arajanf.VEVO, dbo.cikkek.aru_szolg, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, (dbo.vevo_arajant.darab * dbo.vevo_arajant.EGYSEG_AR) * ((100 - dbo.vevo_arajant.kedvezmeny) / 100) AS Ertek, dbo.vevo_arajanf.FIZHAT, dbo.cikkek.SZALLITO, dbo.cikkek.CIKK_NEV AS Expr1, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev, ISNULL(dbo.szallito.SZALL_NEV, '') AS szall_nev, dbo.afa_kulcs.afaertek, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevok.VEVO_NEV, ISNULL(dbo.vevo_lanc.nev, '') AS vlanc_nev, ISNULL(dbo.vevo_terulet.nev, '') AS vterulet_nev, ISNULL(dbo.vevo_csoport.Nev, '') AS vcsoport_nev, dbo.vevo_arajant.EGYSEG_AR FROM dbo.vevo_lanc RIGHT OUTER JOIN dbo.stcikk2 INNER JOIN dbo.gyarto INNER JOIN dbo.vevok INNER JOIN dbo.vevo_arajanf ON dbo.vevok.VEVO_KOD = dbo.vevo_arajanf.VEVO INNER JOIN dbo.vevo_arajant ON dbo.vevo_arajanf.BIZSZAM = dbo.vevo_arajant.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_arajant.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_arajant.AFA_KULCS = dbo.afa_kulcs.AFAKULCS ON dbo.gyarto.kod = dbo.cikkek.GYARTO INNER JOIN dbo.szallito ON dbo.cikkek.SZALLITO = dbo.szallito.SZALL_KOD ON dbo.stcikk2.cikk_szam = dbo.cikkek.CIKKCSOP2 ON dbo.vevo_lanc.kod = dbo.vevok.vevo_lanc LEFT OUTER JOIN dbo.vevo_terulet ON dbo.vevok.vevo_terulet = dbo.vevo_terulet.kod LEFT OUTER JOIN dbo.vevo_cegjelleg ON dbo.vevok.vevo_cegjelleg = dbo.vevo_cegjelleg.kod LEFT OUTER JOIN dbo.vevo_csoport ON dbo.vevok.vevo_csoport = dbo.vevo_csoport.Kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_vwkassza] AS SELECT dbo.wkassza.KICSODA, dbo.wkassza.bizszam, dbo.wkassza.TETEL, dbo.wkassza.CIKK_SZAM, dbo.wkassza.VONALKOD, dbo.wkassza.CIKK_NEV, dbo.wkassza.AFA_KULCS, dbo.wkassza.DARAB, dbo.wkassza.EGYSEG_AR, dbo.wkassza.KEDVEZMENY, dbo.wkassza.OSSZEG, dbo.wkassza.AKCIO, dbo.wkassza.GONGYOLEG, dbo.wkassza.brar, dbo.afa_kulcs.afaertek FROM dbo.wkassza INNER JOIN dbo.afa_kulcs ON dbo.wkassza.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [_web_routes] AS SELECT TOP (100) PERCENT cikk_szam, LOWER(CONVERT(varchar(100), REPLACE(cikk_nev_1, '/', '-') + (CASE LEN(cikk_nev_2) WHEN 0 THEN '' ELSE '/' + REPLACE(cikk_nev_2, '/', '-') END) + (CASE LEN(cikk_nev_3) WHEN 0 THEN '' ELSE '/' + REPLACE(cikk_nev_3, '/', '-') END)) COLLATE Cyrillic_General_CI_AI) AS route_hu, LOWER(CONVERT(varchar(100), REPLACE(cikk_nev_eng_1, '/', '-') + (CASE LEN(cikk_nev_eng_2) WHEN 0 THEN '' ELSE '/' + REPLACE(cikk_nev_eng_2, '/', '-') END) + (CASE LEN(cikk_nev_eng_3) WHEN 0 THEN '' ELSE '/' + REPLACE(cikk_nev_eng_3, '/', '-') END)) COLLATE Cyrillic_General_CI_AI) AS route_en FROM (SELECT cikk_szam, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cikk_nev)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS cikk_nev_1, '' AS cikk_nev_2, '' AS cikk_nev_3, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cikk_nev_eng)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS cikk_nev_eng_1, '' AS cikk_nev_eng_2, '' AS cikk_nev_eng_3 FROM dbo.stcikk2 WHERE (LEN(cikk_szam) = 3) UNION ALL SELECT cs2.cikk_szam, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs1.cikk_nev)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr1, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs2.cikk_nev)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr2, '' AS Expr3, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs1.cikk_nev_eng)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr4, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs2.cikk_nev_eng)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr5, '' AS Expr6 FROM dbo.stcikk2 AS cs1 INNER JOIN dbo.stcikk2 AS cs2 ON LEFT(cs1.cikk_szam, 3) = LEFT(cs2.cikk_szam, 3) WHERE (LEN(cs1.cikk_szam) = 3) AND (LEN(cs2.cikk_szam) = 6) UNION ALL SELECT cs3.cikk_szam, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs1.cikk_nev)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr1, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs2.cikk_nev)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr2, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs3.cikk_nev)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr3, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs1.cikk_nev_eng)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr4, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs2.cikk_nev_eng)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr5, REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(LTRIM(RTRIM(cs3.cikk_nev_eng)), '+', ' '), ',', ' '), ')', ' '), '(', ' '), '&', ' '), '-', ' '), ' ', '<>'), '><', ''), '<>', ' '), ' ', '-') AS Expr6 FROM dbo.stcikk2 AS cs1 INNER JOIN dbo.stcikk2 AS cs2 ON LEFT(cs1.cikk_szam, 3) = LEFT(cs2.cikk_szam, 3) INNER JOIN dbo.stcikk2 AS cs3 ON LEFT(cs2.cikk_szam, 6) = LEFT(cs3.cikk_szam, 6) WHERE (LEN(cs1.cikk_szam) = 3) AND (LEN(cs2.cikk_szam) = 6) AND (LEN(cs3.cikk_szam) = 9)) AS t ORDER BY cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [intrastat_szall] AS SELECT dbo.szall_szlaf.TELJ_DATUM, dbo.cikkek.VTSZ, dbo.orszagok.iso AS felado_iso, dbo.orszagok.eu AS felado_eu, SUM(dbo.szall_szlat.edarab * dbo.szallito.szorzo * dbo.cikkek.db_sulya) AS netto_tomeg, SUM(dbo.szall_szlat.edarab * dbo.szallito.szorzo) AS mennyiseg, SUM(((dbo.szall_szlaf.kurzus * dbo.szall_szlat.edarab * dbo.szallito.szorzo * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlaf.kedvezmeny)) * (100 - dbo.szall_szlat.kedvezmeny) / 10000) AS ertek_ft, dbo.cikkek.szarmazasi_hely AS szarmazasi_iso FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.szallito ON dbo.szall_szlaf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.cikkek ON dbo.szall_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso WHERE (dbo.orszagok.iso <> 'hu') AND (dbo.cikkek.aru_szolg = '1') AND (dbo.orszagok.eu = '1') AND (LEN(dbo.szallito.eu_adoszam) > 0) GROUP BY dbo.szall_szlaf.TELJ_DATUM, dbo.cikkek.VTSZ, dbo.orszagok.iso, dbo.orszagok.eu, dbo.cikkek.szarmazasi_hely GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [intrastat_vevo] AS SELECT dbo.vevo_szlaf.TELJ_DATUM, dbo.cikkek.VTSZ, dbo.orszagok.iso AS rend_iso, dbo.orszagok.eu, SUM(dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.cikkek.db_sulya) AS netto_tomeg, SUM(dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO) AS mennyiseg, SUM(((dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 - dbo.vevo_szlat.kedvezmeny) / 10000) AS ertek_ft, dbo.cikkek.szarmazasi_hely AS szarmazasi_iso, dbo.vevok.eu_adoszam FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso WHERE (dbo.orszagok.iso <> 'hu') AND (dbo.cikkek.aru_szolg = '1') AND (dbo.orszagok.eu = '1') AND (LEN(dbo.vevok.eu_adoszam) > 0) GROUP BY dbo.vevo_szlaf.TELJ_DATUM, dbo.cikkek.VTSZ, dbo.orszagok.iso, dbo.orszagok.eu, dbo.cikkek.szarmazasi_hely, dbo.vevok.eu_adoszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vafa_kulcs] AS SELECT AFAKULCS, afaertek, CASE engedelyez WHEN '1' THEN 'engedélyezve' WHEN '0' THEN 'tiltva' END AS engedely FROM dbo.afa_kulcs GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vakcio_tv] AS SELECT dbo.akcio_tv.sorszam, dbo.akcio_tv.cikk_szam, dbo.akcio_tv.fdatum, dbo.akcio_tv.kdatum, dbo.akcio_tv.vdatum, dbo.akcio_tv.akcios_ar, dbo.akcio_tv.eredeti_ar, dbo.akcio_tv.kicsoda, dbo.akcio_tv.keszult, dbo.akcio_tv.kiemelt, dbo.akcio_tv.megjegyzes, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.cikkek.AFA_KULCS FROM dbo.akcio_tv INNER JOIN dbo.cikkek ON dbo.akcio_tv.cikk_szam = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vanyagszukseglet] AS SELECT dbo.anyagszukseglet.raktar_kod, dbo.anyagszukseglet.cikk_szam, dbo.anyagszukseglet.xdb, dbo.anyagszukseglet.acikk_szam, dbo.cikkek.CIKK_NEV, dbo.anyagszukseglet.darab, dbo.raktarak.nev, dbo.cikkek.MENNY_EGYS, dbo.cikkek.aru_szolg, dbo.anyagszukseglet.egyseg_ar FROM dbo.anyagszukseglet INNER JOIN dbo.cikkek ON dbo.anyagszukseglet.acikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.raktarak ON dbo.anyagszukseglet.raktar_kod = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vanyagszukseglet1] AS SELECT dbo.anyagszukseglet.cikk_szam, dbo.onkoltar.egyseg_ar FROM dbo.anyagszukseglet INNER JOIN dbo.onkoltar ON dbo.anyagszukseglet.cikk_szam = dbo.onkoltar.cikk_szam GROUP BY dbo.anyagszukseglet.cikk_szam, dbo.onkoltar.egyseg_ar GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbankcsomag] AS SELECT dbo.bankszamlak.nev, dbo.bankcsomagt.kivonat, dbo.bankcsomagt.partner_tip, dbo.bankcsomagt.partner, dbo.bankcsomagt.tipus, dbo.bankcsomagt.osszeg, dbo.bankcsomagt.penznem, dbo.bankcsomagt.kozlemeny1, dbo.bankcsomagt.kozlemeny2, dbo.bankcsomagt.kozlemeny3, ISNULL(dbo.bankcsomagb.bizszam, '') AS bizszam, ISNULL(dbo.bankcsomagb.ertek, 0) AS ertek FROM dbo.bankcsomagt INNER JOIN dbo.bankszamlak ON dbo.bankcsomagt.bankszamlaszam = dbo.bankszamlak.kod LEFT OUTER JOIN dbo.bankcsomagb ON dbo.bankcsomagt.kulcs = dbo.bankcsomagb.kulcs GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbankcsomag_ertek] AS SELECT dbo.bankszamlak.nev, dbo.bankcsomagt.kivonat, dbo.bankcsomagt.partner_tip, dbo.bankcsomagt.partner, dbo.bankcsomagt.tipus, dbo.bankcsomagt.osszeg, dbo.bankcsomagt.penznem, dbo.bankcsomagt.kozlemeny1, dbo.bankcsomagt.kozlemeny2, dbo.bankcsomagt.kozlemeny3, dbo.bankcsomagt.megjegyzes, CASE partner_tip WHEN 'v' THEN isnull(dbo.vevok.VEVO_NEV, '') WHEN 'S' THEN isnull(dbo.szallito.SZALL_NEV, '') ELSE '' END AS partner_nev, dbo.bankcsomagf.datum, dbo.bankcsomagt.kulcs, dbo.bankcsomagf.bankszamlaszam FROM dbo.bankszamlak INNER JOIN dbo.bankcsomagf ON dbo.bankszamlak.kod = dbo.bankcsomagf.bankszamlaszam INNER JOIN dbo.bankcsomagt ON dbo.bankcsomagf.bankszamlaszam = dbo.bankcsomagt.bankszamlaszam AND dbo.bankcsomagf.kivonat = dbo.bankcsomagt.kivonat LEFT OUTER JOIN dbo.szallito ON dbo.bankcsomagt.partner = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.vevok ON dbo.bankcsomagt.partner = dbo.vevok.VEVO_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbankcsomagb_sum] AS SELECT bizszam AS bizszam1, SUM(ertek) AS Ertek FROM dbo.bankcsomagb GROUP BY bizszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbankcsomagt] AS SELECT dbo.bankcsomagt.kulcs, dbo.bankcsomagt.bankszamlaszam, dbo.bankcsomagt.kivonat, dbo.bankcsomagt.tipus, dbo.bankcsomagt.partner_tip, dbo.bankcsomagt.partner, dbo.bankcsomagt.p_szamlaszam, dbo.bankcsomagt.osszeg, dbo.bankcsomagt.penznem, dbo.bankcsomagt.kurzus, dbo.bankcsomagt.kozlemeny1, dbo.bankcsomagt.kozlemeny2, dbo.bankcsomagt.kozlemeny3, dbo.bankcsomagt.kicsoda, dbo.bankcsomagt.modido, dbo.PartnerNev(dbo.bankcsomagt.partner_tip, dbo.bankcsomagt.partner) AS Partner_Nev, dbo.bankcsomagt.megjegyzes, dbo.belepes.TELJESNEV, dbo.Bankcsomagb_rendezve(dbo.bankcsomagt.kulcs, dbo.bankcsomagt.osszeg, dbo.bankcsomagt.tipus) AS Rendezve FROM dbo.bankcsomagt INNER JOIN dbo.belepes ON dbo.bankcsomagt.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbankpenztar_atvezetes] AS SELECT TOP (100) PERCENT datum, bank, bank_osszeg, bank_penznem, penztar, penztar_osszeg, penztar_penznem FROM dbo.fpenztar_bank() AS fpenztar_bank_1 ORDER BY datum GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbevet_ertek] AS SELECT dbo.bevetf.BIZSZAM, dbo.bevetf.DATUM, dbo.bevetf.hivszam, dbo.bevetf.BEVET_KOD, dbo.bevetjog.bevetnev, dbo.bevetf.MEGJEGYZES, dbo.bevetf.KICSODA, dbo.belepes.TELJESNEV, dbo.bevetf.MODIDO, dbo.bevetf.RAKTAR_K, dbo.raktarak.nev AS raktar_nev, ISNULL(SUM(dbo.bevett.DARAB * dbo.bevett.EGYSEG_AR), 0) AS netto_ertek, ISNULL(SUM((dbo.bevett.DARAB * dbo.bevett.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 100), 0) AS brutto_ertek FROM dbo.bevetf INNER JOIN dbo.bevetjog ON dbo.bevetf.BEVET_KOD = dbo.bevetjog.kod INNER JOIN dbo.belepes ON dbo.bevetf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak ON dbo.bevetf.RAKTAR_K = dbo.raktarak.kod INNER JOIN dbo.bevett ON dbo.bevetf.BIZSZAM = dbo.bevett.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.bevett.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GROUP BY dbo.bevetf.BIZSZAM, dbo.bevetf.DATUM, dbo.bevetf.hivszam, dbo.bevetf.BEVET_KOD, dbo.bevetjog.bevetnev, dbo.bevetf.MEGJEGYZES, dbo.bevetf.KICSODA, dbo.belepes.TELJESNEV, dbo.bevetf.MODIDO, dbo.bevetf.RAKTAR_K, dbo.raktarak.nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbevetf] AS SELECT dbo.bevetf.BIZSZAM, dbo.bevetf.DATUM, dbo.bevetf.hivszam, dbo.bevetf.BEVET_KOD, dbo.bevetjog.bevetnev, dbo.bevetf.MEGJEGYZES, dbo.bevetf.KICSODA, dbo.belepes.TELJESNEV, dbo.bevetf.MODIDO, dbo.bevetf.RAKTAR_K, dbo.raktarak.nev AS raktar_nev FROM dbo.bevetf INNER JOIN dbo.bevetjog ON dbo.bevetf.BEVET_KOD = dbo.bevetjog.kod INNER JOIN dbo.belepes ON dbo.bevetf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak ON dbo.bevetf.RAKTAR_K = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbevett] AS SELECT dbo.bevett.BIZSZAM, dbo.bevett.TETEL, dbo.bevett.CIKK_SZAM, dbo.bevett.MENNY_EGYS, dbo.bevett.SZORZO, dbo.bevett.AFA_KULCS, dbo.bevett.DARAB, dbo.bevett.EGYSEG_AR, dbo.cikkek.CIKK_NEV FROM dbo.bevett INNER JOIN dbo.cikkek ON dbo.bevett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vbontas] AS SELECT dbo.bontas.cikk_szam, dbo.bontas.acikk_szam, dbo.cikkek.CIKK_NEV, cikkek_1.CIKK_NEV AS acikk_nev FROM dbo.bontas INNER JOIN dbo.cikkek ON dbo.bontas.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.cikkek AS cikkek_1 ON dbo.bontas.acikk_szam = cikkek_1.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikk_info] AS SELECT CIKK_SZAM, CIKK_NEV, cikk_nev_ang, NORM_SZORZ AS keszlet, ut_besz_ar AS netto_brutto_ar, akt_besz_ar AS netto_brutto_akc FROM dbo.cikkek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikk_ker] AS SELECT CIKK_SZAM, CIKK_NEV, MENNY_EGYS, AFA_KULCS FROM dbo.cikkek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikk_neta] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikk_chipsado.norm1 AS mas_udito_menny, dbo.cikk_chipsado.kat1 AS mas_udito_ert, dbo.cikk_chipsado.norm2 AS energia_metilxantin_taurin_menny, dbo.cikk_chipsado.kat2 AS energia_metilxantin_taurin_ert, dbo.cikk_chipsado.norm3 AS cukrozott_keszitmeny_menny, dbo.cikk_chipsado.kat3 AS cukrozott_keszitmeny_ert, dbo.cikk_chipsado.norm4 AS sos_snack_menny, dbo.cikk_chipsado.kat4 AS sos_snack_er, dbo.cikk_chipsado.norm5 AS etelizesito_menny, dbo.cikk_chipsado.kat5 AS etelizesito_ert, dbo.cikk_chipsado.norm6 AS izetsitett_sor_menny, dbo.cikk_chipsado.kat6 AS izetsitett_sor_ert, dbo.cikk_chipsado.norm7 AS alkoholosfrissito_menny, dbo.cikk_chipsado.kat7 AS alkoholosfrissito_ert, dbo.cikk_chipsado.norm8 AS gyumolcsiz_menny, dbo.cikk_chipsado.kat8 AS gyumolcsiz_ert, dbo.cikk_chipsado.norm9 AS uditosuritmenyszorp_menny, dbo.cikk_chipsado.kat9 AS uditosuritmenyszorp_ert, dbo.cikk_chipsado.norm10 AS cukrozottkakaopor_menny, dbo.cikk_chipsado.kat10 AS cukrozottkakaopor_ert, dbo.cikk_chipsado.norm11 AS energiaital_metilxantin_menny, dbo.cikk_chipsado.kat11 AS energiaital_metilxantin_ert FROM dbo.cikkek INNER JOIN dbo.cikk_chipsado ON dbo.cikkek.CIKK_SZAM = dbo.cikk_chipsado.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikk_webaruhaz] AS SELECT dbo.cikk_webaruhaz.cikk_szam, dbo.cikk_webaruhaz.domain1, dbo.cikk_webaruhaz.domain2, dbo.cikk_webaruhaz.domain3, dbo.cikk_webaruhaz.domain4, dbo.cikk_webaruhaz.domain5, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.cikkek.KIFUTOTT, dbo.cikkek.DB_KART, dbo.cikkek.DB_KART * dbo.cikkek.KART_RAKL AS db_rakl FROM dbo.cikk_webaruhaz INNER JOIN dbo.cikkek ON dbo.cikk_webaruhaz.cikk_szam = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikkek] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.cikkek.VTSZ, dbo.cikkek.AFA_KULCS, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.KIFUTOTT, dbo.cikkek.RENDELHETO, dbo.cikkek.NAPI_FOGY, dbo.cikkek.MIN_KESZ, dbo.cikkek.DB_KART, dbo.cikkek.KART_RAKL, dbo.cikkek.JOVEDEKI, dbo.cikkek.GONGYOLEG, dbo.cikkek.TGON, dbo.cikkek.TGONSZOR, dbo.cikkek.NTGON, dbo.cikkek.NTGONSZOR, dbo.cikkek.aru_szolg, dbo.cikkek.letrehozta, dbo.cikkek.letrehozva, dbo.cikkek.modositotta, dbo.cikkek.MODOSITVA, dbo.stcikk2.cikk_nev AS CSOP_NEV, dbo.szallito.SZALL_NEV, dbo.cikkek.VCIKKSZAM, dbo.cikkek.POLC, dbo.cikkek.NORM_ME, dbo.cikkek.NORM_SZORZ, dbo.cikkek.ZSUGOR_DB, dbo.cikkek.KART_SOR, dbo.cikkek.MIN_RENCS, dbo.cikkek.MIN_RENSZ, dbo.cikkek.db_sulya, dbo.cikkek.karton_hossz, dbo.cikkek.karton_szelesseg, dbo.cikkek.karton_magassag, dbo.cikkek.karton_sulya, dbo.cikkek.rakat_mag, dbo.cikkek.akt_besz_ar, dbo.cikkek.ut_besz_ar, dbo.gyarto.nev AS gyarto_nev, dbo.cikkek.GYARTO, dbo.cikkek.raktar_kod, dbo.raktarak.nev AS raktarnev, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod FROM dbo.szallito RIGHT OUTER JOIN dbo.raktarak RIGHT OUTER JOIN dbo.vonal RIGHT OUTER JOIN dbo.cikkek ON dbo.vonal.CIKK_SZAM = dbo.cikkek.CIKK_SZAM ON dbo.raktarak.kod = dbo.cikkek.raktar_kod ON dbo.szallito.SZALL_KOD = dbo.cikkek.SZALLITO LEFT OUTER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod WHERE (dbo.vonal.ALAP = '1') OR (dbo.vonal.ALAP IS NULL) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikkek_ean] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.aru_szolg, dbo.cikkek.MENNY_EGYS, dbo.cikkek.NORM_ME, dbo.cikkek.NORM_SZORZ, dbo.cikkek.VTSZ, dbo.cikkek.AFA_KULCS, dbo.cikkek.KIFUTOTT, dbo.cikkek.RENDELHETO, dbo.cikkek.JOVEDEKI, dbo.cikkek.GONGYOLEG, dbo.cikkek.ALLANDO, dbo.cikkek.TGON, dbo.cikkek.TGONSZOR, dbo.cikkek.NTGON, dbo.cikkek.NTGONSZOR, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.raktar_kod, dbo.cikkek.POLC, dbo.cikkek.SZALLITO, dbo.cikkek.VCIKKSZAM, dbo.cikkek.ZSUGOR_DB, dbo.cikkek.DB_KART, dbo.cikkek.KART_SOR, dbo.cikkek.KART_RAKL, dbo.cikkek.MIN_RENCS, dbo.cikkek.MIN_RENSZ, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.karton_hossz, dbo.cikkek.karton_szelesseg, dbo.cikkek.karton_magassag, dbo.cikkek.karton_sulya, dbo.cikkek.karton_br_sulya, dbo.cikkek.rakat_mag, dbo.cikkek.akt_besz_ar, dbo.cikkek.ut_besz_ar, dbo.cikkek.NAPI_FOGY, dbo.cikkek.MIN_KESZ, dbo.cikkek.letrehozta, dbo.cikkek.letrehozva, dbo.cikkek.modositotta, dbo.cikkek.MODOSITVA, dbo.cikkek.TIZEDES, dbo.cikkek.DAT_TIPUS, dbo.cikkek.SZAV_IDO, dbo.cikkek.vpop_alkoholfok, dbo.cikkek.vpop_fajtakod, dbo.cikkek.vpop_urtartalom, dbo.cikkek.termekdijas, ISNULL(dbo.vonal.VONALKOD, '') AS VONALKOD, dbo.cikkek.cikk_nev_ang FROM dbo.cikkek LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM WHERE (dbo.vonal.ALAP = '1') OR (dbo.vonal.ALAP IS NULL) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikkek_jellemzok] AS SELECT dbo.cikkek_jellemzok.cikk_szam, dbo.cikkek_jellemzok.jellemzo, dbo.cikkek.CIKK_NEV, dbo.jellemzok.nev AS jellemzo_nev FROM dbo.cikkek_jellemzok INNER JOIN dbo.cikkek ON dbo.cikkek_jellemzok.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.jellemzok ON dbo.cikkek_jellemzok.jellemzo = dbo.jellemzok.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcikkek_vonal] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod FROM dbo.cikkek LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vcsomagt] AS SELECT dbo.csomagt.CSOMAG_KOD, dbo.csomagt.CIKK_SZAM, dbo.csomagt.DARAB, dbo.csomagt.EGYSEG_AR, dbo.cikkek.CIKK_NEV, dbo.cikkek.AFA_KULCS, dbo.csomagt.AJANDEK, dbo.cikkek.MENNY_EGYS, dbo.cikkek.aru_szolg FROM dbo.csomagt INNER JOIN dbo.cikkek ON dbo.csomagt.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vdiszpo] AS SELECT dbo.diszpo.kulcs, dbo.diszpo.prioritas, dbo.raktarak.nev AS raktar_nev, dbo.diszpo.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.diszpo.edarab, dbo.diszpo.darab, dbo.diszpo.megjegyzes, dbo.diszpo.rogzitette, dbo.belepes.TELJESNEV AS rogzitette_nev, dbo.diszpo.rogzites, dbo.cikkek.CIKKCSOP2, dbo.stcikk2.cikk_nev AS cikkcsop_nev, ISNULL(dbo.Legyarthato(dbo.diszpo.cikk_szam, dbo.diszpo.raktar_kod, dbo.diszpo.prioritas), 4) AS Legyarthato, dbo.diszpo.raktar_kod, dbo.diszpo.visszaigazolas, dbo.cikkek.MENNY_EGYS, CASE visszaigazolas WHEN '' THEN 'a' ELSE visszaigazolas END AS sorrend, dbo.diszpo.rendeles_szam, dbo.diszpo.rendeles_tetel FROM dbo.diszpo INNER JOIN dbo.raktarak ON dbo.diszpo.raktar_kod = dbo.raktarak.kod INNER JOIN dbo.cikkek ON dbo.diszpo.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.belepes ON dbo.diszpo.rogzitette = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vdiszpo_keszre2] AS SELECT dbo.keszre2.kulcs, dbo.keszre2.acikk_szam, dbo.keszre2.darab, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.keszre1.modido, dbo.keszre2.tetel FROM dbo.keszre2 INNER JOIN dbo.cikkek ON dbo.keszre2.acikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.keszre1 ON dbo.keszre2.kulcs = dbo.keszre1.kulcs GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vfoglalasok] AS SELECT dbo.foglalasok.kulcs, dbo.foglalasok.prioritas, dbo.foglalasok.cikk_szam, dbo.foglalasok.edarab, dbo.foglalasok.darab, dbo.foglalasok.vevo, dbo.foglalasok.raktar_kod, dbo.foglalasok.foglalva, dbo.foglalasok.foglalta, dbo.foglalasok.meddig, dbo.foglalasok.prior_modositotta, dbo.foglalasok.prior_modositva, ISNULL(dbo.raktarak.nev, 'összes') AS raktarnev, dbo.cikkek.CIKK_NEV, dbo.vevok.VEVO_NEV, ISNULL(dbo.belepes.TELJESNEV, '') AS foglalta_nev, ISNULL(belepes_1.TELJESNEV, '') AS modositotta_nev, dbo.SzabadKeszletAdottPrior(dbo.foglalasok.cikk_szam, dbo.foglalasok.raktar_kod, dbo.foglalasok.prioritas) AS kiadhato, dbo.foglalasok.szav_ido, dbo.foglalasok.gyari_szam, dbo.foglalasok.sarzs_szam, dbo.foglalasok.rend_szam, dbo.foglalasok.tetel FROM dbo.foglalasok INNER JOIN dbo.cikkek ON dbo.foglalasok.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevok ON dbo.foglalasok.vevo = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.raktarak ON dbo.foglalasok.raktar_kod = dbo.raktarak.kod LEFT OUTER JOIN dbo.belepes ON dbo.foglalasok.foglalta = dbo.belepes.ROVIDNEV LEFT OUTER JOIN dbo.belepes AS belepes_1 ON dbo.foglalasok.prior_modositotta = belepes_1.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vhcimke_csz] AS SELECT dbo.hcimke_csz.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.hcimke_csz.hcimke_sablon, dbo.hcimke_sablon.nev, dbo.hcimke_sablon.sablon FROM dbo.hcimke_csz INNER JOIN dbo.hcimke_sablon ON dbo.hcimke_csz.hcimke_sablon = dbo.hcimke_sablon.kulcs INNER JOIN dbo.cikkek ON dbo.hcimke_csz.cikk_szam = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet] AS SELECT SORSZAM, RAKTAR_KOD, CIKK_SZAM, EDARAB, DARAB, EGYSEG_AR, szav_datum, CASE mozgaskod WHEN 'vevo_szle' THEN 'Visszáru' WHEN 'bevet' THEN 'Rakt. bev.' WHEN 'vetel' THEN 'Száll. bev.' ELSE 'Bizom.' END AS mozg, SZAMLA_SZ, TETEL, NYUGTAZVA, BIZOMANYOS, GYARI_SZAM, SARZS_SZAM FROM dbo.keszlet GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_beszforras] AS SELECT TOP (100) PERCENT dbo.cikkek.CIKK_NEV, dbo.keszlet.DARAB, dbo.keszlet.EGYSEG_AR, dbo.szall_szlaf.KULSOSZLASZ, dbo.szall_szlaf.SZALL_NEV, dbo.szall_szlaf.TELJ_DATUM, dbo.bevetf.DATUM, dbo.bevetjog.bevetnev FROM dbo.keszlet INNER JOIN dbo.cikkek ON dbo.keszlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM AND dbo.keszlet.DARAB > 0 LEFT OUTER JOIN dbo.szall_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.szall_szlef.BIZSZAM AND dbo.keszlet.MOZGASKOD = 'vetel' LEFT OUTER JOIN dbo.szall_szlaf ON dbo.szall_szlef.szlaszam = dbo.szall_szlaf.BIZSZAM LEFT OUTER JOIN dbo.bevetf ON dbo.keszlet.SZAMLA_SZ = dbo.bevetf.BIZSZAM AND dbo.keszlet.MOZGASKOD = 'bevet' LEFT OUTER JOIN dbo.bevetjog ON dbo.bevetf.BEVET_KOD = dbo.bevetjog.kod ORDER BY dbo.cikkek.CIKK_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkeszlet_reszletes] AS SELECT dbo.keszlet.SORSZAM, dbo.keszlet.RAKTAR_KOD, dbo.keszlet.CIKK_SZAM, dbo.keszlet.EDARAB, dbo.keszlet.DARAB, dbo.keszlet.EGYSEG_AR, dbo.keszlet.szav_datum, dbo.keszlet.MOZGASKOD, dbo.keszlet.SZAMLA_SZ, dbo.keszlet.TETEL, dbo.keszlet.NYUGTAZVA, dbo.keszlet.BIZOMANYOS, dbo.keszlet.GYARI_SZAM, dbo.keszlet.SARZS_SZAM, CASE WHEN mozgaskod = 'bevet' THEN bevetf.datum WHEN mozgaskod = 'vetel' THEN szall_szlef.telj_datum WHEN mozgaskod = 'bizom' THEN szbiz_szlef.telj_datum WHEN mozgaskod = 'vevo_szle' THEN vevo_szlef.telj_datum END AS bev_datum, CASE WHEN mozgaskod = 'bevet' THEN bevetjog.bevetnev WHEN mozgaskod = 'vetel' THEN szall_szlef.szall_nev WHEN mozgaskod = 'bizom' THEN szbiz_szlef.szall_nev WHEN mozgaskod = 'vevo_szle' THEN vevo_szlef.vevo_nev END AS szallito_nev, CASE WHEN mozgaskod = 'bevet' THEN 'HUF' WHEN mozgaskod = 'vetel' THEN szall_szlef.penznem WHEN mozgaskod = 'bizom' THEN szbiz_szlef.penznem WHEN mozgaskod = 'vevo_szle' THEN vevo_szlef.penznem END AS penznem, CASE WHEN mozgaskod = 'bevet' THEN 1 WHEN mozgaskod = 'vetel' THEN szall_szlef.kurzus WHEN mozgaskod = 'bizom' THEN szbiz_szlef.kurzus WHEN mozgaskod = 'vevo_szle' THEN vevo_szlef.kurzus END AS kurzus, CASE WHEN mozgaskod = 'bevet' THEN bevett.egyseg_ar WHEN mozgaskod = 'vetel' THEN szall_szlet.egyseg_ar WHEN mozgaskod = 'bizom' THEN szbiz_szlet.egyseg_ar WHEN mozgaskod = 'vevo_szle' THEN vevo_szlet.egyseg_ar END AS biz_ear, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.cikkek.aru_szolg FROM dbo.bevett RIGHT OUTER JOIN dbo.szbiz_szlet RIGHT OUTER JOIN dbo.szall_szlet RIGHT OUTER JOIN dbo.cikkek INNER JOIN dbo.keszlet ON dbo.cikkek.CIKK_SZAM = dbo.keszlet.CIKK_SZAM ON dbo.szall_szlet.BIZSZAM = dbo.keszlet.SZAMLA_SZ AND dbo.szall_szlet.TETEL = dbo.keszlet.TETEL ON dbo.szbiz_szlet.BIZSZAM = dbo.keszlet.SZAMLA_SZ AND dbo.szbiz_szlet.TETEL = dbo.keszlet.TETEL LEFT OUTER JOIN dbo.vevo_szlet ON dbo.keszlet.SZAMLA_SZ = dbo.vevo_szlet.BIZSZAM AND dbo.keszlet.TETEL = dbo.vevo_szlet.TETEL ON dbo.bevett.BIZSZAM = dbo.keszlet.SZAMLA_SZ AND dbo.bevett.TETEL = dbo.keszlet.TETEL LEFT OUTER JOIN dbo.bevetf INNER JOIN dbo.bevetjog ON dbo.bevetf.BEVET_KOD = dbo.bevetjog.kod ON dbo.keszlet.SZAMLA_SZ = dbo.bevetf.BIZSZAM LEFT OUTER JOIN dbo.vevo_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.vevo_szlef.BIZSZAM LEFT OUTER JOIN dbo.szall_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.szall_szlef.BIZSZAM LEFT OUTER JOIN dbo.szbiz_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.szbiz_szlef.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkivet_ertek] AS SELECT dbo.kivetf.BIZSZAM, dbo.kivetf.DATUM, dbo.kivetf.hivszam, dbo.kivetf.KIVET_KOD, dbo.kivetjog.kivetnev, dbo.kivetf.MEGJEGYZES, dbo.kivetf.KICSODA, dbo.belepes.TELJESNEV, dbo.kivetf.MODIDO, dbo.kivetf.RAKTAR_K, dbo.raktarak.nev AS raktar_nev, ISNULL(- SUM(dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR), 0) AS netto_ertek, ISNULL(- SUM((dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 100), 0) AS brutto_ertek FROM dbo.keszlet INNER JOIN dbo.mozgas ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM AND dbo.mozgas.MOZGASKOD = 'kivet' INNER JOIN dbo.kivetf INNER JOIN dbo.kivetjog ON dbo.kivetf.KIVET_KOD = dbo.kivetjog.kod INNER JOIN dbo.belepes ON dbo.kivetf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak ON dbo.kivetf.RAKTAR_K = dbo.raktarak.kod INNER JOIN dbo.kivett ON dbo.kivetf.BIZSZAM = dbo.kivett.BIZSZAM ON dbo.mozgas.BIZSZAM = dbo.kivett.BIZSZAM AND dbo.mozgas.TETEL = dbo.kivett.TETEL INNER JOIN dbo.cikkek ON dbo.kivett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GROUP BY dbo.kivetf.BIZSZAM, dbo.kivetf.DATUM, dbo.kivetf.hivszam, dbo.kivetf.KIVET_KOD, dbo.kivetjog.kivetnev, dbo.kivetf.MEGJEGYZES, dbo.kivetf.KICSODA, dbo.belepes.TELJESNEV, dbo.kivetf.MODIDO, dbo.kivetf.RAKTAR_K, dbo.raktarak.nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkivetf] AS SELECT dbo.kivetf.BIZSZAM, dbo.kivetf.DATUM, dbo.kivetf.hivszam, dbo.kivetf.KIVET_KOD, dbo.kivetjog.kivetnev, dbo.kivetf.MEGJEGYZES, dbo.kivetf.KICSODA, dbo.belepes.TELJESNEV, dbo.kivetf.MODIDO, dbo.kivetf.RAKTAR_K, dbo.raktarak.nev AS raktar_nev FROM dbo.kivetf INNER JOIN dbo.kivetjog ON dbo.kivetf.KIVET_KOD = dbo.kivetjog.kod INNER JOIN dbo.belepes ON dbo.kivetf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak ON dbo.kivetf.RAKTAR_K = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkivett] AS SELECT dbo.kivett.BIZSZAM, dbo.kivett.TETEL, dbo.kivett.CIKK_SZAM, dbo.kivett.MENNY_EGYS, dbo.kivett.SZORZO, dbo.kivett.DARAB, dbo.cikkek.CIKK_NEV, dbo.kivett.AFA_KULCS, dbo.kivett.EGYSEG_AR FROM dbo.kivett INNER JOIN dbo.cikkek ON dbo.kivett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkomissiof] AS SELECT dbo.vevo_renf.BIZSZAM, dbo.vevo_renf.SZALL_DAT, dbo.vevo_tel.TELEP_NEV, dbo.VevoTelCimsor(dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim) AS szallcim, SUM((100 - dbo.vevo_renf.kedvezmeny) * (100 - dbo.vevo_rent.kedvezmeny) * dbo.vevo_rent.EDARAB * dbo.vevo_rent.EGYSEG_AR / 10000) AS ertek, dbo.vevo_renf.penznem, COUNT(*) AS tetelszam, dbo.vevo_renf.ALLAPOT FROM dbo.vevo_renf INNER JOIN dbo.vevo_rent ON dbo.vevo_renf.BIZSZAM = dbo.vevo_rent.BIZSZAM INNER JOIN dbo.vevo_tel ON dbo.vevo_renf.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_renf.szallcim = dbo.vevo_tel.TELEP_KOD GROUP BY dbo.vevo_renf.BIZSZAM, dbo.vevo_renf.SZALL_DAT, dbo.vevo_renf.penznem, dbo.vevo_tel.TELEP_NEV, dbo.VevoTelCimsor(dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim), dbo.vevo_renf.ALLAPOT GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkonk_ar_figyelo] AS SELECT dbo.konk_ar_figyelo.CIKK_SZAM, dbo.konk_ar_figyelo.Szallito, dbo.konk_ar_figyelo.WEB_CIM, dbo.konk_ar_figyelo.WEB_MEGJ, dbo.konk_ar_figyelo.WEB_AR, dbo.konk_ar_figyelo.ROGZ_DAT, dbo.szallito.SZALL_NEV, dbo.cikkek.CIKK_NEV, dbo.cikkek.KIFUTOTT, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO AS pref_szallito, dbo.cikkek.akt_besz_ar, dbo.cikkek.ut_besz_ar FROM dbo.konk_ar_figyelo INNER JOIN dbo.cikkek ON dbo.konk_ar_figyelo.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.szallito ON dbo.konk_ar_figyelo.Szallito = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vKonk_Figyelo_View] AS SELECT dbo.konk_ar_figyelo.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.konk_ar_figyelo.Szallito, dbo.szallito.SZALL_NEV, dbo.konk_ar_figyelo.WEB_CIM, dbo.konk_ar_figyelo.WEB_AR, dbo.konk_ar_figyelo.ROGZ_DAT, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO AS pref_szallito, dbo.konk_ar_figyelo.WEB_MEGJ, dbo.cikkek.akt_besz_ar, dbo.cikkek.ut_besz_ar, dbo.cikkek.KIFUTOTT FROM dbo.konk_ar_figyelo INNER JOIN dbo.cikkek ON dbo.konk_ar_figyelo.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.szallito ON dbo.konk_ar_figyelo.Szallito = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkont_szabalyf] AS SELECT dbo.kont_szabalyf.kont_azon, dbo.kont_szabalyf.kont_anev, dbo.kont_szabalyf.kont_tip, dbo.kont_tip.tip_nev, dbo.kont_szabalyf.felt_tablo, dbo.kont_szabalyf.felt_ertek, dbo.kont_szabalyf.felt_szures, dbo.kont_szabalyf.szoveg, dbo.kont_szabalyf.prioritas FROM dbo.kont_szabalyf INNER JOIN dbo.kont_tip ON dbo.kont_szabalyf.kont_tip = dbo.kont_tip.kont_tip GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkont_szabalyt] AS SELECT dbo.kont_szabalyt.kont_azon, dbo.kont_szabalyt.t_k, dbo.kont_szabalyt.fk_szam, dbo.szamlatukor.szamlanev, dbo.szamlatukor.konyvelheto, dbo.kont_szabalyt.felt_tablo, dbo.kont_szabalyt.felt_ertek, dbo.kont_szabalyt.felt_szures, dbo.kont_szabalyt.megjegyzes, dbo.kont_szabalyt.lehet_nulla FROM dbo.kont_szabalyt INNER JOIN dbo.szamlatukor ON dbo.kont_szabalyt.fk_szam = dbo.szamlatukor.szamlaszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkontirf] AS SELECT dbo.kontirf.azon, dbo.kontirf.kont_tip, dbo.kontirf.kont_datum, dbo.kontirf.bizszam, dbo.kontirf.hivszam, dbo.kontirf.szoveg, dbo.kontirf.kontirozta, dbo.kontirf.kontirozva, dbo.kont_tip.tip_nev, dbo.belepes.TELJESNEV FROM dbo.kontirf INNER JOIN dbo.kont_tip ON dbo.kontirf.kont_tip = dbo.kont_tip.kont_tip INNER JOIN dbo.belepes ON dbo.kontirf.kontirozta = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vkontirtb] AS SELECT TOP (100) PERCENT dbo.kontirt.azon, dbo.kontirt.t_k, dbo.kontirt.fk_szam, CASE t_k WHEN 'T' THEN szamlanev ELSE ellen_fk END AS tartozik_fk, CASE t_k WHEN 'T' THEN ertek ELSE 0 END AS tartozik_ertek, CASE t_k WHEN 'K' THEN szamlanev ELSE ellen_fk END AS kovetel_fk, CASE t_k WHEN 'K' THEN ertek ELSE 0 END AS kovetel_ertek FROM dbo.kontirt INNER JOIN dbo.szamlatukor ON dbo.kontirt.fk_szam = dbo.szamlatukor.szamlaszam ORDER BY dbo.kontirt.t_k DESC GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vleertekeles] AS SELECT dbo.leertekeles.Azon, dbo.leertekeles.fcikk_szam, dbo.cikkek.CIKKCSOP2 AS FCIKKCSOP2, dbo.cikkek.SZALLITO AS FSZALLITO, dbo.cikkek.GYARTO AS FGYARTO, dbo.cikkek.CIKK_NEV AS FCIKK_NEV, dbo.leertekeles.ccikk_szam, cikkek_1.CIKK_NEV AS CCIKK_NEV FROM dbo.leertekeles INNER JOIN dbo.cikkek ON dbo.leertekeles.fcikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.cikkek AS cikkek_1 ON dbo.leertekeles.ccikk_szam = cikkek_1.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vleltar] AS SELECT dbo.leltar.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.leltar.raktar_kod, SUM(dbo.leltar.darab) AS darab, dbo.raktarak.nev AS raktarnev, dbo.cikkek.CIKKCSOP2, dbo.stcikk2.cikk_nev AS csopnev, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO FROM dbo.leltar INNER JOIN dbo.cikkek ON dbo.leltar.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.raktarak ON dbo.leltar.raktar_kod = dbo.raktarak.kod INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam GROUP BY dbo.leltar.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.leltar.raktar_kod, dbo.raktarak.nev, dbo.cikkek.CIKKCSOP2, dbo.stcikk2.cikk_nev, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vleltar_felv] AS SELECT dbo.leltar_felv.oldal, dbo.leltar_felv.fazis, dbo.leltar_felv.raktar_kod, dbo.leltar_felv.cikk_szam, dbo.leltar_felv.tetel, dbo.leltar_felv.cikk_nev, dbo.cikkek.CIKKCSOP2, CASE WHEN dat_tipus = 'L' OR dat_tipus = 'G' THEN ISNULL(dbo.wszavatos_lel.DARAB, dbo.leltar_felv.darab) ELSE CASE WHEN dat_tipus = 'S' THEN ISNULL(dbo.wsarzs_lel.DARAB, dbo.leltar_felv.darab) ELSE leltar_felv.darab END END AS darab, CASE WHEN dat_tipus = 'L' OR dat_tipus = 'G' THEN ISNULL(dbo.wszavatos_lel.SZAV_LEJAR, '') ELSE CASE WHEN dat_tipus = 'S' THEN ISNULL(dbo.wsarzs_lel.SARZS, '') ELSE '' END END AS szav_lejar, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO FROM dbo.leltar_felv INNER JOIN dbo.cikkek ON dbo.leltar_felv.cikk_szam = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.wszavatos_lel ON dbo.leltar_felv.fazis = dbo.wszavatos_lel.FAZIS AND dbo.leltar_felv.raktar_kod = dbo.wszavatos_lel.RAKTAR_KOD AND dbo.leltar_felv.tetel = dbo.wszavatos_lel.XTETEL LEFT OUTER JOIN dbo.wsarzs_lel ON dbo.leltar_felv.fazis = dbo.wsarzs_lel.FAZIS AND dbo.leltar_felv.raktar_kod = dbo.wsarzs_lel.RAKTAR_KOD AND dbo.leltar_felv.tetel = dbo.wsarzs_lel.XTETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vmozgas_karton] AS SELECT dbo.mozgas.MOZGASKOD, dbo.mozgas.BIZSZAM, dbo.mozgas.TETEL, CASE mozgas.mozgaskod WHEN 'kivet' THEN - mozgas.EDARAB WHEN 'vevo_szle' THEN - mozgas.EDARAB ELSE mozgas.EDARAB END AS edarab, CASE cikkek.dat_tipus WHEN 'S' THEN keszlet.sarzs_szam WHEN 'X' THEN keszlet.gyari_szam WHEN 'L' THEN keszlet.szav_datum WHEN 'G' THEN keszlet.szav_datum ELSE '' END AS szav_datum, CASE WHEN keszlet.mozgaskod = 'bevet' THEN bevetf.datum WHEN keszlet.mozgaskod = 'vetel' THEN szall_szlef.telj_datum WHEN keszlet.mozgaskod = 'bizom' THEN szbiz_szlef.telj_datum WHEN keszlet.mozgaskod LIKE 'vevo_%' THEN vevo_szlef.telj_datum ELSE '' END AS bev_datum, CASE WHEN keszlet.mozgaskod = 'bevet' THEN 'raktár bevét' WHEN keszlet.mozgaskod = 'vetel' THEN 'szállítói bevét' WHEN keszlet.mozgaskod = 'bizom' THEN 'bizományos bevét' WHEN keszlet.mozgaskod LIKE 'vevo_%' THEN 'vevő visszáru' END AS mozgasnev, dbo.keszlet.SZAMLA_SZ, dbo.keszlet.EGYSEG_AR FROM dbo.mozgas INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM INNER JOIN dbo.cikkek ON dbo.keszlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.szall_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.szall_szlef.BIZSZAM LEFT OUTER JOIN dbo.szbiz_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.szbiz_szlef.BIZSZAM LEFT OUTER JOIN dbo.vevo_szlef ON dbo.keszlet.SZAMLA_SZ = dbo.vevo_szlef.BIZSZAM LEFT OUTER JOIN dbo.bevetf ON dbo.keszlet.SZAMLA_SZ = dbo.bevetf.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vmozgas_keszlet] AS SELECT dbo.mozgas.MOZGASKOD, dbo.mozgas.BIZSZAM, dbo.mozgas.TETEL, dbo.mozgas.SORSZAM, dbo.mozgas.EDARAB, dbo.mozgas.DARAB, dbo.keszlet.RAKTAR_KOD, dbo.keszlet.CIKK_SZAM, dbo.keszlet.EDARAB AS kedarab, dbo.keszlet.DARAB AS kdarab, dbo.keszlet.EGYSEG_AR, dbo.keszlet.szav_datum, dbo.keszlet.SZAMLA_SZ, dbo.keszlet.TETEL AS ktetel, dbo.keszlet.BIZOMANYOS, dbo.cikkek.DAT_TIPUS, dbo.keszlet.GYARI_SZAM, dbo.keszlet.MOZGASKOD AS bev_mozgas, dbo.keszlet.SARZS_SZAM, dbo.cikkek.SZAV_IDO, CASE keszlet.MOZGASKOD WHEN 'vevo_szle' THEN isnull(vevo_szlef.telj_datum, '') WHEN 'bevet' THEN isnull(bevetf.datum, '') WHEN 'vetel' THEN isnull(szall_szlef.telj_datum, '') WHEN 'bizom' THEN isnull(szbiz_szlef.telj_datum, '') WHEN 'term' THEN isnull(term_termeles.datum, '') ELSE '' END AS gydatum FROM dbo.mozgas INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM INNER JOIN dbo.cikkek ON dbo.keszlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.bevetf ON dbo.bevetf.BIZSZAM = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.szall_szlef ON dbo.szall_szlef.BIZSZAM = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.szbiz_szlef ON dbo.szbiz_szlef.BIZSZAM = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.term_termeles ON dbo.term_termeles.kulcs = dbo.keszlet.SZAMLA_SZ GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vnaplo_term] AS SELECT 'Raktár bevét' AS mozgas, BIZSZAM AS bizszam, DATUM AS datum, BEVET_KOD AS mkod, KICSODA, bevetnev AS mnev, TELJESNEV FROM bevetf INNER JOIN bevetjog ON bevetf.BEVET_KOD = bevetjog.kod INNER JOIN belepes ON belepes.ROVIDNEV = bevetf.KICSODA UNION all SELECT 'Raktár kivét' AS mozgas, bizszam AS bizszam, datum AS datum, kivet_kod AS mkod, kicsoda, kivetnev AS mnev, teljesnev FROM kivetf INNER JOIN kivetjog ON kivetf.kivet_kod = kivetjog.kod INNER JOIN belepes ON rovidnev = kicsoda UNION all SELECT 'Vevői szállítólevél' AS mozgas, bizszam AS bizszam, telj_datum AS datum, vevo AS mkod, kicsoda, vevo_nev AS mnev, teljesnev FROM vevo_szlef INNER JOIN belepes ON rovidnev = vevo_szlef.kicsoda GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vneta_eladas] AS SELECT TOP (100) PERCENT 'S' AS mozg, LEFT(dbo.vevo_szlef.TELJ_DATUM, 7) AS elad_dat, dbo.vevo_szlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.VTSZ, dbo.cikkek.NORM_SZORZ, - SUM(dbo.mozgas.EDARAB) AS eladott, dbo.szallito.SZALL_NEV, dbo.cikk_chipsado.norm1, dbo.cikk_chipsado.norm2, dbo.cikk_chipsado.norm3, dbo.cikk_chipsado.norm4, dbo.cikk_chipsado.norm5, dbo.cikk_chipsado.norm6, dbo.cikk_chipsado.norm7, dbo.cikk_chipsado.norm8, dbo.cikk_chipsado.norm9, dbo.cikk_chipsado.norm10, dbo.cikk_chipsado.norm11, dbo.cikk_chipsado.kat1, dbo.cikk_chipsado.kat2, dbo.cikk_chipsado.kat3, dbo.cikk_chipsado.kat4, dbo.cikk_chipsado.kat5, dbo.cikk_chipsado.kat6, dbo.cikk_chipsado.kat7, dbo.cikk_chipsado.kat8, dbo.cikk_chipsado.kat9, dbo.cikk_chipsado.kat10, dbo.cikk_chipsado.kat11, dbo.vevo_szlef.SZLASZAM, ISNULL(dbo.szall_szlaf.KULSOSZLASZ, '') AS kulsoszlasz FROM dbo.keszlet INNER JOIN dbo.vevok INNER JOIN dbo.vevo_szlef ON dbo.vevok.VEVO_KOD = dbo.vevo_szlef.VEVO INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.mozgas ON dbo.vevo_szlet.BIZSZAM = dbo.mozgas.BIZSZAM AND dbo.vevo_szlet.TETEL = dbo.mozgas.TETEL AND dbo.mozgas.MOZGASKOD LIKE 'vevo%' INNER JOIN dbo.cikk_chipsado ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikk_chipsado.cikk_szam INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM INNER JOIN dbo.szall_szlet INNER JOIN dbo.szall_szlef ON dbo.szall_szlet.BIZSZAM = dbo.szall_szlef.BIZSZAM ON dbo.keszlet.SZAMLA_SZ = dbo.szall_szlet.BIZSZAM AND dbo.keszlet.TETEL = dbo.szall_szlet.TETEL INNER JOIN dbo.szallito ON dbo.szall_szlef.SZALLITO = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.szall_szlaf ON dbo.szall_szlef.szlaszam = dbo.szall_szlaf.BIZSZAM WHERE (dbo.vevok.iso = 'HU') GROUP BY LEFT(dbo.vevo_szlef.TELJ_DATUM, 7), dbo.vevo_szlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.cikkek.VTSZ, dbo.cikkek.NORM_SZORZ, dbo.keszlet.MOZGASKOD, dbo.szallito.SZALL_NEV, dbo.szallito.orszag, dbo.cikk_chipsado.norm1, dbo.cikk_chipsado.norm2, dbo.cikk_chipsado.norm3, dbo.cikk_chipsado.norm4, dbo.cikk_chipsado.norm5, dbo.cikk_chipsado.norm6, dbo.cikk_chipsado.norm7, dbo.cikk_chipsado.norm8, dbo.cikk_chipsado.norm9, dbo.cikk_chipsado.norm10, dbo.cikk_chipsado.norm11, dbo.cikk_chipsado.kat1, dbo.cikk_chipsado.kat2, dbo.cikk_chipsado.kat3, dbo.cikk_chipsado.kat4, dbo.cikk_chipsado.kat5, dbo.cikk_chipsado.kat6, dbo.cikk_chipsado.kat7, dbo.cikk_chipsado.kat8, dbo.cikk_chipsado.kat9, dbo.cikk_chipsado.kat10, dbo.cikk_chipsado.kat11, dbo.vevo_szlef.SZLASZAM, ISNULL(dbo.szall_szlaf.KULSOSZLASZ, '') HAVING (dbo.keszlet.MOZGASKOD = 'vetel') AND (dbo.szallito.orszag <> 'HU') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_fej] AS SELECT dbo.vevo_szlaf.BIZSZAM AS InvoiceNo, dbo.vevo_szlaf.SZLA_DATUM AS InvoiceDate, dbo.vevo_szlaf.penznem AS CurrencyCode, dbo.vevo_szlaf.kurzus AS CurrencyRate, dbo.vevo_szlaf.FIZ_MODJA AS PaymentMethod1, dbo.vevo_szlaf.FIZ_ESED AS PaymentDate, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.kadoszam AS S_TaxNumber, dbo.vevo_szlaf.knev AS SupplierName, dbo.vevo_szlaf.kiranyito AS SupplierPostalCode, dbo.vevo_szlaf.kvaros AS SupplierCity, dbo.xrCimsor() AS SupplierAddress, dbo.regisztral.bank AS SupplierBankAccountNumber, dbo.vevo_szlaf.VEVO_NEV AS CustomerName, dbo.vevo_szlaf.adoszam AS CustomerTaxNumber, dbo.vevo_szlaf.iranyito AS CustomerPostalCode, dbo.vevo_szlaf.varos AS CustomerCity, dbo.VevoCimsor(dbo.vevo_szlaf.VEVO) AS CustomerAddress, dbo.vevok.BANK AS CustomerBankAccountNumber, dbo.vevok.iso AS CustomerCountryCode, LEFT(dbo.vevo_szlaf.MODOSITVA, 10) + 'T' + SUBSTRING(dbo.vevo_szlaf.MODOSITVA, 12, 8) AS ModificationTimeStamp, dbo.vevo_szlaf.TELJ_DATUM AS DeliveryDate, dbo.vevo_szlaf.VEVO, dbo.vevok.Viszontelado, ISNULL(dbo.vevok_csoportazon.csoport_azon, '') AS csoport_azon FROM dbo.vevo_szlaf INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.vevok_csoportazon ON dbo.vevok.VEVO_KOD = dbo.vevok_csoportazon.vevo_kod CROSS JOIN dbo.regisztral WHERE (CHARINDEX('/', dbo.vevo_szlaf.BIZSZAM) > 0) AND (dbo.vevok.iso = 'HU') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_fej3] AS SELECT dbo.vevo_szlaf.BIZSZAM AS InvoiceNo, dbo.vevo_szlaf.SZLA_DATUM AS InvoiceDate, dbo.vevo_szlaf.penznem AS CurrencyCode, dbo.vevo_szlaf.kurzus AS CurrencyRate, dbo.vevo_szlaf.FIZ_MODJA AS PaymentMethod1, dbo.vevo_szlaf.FIZ_ESED AS PaymentDate, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.kadoszam AS S_TaxNumber, dbo.vevo_szlaf.knev AS SupplierName, dbo.vevo_szlaf.kiranyito AS SupplierPostalCode, dbo.vevo_szlaf.kvaros AS SupplierCity, dbo.xrCimsor() AS SupplierAddress, dbo.regisztral.bank AS SupplierBankAccountNumber, dbo.vevo_szlaf.VEVO_NEV AS CustomerName, dbo.vevo_szlaf.adoszam AS CustomerTaxNumber, dbo.vevo_szlaf.iranyito AS CustomerPostalCode, dbo.vevo_szlaf.varos AS CustomerCity, dbo.VevoCimsor(dbo.vevo_szlaf.VEVO) AS CustomerAddress, dbo.vevok.BANK AS CustomerBankAccountNumber, dbo.vevok.iso AS CustomerCountryCode, LEFT(dbo.vevo_szlaf.MODOSITVA, 10) + 'T' + SUBSTRING(dbo.vevo_szlaf.MODOSITVA, 12, 8) AS ModificationTimeStamp, dbo.vevo_szlaf.TELJ_DATUM AS DeliveryDate, dbo.vevo_szlaf.VEVO, dbo.vevok.Viszontelado, ISNULL(dbo.vevok_csoportazon.csoport_azon, '') AS csoport_azon, dbo.orszagok.eu FROM dbo.vevo_szlaf INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.orszagok ON dbo.vevo_szlaf.iso = dbo.orszagok.iso LEFT OUTER JOIN dbo.vevok_csoportazon ON dbo.vevok.VEVO_KOD = dbo.vevok_csoportazon.vevo_kod CROSS JOIN dbo.regisztral WHERE (CHARINDEX('/', dbo.vevo_szlaf.BIZSZAM) > 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_otetel] AS SELECT TOP (100) PERCENT dbo.vevo_szlet.BIZSZAM AS InvoiceNo, ROW_NUMBER() OVER (PARTITION BY dbo.vevo_szlef.SZLASZAM ORDER BY vevo_szlet.bizszam, tetel ASC) AS LineNumber, dbo.vevo_szlet.CIKK_NEV AS ProductDescription, dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO AS UnitPrice, dbo.vevo_szlet.edarab * dbo.vevo_szlet.SZORZO AS Quantity, dbo.vevo_szlet.MENNY_EGYS AS UnitOfMeasure, dbo.vevo_szlet.kedvezmeny AS InvoiceLineDiscountRate, dbo.vevo_szlet.AFA_KULCS AS LineVATRate, (dbo.vevo_szlet.edarab * (dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO)) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmount, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * ((afa_kulcs.afaertek) / 100) / 10000 AS LineVATAmount, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotal, dbo.vevo_szlet.AFA_KULCS AS ford_afa, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.TELJ_DATUM AS VATPointDate, dbo.cikkek.VTSZ, CASE WHEN jovedeki = '1' THEN 'KN' ELSE CASE WHEN aru_szolg = '1' THEN 'VTSZ' ELSE 'VTSZ' END END AS ProductCodeData, dbo.vevo_szlet.CIKK_SZAM, (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS kedv, dbo.vevo_szlaf.kedvezmeny FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlet.CIKK_SZAM INNER JOIN afa_kulcs on afa_kulcs.afakulcs=vevo_szlet.afa_kulcs inner join vevo_szlaf ON vevo_szlaf.bizszam = vevo_szlef.szlaszam WHERE (LEN(dbo.vevo_szlef.SZLASZAM) <> 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_otetel_tor] AS SELECT TOP (100) PERCENT dbo.vevo_szlet.BIZSZAM AS InvoiceNo, ROW_NUMBER() OVER (PARTITION BY vevo_oszla_bizszam.szamla_sz ORDER BY vevo_szlet.bizszam, tetel ASC) AS LineNumber, dbo.vevo_szlet.CIKK_NEV AS ProductDescription, dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO AS UnitPrice, vevo_szlaf.kurzus * dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO AS UnitPriceHUF, dbo.vevo_szlet.edarab * dbo.vevo_szlet.SZORZO AS Quantity, dbo.vevo_szlet.MENNY_EGYS AS UnitOfMeasure, dbo.vevo_szlet.kedvezmeny AS InvoiceLineDiscountRate, dbo.vevo_szlet.AFA_KULCS AS LineVATRate, (dbo.vevo_szlet.edarab * (dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO)) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmount, vevo_szlaf.kurzus * (dbo.vevo_szlet.edarab * (dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO)) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmountHUF, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * ((afa_kulcs.afaertek) / 100) / 10000 AS LineVATAmount, vevo_szlaf.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * ((afa_kulcs.afaertek) / 100) / 10000 AS LineVATAmountHUF, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotal, vevo_szlaf.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotalHUF, dbo.vevo_szlet.AFA_KULCS AS ford_afa, vevo_oszla_bizszam.szamla_sz AS szlaszam, vevo_oszla_bizszam.storno_szamla_sz AS tszlaszam, dbo.vevo_szlef.TELJ_DATUM AS VATPointDate, dbo.cikkek.VTSZ, CASE WHEN jovedeki = '1' THEN 'KN' ELSE CASE WHEN aru_szolg = '1' THEN 'VTSZ' ELSE 'VTSZ' END END AS ProductCodeData, dbo.vevo_szlet.CIKK_SZAM, (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlef.kedvezmeny) / 10000 AS kedv, dbo.vevo_szlef.kedvezmeny FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlet.CIKK_SZAM INNER JOIN vevo_oszla_bizszam ON vevo_oszla_bizszam.szlevsz = vevo_szlet.bizszam INNER JOIN afa_kulcs on afa_kulcs.afakulcs=vevo_szlet.afa_kulcs inner join vevo_szlaf ON vevo_szlaf.bizszam = vevo_oszla_bizszam.storno_szamla_sz GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_otetel3] AS SELECT TOP (100) PERCENT dbo.vevo_szlet.BIZSZAM AS InvoiceNo, ROW_NUMBER() OVER (PARTITION BY dbo.vevo_szlef.SZLASZAM ORDER BY vevo_szlet.bizszam, tetel ASC) AS LineNumber, dbo.vevo_szlet.CIKK_NEV AS ProductDescription, dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO AS UnitPrice, vevo_szlaf.kurzus * dbo.vevo_szlet.EGYSEG_AR / dbo.vevo_szlet.SZORZO AS UnitPriceHUF, dbo.vevo_szlet.edarab * dbo.vevo_szlet.SZORZO AS Quantity, dbo.vevo_szlet.MENNY_EGYS AS UnitOfMeasure, dbo.vevo_szlet.kedvezmeny AS InvoiceLineDiscountRate, dbo.vevo_szlet.AFA_KULCS AS LineVATRate, (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmount, vevo_szlaf.kurzus * (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmountHUF, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (afa_kulcs.afaertek/ 100) / 10000 AS LineVATAmount, vevo_szlaf.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (afa_kulcs.afaertek / 100) / 10000 AS LineVATAmountHUF, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotal, vevo_szlaf.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotalHUF, dbo.vevo_szlet.AFA_KULCS AS ford_afa, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.TELJ_DATUM AS VATPointDate, dbo.cikkek.VTSZ, CASE WHEN jovedeki = '1' THEN 'KN' ELSE CASE WHEN aru_szolg = '1' THEN 'VTSZ' ELSE 'VTSZ' END END AS ProductCodeData, dbo.vevo_szlet.CIKK_SZAM, (100 - dbo.vevo_szlet.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS kedv, dbo.vevo_szlaf.kedvezmeny FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN afa_kulcs on afa_kulcs.afakulcs=vevo_szlet.afa_kulcs inner join dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlet.CIKK_SZAM INNER JOIN vevo_szlaf ON vevo_szlaf.bizszam = vevo_szlef.szlaszam WHERE (LEN(dbo.vevo_szlef.SZLASZAM) <> 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_otetel31] AS SELECT TOP (100) PERCENT dbo.vevo_szlat.szlev_szam AS InvoiceNo, dbo.vevo_szlat.TETEL AS LineNumber, dbo.vevo_szlat.CIKK_NEV AS ProductDescription, dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO AS UnitPrice, dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO AS UnitPriceHUF, dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO AS Quantity, dbo.vevo_szlat.MENNY_EGYS AS UnitOfMeasure, dbo.vevo_szlat.kedvezmeny AS InvoiceLineDiscountRate, dbo.vevo_szlat.AFA_KULCS AS LineVATRate, ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmount, ((dbo.vevo_szlaf.kurzus * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmountHUF, (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (dbo.afa_kulcs.afaertek / 100) / 10000 AS LineVATAmount, (dbo.vevo_szlaf.kurzus * (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny))) * (dbo.afa_kulcs.afaertek / 100) / 10000 AS LineVATAmountHUF, (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotal, (dbo.vevo_szlaf.kurzus * (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny))) * (100 + dbo.afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotalHUF, dbo.vevo_szlat.AFA_KULCS AS ford_afa, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlef.TELJ_DATUM AS VATPointDate, dbo.cikkek.VTSZ, CASE WHEN jovedeki = '1' THEN 'KN' ELSE CASE WHEN aru_szolg = '1' THEN 'VTSZ' ELSE 'VTSZ' END END AS ProductCodeData, dbo.vevo_szlat.CIKK_SZAM, (100 - dbo.vevo_szlat.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS kedv, dbo.vevo_szlaf.kedvezmeny FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlat.CIKK_SZAM INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlat.szlev_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_tetel] AS SELECT dbo.vevo_szlat.BIZSZAM AS InvoiceNo, dbo.vevo_szlat.TETEL AS LineNumber, dbo.vevo_szlat.CIKK_NEV AS ProductDescription, dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO AS UnitPrice, dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO AS Quantity, dbo.vevo_szlat.MENNY_EGYS AS UnitOfMeasure, dbo.vevo_szlat.kedvezmeny AS InvoiceLineDiscountRate, dbo.vevo_szlat.AFA_KULCS AS LineVATRate, ((dbo.vevo_szlat.edarab * (dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO)) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmount, (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (dbo.afa_kulcs.afaertek / 100) / 10000 AS LineVATAmount, (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotal, dbo.vevo_szlat.AFA_KULCS AS ford_afa, dbo.vevo_szlaf.TELJ_DATUM AS VATPointDate, dbo.cikkek.VTSZ, CASE WHEN jovedeki = '1' THEN 'KN' ELSE CASE WHEN aru_szolg = '1' THEN 'VTSZ' ELSE 'VTSZ' END END AS ProductCodeData, dbo.vevo_szlat.CIKK_SZAM, (100 - dbo.vevo_szlat.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS kedv, dbo.vevo_szlaf.kedvezmeny FROM dbo.vevo_szlat INNER JOIN dbo.vevo_szlaf ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlat.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [voi_tetel3] AS SELECT dbo.vevo_szlat.BIZSZAM AS InvoiceNo, dbo.vevo_szlat.TETEL AS LineNumber, dbo.vevo_szlat.CIKK_NEV AS ProductDescription, dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO AS UnitPrice, dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.EGYSEG_AR / dbo.vevo_szlat.SZORZO AS UnitPriceHUF, dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO AS Quantity, dbo.vevo_szlat.MENNY_EGYS AS UnitOfMeasure, dbo.vevo_szlat.kedvezmeny AS InvoiceLineDiscountRate, dbo.vevo_szlat.AFA_KULCS AS LineVATRate, ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmount, (dbo.vevo_szlaf.kurzus * ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny))) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS InvoiceLineAmountHUF, (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (dbo.afa_kulcs.afaertek / 100) / 10000 AS LineVATAmount, (dbo.vevo_szlaf.kurzus * (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny))) * (dbo.afa_kulcs.afaertek / 100) / 10000 AS LineVATAmountHUF, (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotal, (dbo.vevo_szlaf.kurzus * (((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny))) * (100 + dbo.afa_kulcs.afaertek) / 1000000 AS InvoiceLineTotalHUF, dbo.vevo_szlat.AFA_KULCS AS ford_afa, dbo.vevo_szlaf.TELJ_DATUM AS VATPointDate, dbo.cikkek.VTSZ, CASE WHEN jovedeki = '1' THEN 'KN' ELSE CASE WHEN aru_szolg = '1' THEN 'VTSZ' ELSE 'VTSZ' END END AS ProductCodeData, dbo.vevo_szlat.CIKK_SZAM, (100 - dbo.vevo_szlat.kedvezmeny) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000 AS kedv, dbo.vevo_szlaf.kedvezmeny FROM dbo.vevo_szlat INNER JOIN dbo.vevo_szlaf ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlat.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vpenztart] AS SELECT dbo.penztart.kulcs, dbo.penztart.penztar_kod, dbo.penztarak.nev AS penztar_nev, dbo.penztart.bizszam, dbo.penztart.hivszam, dbo.penztart.datum, dbo.penztart.tipus, dbo.penztart.osszeg, dbo.penztart.penznem, dbo.penztart.megjegyzes, dbo.penztart.partner_tip, dbo.penztart.partner AS partner_kod, CASE partner_tip WHEN 'v' THEN isnull(dbo.vevok.VEVO_NEV, '') WHEN 'S' THEN isnull(dbo.szallito.SZALL_NEV, '') WHEN '' THEN CASE tipus WHEN 'PBT' THEN 'Befizetés bankba' WHEN 'PBJ' THEN 'Pénzfelvét bankból' END END AS partner_nev, dbo.belepes.TELJESNEV, dbo.penztart.modido FROM dbo.penztart INNER JOIN dbo.penztarak ON dbo.penztart.penztar_kod = dbo.penztarak.kod INNER JOIN dbo.belepes ON dbo.penztart.kicsoda = dbo.belepes.ROVIDNEV LEFT OUTER JOIN dbo.bankszamlak ON dbo.penztart.partner = dbo.bankszamlak.kod LEFT OUTER JOIN dbo.szallito ON dbo.penztart.partner = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.vevok ON dbo.penztart.partner = dbo.vevok.VEVO_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vpop_jov_ert] AS SELECT dbo.vevo_szlef.VEVO_NEV, dbo.vevok.ADOSZAM, dbo.vevo_tel.jovedeki, dbo.vevo_tel.IRANYITO, dbo.vevo_tel.VAROS, dbo.VevoTelCimsor(dbo.vevo_szlef.VEVO, dbo.vevo_szlef.TELEP_KOD) AS cim, dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.cikkek.VTSZ, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.edarab * dbo.vevo_szlet.SZORZO AS mennyiseg, dbo.cikkek.MENNY_EGYS, dbo.cikkek.NORM_SZORZ, (dbo.vevo_szlet.edarab * dbo.vevo_szlet.SZORZO * dbo.vevo_szlet.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto_ertek, dbo.cikkek.vpop_alkoholfok, dbo.cikkek.vpop_fajtakod, dbo.cikkek.vpop_urtartalom, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.penznem, dbo.vevok.iso AS orszag FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_tel ON dbo.vevok.VEVO_KOD = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlet.AFA_KULCS = dbo.afa_kulcs.AFAKULCS WHERE (LEN(dbo.vevo_tel.jovedeki) > 0) AND (dbo.cikkek.JOVEDEKI = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vPriorGyarHatralek] AS SELECT PriorGyarHatralek_1.acikk_szam, dbo.cikkek.CIKK_NEV, PriorGyarHatralek_1.szukseg, PriorGyarHatralek_1.el_szukseg, PriorGyarHatralek_1.rkeszlet, PriorGyarHatralek_1.okeszlet, PriorGyarHatralek_1.diszpo, PriorGyarHatralek_1.allapot, dbo.cikkek.MENNY_EGYS FROM dbo.PriorGyarHatralek('1000', 1, 1) AS PriorGyarHatralek_1 INNER JOIN dbo.cikkek ON PriorGyarHatralek_1.acikk_szam = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vq_bevet] AS SELECT dbo.bevetf.BIZSZAM, dbo.bevetf.RAKTAR_K, dbo.bevetf.DATUM, dbo.bevetf.BEVET_KOD, dbo.bevetf.MEGJEGYZES, dbo.bevetf.KICSODA, dbo.bevetf.MODIDO, SUM(dbo.bevett.DARAB) AS Darab, SUM(dbo.bevett.DARAB * dbo.bevett.EGYSEG_AR) AS ERTEK, SUM((dbo.bevett.DARAB * dbo.bevett.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 100) AS BERTEK, dbo.bevetjog.bevetnev, dbo.raktarak.nev AS raktarnev, dbo.belepes.TELJESNEV, dbo.wszav_nyomt.SZAVIDO, dbo.bevetf.hivszam FROM dbo.bevetf INNER JOIN dbo.bevett ON dbo.bevetf.BIZSZAM = dbo.bevett.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.bevett.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.cikkek ON dbo.bevett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.bevetjog ON dbo.bevetf.BEVET_KOD = dbo.bevetjog.kod INNER JOIN dbo.raktarak ON dbo.bevetf.RAKTAR_K = dbo.raktarak.kod INNER JOIN dbo.belepes ON dbo.bevetf.KICSODA = dbo.belepes.ROVIDNEV LEFT OUTER JOIN dbo.wszav_nyomt ON dbo.bevett.TETEL = dbo.wszav_nyomt.TETEL AND dbo.bevett.BIZSZAM = dbo.wszav_nyomt.BIZSZAM GROUP BY dbo.bevetf.BIZSZAM, dbo.bevetf.RAKTAR_K, dbo.bevetf.DATUM, dbo.bevetf.BEVET_KOD, dbo.bevetf.MEGJEGYZES, dbo.bevetf.KICSODA, dbo.bevetf.MODIDO, dbo.bevetjog.bevetnev, dbo.raktarak.nev, dbo.belepes.TELJESNEV, dbo.wszav_nyomt.SZAVIDO, dbo.bevetf.hivszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vq_boltra_szallit] AS SELECT dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.IRANYITO + ' ' + dbo.vevo_tel.VAROS + ', ' + dbo.vevo_tel.CIM AS tel_cime, ISNULL(dbo.uzletkoto.nev, '') AS uzletkotonev, ISNULL(SUM(((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR * dbo.vevo_szlef.kurzus) * (100 - dbo.vevo_szlet.kedvezmeny)) * (100 - dbo.vevo_szlef.kedvezmeny) / 10000), 0) AS brutto_ertek, dbo.vevo_szlef.kedvezmeny, ISNULL(SUM(dbo.vevo_szlet.edarab * dbo.cikkek.db_sulya), 0) AS suly, dbo.vevo_szlef.VEVO, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevok.vevo_arcsoport FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD AND dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlet.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod GROUP BY dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.VAROS, dbo.vevo_tel.IRANYITO, dbo.vevo_tel.CIM, dbo.vevo_szlef.kedvezmeny, dbo.uzletkoto.nev, dbo.vevo_szlef.VEVO, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevok.vevo_arcsoport GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vqbevet1] AS SELECT dbo.bevetf.BIZSZAM, dbo.bevetf.RAKTAR_K, dbo.bevetf.DATUM, dbo.bevetf.BEVET_KOD, dbo.bevetjog.bevetnev, dbo.bevett.TETEL, dbo.bevett.CIKK_SZAM, dbo.bevett.AFA_KULCS, dbo.bevett.MENNY_EGYS, dbo.bevett.SZORZO, dbo.bevett.EGYSEG_AR, dbo.bevett.DARAB, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO FROM dbo.bevetf INNER JOIN dbo.bevett ON dbo.bevetf.BIZSZAM = dbo.bevett.BIZSZAM INNER JOIN dbo.bevetjog ON dbo.bevetf.BEVET_KOD = dbo.bevetjog.kod INNER JOIN dbo.cikkek ON dbo.bevett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vqhavi_keszlet] AS SELECT dbo.havi_keszlet.datum, dbo.havi_keszlet.raktar_kod, dbo.havi_keszlet.cikk_szam, dbo.havi_keszlet.egyseg_ar, dbo.havi_keszlet.darab, dbo.cikkek.CIKK_NEV, dbo.cikkek.JOVEDEKI, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO FROM dbo.havi_keszlet INNER JOIN dbo.cikkek ON dbo.havi_keszlet.cikk_szam = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vqkeszlet] AS SELECT TOP (100) PERCENT dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.keszlet.RAKTAR_KOD, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.cikkek.CIKKCSOP2, SUM(dbo.keszlet.DARAB) AS odb, SUM(dbo.keszlet.DARAB * dbo.keszlet.EGYSEG_AR) AS oert, dbo.cikkek.CIKK_SZAM FROM dbo.keszlet INNER JOIN dbo.cikkek ON dbo.keszlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GROUP BY dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.keszlet.RAKTAR_KOD, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.cikkek.CIKKCSOP2, dbo.cikkek.CIKK_SZAM ORDER BY dbo.cikkek.CIKK_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vqkivet1] AS SELECT dbo.kivetf.BIZSZAM, dbo.kivetf.RAKTAR_K, dbo.kivetf.DATUM, dbo.kivetf.KIVET_KOD, dbo.kivett.TETEL, dbo.kivett.CIKK_SZAM, dbo.kivett.MENNY_EGYS, dbo.kivett.SZORZO, dbo.kivett.DARAB, dbo.kivetjog.kivetnev, dbo.cikkek.CIKK_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO FROM dbo.kivetf INNER JOIN dbo.kivett ON dbo.kivetf.BIZSZAM = dbo.kivett.BIZSZAM INNER JOIN dbo.kivetjog ON dbo.kivetf.KIVET_KOD = dbo.kivetjog.kod INNER JOIN dbo.cikkek ON dbo.kivett.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vqszall_szle1] AS SELECT dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.HIVSZAM, dbo.szall_szlef.szlaszam, dbo.szall_szlef.rendszam, dbo.szall_szlef.SZALLITO, dbo.szall_szlef.SZALL_NEV, dbo.szall_szlef.TELJ_DATUM, dbo.szall_szlef.BEV_DATUM, dbo.szall_szlef.RAKTAR_KOD, dbo.szall_szlef.penznem, dbo.szall_szlef.kurzus, dbo.szall_szlef.afamentes, dbo.szall_szlef.MEGJEGYZES, dbo.szall_szlef.KICSODA, dbo.szall_szlef.MODOSITVA, dbo.szall_szlef.kedvezmeny, dbo.szall_szlef.TOROLT, dbo.szall_szlef.TORLO, dbo.szall_szlef.TOR_SSZ, dbo.szall_szlef.VISSZARU, dbo.szall_szlef.okmany_tip, dbo.szall_szlet.TETEL, dbo.szall_szlet.CIKK_SZAM, dbo.szall_szlet.CIKK_NEV, dbo.szall_szlet.afa_kulcs, dbo.szall_szlet.MENNY_EGYS, dbo.szall_szlet.SZORZO, dbo.szall_szlet.EGYSEG_AR, dbo.szall_szlet.edarab, dbo.szall_szlet.DARAB, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.JOVEDEKI, dbo.szallito.orszag, dbo.orszagok.eu, dbo.cikkek.VTSZ, ISNULL(dbo.szall_szlef_import.belepes_datum, '') AS belepes_datum, ISNULL(dbo.szall_szlef_import.vamkez_datum, '') AS vamkez_datum, ISNULL(dbo.szall_szlef_import.vamokmany_sz, '') AS vamokmany_sz FROM dbo.szall_szlef INNER JOIN dbo.szall_szlet ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlet.BIZSZAM INNER JOIN dbo.szallito ON dbo.szall_szlef.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.cikkek ON dbo.szall_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso LEFT OUTER JOIN dbo.szall_szlef_import ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlef_import.bizszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vqvevo_szle] AS SELECT dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.HIVSZAM, dbo.vevo_szlef.RENDSZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_szlef.TELEP_KOD, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.penznem, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.akciocsoport, dbo.vevo_szlef.arcsoport, dbo.vevo_szlef.afamentes, dbo.vevo_szlef.MEGJEGYZES, dbo.vevo_szlef.TIPUS, dbo.vevo_szlef.UZLETKOTO, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, dbo.vevo_szlef.TOR_SSZ, dbo.vevo_szlef.VISSZARU, dbo.vevo_szlef.KICSODA, dbo.vevo_szlef.MODOSITVA, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.darab, dbo.vevo_szlet.edarab, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny AS TKEDV, dbo.vevo_szlet.megjegyzes AS tmegj, dbo.vevo_szlet.akcio, dbo.vevo_szlet.rendel_bsz, dbo.vevo_szlet.rendel_tet, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO, dbo.vevok.iso AS orszag, dbo.orszagok.eu, dbo.vevok.sajat_bolt FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vrmozgas_ertek] AS SELECT dbo.rmozgasf.BIZSZAM, dbo.rmozgasf.DATUM, dbo.rmozgasf.hivszam, dbo.rmozgasf.MEGJEGYZES, dbo.rmozgasf.KICSODA, dbo.rmozgasf.modido, dbo.belepes.TELJESNEV, dbo.rmozgasf.FRAKTAR_K, RAKTARAK_1.nev AS fraktarnev, dbo.rmozgasf.CRAKTAR_K, dbo.raktarak.nev AS craktarnev, ISNULL(- SUM(dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR), 0) AS netto_ertek, ISNULL(- SUM((dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 100), 0) AS brutto_ertek FROM dbo.rmozgasf INNER JOIN dbo.belepes ON dbo.rmozgasf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak AS RAKTARAK_1 ON dbo.rmozgasf.FRAKTAR_K = RAKTARAK_1.kod INNER JOIN dbo.raktarak ON dbo.rmozgasf.CRAKTAR_K = dbo.raktarak.kod INNER JOIN dbo.rmozgast ON dbo.rmozgasf.BIZSZAM = dbo.rmozgast.BIZSZAM INNER JOIN dbo.cikkek ON dbo.rmozgast.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS LEFT OUTER JOIN dbo.keszlet INNER JOIN dbo.mozgas ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM ON dbo.rmozgast.BIZSZAM = dbo.mozgas.BIZSZAM AND dbo.mozgas.MOZGASKOD = 'rmozgas' AND dbo.mozgas.DARAB < 0 AND dbo.rmozgast.TETEL = dbo.mozgas.TETEL GROUP BY dbo.rmozgasf.BIZSZAM, dbo.rmozgasf.DATUM, dbo.rmozgasf.hivszam, dbo.rmozgasf.MEGJEGYZES, dbo.rmozgasf.KICSODA, dbo.rmozgasf.modido, dbo.belepes.TELJESNEV, dbo.rmozgasf.FRAKTAR_K, RAKTARAK_1.nev, dbo.rmozgasf.CRAKTAR_K, dbo.raktarak.nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vrmozgasf] AS SELECT dbo.rmozgasf.BIZSZAM, dbo.rmozgasf.DATUM, dbo.rmozgasf.hivszam, dbo.rmozgasf.MEGJEGYZES, dbo.rmozgasf.KICSODA, dbo.rmozgasf.modido, dbo.belepes.TELJESNEV, dbo.rmozgasf.FRAKTAR_K, RAKTARAK_1.nev AS fraktarnev, dbo.rmozgasf.CRAKTAR_K, dbo.raktarak.nev AS craktarnev FROM dbo.rmozgasf INNER JOIN dbo.belepes ON dbo.rmozgasf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak AS RAKTARAK_1 ON dbo.rmozgasf.FRAKTAR_K = RAKTARAK_1.kod INNER JOIN dbo.raktarak ON dbo.rmozgasf.CRAKTAR_K = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vrmozgast] AS SELECT dbo.rmozgast.BIZSZAM, dbo.rmozgast.TETEL, dbo.rmozgast.CIKK_SZAM, dbo.rmozgast.MENNY_EGYS, dbo.rmozgast.SZORZO, dbo.rmozgast.DARAB, dbo.cikkek.CIKK_NEV FROM dbo.rmozgast INNER JOIN dbo.cikkek ON dbo.rmozgast.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vSzabadKeszlet] AS SELECT dbo.cikkek.CIKK_SZAM, ISNULL(SUM(dbo.keszlet.DARAB), 0) - ISNULL(SUM(dbo.foglalasok.darab), 0) AS SzabadKeszlet FROM dbo.cikkek LEFT OUTER JOIN dbo.keszlet ON dbo.cikkek.CIKK_SZAM = dbo.keszlet.CIKK_SZAM AND dbo.keszlet.DARAB > 0 LEFT OUTER JOIN dbo.foglalasok ON dbo.foglalasok.cikk_szam = dbo.cikkek.CIKK_SZAM AND dbo.myGetDate() < dbo.foglalasok.meddig GROUP BY dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_arajan] AS SELECT bizszam, ugyletkod, szallito_kod, aj_keres_datum, megjegyzes, aj_erkezes_datum, ervenyes, penznem, pontozas, allapot, tetel, cikk_szam, mennyiseg, cikk_tipus, egyseg_ar, keszlet, szallitas_nap, cikk_nev, szall_NEV, kalk_ar, kurzus, tipus_nev, garancia FROM dbo.SzallArakVevoPenznemben('', '', 'HUF') AS SzallArakVevoPenznemben_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_arajanf] AS SELECT dbo.szall_arajanf.bizszam, dbo.szall_arajanf.szallito, dbo.szall_arajanf.aj_keres_datum, dbo.szall_arajanf.megjegyzes, dbo.szall_arajanf.aj_erkezes_datum, dbo.szall_arajanf.ervenyes, dbo.szall_arajanf.penznem, dbo.szall_arajanf.keres_rogzitette, dbo.szall_arajanf.keres_rogzitve, dbo.szall_arajanf.erkezes_rogzitette, dbo.szall_arajanf.erkezes_rogzitve, dbo.szall_arajanf.allapot, dbo.szallito.SZALL_NEV, dbo.broker_allapotok.allapot_nev, dbo.belepes.TELJESNEV, dbo.szall_arajanf.pontozas, SUM(dbo.szall_arajant.mennyiseg * dbo.szall_arajant.egyseg_ar) AS ertek, ISNULL(dbo.ugyletek.ugyletkod, '') AS ugyletkod, dbo.szallito.email FROM dbo.szall_arajanf INNER JOIN dbo.szall_arajant ON dbo.szall_arajanf.bizszam = dbo.szall_arajant.bizszam INNER JOIN dbo.szallito ON dbo.szall_arajanf.szallito = dbo.szallito.SZALL_KOD INNER JOIN dbo.broker_allapotok ON dbo.szall_arajanf.allapot = dbo.broker_allapotok.allapot_kod INNER JOIN dbo.belepes ON dbo.szall_arajanf.keres_rogzitette = dbo.belepes.ROVIDNEV LEFT OUTER JOIN dbo.ugyletek ON dbo.szall_arajanf.bizszam = dbo.ugyletek.bizszam AND dbo.ugyletek.biztipus = 'szall_arajanlat' GROUP BY dbo.szall_arajanf.bizszam, dbo.szall_arajanf.szallito, dbo.szall_arajanf.aj_keres_datum, dbo.szall_arajanf.megjegyzes, dbo.szall_arajanf.aj_erkezes_datum, dbo.szall_arajanf.ervenyes, dbo.szall_arajanf.penznem, dbo.szall_arajanf.keres_rogzitette, dbo.szall_arajanf.keres_rogzitve, dbo.szall_arajanf.erkezes_rogzitette, dbo.szall_arajanf.erkezes_rogzitve, dbo.szall_arajanf.allapot, dbo.szallito.SZALL_NEV, dbo.broker_allapotok.allapot_nev, dbo.belepes.TELJESNEV, dbo.szall_arajanf.pontozas, dbo.ugyletek.ugyletkod, dbo.szallito.email GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_arajant] AS SELECT dbo.szall_arajant.bizszam, dbo.szall_arajant.tetel, dbo.szall_arajant.cikk_szam, dbo.szall_arajant.mennyiseg, dbo.szall_arajant.cikk_tipus, dbo.szall_arajant.egyseg_ar, dbo.szall_arajant.keszlet, dbo.szall_arajant.szallitas_nap, dbo.cikkek.CIKK_NEV, dbo.cikk_tipusok.tipus_nev, dbo.szall_arajant.garancia FROM dbo.szall_arajant INNER JOIN dbo.cikkek ON dbo.szall_arajant.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.cikk_tipusok ON dbo.szall_arajant.cikk_tipus = dbo.cikk_tipusok.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_arcsz] AS SELECT dbo.szall_arf.KDATUM, dbo.szall_arf.VDATUM, dbo.szall_arf.RKDATUM, dbo.szall_arf.RVDATUM, dbo.szall_arf.TIPUS, dbo.szall_art.CIKK_SZAM, dbo.szall_art.LISTA_AR, dbo.szall_art.KEDVEZMENY, dbo.szall_art.NETTO_AR FROM dbo.szall_arf INNER JOIN dbo.szall_art ON dbo.szall_arf.BIZSZAM = dbo.szall_art.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_arf] AS SELECT dbo.szall_arf.BIZSZAM, dbo.szall_arf.SZALLITO, dbo.szall_arf.KDATUM, dbo.szall_arf.KICSODA, dbo.szall_arf.MODOSITVA, dbo.szall_arf.MEGJEGYZES, dbo.szallito.SZALL_NEV, dbo.belepes.TELJESNEV, dbo.szall_arf.kedvezmeny, dbo.szall_arf.penznem, dbo.szall_arf.TIPUS, dbo.szall_arf.VDATUM, dbo.szall_arf.RKDATUM, dbo.szall_arf.RVDATUM FROM dbo.szall_arf INNER JOIN dbo.szallito ON dbo.szall_arf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.belepes ON dbo.szall_arf.KICSODA = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_art] AS SELECT dbo.szall_art.BIZSZAM, dbo.szall_art.CIKK_SZAM, dbo.szall_art.VCIKKSZAM, dbo.szall_art.LISTA_AR, dbo.szall_art.KEDVEZMENY, dbo.szall_art.NETTO_AR, dbo.cikkek.CIKK_NEV FROM dbo.szall_art INNER JOIN dbo.cikkek ON dbo.szall_art.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_biz_fizetve] AS SELECT biz_tipus, bizszam, szall_nev, szla_datum, fizmod_nev, fiz_esed, brutto_ertek, fizetve, hatralek, fizetett, fiz_modja, szallito, xbizszam, telj_datum, kicsoda, teljesnev, keszult, fiz_datum, torolt, torlo, penznem, kurzus, ut_fizetes FROM dbo.szall_biz_fizetve() AS szall_biz_fizetve_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_ren] AS SELECT TOP (100) PERCENT dbo.szall_renf.bizszam, dbo.szallito.SZALL_NEV AS szallito, dbo.orszagok.nev_hu AS orszag, dbo.szall_renf.datum, dbo.szall_renf.szall_dat, dbo.szall_renf.kedvezmeny AS vegosszeg_kedv, dbo.szall_renf.megjegyzes, dbo.belepes.TELJESNEV AS keszitette, dbo.szall_renf.modositva AS keszult, dbo.szall_rent.TETEL, dbo.szall_rent.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.szall_rent.MENNY_EGYS, dbo.szall_rent.SZORZO, dbo.szall_rent.EDARAB AS rendelt, dbo.szall_rent.DARAB AS hatralek, dbo.szall_rent.EGYSEG_AR, dbo.szall_renf.penznem, dbo.szall_rent.kedvezmeny, dbo.szall_rent.afa_kulcs, dbo.cikkek.VTSZ, SUBSTRING(dbo.szall_renf.datum, 6, 2) AS honap, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.db_sulya * dbo.szall_rent.DARAB * dbo.szall_rent.SZORZO AS teljes_suly, dbo.cikkek.db_br_sulya * dbo.szall_rent.DARAB * dbo.szall_rent.SZORZO AS teljes_br_suly FROM dbo.szall_renf INNER JOIN dbo.szall_rent ON dbo.szall_renf.bizszam = dbo.szall_rent.BIZSZAM INNER JOIN dbo.szallito ON dbo.szall_renf.szallito = dbo.szallito.SZALL_KOD INNER JOIN dbo.cikkek ON dbo.szall_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.szall_renf.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso ORDER BY dbo.szall_renf.bizszam, dbo.szall_rent.TETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_rend_ekaer] AS SELECT dbo.deviza.kurzus, dbo.szall_renf.kedvezmeny AS vkedv, dbo.szall_rent.BIZSZAM, dbo.szall_rent.TETEL, dbo.cikkek.VTSZ, dbo.szall_rent.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.szall_rent.EGYSEG_AR, dbo.szall_rent.kedvezmeny, dbo.cikkek.db_br_sulya, dbo.cikkek.kockazatos, dbo.szall_rent.EDARAB AS darab, dbo.szall_rent.SZORZO FROM dbo.szall_renf INNER JOIN dbo.szall_rent ON dbo.szall_renf.bizszam = dbo.szall_rent.BIZSZAM INNER JOIN dbo.cikkek ON dbo.szall_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.deviza ON dbo.szall_renf.penznem = dbo.deviza.penznem WHERE (dbo.cikkek.aru_szolg = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_rend_ertek] AS SELECT dbo.szall_renf.bizszam, dbo.szall_renf.datum, dbo.szall_renf.penznem, dbo.szall_renf.szall_dat, dbo.stelephely.nev, dbo.szallito.SZALL_NEV, dbo.szall_renf.allapot, ISNULL((100 - dbo.szall_renf.kedvezmeny) / 100 * SUM((dbo.szall_rent.EDARAB * dbo.szall_rent.EGYSEG_AR) * (100 - dbo.szall_rent.kedvezmeny) / 100), 0) AS netto_ertek, ISNULL((100 - dbo.szall_renf.kedvezmeny) / 100 * SUM(((dbo.szall_rent.EDARAB * dbo.szall_rent.EGYSEG_AR) * (100 - dbo.szall_rent.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 10000), 0) AS brutto_ertek, ISNULL(dbo.deviza.kurzus * ((100 - dbo.szall_renf.kedvezmeny) / 100) * SUM(((dbo.szall_rent.EDARAB * dbo.szall_rent.EGYSEG_AR) * (100 - dbo.szall_rent.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 10000), 0) AS brutto_ertek_ft, ISNULL((100 - dbo.szall_renf.kedvezmeny) / 100 * SUM((dbo.szall_rent.DARAB * dbo.szall_rent.EGYSEG_AR) * (100 - dbo.szall_rent.kedvezmeny) / 100), 0) AS hnetto_ertek, dbo.szall_renf.kedvezmeny, dbo.szall_renf.modositva, dbo.belepes.TELJESNEV, dbo.szall_renf.kicsoda, dbo.szall_renf.megjegyzes, dbo.szall_renf.raktar_k, dbo.szall_renf.szallito, dbo.deviza.kurzus FROM dbo.szall_renf INNER JOIN dbo.szall_rent ON dbo.szall_renf.bizszam = dbo.szall_rent.BIZSZAM INNER JOIN dbo.belepes ON dbo.szall_renf.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.afa_kulcs ON dbo.szall_rent.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.szallito ON dbo.szall_renf.szallito = dbo.szallito.SZALL_KOD INNER JOIN dbo.deviza ON dbo.deviza.penznem = dbo.szall_renf.penznem INNER JOIN dbo.stelephely ON dbo.szall_renf.raktar_k = dbo.stelephely.kod GROUP BY dbo.szall_renf.bizszam, dbo.szall_renf.datum, dbo.szall_renf.penznem, dbo.szall_renf.szall_dat, dbo.szallito.SZALL_NEV, dbo.szall_renf.allapot, dbo.szall_renf.kedvezmeny, dbo.szall_renf.modositva, dbo.belepes.TELJESNEV, dbo.szall_renf.kicsoda, dbo.szall_renf.megjegyzes, dbo.szall_renf.raktar_k, dbo.szall_renf.szallito, dbo.deviza.kurzus, dbo.stelephely.nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_renf] AS SELECT dbo.szall_renf.bizszam, dbo.szall_renf.szallito, dbo.szall_renf.datum, dbo.szall_renf.szall_dat, dbo.szall_renf.raktar_k, dbo.szall_renf.penznem, dbo.szall_renf.kedvezmeny, dbo.szall_renf.allapot, dbo.szall_renf.megjegyzes, dbo.szall_renf.kicsoda, dbo.szall_renf.modositva, dbo.szallito.SZALL_NEV, dbo.belepes.TELJESNEV, dbo.stelephely.nev AS telep_nev, dbo.szall_renf.afamentes, dbo.deviza.kurzus FROM dbo.szall_renf INNER JOIN dbo.szallito ON dbo.szall_renf.szallito = dbo.szallito.SZALL_KOD INNER JOIN dbo.belepes ON dbo.szall_renf.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.stelephely ON dbo.szall_renf.raktar_k = dbo.stelephely.kod INNER JOIN dbo.deviza ON dbo.szall_renf.penznem = dbo.deviza.penznem GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_rent] AS SELECT dbo.szall_rent.BIZSZAM, dbo.szall_rent.TETEL, dbo.szall_rent.CIKK_SZAM, dbo.szall_rent.VCIKKSZAM, dbo.szall_rent.afa_kulcs, dbo.szall_rent.MENNY_EGYS, dbo.szall_rent.SZORZO, dbo.szall_rent.EGYSEG_AR, dbo.szall_rent.kedvezmeny, dbo.szall_rent.EDARAB, dbo.szall_rent.DARAB, dbo.cikkek.CIKK_NEV, dbo.cikkek.GONGYOLEG, dbo.afa_kulcs.afaertek FROM dbo.szall_rent INNER JOIN dbo.cikkek ON dbo.szall_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.szall_rent.afa_kulcs = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szl_fizetesek] AS SELECT dbo.szall_szl_fizetesek.biz_tipus, dbo.szall_szl_fizetesek.bizszam, dbo.szall_szl_fizetesek.osszeg, dbo.szall_szl_fizetesek.fiz_datum, dbo.szall_szl_fizetesek.kicsoda, dbo.szall_szl_fizetesek.rog_datum, dbo.belepes.TELJESNEV FROM dbo.szall_szl_fizetesek INNER JOIN dbo.belepes ON dbo.szall_szl_fizetesek.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szla] AS SELECT dbo.szall_szlaf.BIZSZAM, dbo.szall_szlaf.KULSOSZLASZ AS kulso_szamla_sz, dbo.szallito.SZALL_NEV AS szallito, dbo.orszagok.nev_hu AS orszag, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZLA_DATUM, dbo.fizmodok.NEV AS fizetes_modja, dbo.szall_szlaf.FIZ_ESED, dbo.szall_szlaf.kedvezmeny AS vegosszeg_kedv, dbo.szall_szlaf.MEGJEGYZES, dbo.belepes.TELJESNEV AS keszitette, dbo.szall_szlaf.MODOSITVA AS keszult, dbo.szall_szlat.TETEL, dbo.szall_szlat.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.szall_szlat.MENNY_EGYS, dbo.szall_szlat.SZORZO, dbo.szall_szlat.edarab, dbo.szall_szlat.EGYSEG_AR, dbo.szall_szlaf.penznem, dbo.szall_szlaf.kurzus, dbo.szall_szlat.kedvezmeny, ((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlaf.kedvezmeny)) * (100 - dbo.szall_szlat.kedvezmeny) / 10000 AS ertek, ((dbo.szall_szlaf.kurzus * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlaf.kedvezmeny)) * (100 - dbo.szall_szlat.kedvezmeny) / 10000 AS ertek_ft, dbo.szall_szlat.afa_kulcs, dbo.szall_szlaf.BRUTTO_ERTEK, dbo.cikkek.VTSZ, SUBSTRING(dbo.szall_szlaf.TELJ_DATUM, 6, 2) AS honap, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.db_sulya * dbo.szall_szlat.DARAB * dbo.szall_szlat.SZORZO AS teljes_suly, dbo.cikkek.db_br_sulya * dbo.szall_szlat.DARAB * dbo.szall_szlat.SZORZO AS teljes_br_suly FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.szallito ON dbo.szall_szlaf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.belepes ON dbo.szall_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.cikkek ON dbo.szall_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.fizmodok ON dbo.szall_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szla_ford] AS SELECT dbo.szallito.SZALL_NEV, dbo.szallito.ADOSZAM, dbo.szall_szlaf.TELJ_DATUM, dbo.vtsz.vtsz, SUM(dbo.szall_szlat.edarab * dbo.cikkek.db_sulya) AS suly, (SUM(dbo.szall_szlaf.kurzus * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlaf.kedvezmeny)) * (100 - dbo.szall_szlat.kedvezmeny) / 10000 AS ertek, dbo.vtsz.vtsz_nev FROM dbo.szall_szlat INNER JOIN dbo.szall_szlaf ON dbo.szall_szlat.BIZSZAM = dbo.szall_szlaf.BIZSZAM INNER JOIN dbo.szallito ON dbo.szallito.SZALL_KOD = dbo.szall_szlaf.SZALLITO INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.szall_szlat.CIKK_SZAM INNER JOIN dbo.vtsz ON LEFT(dbo.cikkek.VTSZ, 4) = dbo.vtsz.vtsz WHERE (dbo.szall_szlat.afa_kulcs = 'FA') GROUP BY dbo.szallito.SZALL_NEV, dbo.szallito.ADOSZAM, dbo.szall_szlaf.TELJ_DATUM, dbo.vtsz.vtsz, dbo.szall_szlaf.kedvezmeny, dbo.szall_szlat.kedvezmeny, dbo.vtsz.vtsz_nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szla_pr08] AS SELECT TOP (100) PERCENT dbo.szall_szlaf.BIZSZAM, dbo.szall_szlaf.SZALLITO, dbo.szall_szlaf.SZALL_NEV, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZLA_DATUM, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.FIZ_ESED, dbo.szall_szlaf.penznem, dbo.szall_szlaf.MEGJEGYZES, dbo.afa_kulcs.afaertek, dbo.szall_szlaf.kedvezmeny, dbo.fizmodok.NEV AS fizmod_nev, dbo.szall_szlaf.TORLO, dbo.szall_szlaf.TOROLT, dbo.szall_szlaf.kurzus, dbo.szall_szlaf.MODOSITVA, ISNULL(SUM(((dbo.szall_szlaf.kurzus * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny)) * (100 - dbo.szall_szlaf.kedvezmeny) / 10000), 0) AS netto_ertek, ROUND(ISNULL(SUM(((dbo.szall_szlaf.kurzus * CASE szall_szlaf.afamentes WHEN 0 THEN (dbo.afa_kulcs.afaertek / 100) WHEN 1 THEN 0 END * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny)) * (100 - dbo.szall_szlaf.kedvezmeny) / 10000), 0), CASE dbo.szall_szlaf.penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS afa_ertek, ROUND(ISNULL(SUM(((dbo.szall_szlaf.kurzus * CASE szall_szlaf.afamentes WHEN 0 THEN ((100 + afa_kulcs.afaertek) / 100) WHEN 1 THEN 1 END * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny)) * (100 - dbo.szall_szlaf.kedvezmeny) / 10000), 0), CASE dbo.szall_szlaf.penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, ISNULL(SUM(((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny)) * (100 - dbo.szall_szlaf.kedvezmeny) / 10000), 0) AS netto_dev_ertek, ROUND(ISNULL(SUM(((CASE szall_szlaf.afamentes WHEN 0 THEN (dbo.afa_kulcs.afaertek / 100) WHEN 1 THEN 0 END * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny)) * (100 - dbo.szall_szlaf.kedvezmeny) / 10000), 0), CASE dbo.szall_szlaf.penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS afa_dev_ertek, ROUND(ISNULL(SUM(((CASE szall_szlaf.afamentes WHEN 0 THEN ((100 + afa_kulcs.afaertek) / 100) WHEN 1 THEN 1 END * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny)) * (100 - dbo.szall_szlaf.kedvezmeny) / 10000), 0), CASE dbo.szall_szlaf.penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_dev_ertek, dbo.szallito.orszag, dbo.orszagok.eu, dbo.devizakod.kod, dbo.szall_szlaf.KULSOSZLASZ, dbo.szall_szlaf.afamentes, dbo.szall_szlat.afa_kulcs FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.szall_szlat.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.fizmodok ON dbo.szall_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.szallito ON dbo.szall_szlaf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso INNER JOIN dbo.devizakod ON dbo.szall_szlaf.penznem = dbo.devizakod.ISO CROSS JOIN dbo.parameterek GROUP BY dbo.szall_szlaf.BIZSZAM, dbo.szall_szlaf.SZALLITO, dbo.szall_szlaf.SZALL_NEV, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZLA_DATUM, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.FIZ_ESED, dbo.szall_szlaf.penznem, dbo.szall_szlaf.MEGJEGYZES, dbo.afa_kulcs.afaertek, dbo.szall_szlaf.kedvezmeny, dbo.fizmodok.NEV, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO, dbo.szall_szlaf.TORLO, dbo.szall_szlaf.TOROLT, dbo.szall_szlaf.kurzus, dbo.szall_szlaf.MODOSITVA, dbo.szallito.orszag, dbo.orszagok.eu, dbo.devizakod.kod, dbo.szall_szlaf.KULSOSZLASZ, dbo.szall_szlaf.afamentes, dbo.szall_szlat.afa_kulcs HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szla_revol] AS SELECT dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.penznem, dbo.orszagok.nev_hu AS orszag, dbo.szall_szlat.afa_kulcs, dbo.szall_szlaf.kedvezmeny, dbo.afa_kulcs.afaertek, dbo.szall_szlaf.kurzus, (dbo.szall_szlaf.kurzus * SUM((dbo.szall_szlat.SZORZO * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100)) * (100 - dbo.szall_szlaf.kedvezmeny) / 100 AS netto, (dbo.szall_szlaf.kurzus * SUM((dbo.szall_szlat.SZORZO * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100)) * (100 - dbo.szall_szlaf.kedvezmeny) * dbo.afa_kulcs.afaertek / 10000 AS afa, (SUM((dbo.szall_szlat.SZORZO * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100) * (100 - dbo.szall_szlaf.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 10000 AS bruttopn, SUM((dbo.szall_szlat.SZORZO * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100) * (100 - dbo.szall_szlaf.kedvezmeny) / 100 AS nettopn, SUM((dbo.szall_szlat.SZORZO * dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100) * (100 - dbo.szall_szlaf.kedvezmeny) * dbo.afa_kulcs.afaertek / 10000 AS afapn FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.szall_szlat.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.szallito ON dbo.szallito.SZALL_KOD = dbo.szall_szlaf.SZALLITO INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso GROUP BY dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.penznem, dbo.orszagok.nev_hu, dbo.szall_szlat.afa_kulcs, dbo.szall_szlaf.kedvezmeny, dbo.afa_kulcs.afaertek, dbo.szall_szlaf.kurzus GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szlaf] AS SELECT dbo.szall_szlaf.BIZSZAM, dbo.szall_szlaf.KULSOSZLASZ, dbo.szall_szlaf.SZALLITO, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZLA_DATUM, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.FIZ_ESED, dbo.szall_szlaf.penznem, dbo.szall_szlaf.kurzus, dbo.szall_szlaf.kedvezmeny, dbo.szall_szlaf.MEGJEGYZES, dbo.szall_szlaf.KICSODA, dbo.szall_szlaf.MODOSITVA, dbo.szall_szlaf.TOROLT, dbo.szall_szlaf.TORLO, dbo.szall_szlaf.TOR_SSZ, dbo.szall_szlaf.VISSZARU, dbo.szall_szlaf.SZALL_NEV, dbo.belepes.TELJESNEV, dbo.szall_szlaf.afamentes, dbo.szall_szlaf.BRUTTO_ERTEK, dbo.fizmodok.NEV AS fizmod_nev FROM dbo.szall_szlaf INNER JOIN dbo.belepes ON dbo.szall_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.szall_szlaf.FIZ_MODJA = dbo.fizmodok.KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szlat] AS SELECT dbo.szall_szlat.BIZSZAM, dbo.szall_szlat.TETEL, dbo.szall_szlat.CIKK_SZAM, dbo.szall_szlat.afa_kulcs, dbo.szall_szlat.MENNY_EGYS, dbo.szall_szlat.SZORZO, dbo.szall_szlat.EGYSEG_AR, dbo.szall_szlat.kedvezmeny, dbo.szall_szlat.edarab, dbo.szall_szlat.DARAB, dbo.szall_szlat.rendel_bsz, dbo.szall_szlat.rendel_tet, dbo.szall_szlat.CIKK_NEV, dbo.cikkek.VCIKKSZAM, dbo.afa_kulcs.afaertek, dbo.szall_szlaf.TELJ_DATUM, dbo.szall_szlaf.SZALLITO, dbo.szall_szlaf.FIZ_MODJA, dbo.szall_szlaf.penznem, dbo.szall_szlaf.kurzus, dbo.szallito.SZALL_NEV, dbo.szallcsoport.nev AS szallcsopnev, ISNULL(szallito_1.SZALL_NEV, '') AS prefszall_nev, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev, dbo.cikkek.SZALLITO AS prefszallito, dbo.cikkek.GYARTO, dbo.cikkek.CIKKCSOP2, dbo.stcikk2.cikk_nev AS csopnev, dbo.cikkek.aru_szolg, ((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * ((100 - dbo.szall_szlat.kedvezmeny) / 100)) * ((100 - dbo.szall_szlaf.kedvezmeny) / 100) AS ertek FROM dbo.szall_szlat INNER JOIN dbo.cikkek ON dbo.szall_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.szall_szlat.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.szall_szlaf ON dbo.szall_szlat.BIZSZAM = dbo.szall_szlaf.BIZSZAM LEFT OUTER JOIN dbo.szallito ON dbo.szall_szlaf.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.szallcsoport ON dbo.szallito.SZALLCSOP = dbo.szallcsoport.kod LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.szallito AS szallito_1 ON dbo.cikkek.SZALLITO = szallito_1.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szle] AS SELECT dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.HIVSZAM, dbo.szallito.SZALL_NEV AS szallito, dbo.orszagok.nev_hu AS orszag, dbo.szall_szlef.TELJ_DATUM, dbo.szall_szlef.BEV_DATUM, dbo.raktarak.nev AS raktar, dbo.szall_szlef.kedvezmeny AS vegosszeg_kedv, dbo.szall_szlef.MEGJEGYZES, dbo.belepes.TELJESNEV AS keszitette, dbo.szall_szlef.MODOSITVA AS keszult, ISNULL(dbo.szall_szlaf.KULSOSZLASZ, '') AS kulso_szamla_sz, dbo.szall_szlet.TETEL, dbo.szall_szlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.szall_szlet.MENNY_EGYS, dbo.szall_szlet.SZORZO, dbo.szall_szlet.edarab, dbo.szall_szlet.EGYSEG_AR, dbo.szall_szlef.penznem, dbo.szall_szlef.kurzus, dbo.szall_szlet.kedvezmeny, ((dbo.szall_szlet.edarab * dbo.szall_szlet.EGYSEG_AR) * (100 - dbo.szall_szlef.kedvezmeny)) * (100 - dbo.szall_szlet.kedvezmeny) / 10000 AS ertek, ((dbo.szall_szlef.kurzus * dbo.szall_szlet.edarab * dbo.szall_szlet.EGYSEG_AR) * (100 - dbo.szall_szlef.kedvezmeny)) * (100 - dbo.szall_szlet.kedvezmeny) / 10000 AS ertek_ft, dbo.szall_szlet.afa_kulcs, dbo.szall_szlet.rendel_bsz AS rendeles_bizszam, dbo.szall_szlet.rendel_tet AS rendeles_tetel, dbo.cikkek.VTSZ, SUBSTRING(dbo.szall_szlef.TELJ_DATUM, 6, 2) AS honap, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.db_sulya * dbo.szall_szlet.DARAB * dbo.szall_szlet.SZORZO AS teljes_suly, dbo.cikkek.db_br_sulya * dbo.szall_szlet.DARAB * dbo.szall_szlet.SZORZO AS teljes_br_suly FROM dbo.szall_szlef INNER JOIN dbo.szall_szlet ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlet.BIZSZAM INNER JOIN dbo.szallito ON dbo.szall_szlef.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.belepes ON dbo.szall_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.cikkek ON dbo.szall_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.raktarak ON dbo.szall_szlef.RAKTAR_KOD = dbo.raktarak.kod INNER JOIN dbo.orszagok ON dbo.szallito.orszag = dbo.orszagok.iso LEFT OUTER JOIN dbo.szall_szlaf ON dbo.szall_szlef.szlaszam = dbo.szall_szlaf.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szle_ekaer] AS SELECT dbo.deviza.kurzus, dbo.szall_szlef.kedvezmeny AS vkedv, dbo.szall_szlet.BIZSZAM, dbo.szall_szlet.TETEL, dbo.cikkek.VTSZ, dbo.szall_szlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.szall_szlet.EGYSEG_AR, dbo.szall_szlet.kedvezmeny, dbo.cikkek.db_br_sulya, dbo.cikkek.kockazatos, dbo.szall_szlet.edarab AS darab, dbo.szall_szlet.SZORZO FROM dbo.szall_szlef INNER JOIN dbo.szall_szlet ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.szall_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.deviza ON dbo.szall_szlef.penznem = dbo.deviza.penznem WHERE (dbo.cikkek.aru_szolg = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szle_ertek] AS SELECT dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.HIVSZAM, dbo.szall_szlef.TELJ_DATUM, dbo.szall_szlef.penznem, dbo.szall_szlef.SZALL_NEV, dbo.raktarak.nev AS raktar_nev, ISNULL(SUM((CASE dbo.xrazonosito() WHEN '031-0093-001' THEN szall_szlet.szorzo ELSE 1 END * dbo.szall_szlet.edarab * dbo.szall_szlet.EGYSEG_AR) * (100 - dbo.szall_szlet.kedvezmeny) / 100) * (100 - dbo.szall_szlef.kedvezmeny) / 100, 0) AS netto_ertek, ISNULL((100 - dbo.szall_szlef.kedvezmeny) / 100 * SUM((CASE szall_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (CASE dbo.xrazonosito() WHEN '031-0093-001' THEN szall_szlet.szorzo ELSE 1 END * dbo.szall_szlet.edarab * dbo.szall_szlet.EGYSEG_AR)) * ((100 - dbo.szall_szlet.kedvezmeny) / 100)), 0) AS brutto_ertek, ISNULL((100 - dbo.szall_szlef.kedvezmeny) / 100 * dbo.szall_szlef.kurzus * SUM((CASE szall_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (CASE dbo.xrazonosito() WHEN '031-0093-001' THEN szall_szlet.szorzo ELSE 1 END * dbo.szall_szlet.edarab * dbo.szall_szlet.EGYSEG_AR)) * ((100 - dbo.szall_szlet.kedvezmeny) / 100)), 0) AS brutto_ertekft, dbo.szall_szlef.kedvezmeny, dbo.szall_szlef.MODOSITVA, dbo.belepes.TELJESNEV, dbo.szall_szlef.rendszam, dbo.szall_szlef.TOROLT, dbo.szall_szlef.TORLO, dbo.szall_szlef.TOR_SSZ, dbo.szall_szlef.VISSZARU, dbo.szall_szlef.KICSODA, dbo.szall_szlef.MEGJEGYZES, dbo.szall_szlef.kurzus, dbo.szall_szlef.afamentes, dbo.szall_szlef.RAKTAR_KOD, dbo.szall_szlef.BEV_DATUM, dbo.szall_szlef.SZALLITO, dbo.szall_szlef.okmany_tip, dbo.szall_szlef.szlaszam, ISNULL(dbo.szall_szlaf.KULSOSZLASZ, '') AS KULSOSZLASZ, dbo.szallito.SZALLCSOP, ISNULL(dbo.szall_szlaf.SZLA_DATUM, '') AS szla_datum, dbo.szall_szlef.brutto_ertek AS szla_brutto_ertek, dbo.szall_szlef.brutto_ertek * dbo.szall_szlef.kurzus AS szla_brutto_ertekft FROM dbo.szall_szlef INNER JOIN dbo.szall_szlet ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlet.BIZSZAM INNER JOIN dbo.raktarak ON dbo.szall_szlef.RAKTAR_KOD = dbo.raktarak.kod INNER JOIN dbo.belepes ON dbo.szall_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.afa_kulcs ON dbo.szall_szlet.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.szallito ON dbo.szall_szlef.SZALLITO = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.szall_szlaf ON dbo.szall_szlef.szlaszam = dbo.szall_szlaf.BIZSZAM GROUP BY dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.HIVSZAM, dbo.szall_szlef.TELJ_DATUM, dbo.szall_szlef.penznem, dbo.szall_szlef.SZALL_NEV, dbo.raktarak.nev, dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.kedvezmeny, dbo.szall_szlef.MODOSITVA, dbo.belepes.TELJESNEV, dbo.szall_szlef.rendszam, dbo.szall_szlef.TOROLT, dbo.szall_szlef.TORLO, dbo.szall_szlef.TOR_SSZ, dbo.szall_szlef.VISSZARU, dbo.szall_szlef.KICSODA, dbo.szall_szlef.MEGJEGYZES, dbo.szall_szlef.kurzus, dbo.szall_szlef.RAKTAR_KOD, dbo.szall_szlef.BEV_DATUM, dbo.szall_szlef.SZALLITO, dbo.szall_szlef.okmany_tip, dbo.szall_szlef.afamentes, dbo.szall_szlef.szlaszam, dbo.szall_szlaf.KULSOSZLASZ, dbo.szallito.SZALLCSOP, dbo.szall_szlaf.SZLA_DATUM, dbo.szall_szlef.brutto_ertek, dbo.szall_szlef.brutto_ertek * dbo.szall_szlef.kurzus GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szlef] AS SELECT dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.HIVSZAM, dbo.szall_szlef.SZALLITO, dbo.szall_szlef.TELJ_DATUM, dbo.szall_szlef.BEV_DATUM, dbo.szall_szlef.RAKTAR_KOD, dbo.szall_szlef.penznem, dbo.szall_szlef.kurzus, dbo.szall_szlef.MEGJEGYZES, dbo.szall_szlef.KICSODA, dbo.szall_szlef.MODOSITVA, dbo.szall_szlef.kedvezmeny, dbo.szall_szlef.TOROLT, dbo.szall_szlef.TORLO, dbo.szall_szlef.TOR_SSZ, dbo.szall_szlef.VISSZARU, dbo.szall_szlef.okmany_tip, dbo.szall_szlef.SZALL_NEV, dbo.belepes.TELJESNEV, dbo.szall_szlef.afamentes, dbo.raktarak.nev AS raktar_nev, dbo.szall_szlef.rendszam, dbo.szall_szlef.szlaszam, dbo.szall_szlef.brutto_ertek FROM dbo.szall_szlef INNER JOIN dbo.belepes ON dbo.szall_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak ON dbo.szall_szlef.RAKTAR_KOD = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szlet] AS SELECT dbo.szall_szlet.BIZSZAM, dbo.szall_szlet.TETEL, dbo.szall_szlet.CIKK_SZAM, dbo.szall_szlet.afa_kulcs, dbo.szall_szlet.MENNY_EGYS, dbo.szall_szlet.SZORZO, dbo.szall_szlet.EGYSEG_AR, dbo.szall_szlet.kedvezmeny, dbo.szall_szlet.edarab, dbo.szall_szlet.DARAB, dbo.szall_szlet.rendel_bsz, dbo.szall_szlet.rendel_tet, dbo.szall_szlet.CIKK_NEV, dbo.cikkek.VCIKKSZAM, dbo.cikkek.aru_szolg, dbo.afa_kulcs.afaertek FROM dbo.szall_szlet INNER JOIN dbo.cikkek ON dbo.szall_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.szall_szlet.afa_kulcs = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszall_szlet_szallito] AS SELECT dbo.szall_szlef.BIZSZAM, dbo.szall_szlef.SZALL_NEV, dbo.szall_szlef.TELJ_DATUM, dbo.szall_szlef.penznem, dbo.szall_szlet.CIKK_SZAM, dbo.szall_szlet.MENNY_EGYS, dbo.szall_szlet.DARAB, dbo.szall_szlet.EGYSEG_AR FROM dbo.szall_szlef INNER JOIN dbo.szall_szlet ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlet.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_kiv] AS SELECT dbo.szbiz_kiv.idoszak, dbo.szbiz_kiv.szallito, dbo.szbiz_kiv.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.szbiz_kiv.darab, dbo.szbiz_kiv.mozgaskod, dbo.szbiz_kiv.kbizszam, dbo.szbiz_kiv.ktetel, dbo.szbiz_kiv.bbizszam, dbo.szbiz_kiv.btetel, dbo.szallito.SZALL_NEV, dbo.szbiz_kiv.elszam_ar, dbo.cikkek.MENNY_EGYS FROM dbo.szbiz_kiv INNER JOIN dbo.cikkek ON dbo.szbiz_kiv.cikk_szam = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.szallito ON dbo.szbiz_kiv.szallito = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_kiv_datum] AS SELECT dbo.szbiz_kiv.idoszak, dbo.szbiz_kiv.szallito, dbo.szbiz_kiv.cikk_szam, dbo.szbiz_kiv.darab, dbo.szbiz_kiv.sorszam, dbo.szbiz_kiv.mozgaskod, dbo.szbiz_kiv.kbizszam, dbo.szbiz_kiv.ktetel, dbo.szbiz_kiv.bbizszam, dbo.szbiz_kiv.btetel, dbo.szbiz_kiv.bdarab, CASE WHEN dbo.szbiz_kiv.mozgaskod = 'kivet' THEN kivetf.datum WHEN dbo.szbiz_kiv.mozgaskod = 'vevo_szle' THEN vevo_szlef.telj_datum END AS kiv_datum, dbo.szallito.SZALL_NEV, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.szbiz_kiv.elszam_ar AS ut_besz_ar, dbo.afa_kulcs.afaertek, dbo.szbiz_kiv.darab * dbo.szbiz_kiv.elszam_ar AS netto, (dbo.szbiz_kiv.darab * dbo.szbiz_kiv.elszam_ar) * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto FROM dbo.szbiz_kiv INNER JOIN dbo.szallito ON dbo.szbiz_kiv.szallito = dbo.szallito.SZALL_KOD INNER JOIN dbo.cikkek ON dbo.szbiz_kiv.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS LEFT OUTER JOIN dbo.vevo_szlef ON dbo.szbiz_kiv.kbizszam = dbo.vevo_szlef.BIZSZAM LEFT OUTER JOIN dbo.kivetf ON dbo.szbiz_kiv.kbizszam = dbo.kivetf.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_kiv_ossz] AS SELECT dbo.szbiz_kiv.idoszak, dbo.szbiz_kiv.szallito, dbo.szbiz_kiv.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.szallito.SZALL_NEV, SUM(dbo.szbiz_kiv.darab) AS darab, SUM(dbo.szbiz_kiv.darab * dbo.szbiz_kiv.elszam_ar) AS ertek, SUM((dbo.szbiz_kiv.darab * dbo.szbiz_kiv.elszam_ar) * (100 + dbo.afa_kulcs.afaertek) / 100) AS brutto FROM dbo.szbiz_kiv INNER JOIN dbo.cikkek ON dbo.szbiz_kiv.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.szallito ON dbo.szbiz_kiv.szallito = dbo.szallito.SZALL_KOD INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GROUP BY dbo.szbiz_kiv.idoszak, dbo.szbiz_kiv.szallito, dbo.cikkek.CIKK_NEV, dbo.cikkek.MENNY_EGYS, dbo.szallito.SZALL_NEV, dbo.szbiz_kiv.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_kivb] AS SELECT dbo.szbiz_kiv.idoszak, ISNULL(dbo.szallito.SZALL_NEV, '') AS szall_nev, dbo.szbiz_kiv.szallito FROM dbo.szbiz_kiv LEFT OUTER JOIN dbo.szallito ON dbo.szbiz_kiv.szallito = dbo.szallito.SZALL_KOD GROUP BY dbo.szbiz_kiv.idoszak, dbo.szallito.SZALL_NEV, dbo.szbiz_kiv.szallito GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_szle_ertek] AS SELECT dbo.szbiz_szlef.BIZSZAM, dbo.szbiz_szlef.HIVSZAM, dbo.szbiz_szlef.TELJ_DATUM, dbo.szbiz_szlef.penznem, dbo.szbiz_szlef.SZALL_NEV, dbo.raktarak.nev AS raktar_nev, ISNULL(SUM((dbo.szbiz_szlet.edarab * dbo.szbiz_szlet.EGYSEG_AR) * (100 - dbo.szbiz_szlet.kedvezmeny) / 100) * (100 - dbo.szbiz_szlef.kedvezmeny) / 100, 0) AS netto_ertek, ISNULL((100 - dbo.szbiz_szlef.kedvezmeny) / 100 * SUM((CASE szbiz_szlef.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.szbiz_szlet.edarab * dbo.szbiz_szlet.EGYSEG_AR)) * ((100 - dbo.szbiz_szlet.kedvezmeny) / 100)), 0) AS brutto_ertek, dbo.szbiz_szlef.kedvezmeny, dbo.szbiz_szlef.szlaszam, dbo.szbiz_szlef.MODOSITVA, dbo.belepes.TELJESNEV, dbo.szbiz_szlef.rendszam, dbo.szbiz_szlef.TOROLT, dbo.szbiz_szlef.TORLO, dbo.szbiz_szlef.TOR_SSZ, dbo.szbiz_szlef.VISSZARU, dbo.szbiz_szlef.KICSODA, dbo.szbiz_szlef.MEGJEGYZES, dbo.szbiz_szlef.kurzus, dbo.szbiz_szlef.RAKTAR_KOD, dbo.szbiz_szlet.afa_kulcs, dbo.szbiz_szlef.BEV_DATUM, dbo.szbiz_szlef.SZALLITO, dbo.szbiz_szlef.okmany_tip FROM dbo.szbiz_szlef INNER JOIN dbo.szbiz_szlet ON dbo.szbiz_szlef.BIZSZAM = dbo.szbiz_szlet.BIZSZAM INNER JOIN dbo.raktarak ON dbo.szbiz_szlef.RAKTAR_KOD = dbo.raktarak.kod INNER JOIN dbo.belepes ON dbo.szbiz_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.afa_kulcs ON dbo.szbiz_szlet.afa_kulcs = dbo.afa_kulcs.AFAKULCS GROUP BY dbo.szbiz_szlef.BIZSZAM, dbo.szbiz_szlef.HIVSZAM, dbo.szbiz_szlef.TELJ_DATUM, dbo.szbiz_szlef.penznem, dbo.szbiz_szlef.SZALL_NEV, dbo.raktarak.nev, dbo.szbiz_szlef.BIZSZAM, dbo.szbiz_szlef.kedvezmeny, dbo.szbiz_szlef.szlaszam, dbo.szbiz_szlef.MODOSITVA, dbo.belepes.TELJESNEV, dbo.szbiz_szlef.rendszam, dbo.szbiz_szlef.TOROLT, dbo.szbiz_szlef.TORLO, dbo.szbiz_szlef.TOR_SSZ, dbo.szbiz_szlef.VISSZARU, dbo.szbiz_szlef.KICSODA, dbo.szbiz_szlef.MEGJEGYZES, dbo.szbiz_szlef.kurzus, dbo.szbiz_szlef.RAKTAR_KOD, dbo.szbiz_szlef.BEV_DATUM, dbo.szbiz_szlef.SZALLITO, dbo.szbiz_szlet.afa_kulcs, dbo.szbiz_szlef.okmany_tip GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_szlef] AS SELECT dbo.szbiz_szlef.BIZSZAM, dbo.szbiz_szlef.HIVSZAM, dbo.szbiz_szlef.szlaszam, dbo.szbiz_szlef.SZALLITO, dbo.szbiz_szlef.TELJ_DATUM, dbo.szbiz_szlef.BEV_DATUM, dbo.szbiz_szlef.RAKTAR_KOD, dbo.szbiz_szlef.penznem, dbo.szbiz_szlef.kurzus, dbo.szbiz_szlef.MEGJEGYZES, dbo.szbiz_szlef.KICSODA, dbo.szbiz_szlef.MODOSITVA, dbo.szbiz_szlef.kedvezmeny, dbo.szbiz_szlef.TOROLT, dbo.szbiz_szlef.TORLO, dbo.szbiz_szlef.TOR_SSZ, dbo.szbiz_szlef.VISSZARU, dbo.szbiz_szlef.okmany_tip, dbo.szbiz_szlef.SZALL_NEV, dbo.belepes.TELJESNEV, dbo.szbiz_szlef.afamentes, dbo.raktarak.nev AS raktar_nev, dbo.szbiz_szlef.rendszam FROM dbo.szbiz_szlef INNER JOIN dbo.belepes ON dbo.szbiz_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.raktarak ON dbo.szbiz_szlef.RAKTAR_KOD = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vszbiz_szlet] AS SELECT dbo.szbiz_szlet.BIZSZAM, dbo.szbiz_szlet.TETEL, dbo.szbiz_szlet.CIKK_SZAM, dbo.szbiz_szlet.afa_kulcs, dbo.szbiz_szlet.MENNY_EGYS, dbo.szbiz_szlet.SZORZO, dbo.szbiz_szlet.EGYSEG_AR, dbo.szbiz_szlet.kedvezmeny, dbo.szbiz_szlet.edarab, dbo.szbiz_szlet.DARAB, dbo.szbiz_szlet.rendel_bsz, dbo.szbiz_szlet.rendel_tet, dbo.szbiz_szlet.CIKK_NEV, dbo.cikkek.VCIKKSZAM, dbo.cikkek.aru_szolg, dbo.afa_kulcs.afaertek FROM dbo.szbiz_szlet INNER JOIN dbo.cikkek ON dbo.szbiz_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.szbiz_szlet.afa_kulcs = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vterm_anyag_felh] AS SELECT dbo.keszre1.diszpo, - SUM(dbo.mozgas.DARAB * dbo.keszlet.EGYSEG_AR) AS ertek FROM dbo.keszre1 INNER JOIN dbo.keszre2 ON dbo.keszre1.kulcs = dbo.keszre2.kulcs INNER JOIN dbo.mozgas ON dbo.mozgas.MOZGASKOD = 'term_ki' AND dbo.keszre2.kulcs = dbo.mozgas.BIZSZAM AND dbo.keszre2.tetel = dbo.mozgas.TETEL INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM GROUP BY dbo.keszre1.diszpo GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vterm_receptura] AS SELECT dbo.term_receptura.tevekenyseg, dbo.term_receptura.cikk_szam, dbo.term_receptura.xdb, dbo.term_receptura.acikk_szam, dbo.cikkek.CIKK_NEV AS acikk_nev, dbo.term_receptura.darab, dbo.term_tevekenyseg.nev, dbo.cikkek.MENNY_EGYS, cikkek_1.CIKK_NEV FROM dbo.term_receptura INNER JOIN dbo.cikkek ON dbo.term_receptura.acikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.term_tevekenyseg ON dbo.term_receptura.tevekenyseg = dbo.term_tevekenyseg.kod INNER JOIN dbo.cikkek AS cikkek_1 ON dbo.term_receptura.cikk_szam = cikkek_1.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vterm_termel] AS SELECT dbo.term_termeles.kulcs, dbo.term_termeles.datum, dbo.term_termeles.tevekenyseg, dbo.term_termeles.irany, dbo.term_termeles.focikk_szam, dbo.term_termeles.cikk_szam, dbo.term_termeles.darab, dbo.term_termeles.egyseg_ar, dbo.term_termeles.sarzs, dbo.term_termeles.term_kulcs, dbo.term_termeles.term_datum, ISNULL(dbo.term_tevekenyseg.nev, 'Bontás') AS term_nev, cikkek_1.CIKK_NEV AS focikk_nev, dbo.cikkek.CIKK_NEV FROM dbo.term_termeles INNER JOIN dbo.cikkek ON dbo.term_termeles.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.cikkek AS cikkek_1 ON dbo.term_termeles.focikk_szam = cikkek_1.CIKK_SZAM LEFT OUTER JOIN dbo.term_tevekenyseg ON dbo.term_termeles.tevekenyseg = dbo.term_tevekenyseg.kod WHERE (dbo.term_termeles.term_kulcs <> 0) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vterm_termeles] AS SELECT dbo.term_termeles.term_kulcs, dbo.term_termeles.term_datum, dbo.term_termeles.tevekenyseg, dbo.term_termeles.focikk_szam, ISNULL(dbo.term_tevekenyseg.nev, 'Bontás') AS tev_nev, dbo.cikkek.CIKK_NEV FROM dbo.term_termeles INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.term_termeles.focikk_szam LEFT OUTER JOIN dbo.term_tevekenyseg ON dbo.term_tevekenyseg.kod = dbo.term_termeles.tevekenyseg WHERE (dbo.term_termeles.term_kulcs <> 0) GROUP BY dbo.term_termeles.term_datum, dbo.term_termeles.tevekenyseg, dbo.term_termeles.focikk_szam, dbo.term_termeles.term_kulcs, ISNULL(dbo.term_tevekenyseg.nev, 'Bontás'), dbo.cikkek.CIKK_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vterm_veszteseg] AS SELECT dbo.term_veszteseg.cikk_szam, dbo.cikkek.CIKK_NEV, SUM(dbo.term_veszteseg.eredeti_db) AS eredeti_db, SUM(dbo.term_veszteseg.darab) AS darab, LEFT(dbo.term_veszteseg.modido, 10) AS datum, dbo.vevok.VEVO_KOD, dbo.vevok.VEVO_NEV FROM dbo.term_veszteseg INNER JOIN dbo.cikkek ON dbo.term_veszteseg.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevo_szlef ON dbo.term_veszteseg.bizszam = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD GROUP BY dbo.term_veszteseg.cikk_szam, LEFT(dbo.term_veszteseg.modido, 10), dbo.cikkek.CIKK_NEV, dbo.vevok.VEVO_KOD, dbo.vevok.VEVO_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vTervEsemeny] AS SELECT dbo.TervEsemeny.kod, dbo.TervEsemeny.TervNev, dbo.TervEsemeny.TervTipus, dbo.TervEsemeny.KDatum, dbo.TervEsemeny.VDatum, dbo.TervEsemeny.Ismetlodes, dbo.TervEsemeny.PartnerTip, dbo.TervEsemeny.PartnerKod, dbo.TervEsemeny.PenztarBank, dbo.TervEsemeny.Cikk_szam, dbo.TervEsemeny.AfaErtek, dbo.TervEsemeny.darab, dbo.TervEsemeny.egyseg_ar, dbo.TervEsemeny.kicsoda, dbo.TervEsemeny.modositva, dbo.cikkek.CIKK_NEV, CASE partnertip WHEN 'v' THEN vevo_nev WHEN 's' THEN szall_nev ELSE '' END AS partnerNev FROM dbo.TervEsemeny LEFT OUTER JOIN dbo.cikkek ON dbo.TervEsemeny.Cikk_szam = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.TervEsemeny.PartnerKod AND dbo.TervEsemeny.PartnerTip = 'v' LEFT OUTER JOIN dbo.szallito ON dbo.szallito.SZALL_KOD = dbo.TervEsemeny.PartnerKod AND dbo.TervEsemeny.PartnerTip = 's' GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vugyletek] AS SELECT dbo.ugyletek.ugyletkod, dbo.ugyletek.bizszam, dbo.vevo_arajanlatf.vevo_kod, dbo.vevok.VEVO_NEV, dbo.vevo_arajanlatf.datum, dbo.vevo_arajanlatf.keres_rogzitette, dbo.belepes.TELJESNEV, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.allapot, dbo.broker_allapotok.allapot_nev FROM dbo.ugyletek INNER JOIN dbo.vevo_arajanlatf ON dbo.ugyletek.bizszam = dbo.vevo_arajanlatf.bizszam AND dbo.ugyletek.biztipus = 'vevo_arajan' INNER JOIN dbo.vevok ON dbo.vevo_arajanlatf.vevo_kod = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_arajanlatf.keres_rogzitette = dbo.belepes.ROVIDNEV INNER JOIN dbo.broker_allapotok ON dbo.vevo_arajanlatf.allapot = dbo.broker_allapotok.allapot_kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vutnyilv_gk] AS SELECT rendszam, uzemanyag_tip, norma, tulajdonos, CASE uzemanyag_tip WHEN 'D' THEN 'Diesel' ELSE 'Benzin' END AS uzem_tip FROM dbo.utnyilv_gk GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vutnyilv_tavolsag] AS SELECT vevo_szall, partner_kod, telep_kod, nev, iranyito, varos, cim, tavolsag FROM dbo.futnyilv_tavolsag() AS futnyilv_tavolsag_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vutokalk] AS SELECT cikk_szam, cikk_nev, akt_onkolt, termelt_db, termelt_ertek, felh_ertek, uj_ar FROM dbo.fvutokalk('2000.01.01', '2000.00.01', 0, '', 1) AS fvutokalk_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_akcio_arak] AS SELECT AKCIOCSOP, akcio_tip, KDATUM, VDATUM, CIKK_SZAM AS cikkszam, EGYSEG_AR FROM dbo.vevo_akcio GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_akcio_hh] AS SELECT dbo.vevo_akcio_hh.cikk_szam, dbo.vevo_akcio_hh.megszunt, dbo.vevo_akcio_hh.kicsoda, dbo.vevo_akcio_hh.modido, dbo.cikkek.CIKK_NEV, dbo.belepes.TELJESNEV, dbo.gyarto.nev AS gyarto_nev, dbo.stcikk2.cikk_nev AS cikkcsopnev, dbo.szallito.SZALL_NEV, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO, dbo.vevo_akcio_hh.kedvezmeny, dbo.vevo_akcio_hh.kido, dbo.vevo_akcio_hh.vido, dbo.vevo_akcio_hh.kulcs, dbo.vevo_akcio_hh.het, dbo.vevo_akcio_hh.akc_csop, dbo.vevo_akc_csoport.nev AS akc_csop_nev FROM dbo.vevo_akcio_hh INNER JOIN dbo.cikkek ON dbo.vevo_akcio_hh.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.vevo_akcio_hh.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam INNER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod INNER JOIN dbo.szallito ON dbo.cikkek.SZALLITO = dbo.szallito.SZALL_KOD INNER JOIN dbo.vevo_akc_csoport ON dbo.vevo_akcio_hh.akc_csop = dbo.vevo_akc_csoport.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_akcio_me] AS SELECT dbo.vevo_akcio_me.kulcs, dbo.vevo_akcio_me.akciocsop, dbo.vevo_akcio_me.kdatum, dbo.vevo_akcio_me.vdatum, dbo.vevo_akcio_me.cikk_szam, dbo.vevo_akcio_me.felt_db, dbo.vevo_akcio_me.kedvezmeny, dbo.vevo_akcio_me.akc_ar, dbo.vevo_akcio_me.megszunt, dbo.vevo_akcio_me.kicsoda, dbo.vevo_akcio_me.keszult, dbo.belepes.TELJESNEV, dbo.cikkek.CIKK_NEV, dbo.vevo_akc_csoport.nev, dbo.vevo_akc_csoport.penznem, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO FROM dbo.vevo_akcio_me INNER JOIN dbo.belepes ON dbo.vevo_akcio_me.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.cikkek ON dbo.vevo_akcio_me.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevo_akc_csoport ON dbo.vevo_akcio_me.akciocsop = dbo.vevo_akc_csoport.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_akcior] AS SELECT AKCIOCSOP, akcio_tip, KDATUM, VDATUM, CIKK_SZAM, EGYSEG_AR, brutto_Ar, ke_keszlet, ke_maradek, nev FROM dbo.fvevo_akcio_cikk_rovid() AS fvevo_akcio_cikk_rovid_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_ar_lista] AS SELECT dbo.vevo_ar_lista.arcsoport, dbo.vevo_ar_lista.datum, dbo.vevo_ar_lista.cikk_szam, dbo.vevo_ar_lista.netto_ar, dbo.vevo_ar_lista.brutto_ar, dbo.vevo_ar_lista.beszerz_ar, dbo.vevo_ar_lista.arres, dbo.vevo_ar_lista.kicsoda, dbo.vevo_ar_lista.modositva, dbo.belepes.TELJESNEV, dbo.cikkek.AFA_KULCS, dbo.cikkek.CIKKCSOP2, dbo.stcikk2.cikk_nev AS csoportnev, dbo.gyarto.nev AS gyartonev, dbo.cikkek.GYARTO, dbo.cikkek.CIKK_NEV, dbo.cikkek.SZALLITO, dbo.szallito.SZALL_NEV, dbo.cikkek.aru_szolg, dbo.cikkek.KIFUTOTT, dbo.afa_kulcs.afaertek FROM dbo.vevo_ar_lista INNER JOIN dbo.cikkek ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.cikkek.AFA_KULCS INNER JOIN dbo.belepes ON dbo.vevo_ar_lista.kicsoda = dbo.belepes.ROVIDNEV INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.szallito ON dbo.cikkek.SZALLITO = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajan_egyedi_ertek] AS SELECT dbo.vevo_arajanlatf.bizszam, dbo.vevo_arajanlatf.vevo_kod, dbo.vevo_arajanlatf.datum, dbo.vevo_arajanlatf.datum_ig, dbo.vevo_arajanlatf.fiz_modja, dbo.vevo_arajanlatf.fizhat, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.afamentes, dbo.vevo_arajanlatf.kedvezmeny, dbo.vevo_arajanlatf.arcsoport, dbo.vevo_arajanlatf.akciocsoport, dbo.vevo_arajanlatf.megjegyzes, dbo.vevo_arajanlatf.hatarido, dbo.vevo_arajanlatf.keres_rogzitette AS kereskedo_kod, dbo.vevo_arajanlatf.keres_rogzitve, dbo.vevo_arajanlatf.beszerzes_rogzitette, dbo.vevo_arajanlatf.beszerzes_rogzitve, dbo.vevo_arajanlatf.ajanlat_penznem, dbo.vevo_arajanlatf.ajanlat_kurzus, dbo.vevo_arajanlatf.ajanlat_rogzitette, dbo.vevo_arajanlatf.ajanlat_rogzitve, dbo.vevo_arajanlatf.valasz, dbo.vevo_arajanlatf.valasz_datum, dbo.vevo_arajanlatf.valasz_megjegyzes, dbo.vevo_arajanlatf.allapot, dbo.vevok.VEVO_NEV, dbo.fizmodok.NEV AS fizmod_nev, ISNULL(belepes_1.TELJESNEV, '') AS kereskedo, ISNULL((100 - dbo.vevo_arajanlatf.kedvezmeny) / 100 * SUM((dbo.vevo_arajanlatt.mennyiseg * dbo.vevo_arajanlatt.kiajanlott_ar) * (100 - dbo.vevo_arajanlatt.kedvezmeny) / 100), 0) AS netto_ertek, ROUND(ISNULL((100 - dbo.vevo_arajanlatf.kedvezmeny) / 100 * SUM((CASE vevo_arajanlatf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_arajanlatt.mennyiseg * dbo.vevo_arajanlatt.kiajanlott_ar)) * ((100 - dbo.vevo_arajanlatt.kedvezmeny) / 100)), 0), CASE vevo_penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, ISNULL(dbo.belepes.TELJESNEV, '') AS ajanlotta, ISNULL(dbo.vevo_akc_csoport.nev, '') AS akccsop_nev, dbo.vevo_arcsoport.NEV AS arcsop_nev FROM dbo.vevo_arajanlatf INNER JOIN dbo.vevo_arajanlatt ON dbo.vevo_arajanlatf.bizszam = dbo.vevo_arajanlatt.bizszam INNER JOIN dbo.vevok ON dbo.vevo_arajanlatf.vevo_kod = dbo.vevok.VEVO_KOD INNER JOIN dbo.fizmodok ON dbo.vevo_arajanlatf.fiz_modja = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_arajanlatt.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.vevo_arcsoport ON dbo.vevo_arajanlatf.arcsoport = dbo.vevo_arcsoport.KOD LEFT OUTER JOIN dbo.vevo_akc_csoport ON dbo.vevo_arajanlatf.akciocsoport = dbo.vevo_akc_csoport.kod LEFT OUTER JOIN dbo.belepes ON dbo.vevo_arajanlatf.ajanlat_rogzitette = dbo.belepes.ROVIDNEV LEFT OUTER JOIN dbo.belepes AS belepes_1 ON dbo.vevo_arajanlatf.keres_rogzitette = belepes_1.ROVIDNEV CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_arajanlatf.vevo_kod, dbo.vevo_arajanlatf.datum, dbo.vevo_arajanlatf.datum_ig, dbo.vevo_arajanlatf.fiz_modja, dbo.vevo_arajanlatf.fizhat, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.afamentes, dbo.vevo_arajanlatf.kedvezmeny, dbo.vevo_arajanlatf.arcsoport, dbo.vevo_arajanlatf.akciocsoport, dbo.vevo_arajanlatf.megjegyzes, dbo.vevo_arajanlatf.hatarido, dbo.vevo_arajanlatf.keres_rogzitette, dbo.vevo_arajanlatf.keres_rogzitve, dbo.vevo_arajanlatf.beszerzes_rogzitette, dbo.vevo_arajanlatf.beszerzes_rogzitve, dbo.vevo_arajanlatf.ajanlat_penznem, dbo.vevo_arajanlatf.ajanlat_kurzus, dbo.vevo_arajanlatf.ajanlat_rogzitette, dbo.vevo_arajanlatf.ajanlat_rogzitve, dbo.vevo_arajanlatf.valasz, dbo.vevo_arajanlatf.valasz_datum, dbo.vevo_arajanlatf.valasz_megjegyzes, dbo.vevo_arajanlatf.allapot, dbo.vevok.VEVO_NEV, dbo.fizmodok.NEV, dbo.vevo_arajanlatf.bizszam, dbo.parameterek.AZONOSITO, dbo.parameterek.ERTEK, ISNULL(belepes_1.TELJESNEV, ''), dbo.belepes.TELJESNEV, dbo.vevo_akc_csoport.nev, dbo.vevo_arcsoport.NEV HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') AND (dbo.vevo_arajanlatf.allapot = 14) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajanlat_ertek] AS SELECT dbo.vevo_arajanlatf.bizszam, ISNULL(dbo.ugyletek.ugyletkod, '') AS ugyletkod, dbo.vevo_arajanlatf.vevo_kod, dbo.vevo_arajanlatf.datum, dbo.vevo_arajanlatf.datum_ig, dbo.vevo_arajanlatf.fiz_modja, dbo.vevo_arajanlatf.fizhat, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.afamentes, dbo.vevo_arajanlatf.kedvezmeny, dbo.vevo_arajanlatf.arcsoport, dbo.vevo_arajanlatf.akciocsoport, dbo.vevo_arajanlatf.megjegyzes, dbo.vevo_arajanlatf.hatarido, dbo.vevo_arajanlatf.keres_rogzitette AS kereskedo_kod, dbo.vevo_arajanlatf.keres_rogzitve, dbo.vevo_arajanlatf.beszerzes_rogzitette, dbo.vevo_arajanlatf.beszerzes_rogzitve, dbo.vevo_arajanlatf.ajanlat_penznem, dbo.vevo_arajanlatf.ajanlat_kurzus, dbo.vevo_arajanlatf.ajanlat_rogzitette, dbo.vevo_arajanlatf.ajanlat_rogzitve, dbo.vevo_arajanlatf.valasz, dbo.vevo_arajanlatf.valasz_datum, dbo.vevo_arajanlatf.valasz_megjegyzes, dbo.vevo_arajanlatf.allapot, dbo.vevok.VEVO_NEV, dbo.fizmodok.NEV AS fizmod_nev, ISNULL(belepes_1.TELJESNEV, '') AS kereskedo, ISNULL(SUM((dbo.vevo_arajanlatt.mennyiseg * dbo.vevo_arajanlatt.belfoldi_ar) * (100 - dbo.vevo_arajanlatt.kedvezmeny) / 100), 0) AS netto_ertek, ROUND(ISNULL(SUM((CASE vevo_arajanlatf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_arajanlatt.mennyiseg * dbo.vevo_arajanlatt.belfoldi_ar)) * ((100 - dbo.vevo_arajanlatt.kedvezmeny) / 100)), 0), CASE vevo_penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, dbo.parameterek.AZONOSITO, dbo.parameterek.ERTEK AS alappenznem, ISNULL(dbo.belepes.TELJESNEV, '') AS ajanlotta, dbo.broker_allapotok.allapot_nev FROM dbo.vevo_arajanlatf INNER JOIN dbo.vevo_arajanlatt ON dbo.vevo_arajanlatf.bizszam = dbo.vevo_arajanlatt.bizszam INNER JOIN dbo.vevok ON dbo.vevo_arajanlatf.vevo_kod = dbo.vevok.VEVO_KOD INNER JOIN dbo.fizmodok ON dbo.vevo_arajanlatf.fiz_modja = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_arajanlatt.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.broker_allapotok ON dbo.vevo_arajanlatf.allapot = dbo.broker_allapotok.allapot_kod LEFT OUTER JOIN dbo.ugyletek ON dbo.vevo_arajanlatf.bizszam = dbo.ugyletek.bizszam AND dbo.ugyletek.biztipus = 'vevo_arajan' LEFT OUTER JOIN dbo.belepes ON dbo.vevo_arajanlatf.ajanlat_rogzitette = dbo.belepes.ROVIDNEV LEFT OUTER JOIN dbo.belepes AS belepes_1 ON dbo.vevo_arajanlatf.keres_rogzitette = belepes_1.ROVIDNEV CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_arajanlatf.vevo_kod, dbo.vevo_arajanlatf.datum, dbo.vevo_arajanlatf.datum_ig, dbo.vevo_arajanlatf.fiz_modja, dbo.vevo_arajanlatf.fizhat, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.afamentes, dbo.vevo_arajanlatf.kedvezmeny, dbo.vevo_arajanlatf.arcsoport, dbo.vevo_arajanlatf.akciocsoport, dbo.vevo_arajanlatf.megjegyzes, dbo.vevo_arajanlatf.hatarido, dbo.vevo_arajanlatf.keres_rogzitette, dbo.vevo_arajanlatf.keres_rogzitve, dbo.vevo_arajanlatf.beszerzes_rogzitette, dbo.vevo_arajanlatf.beszerzes_rogzitve, dbo.vevo_arajanlatf.ajanlat_penznem, dbo.vevo_arajanlatf.ajanlat_kurzus, dbo.vevo_arajanlatf.ajanlat_rogzitette, dbo.vevo_arajanlatf.ajanlat_rogzitve, dbo.vevo_arajanlatf.valasz, dbo.vevo_arajanlatf.valasz_datum, dbo.vevo_arajanlatf.valasz_megjegyzes, dbo.vevo_arajanlatf.allapot, dbo.vevok.VEVO_NEV, dbo.fizmodok.NEV, dbo.vevo_arajanlatf.bizszam, dbo.parameterek.AZONOSITO, dbo.parameterek.ERTEK, ISNULL(belepes_1.TELJESNEV, ''), dbo.belepes.TELJESNEV, dbo.broker_allapotok.allapot_nev, ISNULL(dbo.ugyletek.ugyletkod, '') HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajanlat_kalk] AS SELECT dbo.wvevo_arajanlatt.bizszam, 123456 AS vevo_kurzusa, dbo.wvevo_arajanlatt.tetel, dbo.wvevo_arajanlatt.cikk_szam, dbo.wvevo_arajanlatt.cikk_tipus, dbo.wvevo_arajanlatt.mennyiseg, dbo.wvevo_arajanlatt.belfoldi_ar, dbo.wvevo_arajanlatt.belfoldi_penznem, ISNULL(deviza_1.kurzus, 1) AS belfoldi_kurzus, dbo.wvevo_arajanlatt.belfoldi_szallito, dbo.wvevo_arajanlatt.belfoldi_keszlet, dbo.wvevo_arajanlatt.belfoldi_szallitas_nap, dbo.wvevo_arajanlatt.kozbesz_ar, dbo.wvevo_arajanlatt.beszerzesi_ar, dbo.wvevo_arajanlatt.beszerzesi_penznem, dbo.wvevo_arajanlatt.beszerzesi_szallito, dbo.wvevo_arajanlatt.beszerzesi_keszlet, dbo.wvevo_arajanlatt.beszerzesi_kurzus, dbo.wvevo_arajanlatt.beszerzesi_szallitas_nap, dbo.wvevo_arajanlatt.kiajanlott_ar, dbo.wvevo_arajanlatt.kiajanlott_szallitas_nap, dbo.wvevo_arajanlatt.kiajanlott_ar * 123456 AS kiajanlott_ar_ft, dbo.wvevo_arajanlatt.beszerzesi_ar * dbo.wvevo_arajanlatt.beszerzesi_kurzus AS beszerzesi_ar_ft, dbo.wvevo_arajanlatt.mennyiseg * dbo.wvevo_arajanlatt.beszerzesi_ar AS beszerzesi_ertek, dbo.wvevo_arajanlatt.mennyiseg * dbo.wvevo_arajanlatt.beszerzesi_ar * dbo.wvevo_arajanlatt.beszerzesi_kurzus AS beszerzesi_ertek_ft, dbo.wvevo_arajanlatt.mennyiseg * dbo.wvevo_arajanlatt.kiajanlott_ar AS kiajanlott_ert, dbo.wvevo_arajanlatt.mennyiseg * (dbo.wvevo_arajanlatt.kiajanlott_ar * 123456 - dbo.wvevo_arajanlatt.beszerzesi_ar * dbo.wvevo_arajanlatt.beszerzesi_kurzus) AS gap, dbo.wvevo_arajanlatt.kiajanlott_ar * 123456 / CASE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) WHEN 0 THEN 1 ELSE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) END AS kiajan_szaz, dbo.wvevo_arajanlatt.belfoldi_ar * ISNULL(deviza_1.kurzus, 1) / CASE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) WHEN 0 THEN 1 ELSE (wvevo_arajanlatt.beszerzesi_ar * wvevo_arajanlatt.beszerzesi_kurzus) END AS belf_szaz, dbo.wvevo_arajanlatt.cikk_nev, dbo.wvevo_arajanlatt.tipus_nev, dbo.wvevo_arajanlatt.kicsoda FROM dbo.deviza AS deviza_1 RIGHT OUTER JOIN dbo.wvevo_arajanlatt ON deviza_1.penznem = dbo.wvevo_arajanlatt.belfoldi_penznem GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajanlatf] AS SELECT dbo.vevo_arajanlatf.bizszam, ISNULL(dbo.ugyletek.ugyletkod, '') AS ugyletkod, SUM(dbo.vevo_arajanlatt.mennyiseg * dbo.vevo_arajanlatt.belfoldi_ar) AS ertek, dbo.vevok.VEVO_NEV, dbo.vevo_arajanlatf.datum, dbo.belepes.TELJESNEV AS kereskedo, dbo.broker_allapotok.allapot_nev, dbo.vevo_arajanlatf.vevo_kod, dbo.vevo_arajanlatf.allapot, dbo.vevo_arajanlatf.keres_rogzitette AS kereskedo_kod, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.megjegyzes, dbo.vevo_arajanlatf.keres_rogzitve, dbo.vevo_arajanlatf.hatarido, dbo.vevo_arajanlatf.fiz_modja, ISNULL(dbo.ugyletek.biztipus, '') AS biztipus, dbo.vevo_arajanlatf.kedvezmeny, dbo.vevo_arajanlatf.arcsoport, dbo.vevo_arajanlatf.akciocsoport, dbo.vevo_arajanlatf.afamentes, dbo.vevo_arajanlatf.ajanlat_penznem, dbo.vevo_arajanlatf.datum_ig, dbo.vevo_arajanlatf.fizhat FROM dbo.vevo_arajanlatf INNER JOIN dbo.vevo_arajanlatt ON dbo.vevo_arajanlatf.bizszam = dbo.vevo_arajanlatt.bizszam INNER JOIN dbo.vevok ON dbo.vevo_arajanlatf.vevo_kod = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_arajanlatf.keres_rogzitette = dbo.belepes.ROVIDNEV INNER JOIN dbo.broker_allapotok ON dbo.vevo_arajanlatf.allapot = dbo.broker_allapotok.allapot_kod LEFT OUTER JOIN dbo.ugyletek ON dbo.vevo_arajanlatf.bizszam = dbo.ugyletek.bizszam AND dbo.ugyletek.biztipus = 'vevo_arajan' GROUP BY dbo.vevo_arajanlatf.bizszam, dbo.ugyletek.ugyletkod, dbo.vevok.VEVO_NEV, dbo.vevo_arajanlatf.datum, dbo.belepes.TELJESNEV, dbo.broker_allapotok.allapot_nev, dbo.vevo_arajanlatf.vevo_kod, dbo.vevo_arajanlatf.allapot, dbo.vevo_arajanlatf.keres_rogzitette, dbo.vevo_arajanlatf.vevo_penznem, dbo.vevo_arajanlatf.megjegyzes, dbo.vevo_arajanlatf.keres_rogzitve, dbo.vevo_arajanlatf.hatarido, dbo.vevo_arajanlatf.fiz_modja, dbo.ugyletek.biztipus, dbo.vevo_arajanlatf.kedvezmeny, dbo.vevo_arajanlatf.arcsoport, dbo.vevo_arajanlatf.akciocsoport, dbo.vevo_arajanlatf.afamentes, dbo.vevo_arajanlatf.ajanlat_penznem, dbo.vevo_arajanlatf.datum_ig, dbo.vevo_arajanlatf.fizhat GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arajanlatt] AS SELECT dbo.vevo_arajanlatt.bizszam, dbo.vevo_arajanlatt.tetel, dbo.vevo_arajanlatt.cikk_szam, dbo.vevo_arajanlatt.mennyiseg, dbo.vevo_arajanlatt.belfoldi_ar, dbo.vevo_arajanlatt.belfoldi_penznem, dbo.vevo_arajanlatt.belfoldi_szallito, dbo.vevo_arajanlatt.belfoldi_keszlet, dbo.vevo_arajanlatt.belfoldi_szallitas_nap, ISNULL(szallito_1.SZALL_NEV, '') AS szall_nev, dbo.cikkek.CIKK_NEV, dbo.vevo_arajanlatt.beszerzesi_ar, dbo.vevo_arajanlatt.beszerzesi_penznem, dbo.vevo_arajanlatt.beszerzesi_szallito, dbo.vevo_arajanlatt.beszerzesi_keszlet, dbo.vevo_arajanlatt.beszerzesi_kurzus, dbo.vevo_arajanlatt.beszerzesi_szallitas_nap, dbo.vevo_arajanlatt.kiajanlott_ar, dbo.vevo_arajanlatt.kiajanlott_szallitas_nap, dbo.vevo_arajanlatt.cikk_tipus, dbo.cikk_tipusok.tipus_nev, ISNULL(dbo.szallito.SZALL_NEV, '') AS beszerzesi_szallito_nev, dbo.vevo_arajanlatt.kozbesz_ar, dbo.vevo_arajanlatt.afa_kulcs, dbo.vevo_arajanlatt.menny_egys, dbo.vevo_arajanlatt.szorzo, dbo.vevo_arajanlatt.kedvezmeny, dbo.vevo_arajanlatt.megjegyzes, ISNULL(dbo.afa_kulcs.afaertek, 0) AS afaertek, dbo.vevo_arajanlatt.garancia, dbo.vevo_arajanlatt.beszerzesi_bizszam, dbo.vevo_arajanlatt.beszerzesi_tetel FROM dbo.vevo_arajanlatt INNER JOIN dbo.cikkek ON dbo.vevo_arajanlatt.cikk_szam = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.afa_kulcs ON dbo.vevo_arajanlatt.afa_kulcs = dbo.afa_kulcs.AFAKULCS LEFT OUTER JOIN dbo.cikk_tipusok ON dbo.vevo_arajanlatt.cikk_tipus = dbo.cikk_tipusok.kod LEFT OUTER JOIN dbo.szallito ON dbo.vevo_arajanlatt.beszerzesi_szallito = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.szallito AS szallito_1 ON dbo.vevo_arajanlatt.belfoldi_szallito = szallito_1.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arak] AS SELECT dbo.vevo_arcsoport.NEV, varcsop_arak.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.afa_kulcs.afaertek, varcsop_arak.netto_ar, dbo.Netto2Brutto(varcsop_arak.netto_ar, dbo.afa_kulcs.AFAKULCS) AS brutto_ar FROM dbo.varcsop_arak(LEFT(dbo.myGetDate(), 7)) AS varcsop_arak INNER JOIN dbo.vevo_arcsoport ON varcsop_arak.arcsoport = dbo.vevo_arcsoport.KOD INNER JOIN dbo.cikkek ON varcsop_arak.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.cikkek.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arak_karb] AS SELECT tipus, datum, vdatum, vevo, cikk_szam, cikk_nev, cikkcsop2, netto_ar, arcsoport FROM dbo.vevo_arak_karb('2009.01.01', 0, 0) AS vevo_arak_karb_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_arf] AS SELECT dbo.vevo_arf.ARCSOPORT, dbo.vevo_arf.IND_TIPUS, dbo.vevo_arf.kicsoda, dbo.vevo_arf.modositva, dbo.belepes.TELJESNEV FROM dbo.vevo_arf INNER JOIN dbo.belepes ON dbo.vevo_arf.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_art] AS SELECT dbo.vevo_art.ARCSOPORT, dbo.vevo_art.sorrend, dbo.vevo_art.CIKK_CSOP, dbo.vevo_art.FELAR, ISNULL(dbo.szallito.SZALL_NEV, '') AS szall_nev, ISNULL(dbo.stcikk2.cikk_nev, '') AS cikk_nev, dbo.vevo_art.szallito, dbo.vevo_art.gyarto AS gyarto_kod, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev FROM dbo.vevo_art LEFT OUTER JOIN dbo.gyarto ON dbo.vevo_art.gyarto = dbo.gyarto.kod LEFT OUTER JOIN dbo.stcikk2 ON dbo.vevo_art.CIKK_CSOP = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.szallito ON dbo.vevo_art.szallito = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_biz_fizetve] AS SELECT TOP (100) PERCENT biz_tipus, bizszam, vevo_nev, szla_datum, fizmod_nev, fiz_esed, CASE WHEN (penznem = 'HUF' AND fiz_modja = '3' AND dbo.xrfuggveny('PUKerekitKp') = '1') OR (penznem = 'HUF' AND fiz_modja = 'X' AND dbo.xrfuggveny('PUKerekitBankKartya') = '1') THEN dbo.round5(brutto_ertek) ELSE brutto_ertek END AS brutto_ertek, fizetve, hatralek, fizetett, fiz_modja, vevo, xbizszam, telj_datum, kicsoda, teljesnev, keszult, fiz_datum, torolt, torlo, ut_fizetes, penznem, kurzus, modositva, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, uzletkoto, vevo_arcsoport FROM dbo.vevo_biz_fizetve() AS vevo_biz_fizetve_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_elabe] AS SELECT dbo.vevo_szlef.VEVO, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlet.CIKK_SZAM, dbo.cikkek.aru_szolg, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, SUM(dbo.mozgas.EDARAB * dbo.keszlet.EGYSEG_AR) AS beszerz_ertek FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.keszlet INNER JOIN dbo.mozgas ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM ON dbo.vevo_szlet.BIZSZAM = dbo.mozgas.BIZSZAM AND dbo.vevo_szlet.TETEL = dbo.mozgas.TETEL INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM WHERE (dbo.mozgas.MOZGASKOD = 'vevo_szle') GROUP BY dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.VEVO, dbo.cikkek.aru_szolg, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_ido_osszesit] AS SELECT dbo.vevo_ido_szlaf.kod, dbo.vevo_ido_szlaf.nev, dbo.vevo_ido_szlaf.fix_ar, dbo.cikkek.CIKK_NEV, SUM(dbo.vevo_ido_szlat.darab) AS darab, SUM(dbo.vevo_ido_szlat.darab * dbo.vevo_ido_szlat.egyseg_ar) AS egyseg_ar, dbo.stcikk2.cikk_nev AS csoportnev FROM dbo.vevo_ido_szlaf INNER JOIN dbo.vevo_ido_szlat ON dbo.vevo_ido_szlaf.kod = dbo.vevo_ido_szlat.kod INNER JOIN dbo.cikkek ON dbo.vevo_ido_szlat.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam GROUP BY dbo.vevo_ido_szlaf.kod, dbo.vevo_ido_szlaf.nev, dbo.vevo_ido_szlaf.fix_ar, dbo.cikkek.CIKK_NEV, dbo.stcikk2.cikk_nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_ido_szlat] AS SELECT dbo.vevo_ido_szlat.kod, dbo.vevo_ido_szlat.vevo_kod, dbo.vevo_ido_szlat.vevo_tel, dbo.vevo_ido_szlat.fiz_modja, dbo.vevo_ido_szlat.fiz_esed, dbo.vevo_ido_szlat.raktar_kod, dbo.vevo_ido_szlat.cikk_szam, dbo.vevo_ido_szlat.darab, dbo.vevo_ido_szlat.egyseg_ar, dbo.vevok.VEVO_NEV, dbo.vevo_tel.TELEP_NEV, dbo.cikkek.CIKK_NEV, dbo.cikkek.aru_szolg, dbo.cikkek.MENNY_EGYS, dbo.cikkek.AFA_KULCS, dbo.fizmodok.NEV AS fizmod_nev, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.raktarak.nev AS raktar_nev FROM dbo.vevo_ido_szlat INNER JOIN dbo.vevok ON dbo.vevo_ido_szlat.vevo_kod = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_tel ON dbo.vevok.VEVO_KOD = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_ido_szlat.vevo_tel = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.cikkek ON dbo.vevo_ido_szlat.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.fizmodok ON dbo.vevo_ido_szlat.fiz_modja = dbo.fizmodok.KOD INNER JOIN dbo.raktarak ON dbo.vevo_ido_szlat.raktar_kod = dbo.raktarak.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_kedv] AS SELECT vevo_kod, 1 AS tipus, vevo_kedv.ertek, stcikk2.cikk_nev AS megnevezes, vevo_kedv.kedvezmeny FROM vevo_kedv INNER JOIN stcikk2 ON vevo_kedv.tipus = 1 AND stcikk2.cikk_szam = vevo_kedv.ertek UNION all SELECT vevo_kod, 2 AS tipus, vevo_kedv.ertek, szallito.szall_nev, vevo_kedv.kedvezmeny FROM vevo_kedv INNER JOIN szallito ON vevo_kedv.tipus = 2 AND szallito.szall_kod = vevo_kedv.ertek UNION all SELECT vevo_kod, 3 AS tipus, vevo_kedv.ertek, gyarto.nev, vevo_kedv.kedvezmeny FROM vevo_kedv INNER JOIN gyarto ON vevo_kedv.tipus = 3 AND gyarto.kod = vevo_kedv.ertek UNION all SELECT vevo_kod, 4 AS tipus, vevo_kedv.ertek, vevo_kedv.ertek, vevo_kedv.kedvezmeny FROM vevo_kedv WHERE vevo_kedv.tipus = 4 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_ker] AS SELECT VEVO_KOD, VEVO_NEV, VAROS, IRANYITO, dbo.VevoCimsor(VEVO_KOD) AS cim, FIZMOD, FIZHAT, vevo_arcsoport, vevo_akc_csoport, KEDVEZMENY, sajat_bolt, Viszontelado, fordafa, ADOSZAM FROM dbo.vevok GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_pszla_ertek] AS SELECT dbo.vevo_pszlaf.VEVO, dbo.vevo_pszlaf.BIZSZAM, dbo.vevo_pszlaf.TELJ_DATUM, dbo.vevo_pszlaf.SZLA_DATUM, dbo.vevo_pszlaf.FIZ_MODJA, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_pszlaf.FIZ_ESED, dbo.vevo_pszlaf.penznem, dbo.vevo_pszlaf.kurzus, dbo.vevo_pszlaf.kedvezmeny, dbo.vevo_pszlaf.UZLETKOTO, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevo_pszlaf.MEGJEGYZES, dbo.vevo_pszlaf.TOROLT, dbo.vevo_pszlaf.TORLO, dbo.vevo_pszlaf.VISSZARU, dbo.belepes.TELJESNEV, dbo.vevo_pszlaf.MODOSITVA, ISNULL(SUM((dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR) * (100 - dbo.vevo_pszlat.kedvezmeny) / 100) * (100 - dbo.vevo_pszlaf.kedvezmeny) / 100, 0) AS netto_ertek, ROUND(ISNULL(SUM((CASE vevo_pszlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR)) * ((100 - dbo.vevo_pszlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_pszlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, ROUND(ISNULL(SUM((CASE vevo_pszlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR * dbo.vevo_pszlaf.kurzus)) * ((100 - dbo.vevo_pszlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_pszlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertekft, ISNULL(SUM((dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR) * (100 - dbo.vevo_pszlat.kedvezmeny) / 100) * (dbo.vevo_pszlaf.kedvezmeny / 100), 0) AS veng_ertek, dbo.parameterek.ERTEK AS alappenznem, dbo.vevo_pszlaf.TIPUS, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_pszlaf.KICSODA, dbo.vevo_pszlaf.peldany, dbo.vevo_pszlaf.VEVO_NEV, COUNT(*) AS tetel_db FROM dbo.fizmodok INNER JOIN dbo.vevo_pszlaf INNER JOIN dbo.vevok ON dbo.vevo_pszlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_pszlaf.KICSODA = dbo.belepes.ROVIDNEV ON dbo.fizmodok.KOD = dbo.vevo_pszlaf.FIZ_MODJA INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_pszlaf.TIPUS = dbo.ertekesit_tipus.kod LEFT OUTER JOIN dbo.afa_kulcs INNER JOIN dbo.vevo_pszlat ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_pszlat.AFA_KULCS ON dbo.vevo_pszlaf.BIZSZAM = dbo.vevo_pszlat.BIZSZAM LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_pszlaf.UZLETKOTO = dbo.uzletkoto.kod CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_pszlaf.VEVO_NEV, dbo.vevo_pszlaf.BIZSZAM, dbo.vevo_pszlaf.TELJ_DATUM, dbo.vevo_pszlaf.SZLA_DATUM, dbo.vevo_pszlaf.FIZ_MODJA, dbo.vevo_pszlaf.FIZ_ESED, dbo.vevo_pszlaf.penznem, dbo.vevo_pszlaf.kurzus, dbo.vevo_pszlaf.kedvezmeny, dbo.vevo_pszlaf.UZLETKOTO, dbo.uzletkoto.nev, dbo.vevo_pszlaf.MEGJEGYZES, dbo.vevo_pszlaf.TOROLT, dbo.vevo_pszlaf.TORLO, dbo.vevo_pszlaf.VISSZARU, dbo.belepes.TELJESNEV, dbo.vevo_pszlaf.MODOSITVA, dbo.fizmodok.NEV, dbo.vevo_pszlaf.VEVO, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO, dbo.vevo_pszlaf.TIPUS, dbo.ertekesit_tipus.nev, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_pszlaf.KICSODA, dbo.vevo_pszlaf.peldany HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_pszla_nyomt] AS SELECT dbo.vevo_pszlaf.BIZSZAM, dbo.vevo_pszlaf.TELJ_DATUM, dbo.vevo_pszlaf.SZLA_DATUM, dbo.vevo_pszlaf.FIZ_MODJA, dbo.vevo_pszlaf.FIZ_ESED, dbo.vevo_pszlaf.penznem, dbo.vevo_pszlaf.kurzus, dbo.vevo_pszlaf.afamentes, dbo.vevo_pszlaf.kedvezmeny, dbo.vevo_pszlaf.TIPUS, dbo.vevo_pszlaf.UZLETKOTO, dbo.vevo_pszlaf.MEGJEGYZES, dbo.vevo_pszlaf.TOROLT, dbo.vevo_pszlaf.TORLO, dbo.vevo_pszlaf.TOR_SSZ, dbo.vevo_pszlaf.VISSZARU, dbo.vevo_pszlaf.KICSODA, dbo.belepes.TELJESNEV, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_pszlat.TETEL, dbo.vevo_pszlat.CIKK_SZAM, dbo.vevo_pszlat.AFA_KULCS, dbo.vevo_pszlat.MENNY_EGYS, dbo.vevo_pszlat.SZORZO, dbo.vevo_pszlat.edarab, dbo.vevo_pszlat.darab, dbo.vevo_pszlat.EGYSEG_AR, dbo.vevo_pszlat.kedvezmeny AS tet_kedvezmeny, dbo.vevo_pszlat.megjegyzes AS tet_megjegyzes, dbo.vevo_pszlat.akcio, dbo.afa_kulcs.afaertek, dbo.vevo_pszlat.CIKK_NEV, dbo.cikkek.VTSZ, dbo.vevo_pszlaf.VEVO_NEV, dbo.vevok.IRANYITO, dbo.vevok.VAROS, dbo.vevok.orszag, dbo.VevoCimsor(dbo.vevo_pszlaf.VEVO) AS cim, dbo.vevok.ADOSZAM, dbo.vevok.JOVEDEKI, dbo.vevok.eu_adoszam, (dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR) * (100 - dbo.vevo_pszlat.kedvezmeny) / 100 AS netto, (dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR) * (100 - dbo.vevo_pszlat.kedvezmeny) / 100 * dbo.afa_kulcs.afaertek / 100 AS tafaert, ((dbo.vevo_pszlat.edarab * dbo.vevo_pszlat.EGYSEG_AR) * (100 - dbo.vevo_pszlat.kedvezmeny) / 100) * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto, dbo.vevo_pszlaf.peldany, dbo.parameterek.ERTEK AS nemakciosra, ISNULL(dbo.vonal.VONALKOD, '') AS VONALKOD, ISNULL(parameterek_1.ERTEK, 'N') AS kellvcikkszam, dbo.cikkek.VCIKKSZAM, dbo.cikkek.cikk_nev_ang, dbo.cikkek.menny_egys_ang FROM dbo.vevo_pszlaf INNER JOIN dbo.vevo_pszlat ON dbo.vevo_pszlaf.BIZSZAM = dbo.vevo_pszlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_pszlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_pszlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.vevo_pszlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_pszlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.cikkek ON dbo.vevo_pszlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' CROSS JOIN dbo.parameterek CROSS JOIN dbo.parameterek AS parameterek_1 WHERE (dbo.parameterek.AZONOSITO = 'ErtVegosszegEngErv') AND (parameterek_1.AZONOSITO = 'SzallitoCikkszam') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_pszlaf] AS SELECT dbo.vevo_pszlaf.BIZSZAM, dbo.vevo_pszlaf.VEVO, dbo.vevo_pszlaf.VEVO_NEV, dbo.vevo_pszlaf.TELJ_DATUM, dbo.vevo_pszlaf.SZLA_DATUM, dbo.vevo_pszlaf.FIZ_MODJA, dbo.vevo_pszlaf.FIZ_ESED, dbo.vevo_pszlaf.penznem, dbo.vevo_pszlaf.kurzus, dbo.vevo_pszlaf.afamentes, dbo.vevo_pszlaf.kedvezmeny, dbo.vevo_pszlaf.TIPUS, dbo.vevo_pszlaf.UZLETKOTO, dbo.vevo_pszlaf.MEGJEGYZES, dbo.vevo_pszlaf.TOROLT, dbo.vevo_pszlaf.TORLO, dbo.vevo_pszlaf.TOR_SSZ, dbo.vevo_pszlaf.VISSZARU, dbo.vevo_pszlaf.KICSODA, dbo.vevo_pszlaf.MODOSITVA, dbo.vevo_pszlaf.peldany, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.belepes.TELJESNEV, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.fizmodok.NEV AS fizmod_nev FROM dbo.vevo_pszlaf INNER JOIN dbo.belepes ON dbo.vevo_pszlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.vevo_pszlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_pszlaf.TIPUS = dbo.ertekesit_tipus.kod LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_pszlaf.UZLETKOTO = dbo.uzletkoto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_pszlat] AS SELECT dbo.vevo_pszlat.BIZSZAM, dbo.vevo_pszlat.TETEL, dbo.vevo_pszlat.CIKK_SZAM, dbo.vevo_pszlat.CIKK_NEV, dbo.vevo_pszlat.AFA_KULCS, dbo.vevo_pszlat.MENNY_EGYS, dbo.vevo_pszlat.SZORZO, dbo.vevo_pszlat.edarab, dbo.vevo_pszlat.darab, dbo.vevo_pszlat.EGYSEG_AR, dbo.vevo_pszlat.kedvezmeny, dbo.vevo_pszlat.megjegyzes, dbo.vevo_pszlat.akcio, dbo.afa_kulcs.afaertek FROM dbo.vevo_pszlat INNER JOIN dbo.afa_kulcs ON dbo.vevo_pszlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_ren] AS SELECT TOP (100) PERCENT dbo.vevo_renf.BIZSZAM, dbo.vevok.VEVO_NEV, dbo.orszagok.nev_hu AS orszag, dbo.vevo_renf.REND_DAT, dbo.vevo_renf.SZALL_DAT, dbo.vevo_renf.visszaig_dat, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto, dbo.vevo_renf.kedvezmeny AS vegosszeg_kedv, dbo.vevo_renf.MEGJEGYZES, dbo.belepes.TELJESNEV AS keszitette, dbo.vevo_renf.MODOSITVA AS keszult, dbo.vevo_rent.TETEL, dbo.vevo_rent.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.vevo_rent.MENNY_EGYS, dbo.vevo_rent.SZORZO, dbo.vevo_rent.EDARAB AS rendelt, dbo.vevo_rent.DARAB AS hatralek, dbo.vevo_rent.EGYSEG_AR, dbo.vevo_renf.penznem, dbo.vevo_rent.kedvezmeny, dbo.vevo_rent.afa_kulcs, dbo.cikkek.VTSZ, SUBSTRING(dbo.vevo_renf.REND_DAT, 6, 2) AS honap, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.db_sulya * dbo.vevo_rent.EDARAB * dbo.vevo_rent.SZORZO AS teljes_suly, dbo.cikkek.db_br_sulya * dbo.vevo_rent.EDARAB * dbo.vevo_rent.SZORZO AS teljes_br_suly FROM dbo.vevo_renf INNER JOIN dbo.vevo_rent ON dbo.vevo_renf.BIZSZAM = dbo.vevo_rent.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_renf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.cikkek ON dbo.vevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.vevok.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_renf.UZLETKOTO = dbo.uzletkoto.kod ORDER BY dbo.vevo_renf.BIZSZAM, dbo.vevo_rent.TETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rend_ekaer] AS SELECT dbo.deviza.kurzus, dbo.vevo_renf.kedvezmeny AS vkedv, dbo.vevo_rent.BIZSZAM, dbo.vevo_rent.TETEL, dbo.cikkek.VTSZ, dbo.vevo_rent.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.vevo_rent.EGYSEG_AR, dbo.vevo_rent.kedvezmeny, dbo.cikkek.db_br_sulya, dbo.cikkek.kockazatos, dbo.vevo_rent.EDARAB AS darab, dbo.vevo_rent.SZORZO FROM dbo.vevo_rent INNER JOIN dbo.vevo_renf ON dbo.vevo_renf.BIZSZAM = dbo.vevo_rent.BIZSZAM INNER JOIN dbo.deviza ON dbo.deviza.penznem = dbo.vevo_renf.penznem INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_rent.CIKK_SZAM WHERE (dbo.cikkek.aru_szolg = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rend_ertek] AS SELECT dbo.vevo_renf.BIZSZAM, dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim, dbo.vevo_renf.REND_DAT, dbo.vevo_renf.SZALL_DAT, dbo.vevo_renf.visszaig_dat, dbo.vevo_renf.UZLETKOTO, dbo.vevo_renf.kedvezmeny, dbo.vevo_renf.penznem, dbo.vevo_renf.afamentes, dbo.vevo_renf.AKCIOCSOPORT, dbo.vevo_renf.ARCSOPORT, dbo.vevo_renf.MEGJEGYZES, dbo.vevo_renf.BIZTIPUS, dbo.vevo_renf.ALLAPOT, dbo.vevo_renf.KICSODA, dbo.vevo_renf.MODOSITVA, dbo.belepes.TELJESNEV, dbo.vevo_tel.TELEP_NEV, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevok.VEVO_NEV, dbo.deviza.kurzus, ISNULL(SUM((dbo.vevo_rent.EDARAB * dbo.vevo_rent.EGYSEG_AR) * (100 - dbo.vevo_rent.kedvezmeny) / 100) * (100 - dbo.vevo_renf.kedvezmeny) / 100, 0) AS netto_ertek, ISNULL(SUM((CASE vevo_renf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_rent.EDARAB * dbo.vevo_rent.EGYSEG_AR)) * ((100 - dbo.vevo_rent.kedvezmeny) / 100)) * ((100 - dbo.vevo_renf.kedvezmeny) / 100), 0) AS brutto_ertek, ISNULL(SUM(((CASE vevo_renf.afamentes WHEN 0 THEN (100 + dbo.afa_kulcs.afaertek) / 100 WHEN 1 THEN 1 END * dbo.deviza.kurzus) * (dbo.vevo_rent.EDARAB * dbo.vevo_rent.EGYSEG_AR)) * ((100 - dbo.vevo_rent.kedvezmeny) / 100)) * ((100 - dbo.vevo_renf.kedvezmeny) / 100), 0) AS brutto_ertek_ft, ISNULL((100 - dbo.vevo_renf.kedvezmeny) / 100 * SUM((dbo.vevo_rent.DARAB * dbo.vevo_rent.EGYSEG_AR) * (100 - dbo.vevo_rent.kedvezmeny) / 100), 0) AS hnetto_ertek, ISNULL(SUM((CASE vevo_renf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_rent.DARAB * dbo.vevo_rent.EGYSEG_AR)) * ((100 - dbo.vevo_rent.kedvezmeny) / 100)) * ((100 - dbo.vevo_renf.kedvezmeny) / 100), 0) AS hbrutto_ertek, dbo.vevo_renf.IDOPONT, dbo.vevo_renf.raktar_kod, dbo.vevok.vevo_cszcsoport, dbo.vevok.vevo_terulet, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_lanc, dbo.vevok.vevo_csoport, dbo.vevo_tel.vevo_csoport AS telep_csoport, dbo.vevo_tel.vevo_lanc AS telep_lanc, dbo.vevo_tel.vevo_cegjelleg AS telep_cegjelleg, dbo.vevo_tel.vevo_terulet AS telep_terulet FROM dbo.vevo_renf INNER JOIN dbo.vevo_rent ON dbo.vevo_renf.BIZSZAM = dbo.vevo_rent.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_renf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_rent.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.belepes ON dbo.vevo_renf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.vevo_tel ON dbo.vevo_renf.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_renf.szallcim = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.deviza ON dbo.vevo_renf.penznem = dbo.deviza.penznem LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_renf.UZLETKOTO = dbo.uzletkoto.kod GROUP BY dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim, dbo.vevo_renf.REND_DAT, dbo.vevo_renf.SZALL_DAT, dbo.vevo_renf.visszaig_dat, dbo.vevo_renf.UZLETKOTO, dbo.vevo_renf.kedvezmeny, dbo.vevo_renf.penznem, dbo.vevo_renf.afamentes, dbo.vevo_renf.AKCIOCSOPORT, dbo.vevo_renf.ARCSOPORT, dbo.vevo_renf.MEGJEGYZES, dbo.vevo_renf.BIZTIPUS, dbo.vevo_renf.ALLAPOT, dbo.vevo_renf.KICSODA, dbo.vevo_renf.MODOSITVA, dbo.belepes.TELJESNEV, dbo.vevo_renf.BIZSZAM, dbo.vevo_tel.TELEP_NEV, dbo.uzletkoto.nev, dbo.vevok.VEVO_NEV, dbo.deviza.kurzus, dbo.vevo_renf.IDOPONT, dbo.vevo_renf.raktar_kod, dbo.vevok.vevo_cszcsoport, dbo.vevok.vevo_terulet, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_lanc, dbo.vevok.vevo_csoport, dbo.vevo_tel.vevo_csoport, dbo.vevo_tel.vevo_lanc, dbo.vevo_tel.vevo_cegjelleg, dbo.vevo_tel.vevo_terulet GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rend_term] AS SELECT dbo.VEVO_REND_TERM.VEVO_KOD, dbo.VEVO_REND_TERM.SZALL_CIM, dbo.VEVO_REND_TERM.SZCIM_NEV, dbo.VEVO_REND_TERM.EMAILCIM, dbo.VEVO_REND_TERM.EMAILJELSZO, dbo.vevok.VEVO_NEV, dbo.VEVO_REND_TERM.TERM_KOD, dbo.VEVO_REND_TERM.SZLA_KIV, dbo.VEVO_REND_TERM.UTVER, ISNULL(dbo.kivetjog.kivetnev, '') AS KIVETNEV, dbo.VEVO_REND_TERM.KIVETKOD, dbo.VEVO_REND_TERM.BOLT_PRG, dbo.VEVO_REND_TERM.odbc_kapcsolat, dbo.VEVO_REND_TERM.emailuser FROM dbo.VEVO_REND_TERM INNER JOIN dbo.vevok ON dbo.VEVO_REND_TERM.VEVO_KOD = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.kivetjog ON dbo.VEVO_REND_TERM.KIVETKOD = dbo.kivetjog.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_renf] AS SELECT dbo.vevo_renf.BIZSZAM, dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim, dbo.vevo_renf.REND_DAT, dbo.vevo_renf.SZALL_DAT, dbo.vevo_renf.visszaig_dat, dbo.vevo_renf.kedvezmeny, dbo.vevo_renf.penznem, dbo.vevo_renf.afamentes, dbo.vevo_renf.ARCSOPORT, dbo.vevo_renf.AKCIOCSOPORT, dbo.vevo_renf.MEGJEGYZES, dbo.vevo_renf.BIZTIPUS, dbo.vevo_renf.ALLAPOT, dbo.vevo_renf.KICSODA, dbo.vevo_renf.MODOSITVA, dbo.vevok.VEVO_NEV, dbo.belepes.TELJESNEV, dbo.vevo_renf.UZLETKOTO, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.VAROS, dbo.vevo_tel.IRANYITO, dbo.vevo_tel.CIM, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_arcsoport.NEV AS arcsoport_nev, ISNULL(dbo.vevo_akc_csoport.nev, '') AS akc_csoport_nev, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevo_renf.IDOPONT, dbo.deviza.kurzus, dbo.vevo_renf.raktar_kod, ISNULL(dbo.raktarak.nev, '') AS raktarnev FROM dbo.vevo_renf INNER JOIN dbo.vevok ON dbo.vevo_renf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_renf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.vevo_tel ON dbo.vevo_renf.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_renf.szallcim = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.vevo_arcsoport ON dbo.vevo_renf.ARCSOPORT = dbo.vevo_arcsoport.KOD INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_renf.BIZTIPUS = dbo.ertekesit_tipus.kod INNER JOIN dbo.deviza ON dbo.vevo_renf.penznem = dbo.deviza.penznem LEFT OUTER JOIN dbo.raktarak ON dbo.vevo_renf.raktar_kod = dbo.raktarak.kod LEFT OUTER JOIN dbo.vevo_akc_csoport ON dbo.vevo_renf.AKCIOCSOPORT = dbo.vevo_akc_csoport.kod LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_renf.UZLETKOTO = dbo.uzletkoto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_rent_agy] AS SELECT dbo.vevo_rent.BIZSZAM, dbo.vevo_rent.TETEL, dbo.vevo_rent.CIKK_SZAM, dbo.cikkek.aru_szolg, dbo.cikkek.GONGYOLEG, dbo.cikkek.CIKK_NEV, dbo.vevo_rent.MENNY_EGYS, dbo.vevo_rent.SZORZO, dbo.vevo_rent.DARAB, dbo.cikkek.POLC, dbo.cikkek.CIKKCSOP2, dbo.stcikk2.cikk_nev AS CSOPORT_NEV FROM dbo.vevo_rent INNER JOIN dbo.cikkek ON dbo.vevo_rent.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szall] AS SELECT dbo.vevo_szall.vevo_kod, dbo.vevo_szall.szall_kod, dbo.szallito.SZALL_NEV, dbo.vevok.VEVO_NEV FROM dbo.vevo_szall INNER JOIN dbo.vevok ON dbo.vevo_szall.vevo_kod = dbo.vevok.VEVO_KOD INNER JOIN dbo.szallito ON dbo.vevo_szall.szall_kod = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szl_fizetesek] AS SELECT dbo.vevo_szl_fizetesek.biz_tipus, dbo.vevo_szl_fizetesek.bizszam, dbo.vevo_szl_fizetesek.osszeg, dbo.vevo_szl_fizetesek.fiz_datum, dbo.vevo_szl_fizetesek.kicsoda, dbo.vevo_szl_fizetesek.rog_datum, dbo.belepes.TELJESNEV FROM dbo.vevo_szl_fizetesek INNER JOIN dbo.belepes ON dbo.vevo_szl_fizetesek.kicsoda = dbo.belepes.ROVIDNEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szl_fizetve] AS SELECT TOP (100) PERCENT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlaf.FIZ_ESED, ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0) AS brutto_ertek, ISNULL(dbo.vevo_szl_fizetve.fizetve, ' ') AS fizetve, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.VEVO, dbo.SzlaSzamOrder(dbo.vevo_szlaf.BIZSZAM) AS xbizszam, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szl_fizetve.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_szl_fizetve.keszult, dbo.vevo_szl_fizetve.biz_tipus, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus FROM dbo.belepes INNER JOIN dbo.vevo_szl_fizetve ON dbo.belepes.ROVIDNEV = dbo.vevo_szl_fizetve.kicsoda RIGHT OUTER JOIN dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS ON dbo.vevo_szl_fizetve.bizszam = dbo.vevo_szlaf.BIZSZAM GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szl_fizetve.fizetve, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.VEVO, dbo.SzlaSzamOrder(dbo.vevo_szlaf.BIZSZAM), dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szl_fizetve.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_szl_fizetve.keszult, dbo.vevo_szl_fizetve.biz_tipus, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus ORDER BY xbizszam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla] AS SELECT TOP (100) PERCENT dbo.vevo_szlaf.BIZSZAM, dbo.vevok.VEVO_NEV, dbo.orszagok.nev_hu AS orszag, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.fizmodok.NEV AS fizetes_modja, dbo.vevo_szlaf.FIZ_ESED, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto, dbo.vevo_szlaf.kedvezmeny AS vegosszeg_kedv, dbo.vevo_szlaf.MEGJEGYZES, dbo.belepes.TELJESNEV AS keszitette, dbo.vevo_szlaf.MODOSITVA AS keszult, dbo.vevo_szlat.TETEL, dbo.vevo_szlat.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.vevo_szlat.MENNY_EGYS, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.edarab, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlat.kedvezmeny, ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 - dbo.vevo_szlat.kedvezmeny) / 10000 AS ertek, ((dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 - dbo.vevo_szlat.kedvezmeny) / 10000 AS ertek_ft, dbo.ElabeSzlaTetel(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL) AS elabe, (dbo.vevo_szlaf.kurzus * ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlaf.kedvezmeny))) * (100 - dbo.vevo_szlat.kedvezmeny) / 10000 - dbo.ElabeSzlaTetel(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL) AS arres, CASE dbo.ElabeSzlaTetel(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL) WHEN 0 THEN 0 ELSE 100 * ((dbo.vevo_szlaf.kurzus * ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlaf.kedvezmeny))) * (100 - dbo.vevo_szlat.kedvezmeny) / 10000 - dbo.ElabeSzlaTetel(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL)) / dbo.ElabeSzlaTetel(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL) END AS arres_szaz, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.megjegyzes AS tet_megjegyzes, dbo.cikkek.VTSZ, SUBSTRING(dbo.vevo_szlaf.TELJ_DATUM, 6, 2) AS honap, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.db_sulya * dbo.vevo_szlat.darab * dbo.vevo_szlat.SZORZO AS teljes_suly, dbo.cikkek.db_br_sulya * dbo.vevo_szlat.darab * dbo.vevo_szlat.SZORZO AS teljes_br_suly FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.vevo_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlaf.UZLETKOTO = dbo.uzletkoto.kod ORDER BY dbo.SzlaSzamOrder(dbo.vevo_szlaf.BIZSZAM), dbo.vevo_szlat.TETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_edi] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.cim, dbo.vevo_szlaf.iso, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.kerulet, dbo.vevo_szlaf.kozterulet_jellege, dbo.vevo_szlaf.hazszam, dbo.vevo_szlaf.epulet, dbo.vevo_szlaf.lepcsohaz, dbo.vevo_szlaf.szint, dbo.vevo_szlaf.ajto, ISNULL(dbo.edi_partner.edi_azon, '') AS edi_telep, ISNULL(edi_partner_1.edi_azon, '') AS edi_vevo, dbo.cikkek.VTSZ, dbo.vevo_szlat.TETEL, dbo.vevo_szlat.CIKK_SZAM, dbo.vevo_szlat.CIKK_NEV, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.edarab, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlat.kedvezmeny AS tkedv, dbo.afa_kulcs.afaertek AS afa_num, dbo.vevo_szlef.TELJ_DATUM AS szle_telj_datum, dbo.vevo_szlef.BIZSZAM AS szle_bizszam, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.VAROS AS tvaros, dbo.vevo_tel.IRANYITO AS tiranyito, dbo.vevo_tel.CIM AS tcim, dbo.vevo_tel.iso AS tiso, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod, dbo.vevo_szlaf.kadoszam, dbo.vevo_szlaf.knev, dbo.vevo_szlaf.kiranyito, dbo.vevo_szlaf.kvaros, dbo.vevo_szlaf.kkerulet, dbo.vevo_szlaf.kkozterulet, dbo.vevo_szlaf.kkozterulet_jellege, dbo.vevo_szlaf.khazszam, dbo.vevo_szlaf.kepulet, dbo.vevo_szlaf.klepcsohaz, dbo.vevo_szlaf.kszint, dbo.vevo_szlaf.kajto FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlef.SZLASZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD LEFT OUTER JOIN dbo.vonal ON dbo.vevo_szlat.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' LEFT OUTER JOIN dbo.edi_partner AS edi_partner_1 ON dbo.vevo_szlaf.VEVO = edi_partner_1.partner_kod AND edi_partner_1.tipus = 'V' AND edi_partner_1.telep_kod = '0' LEFT OUTER JOIN dbo.edi_partner ON dbo.vevo_szlef.VEVO = dbo.edi_partner.partner_kod AND dbo.vevo_szlef.TELEP_KOD = dbo.edi_partner.telep_kod AND dbo.edi_partner.tipus = 'V' GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_edi_mod] AS SELECT TOP (100) PERCENT dbo.vevo_szlaf.BIZSZAM, vevo_szlaf_1.BIZSZAM AS ere_bizszam, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.cim, dbo.vevo_szlaf.iso, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.kerulet, dbo.vevo_szlaf.kozterulet_jellege, dbo.vevo_szlaf.hazszam, dbo.vevo_szlaf.epulet, dbo.vevo_szlaf.lepcsohaz, dbo.vevo_szlaf.szint, dbo.vevo_szlaf.ajto, dbo.vevo_szlaf.kadoszam, dbo.vevo_szlaf.knev, dbo.vevo_szlaf.kiranyito, dbo.vevo_szlaf.kvaros, dbo.vevo_szlaf.kkerulet, dbo.vevo_szlaf.kkozterulet, dbo.vevo_szlaf.kkozterulet_jellege, dbo.vevo_szlaf.khazszam, dbo.vevo_szlaf.kepulet, dbo.vevo_szlaf.klepcsohaz, dbo.vevo_szlaf.kszint, dbo.vevo_szlaf.kajto, dbo.vevo_szlef.BIZSZAM AS szle_bizszam, ISNULL(edi_partner_1.edi_azon, '') AS edi_telep, ISNULL(dbo.edi_partner.edi_azon, '') AS edi_vevo, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.VAROS AS tvaros, dbo.vevo_tel.IRANYITO AS tiranyito, dbo.vevo_tel.CIM AS tcim, dbo.vevo_tel.iso AS tiso, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod, dbo.cikkek.VTSZ, dbo.vevo_szlat.TETEL, dbo.vevo_szlat.CIKK_SZAM, dbo.vevo_szlat.CIKK_NEV, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.edarab, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlat.kedvezmeny AS tkedv, dbo.afa_kulcs.afaertek AS afa_num, vevo_szlaf_1.SZLA_DATUM AS ere_szla_datum, dbo.vevo_szlef.TELJ_DATUM AS szle_telj_datum, vevo_szlaf_1.MEGJEGYZES AS ere_megjegyzes FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.afa_kulcs.AFAKULCS = dbo.vevo_szlat.AFA_KULCS INNER JOIN dbo.vevo_szlaf AS vevo_szlaf_1 ON LEFT(dbo.vevo_szlaf.MEGJEGYZES, 9) = vevo_szlaf_1.BIZSZAM INNER JOIN dbo.vevo_szlef ON vevo_szlaf_1.BIZSZAM = dbo.vevo_szlef.SZLASZAM INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD AND dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD LEFT OUTER JOIN dbo.vonal ON dbo.vevo_szlat.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.edi_partner ON dbo.vevo_szlaf.VEVO = dbo.edi_partner.partner_kod AND dbo.edi_partner.telep_kod = '0' AND dbo.edi_partner.tipus = 'V' LEFT OUTER JOIN dbo.edi_partner AS edi_partner_1 ON dbo.vevo_szlef.VEVO = edi_partner_1.partner_kod AND dbo.vevo_szlef.TELEP_KOD = edi_partner_1.telep_kod AND dbo.edi_partner.tipus = 'V' WHERE (dbo.vevo_szlaf.penzugyi = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ertek_kosar] AS SELECT dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.UZLETKOTO, dbo.uzletkoto.nev AS uzletkoto_nev, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.belepes.TELJESNEV, dbo.vevo_szlaf.MODOSITVA, ISNULL(SUM((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 - dbo.vevo_szlaf.kedvezmeny) / 100, 0) AS netto_ertek, ROUND(ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, ROUND(ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.vevo_szlaf.kurzus)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertekft, dbo.parameterek.ERTEK AS alappenznem, dbo.vevo_szlaf.TIPUS, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO, dbo.vevo_szlaf.peldany, dbo.vevok.vevo_arcsoport FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.belepes ON dbo.vevo_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlaf.TIPUS = dbo.ertekesit_tipus.kod LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlaf.UZLETKOTO = dbo.uzletkoto.kod CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.UZLETKOTO, dbo.uzletkoto.nev, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.belepes.TELJESNEV, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.MODOSITVA, dbo.fizmodok.NEV, dbo.vevo_szlaf.VEVO, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO, dbo.vevo_szlaf.TIPUS, dbo.ertekesit_tipus.nev, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.cikkek.CIKKCSOP2, dbo.cikkek.SZALLITO, dbo.cikkek.GYARTO, dbo.vevo_szlaf.peldany, dbo.vevok.vevo_arcsoport HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ford] AS SELECT dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.TELJ_DATUM, dbo.vtsz.vtsz, SUM(dbo.vevo_szlat.edarab * dbo.cikkek.db_sulya) AS suly, (SUM(dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 - dbo.vevo_szlat.kedvezmeny) / 10000 AS ertek, dbo.vtsz.vtsz_nev FROM dbo.vevo_szlat INNER JOIN dbo.vevo_szlaf ON dbo.vevo_szlat.BIZSZAM = dbo.vevo_szlaf.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.vevo_szlaf.VEVO INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlat.CIKK_SZAM INNER JOIN dbo.vtsz ON LEFT(dbo.cikkek.VTSZ, 4) = dbo.vtsz.vtsz WHERE (dbo.vevo_szlat.AFA_KULCS = 'FA') GROUP BY dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.TELJ_DATUM, dbo.vtsz.vtsz, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlat.kedvezmeny, dbo.vtsz.vtsz_nev GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_forg_ccs] AS SELECT dbo.vevo_szlaf.VEVO, LEFT(dbo.vevo_szlaf.TELJ_DATUM, 4) AS telj_datum, dbo.stcikk2.cikk_nev, SUM(dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.darab * dbo.vevo_szlat.EGYSEG_AR) AS ertek FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod GROUP BY dbo.vevo_szlaf.VEVO, dbo.stcikk2.cikk_nev, LEFT(dbo.vevo_szlaf.TELJ_DATUM, 4) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_forg_gy] AS SELECT dbo.vevo_szlaf.VEVO, LEFT(dbo.vevo_szlaf.TELJ_DATUM, 4) AS telj_datum, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev, SUM(dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.darab * dbo.vevo_szlat.EGYSEG_AR) AS ertek FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod GROUP BY dbo.vevo_szlaf.VEVO, ISNULL(dbo.gyarto.nev, ''), LEFT(dbo.vevo_szlaf.TELJ_DATUM, 4) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_forgalom] AS SELECT dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.kurzus, dbo.vevo_szlat.darab, dbo.vevo_szlat.EGYSEG_AR, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev, dbo.stcikk2.cikk_nev FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_infoteka] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.KOTEG_SZ, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.cim, dbo.vevo_szlaf.iso, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.kozterulet_jellege, dbo.vevo_szlaf.hazszam, dbo.vevo_szlaf.epulet, dbo.vevo_szlaf.lepcsohaz, dbo.vevo_szlaf.szint, dbo.vevo_szlaf.ajto, dbo.vevo_szlat.CIKK_SZAM, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.darab, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlat.kedvezmeny AS tkedv, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.MODOSITVA FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS WHERE (dbo.vevo_szlaf.TIPUS <> 6) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_nyomt] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.UZLETKOTO, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.KICSODA, dbo.belepes.TELJESNEV, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlat.TETEL, dbo.vevo_szlat.CIKK_SZAM, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.MENNY_EGYS, dbo.cikkek.menny_egys_ang, dbo.cikkek.MENNY_EGYS AS cikkek_me, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.edarab, dbo.vevo_szlat.darab, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlat.kedvezmeny AS tet_kedvezmeny, dbo.vevo_szlat.megjegyzes AS tet_megjegyzes, dbo.vevo_szlat.akcio, dbo.afa_kulcs.afaertek, dbo.vevo_szlat.CIKK_NEV, dbo.cikkek.cikk_nev_ang, dbo.cikkek.CIKK_NEV AS cikkek_nev, dbo.cikkek.VTSZ, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.iso AS orszag, dbo.VevoCimsor1(dbo.vevo_szlaf.BIZSZAM) AS cim, CASE WHEN vevo_szlaf.iso = 'HU' THEN vevo_szlaf.adoszam ELSE '' END AS adoszam, dbo.vevok.JOVEDEKI, CASE WHEN vevo_szlaf.iso <> 'HU' THEN vevo_szlaf.adoszam ELSE '' END AS eu_adoszam, (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100 AS netto, (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100 * dbo.afa_kulcs.afaertek / 100 AS tafaert, ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto, dbo.vevo_szlaf.peldany, ISNULL(dbo.vevo_szlat_td.E1, 0) AS E1, ISNULL(dbo.vevo_szlat_td.E2, 0) AS E2, dbo.parameterek.ERTEK AS nemakciosra, CASE WHEN vevok.vevo_cszcsoport <> 0 THEN 'I' ELSE ISNULL(parameterek_1.ERTEK, 'N') END AS kellvcikkszam, CASE WHEN vevok.vevo_cszcsoport <> 0 THEN isnull(vevo_csz.VEVOCSZ, '') ELSE cikkek.VCIKKSZAM END AS vcikkszam, CASE ISNULL(parameterek_2.ERTEK, 'N') WHEN 'I' THEN ISNULL(vonal.VONALKOD, '') ELSE '' END AS VONALKOD, dbo.vevok.nyelv, dbo.vevok.EMAIL, ROUND(dbo.vevo_szlat.EGYSEG_AR * (100 - dbo.vevo_szlat.kedvezmeny) / 100, 0) AS scandia_ear, dbo.vevo_szlat.edarab * ROUND(dbo.vevo_szlat.EGYSEG_AR * (100 - dbo.vevo_szlat.kedvezmeny) / 100, 0) AS scandia_netto, dbo.vevo_szlat.edarab * ROUND(dbo.vevo_szlat.EGYSEG_AR * (100 - dbo.vevo_szlat.kedvezmeny) / 100, 0) * dbo.afa_kulcs.afaertek / 100 AS scandia_tafaert, (dbo.vevo_szlat.edarab * ROUND(dbo.vevo_szlat.EGYSEG_AR * (100 - dbo.vevo_szlat.kedvezmeny) / 100, 0)) * (100 + dbo.afa_kulcs.afaertek) / 100 AS scandia_brutto, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.lejarat_datuma(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL) AS lejar, ISNULL(dbo.vevok_csoportazon.csoport_azon, '') AS csoport_azon FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' LEFT OUTER JOIN dbo.vevo_cszcsoport ON dbo.vevok.vevo_cszcsoport = dbo.vevo_cszcsoport.KOD LEFT OUTER JOIN dbo.vevo_csz ON dbo.vevo_csz.VEVOCSZCSOP = dbo.vevok.vevo_cszcsoport AND dbo.vevo_szlat.CIKK_SZAM = dbo.vevo_csz.CIKK_SZAM LEFT OUTER JOIN dbo.vevok_csoportazon ON dbo.vevok_csoportazon.vevo_kod = dbo.vevo_szlaf.VEVO LEFT OUTER JOIN dbo.vevo_szlat_td ON dbo.vevo_szlat.BIZSZAM = dbo.vevo_szlat_td.BIZSZAM AND dbo.vevo_szlat.TETEL = dbo.vevo_szlat_td.TETEL CROSS JOIN dbo.parameterek AS parameterek_1 CROSS JOIN dbo.parameterek CROSS JOIN dbo.parameterek AS parameterek_2 WHERE (dbo.parameterek.AZONOSITO = 'ErtVegosszegEngErv') AND (parameterek_1.AZONOSITO = 'SzallitoCikkszam') AND (parameterek_2.AZONOSITO = 'SzlaVonalkod') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_nyomtgy] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.UZLETKOTO, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.KICSODA, dbo.belepes.TELJESNEV, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlat_nyomt.TETEL, dbo.vevo_szlat_nyomt.CIKK_SZAM, dbo.vevo_szlat_nyomt.AFA_KULCS, dbo.vevo_szlat_nyomt.MENNY_EGYS, dbo.vevo_szlat_nyomt.MENNY_EGYS_ANG, dbo.vevo_szlat_nyomt.szorzo, dbo.vevo_szlat_nyomt.darab, dbo.vevo_szlat_nyomt.EGYSEG_AR, dbo.vevo_szlat_nyomt.kedvezmeny AS tet_kedvezmeny, dbo.vevo_szlat_nyomt.megjegyzes AS tet_megjegyzes, dbo.vevo_szlat_nyomt.akcio, dbo.afa_kulcs.afaertek, dbo.vevo_szlat_nyomt.CIKK_NEV, dbo.vevo_szlat_nyomt.CIKK_NEV_ANG, dbo.vevo_szlat_nyomt.VTSZ, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.iso AS orszag, dbo.VevoCimsor(dbo.vevo_szlaf.VEVO) AS cim, dbo.vevo_szlaf.adoszam, dbo.vevok.JOVEDEKI, dbo.vevok.eu_adoszam, (dbo.vevo_szlat_nyomt.darab * dbo.vevo_szlat_nyomt.EGYSEG_AR) * (100 - dbo.vevo_szlat_nyomt.kedvezmeny) / 100 AS netto, (dbo.vevo_szlat_nyomt.darab * dbo.vevo_szlat_nyomt.EGYSEG_AR) * (100 - dbo.vevo_szlat_nyomt.kedvezmeny) / 100 * dbo.afa_kulcs.afaertek / 100 AS tafaert, ((dbo.vevo_szlat_nyomt.darab * dbo.vevo_szlat_nyomt.EGYSEG_AR) * (100 - dbo.vevo_szlat_nyomt.kedvezmeny) / 100) * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto, dbo.vevo_szlaf.peldany, 0 AS E1, 0 AS E2, dbo.parameterek.ERTEK AS nemakciosra FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat_nyomt ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat_nyomt.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat_nyomt.AFA_KULCS = dbo.afa_kulcs.AFAKULCS CROSS JOIN dbo.parameterek WHERE (dbo.parameterek.AZONOSITO = 'ErtVegosszegEngErv') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ol_seged] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.iso, CASE afamentes WHEN '1' THEN 0 ELSE kurzus END * SUM(((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.afa_kulcs.afaertek) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 1000000) AS afaosszeg FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.vevo_szlaf.VEVO INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS WHERE (dbo.vevok.Viszontelado = '1') AND (LEN(dbo.vevok.ADOSZAM) = 13) AND (CHARINDEX('/', dbo.vevo_szlaf.BIZSZAM) > 0) GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.iso HAVING (dbo.vevo_szlaf.TELJ_DATUM >= '2018.07.01') AND (dbo.vevo_szlaf.iso = 'hu') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_ol_seged3] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.iso, CASE afamentes WHEN '1' THEN 0 ELSE kurzus END * SUM(((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.afa_kulcs.afaertek) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 1000000) AS afaosszeg FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.vevo_szlaf.VEVO INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS WHERE (CHARINDEX('/', dbo.vevo_szlaf.BIZSZAM) > 0) GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.adoszam, dbo.vevo_szlaf.iso GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_pr08] AS SELECT TOP (100) PERCENT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.MEGJEGYZES, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.kedvezmeny, dbo.fizmodok.NEV AS fizmod_nev, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.MODOSITVA, ISNULL(SUM(((dbo.vevo_szlaf.kurzus * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000), 0) AS netto_ertek, ROUND(ISNULL(SUM(((dbo.vevo_szlaf.kurzus * CASE vevo_szlaf.afamentes WHEN 0 THEN ((afa_kulcs.afaertek) / 100) WHEN 1 THEN 0 END * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000), 0), CASE penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS afa_ertek, ROUND(ISNULL(SUM(((dbo.vevo_szlaf.kurzus * CASE vevo_szlaf.afamentes WHEN 0 THEN ((100 + afa_kulcs.afaertek) / 100) WHEN 1 THEN 1 END * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000), 0), CASE penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, ISNULL(SUM(((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000), 0) AS netto_dev_ertek, ROUND(ISNULL(SUM(((CASE vevo_szlaf.afamentes WHEN 0 THEN ((afa_kulcs.afaertek) / 100) WHEN 1 THEN 0 END * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000), 0), CASE penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS afa_dev_ertek, ROUND(ISNULL(SUM(((CASE vevo_szlaf.afamentes WHEN 0 THEN ((100 + afa_kulcs.afaertek) / 100) WHEN 1 THEN 1 END * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 10000), 0), CASE penznem WHEN parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_dev_ertek, dbo.vevo_szlaf.iso AS orszag, dbo.devizakod.kod, dbo.orszagok.eu, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.adoszam, dbo.afa_kulcs.AFAKULCS, dbo.vevo_szlaf.TOR_SSZ FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.devizakod ON dbo.vevo_szlaf.penznem = dbo.devizakod.ISO INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.MEGJEGYZES, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.kedvezmeny, dbo.fizmodok.NEV, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.MODOSITVA, dbo.vevo_szlaf.iso, dbo.devizakod.kod, dbo.orszagok.eu, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.adoszam, dbo.afa_kulcs.AFAKULCS, dbo.vevo_szlaf.TOR_SSZ HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_preciz] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.kedvezmeny AS okedv, dbo.vevo_szlaf.KOTEG_SZ, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlat.kedvezmeny, dbo.afa_kulcs.afaertek, dbo.vevo_szlat.edarab FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_revol] AS SELECT dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.penznem, dbo.orszagok.nev_hu, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlaf.kedvezmeny, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.kurzus, (dbo.vevo_szlaf.kurzus * SUM((dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100)) * (100 - dbo.vevo_szlaf.kedvezmeny) / 100 AS netto, (dbo.vevo_szlaf.kurzus * SUM((dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100)) * (100 - dbo.vevo_szlaf.kedvezmeny) * dbo.afa_kulcs.afaertek / 10000 AS afa, (SUM((dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 + dbo.afa_kulcs.afaertek) / 10000 AS bruttopn, SUM((dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 - dbo.vevo_szlaf.kedvezmeny) / 100 AS nettopn, SUM((dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * (100 - dbo.vevo_szlat.kedvezmeny) / 100) * (100 - dbo.vevo_szlaf.kedvezmeny) * dbo.afa_kulcs.afaertek / 10000 AS afapn, dbo.orszagok.eu FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.vevo_szlaf.VEVO INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso GROUP BY dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.penznem, dbo.orszagok.nev_hu, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlaf.kedvezmeny, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.kurzus, dbo.orszagok.eu GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_rlb] AS SELECT dbo.vevo_szlaf.KOTEG_SZ, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.cim, CASE WHEN FIZ_MODJA = '3' THEN 1 ELSE CASE WHEN FIZ_MODJA = '4' THEN 2 ELSE CASE WHEN FIZ_MODJA = '8' THEN 3 ELSE CASE WHEN FIZ_MODJA = 'C' THEN 4 ELSE CASE WHEN FIZ_MODJA = 'X' THEN 5 ELSE 1 END END END END END AS fiz_modja, dbo.vevo_szlaf.adoszam, dbo.vevo_szlat.AFA_KULCS, SUM((dbo.vevo_szlaf.kurzus * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR / 10000) AS netto, SUM((dbo.vevo_szlaf.kurzus * (100 - dbo.vevo_szlaf.kedvezmeny)) * (100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR * dbo.afa_kulcs.afaertek / 1000000) AS afaertek, dbo.vevo_szlaf.MODOSITVA, dbo.VevoCimsor(dbo.vevo_szlaf.VEVO) AS vevocime, dbo.vevo_szlaf.iso, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS WHERE (dbo.vevo_szlaf.TIPUS <> 6) GROUP BY dbo.vevo_szlaf.KOTEG_SZ, dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.iranyito, dbo.vevo_szlaf.varos, dbo.vevo_szlaf.cim, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.adoszam, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlaf.MODOSITVA, dbo.vevo_szlaf.iso, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_xml] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.kadoszam, dbo.regisztral.euadoszam AS keuadoszam, dbo.vevo_szlaf.knev AS felhasznalo, dbo.vevo_szlaf.kiranyito AS iranyito, dbo.vevo_szlaf.kvaros AS varos, dbo.vevo_szlaf.kkozterulet AS cim, CASE WHEN vevok.iso = 'HU' THEN dbo.vevo_szlaf.adoszam ELSE '' END AS vadoszam, CASE WHEN vevok.iso <> 'HU' THEN dbo.vevo_szlaf.adoszam ELSE '' END AS veuadoszam, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.iranyito AS viranyito, dbo.vevo_szlaf.varos AS vvaros, dbo.vevo_szlaf.cim AS vcim, dbo.vevo_szlat.CIKK_NEV, dbo.cikkek.VTSZ, dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO AS mennyiseg, dbo.vevo_szlat.MENNY_EGYS, (100 - dbo.vevo_szlaf.kedvezmeny) * (100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR / 10000 AS netto_ertek, dbo.vevo_szlat.EGYSEG_AR, CONVERT(varchar(10), dbo.afa_kulcs.afaertek) AS afa_kulcs, (100 - dbo.vevo_szlaf.kedvezmeny) * (100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR * dbo.afa_kulcs.afaertek / 1000000 AS afa_ertek, ((100 - dbo.vevo_szlaf.kedvezmeny) * (100 - dbo.vevo_szlat.kedvezmeny) * dbo.vevo_szlat.edarab * dbo.vevo_szlat.SZORZO * dbo.vevo_szlat.EGYSEG_AR) * (100 + dbo.afa_kulcs.afaertek) / 1000000 AS brutto_ertek, dbo.vevo_szlaf.MODOSITVA, dbo.vevo_szlat.kedvezmeny AS tkedvezmeny, dbo.vevo_szlat.EGYSEG_AR * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto_ar, CASE WHEN parameterek.ERTEK = vevo_szlat.cikk_szam THEN CASE WHEN vevo_szlat.edarab > 0 THEN 1 ELSE 2 END ELSE 0 END AS eloleg, CASE WHEN vevo_szlat.afa_kulcs = 'FA' THEN 1 ELSE 0 END AS fordafa, dbo.regisztral.kerulet AS kkerulet, dbo.regisztral.kozterulet_jellege AS kjelleg, dbo.regisztral.hazszam AS khazszam, dbo.regisztral.epulet AS kepulet, dbo.regisztral.lepcsohaz AS klepcsohaz, dbo.regisztral.szint AS kszint, dbo.regisztral.ajto AS kajto, dbo.regisztral.ev_nev, dbo.regisztral.ev_szam, dbo.vevo_szlaf.kerulet, dbo.vevo_szlaf.kozterulet_jellege, dbo.vevo_szlaf.hazszam, dbo.vevo_szlaf.epulet, dbo.vevo_szlaf.lepcsohaz, dbo.vevo_szlaf.szint, dbo.vevo_szlaf.ajto, dbo.fizmodok.NEV, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem FROM dbo.vevo_szlaf INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD CROSS JOIN dbo.parameterek CROSS JOIN dbo.regisztral WHERE (CHARINDEX('/', dbo.vevo_szlaf.BIZSZAM) <> 0) AND (dbo.parameterek.AZONOSITO = 'ElolegCikk') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szla_zeus] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.MEGJEGYZES, dbo.afa_kulcs.afaertek, ROUND(ISNULL(SUM((CASE vevo_szlaf.afamentes WHEN 0 THEN (((100 + dbo.afa_kulcs.afaertek) / 100)) WHEN 1 THEN 1 END * (dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR)) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100), 0), CASE penznem WHEN dbo.parameterek.ERTEK THEN 0 ELSE 2 END) AS brutto_ertek, dbo.vevo_szlaf.kedvezmeny, dbo.fizmodok.NEV AS fizmod_nev FROM dbo.vevo_szlaf INNER JOIN dbo.vevo_szlat ON dbo.vevo_szlaf.BIZSZAM = dbo.vevo_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD CROSS JOIN dbo.parameterek GROUP BY dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.MEGJEGYZES, dbo.afa_kulcs.afaertek, dbo.vevo_szlaf.kedvezmeny, dbo.fizmodok.NEV, dbo.parameterek.ERTEK, dbo.parameterek.AZONOSITO HAVING (dbo.parameterek.AZONOSITO = 'AlapPenznem') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlaf] AS SELECT dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.SZLA_DATUM, dbo.vevo_szlaf.FIZ_MODJA, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.kedvezmeny, dbo.vevo_szlaf.TIPUS, dbo.vevo_szlaf.UZLETKOTO, dbo.vevo_szlaf.penzugyi, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.kurzus, dbo.vevo_szlaf.MEGJEGYZES, dbo.vevo_szlaf.TOROLT, dbo.vevo_szlaf.TORLO, dbo.vevo_szlaf.TOR_SSZ, dbo.vevo_szlaf.VISSZARU, dbo.vevo_szlaf.MODOSITVA, dbo.vevo_szlaf.KICSODA, dbo.vevo_szlaf.VEVO_NEV, dbo.belepes.TELJESNEV, dbo.vevo_szlaf.afamentes, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_szlaf.peldany, dbo.fizmodok.NEV AS fizmod_nev, dbo.ertekesit_tipus.nev AS tipus_nev, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevok.vevo_arcsoport FROM dbo.vevo_szlaf INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_szlaf.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.fizmodok ON dbo.vevo_szlaf.FIZ_MODJA = dbo.fizmodok.KOD INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlaf.TIPUS = dbo.ertekesit_tipus.kod LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlaf.UZLETKOTO = dbo.uzletkoto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlat] AS SELECT dbo.vevo_szlat.BIZSZAM, dbo.vevo_szlat.TETEL, dbo.vevo_szlat.CIKK_SZAM, dbo.vevo_szlat.MENNY_EGYS, dbo.vevo_szlat.SZORZO, dbo.vevo_szlat.EGYSEG_AR, dbo.vevo_szlat.edarab, dbo.vevo_szlat.darab, dbo.vevo_szlat.AFA_KULCS, dbo.vevo_szlat.kedvezmeny, dbo.vevo_szlat.CIKK_NEV, dbo.vevo_szlaf.TELJ_DATUM, dbo.vevo_szlaf.VEVO, dbo.vevo_szlaf.TIPUS, dbo.cikkek.aru_szolg, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, ((dbo.vevo_szlat.edarab * dbo.vevo_szlat.EGYSEG_AR) * ((100 - dbo.vevo_szlat.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlaf.kedvezmeny) / 100) AS Ertek, dbo.vevo_szlaf.FIZ_MODJA, dbo.cikkek.SZALLITO, dbo.stcikk2.cikk_nev AS csopnev, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev, ISNULL(dbo.szallito.SZALL_NEV, '') AS szall_nev, dbo.afa_kulcs.afaertek, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_szlaf.VEVO_NEV, dbo.vevo_szlaf.kurzus, ISNULL(dbo.vevo_lanc.nev, '') AS vlanc_nev, ISNULL(dbo.vevo_terulet.nev, '') AS vterulet_nev, ISNULL(dbo.vevo_cegjelleg.nev, '') AS vjelleg_nev, ISNULL(dbo.vevo_csoport.Nev, '') AS vcsoport_nev, dbo.vevo_szlaf.peldany, dbo.ElabeSzlaTetel(dbo.vevo_szlaf.BIZSZAM, dbo.vevo_szlat.TETEL) AS Elabe, dbo.vevo_szlat.megjegyzes, dbo.vevo_szlat.akcio, dbo.vevo_szlaf.penznem, dbo.vevo_szlaf.FIZ_ESED, dbo.vevo_szlaf.afamentes, dbo.vevo_szlaf.kedvezmeny AS veg_eng, dbo.cikkek.NORM_SZORZ, dbo.vevok.vevo_arcsoport FROM dbo.gyarto RIGHT OUTER JOIN dbo.vevo_szlat INNER JOIN dbo.cikkek ON dbo.vevo_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevo_szlaf ON dbo.vevo_szlat.BIZSZAM = dbo.vevo_szlaf.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlat.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.vevok ON dbo.vevo_szlaf.VEVO = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.vevo_csoport ON dbo.vevok.vevo_csoport = dbo.vevo_csoport.Kod LEFT OUTER JOIN dbo.vevo_cegjelleg ON dbo.vevok.vevo_cegjelleg = dbo.vevo_cegjelleg.kod LEFT OUTER JOIN dbo.vevo_terulet ON dbo.vevok.vevo_terulet = dbo.vevo_terulet.kod LEFT OUTER JOIN dbo.vevo_lanc ON dbo.vevok.vevo_lanc = dbo.vevo_lanc.kod LEFT OUTER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam ON dbo.gyarto.kod = dbo.cikkek.GYARTO LEFT OUTER JOIN dbo.szallito ON dbo.cikkek.SZALLITO = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle] AS SELECT TOP (100) PERCENT dbo.vevo_szlef.BIZSZAM, dbo.vevok.VEVO_NEV, dbo.orszagok.nev_hu AS orszag, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.SZLASZAM, dbo.raktarak.nev AS raktar, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto, dbo.vevo_szlef.kedvezmeny AS vegosszeg_kedv, dbo.vevo_szlef.MEGJEGYZES, dbo.belepes.TELJESNEV AS keszitette, dbo.vevo_szlef.MODOSITVA AS keszult, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.edarab, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlef.penznem, dbo.vevo_szlef.kurzus, dbo.vevo_szlet.kedvezmeny, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlef.kedvezmeny)) * (100 - dbo.vevo_szlet.kedvezmeny) / 10000 AS ertek, (dbo.vevo_szlef.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlef.kedvezmeny))) * (100 - dbo.vevo_szlet.kedvezmeny) / 10000 AS ertek_ft, dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL) AS elabe, (dbo.vevo_szlef.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlef.kedvezmeny))) * (100 - dbo.vevo_szlet.kedvezmeny) / 10000 - dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL) AS arres, CASE dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL) WHEN 0 THEN 0 ELSE 100 * ((dbo.vevo_szlef.kurzus * ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlef.kedvezmeny))) * (100 - dbo.vevo_szlet.kedvezmeny) / 10000 - dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL)) / dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL) END AS arres_szaz, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.rendel_bsz, dbo.vevo_szlet.rendel_tet, dbo.vevo_szlet.megjegyzes AS tet_megjegyzes, dbo.cikkek.VTSZ, SUBSTRING(dbo.vevo_szlef.TELJ_DATUM, 6, 2) AS honap, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.cikkek.db_sulya * dbo.vevo_szlet.darab * dbo.vevo_szlet.SZORZO AS teljes_suly, dbo.cikkek.db_br_sulya * dbo.vevo_szlet.darab * dbo.vevo_szlet.SZORZO AS teljes_br_suly, dbo.vevo_arcsoport.NEV AS arcsoport_nev, ISNULL(dbo.vevo_akc_csoport.nev, 'nincs') AS akc_csoport_nev FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.raktarak ON dbo.vevo_szlef.RAKTAR_KOD = dbo.raktarak.kod INNER JOIN dbo.belepes ON dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV AND dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso INNER JOIN dbo.vevo_arcsoport ON dbo.vevo_szlef.arcsoport = dbo.vevo_arcsoport.KOD LEFT OUTER JOIN dbo.vevo_akc_csoport ON dbo.vevo_szlef.akciocsoport = dbo.vevo_akc_csoport.kod LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod ORDER BY dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_ekaer] AS SELECT dbo.vevo_szlef.kurzus, dbo.vevo_szlef.kedvezmeny AS vkedv, dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.cikkek.VTSZ, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny, dbo.cikkek.db_br_sulya, dbo.cikkek.kockazatos, dbo.mozgas.DARAB, CASE WHEN keszlet.mozgaskod = 'vetel' THEN isnull(szallito.orszag, 'HU') ELSE CASE WHEN keszlet.mozgaskod = 'bevet' THEN 'BEV' ELSE 'HU' END END AS bevet_orszag, dbo.vevo_szlet.SZORZO FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlet.CIKK_SZAM INNER JOIN dbo.mozgas ON dbo.mozgas.BIZSZAM = dbo.vevo_szlet.BIZSZAM AND dbo.mozgas.TETEL = dbo.vevo_szlet.TETEL AND dbo.mozgas.MOZGASKOD = 'vevo_szle' INNER JOIN dbo.keszlet ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM LEFT OUTER JOIN dbo.szall_szlef ON dbo.szall_szlef.BIZSZAM = dbo.keszlet.SZAMLA_SZ LEFT OUTER JOIN dbo.szallito ON dbo.szallito.SZALL_KOD = dbo.szall_szlef.SZALLITO WHERE (dbo.vevo_szlef.TORLO <> '1') AND (dbo.vevo_szlef.TOROLT <> '1') AND (dbo.cikkek.aru_szolg = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_ekaere] AS SELECT dbo.vevo_szlef.kurzus, dbo.vevo_szlef.kedvezmeny AS vkedv, dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.cikkek.VTSZ, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny, dbo.cikkek.db_br_sulya, dbo.cikkek.kockazatos, dbo.vevo_szlet.edarab AS darab, dbo.vevo_szlet.SZORZO FROM dbo.vevo_szlet INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.cikkek.CIKK_SZAM = dbo.vevo_szlet.CIKK_SZAM WHERE (dbo.vevo_szlef.TORLO <> '1') AND (dbo.vevo_szlef.TOROLT <> '1') AND (dbo.cikkek.aru_szolg = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_forg_ccs] AS SELECT dbo.vevo_szlef.VEVO, LEFT(dbo.vevo_szlef.TELJ_DATUM, 4) AS telj_datum, dbo.stcikk2.cikk_nev, SUM(dbo.vevo_szlef.kurzus * dbo.vevo_szlet.darab * dbo.vevo_szlet.EGYSEG_AR) AS ertek FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod GROUP BY dbo.vevo_szlef.VEVO, dbo.stcikk2.cikk_nev, LEFT(dbo.vevo_szlef.TELJ_DATUM, 4) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_forg_gy] AS SELECT dbo.vevo_szlef.VEVO, LEFT(dbo.vevo_szlef.TELJ_DATUM, 4) AS telj_datum, ISNULL(dbo.gyarto.nev, '') AS gyarto_nev, SUM(dbo.vevo_szlef.kurzus * dbo.vevo_szlet.darab * dbo.vevo_szlet.EGYSEG_AR) AS ertek FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod GROUP BY dbo.vevo_szlef.VEVO, ISNULL(dbo.gyarto.nev, ''), LEFT(dbo.vevo_szlef.TELJ_DATUM, 4) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szle_nyomt] AS SELECT dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.RENDSZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.TELEP_KOD, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.penznem, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.afamentes, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.akciocsoport, dbo.vevo_szlef.arcsoport, dbo.vevo_szlef.MEGJEGYZES, dbo.vevo_szlef.TIPUS, dbo.vevo_szlef.UZLETKOTO, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, dbo.vevo_szlef.TOR_SSZ, dbo.vevo_szlef.VISSZARU, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.edarab, dbo.vevo_szlet.darab, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny AS tet_kedvezmeny, dbo.vevo_szlet.megjegyzes AS tet_megjegyzes, dbo.vevo_szlet.akcio, dbo.vevo_szlet.CIKK_NEV, dbo.cikkek.VTSZ, dbo.vevo_szlef.VEVO_NEV, dbo.vevok.IRANYITO, dbo.vevok.VAROS, dbo.vevok.iso AS orszag, dbo.vevok.CIM, dbo.vevok.ADOSZAM, dbo.vevok.eu_adoszam, dbo.vevok.JOVEDEKI, dbo.cikkek.aru_szolg, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.belepes.TELJESNEV, dbo.afa_kulcs.afaertek, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.VAROS AS tvaros, dbo.vevo_tel.IRANYITO AS tiranyito, dbo.VevoTelCimsor(dbo.vevo_tel.VEVO_KOD, dbo.vevo_tel.TELEP_KOD) AS tcim, dbo.vevo_tel.jovedeki AS tjovedeki, dbo.raktarak.nev AS raktarnev, ISNULL(dbo.wszav_nyomt.SZAVIDO, '') AS szavido, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod, ISNULL(dbo.uzletkoto.nev, '') AS uzletkotonev, (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) / 100 AS netto, (dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) / 100 * dbo.afa_kulcs.afaertek / 100 AS tafaert, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * (100 - dbo.vevo_szlet.kedvezmeny) / 100) * (100 + dbo.afa_kulcs.afaertek) / 100 AS brutto, ISNULL(dbo.vevo_szlet_td.E1, 0) AS E1, ISNULL(dbo.vevo_szlet_td.E2, 0) AS E2, dbo.parameterek.ERTEK AS nemakciosra, CASE WHEN vevok.vevo_cszcsoport <> 0 THEN isnull(vevo_csz.VEVOCSZ, '') ELSE cikkek.VCIKKSZAM END AS vcikkszam, CASE WHEN vevok.vevo_cszcsoport <> 0 THEN 'I' ELSE parameterek_1.ERTEK END AS kellvcikkszam, dbo.Tetel_gyszam('vevo_szle', dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlet.TETEL) AS gyszamok, dbo.vevo_szlef.HIVSZAM, dbo.cikkek.cikk_nev_ang, dbo.vevok.EMAIL, dbo.vevo_tel.idokapu FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.belepes ON dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlet.AFA_KULCS = dbo.afa_kulcs.AFAKULCS LEFT OUTER JOIN dbo.vevo_szlet_td ON dbo.vevo_szlet.BIZSZAM = dbo.vevo_szlet_td.BIZSZAM AND dbo.vevo_szlet.TETEL = dbo.vevo_szlet_td.TETEL LEFT OUTER JOIN dbo.wszav_nyomt ON dbo.vevo_szlet.TETEL = dbo.wszav_nyomt.TETEL AND dbo.vevo_szlet.BIZSZAM = dbo.wszav_nyomt.BIZSZAM LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod LEFT OUTER JOIN dbo.raktarak ON dbo.vevo_szlef.RAKTAR_KOD = dbo.raktarak.kod LEFT OUTER JOIN dbo.vevo_cszcsoport ON dbo.vevok.vevo_cszcsoport = dbo.vevo_cszcsoport.KOD LEFT OUTER JOIN dbo.vevo_csz ON dbo.vevo_csz.VEVOCSZCSOP = dbo.vevok.vevo_cszcsoport AND dbo.vevo_szlet.CIKK_SZAM = dbo.vevo_csz.CIKK_SZAM LEFT OUTER JOIN dbo.vevo_tel ON dbo.vevok.VEVO_KOD = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' CROSS JOIN dbo.parameterek CROSS JOIN dbo.parameterek AS parameterek_1 WHERE (dbo.parameterek.AZONOSITO = 'ErtVegosszegEngErv') AND (parameterek_1.AZONOSITO = 'SzallitoCikkszam') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlef] AS SELECT dbo.vevo_szlef.VEVO, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.HIVSZAM, dbo.vevo_szlef.RENDSZAM, dbo.vevo_szlef.SZLASZAM, dbo.vevo_szlef.TELEP_KOD, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.TIPUS, ISNULL(dbo.vevo_szlef.UZLETKOTO, 0) AS uzletkoto, dbo.vevo_szlef.TOROLT, dbo.vevo_szlef.TORLO, dbo.vevo_szlef.TOR_SSZ, dbo.vevo_szlef.VISSZARU, dbo.vevo_szlef.KICSODA, dbo.vevo_szlef.MODOSITVA, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.VEVO_NEV, dbo.vevo_tel.TELEP_NEV, dbo.raktarak.nev AS raktarnev, dbo.vevo_szlef.MEGJEGYZES, dbo.vevo_szlef.penznem, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.afamentes, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevo_szlef.akciocsoport, dbo.vevo_szlef.arcsoport, dbo.belepes.TELJESNEV, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevok.sajat_bolt, dbo.vevo_arcsoport.NEV AS arcsoport_nev, ISNULL(dbo.vevo_akc_csoport.nev, '') AS akciocsoport_nev, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevok.vevo_arcsoport FROM dbo.vevo_szlef INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD INNER JOIN dbo.raktarak ON dbo.vevo_szlef.RAKTAR_KOD = dbo.raktarak.kod INNER JOIN dbo.belepes ON dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV AND dbo.vevo_szlef.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.vevo_arcsoport ON dbo.vevo_szlef.arcsoport = dbo.vevo_arcsoport.KOD INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlef.TIPUS = dbo.ertekesit_tipus.kod LEFT OUTER JOIN dbo.vevo_akc_csoport ON dbo.vevo_szlef.akciocsoport = dbo.vevo_akc_csoport.kod LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlet] AS SELECT dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.darab, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.kedvezmeny, dbo.vevo_szlet.megjegyzes, dbo.vevo_szlet.rendel_tet, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.edarab, dbo.vevo_szlet.akcio, dbo.vevo_szlet.rendel_bsz, dbo.vevo_szlef.TELJ_DATUM, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100) AS Ertek, dbo.vevo_szlef.VEVO, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.TIPUS, dbo.cikkek.aru_szolg, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.stcikk2.cikk_nev AS csopnev, dbo.gyarto.nev AS gyarto_nev, dbo.szallito.SZALL_NEV, dbo.vevok.VEVO_NEV, dbo.afa_kulcs.afaertek, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_szlef.UZLETKOTO, dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL) AS Elabe, dbo.vevo_szlef.kurzus, dbo.vevo_szlef.TELEP_KOD, dbo.cikkek.NORM_SZORZ, dbo.vevok.vevo_arcsoport, ISNULL(dbo.raktarak.nev, '') AS alapraktarnev, dbo.vevo_tel.vevo_csoport AS telep_csoport, dbo.vevo_tel.vevo_lanc AS telep_lanc, dbo.vevo_tel.vevo_cegjelleg AS telep_cegjelleg, dbo.vevo_tel.vevo_terulet AS telep_terulet, dbo.vevo_szlef.VISSZARU, ISNULL ((SELECT CASE WHEN SUM(mozgas.darab) = 0 THEN 0 ELSE SUM(mozgas.darab * keszlet.egyseg_ar) / SUM(mozgas.darab) END AS Expr1 FROM dbo.mozgas INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM WHERE (dbo.mozgas.BIZSZAM = dbo.vevo_szlet.BIZSZAM) AND (dbo.mozgas.TETEL = dbo.vevo_szlet.TETEL) AND (dbo.mozgas.MOZGASKOD = 'vevo_szle')), 0) AS karton_ar FROM dbo.vevo_szlet INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevo_szlef ON dbo.vevo_szlet.BIZSZAM = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.vevok ON dbo.vevo_szlef.VEVO = dbo.vevok.VEVO_KOD INNER JOIN dbo.afa_kulcs ON dbo.vevo_szlet.AFA_KULCS = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD LEFT OUTER JOIN dbo.raktarak ON dbo.cikkek.raktar_kod = dbo.raktarak.kod LEFT OUTER JOIN dbo.gyarto ON dbo.cikkek.GYARTO = dbo.gyarto.kod LEFT OUTER JOIN dbo.szallito ON dbo.cikkek.SZALLITO = dbo.szallito.SZALL_KOD LEFT OUTER JOIN dbo.stcikk2 ON dbo.cikkek.CIKKCSOP2 = dbo.stcikk2.cikk_szam GROUP BY dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, dbo.vevo_szlet.MENNY_EGYS, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.darab, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.kedvezmeny, dbo.vevo_szlet.megjegyzes, dbo.vevo_szlet.rendel_tet, dbo.vevo_szlet.CIKK_NEV, dbo.vevo_szlet.edarab, dbo.vevo_szlet.akcio, dbo.vevo_szlet.rendel_bsz, dbo.vevo_szlef.TELJ_DATUM, ((dbo.vevo_szlet.edarab * dbo.vevo_szlet.EGYSEG_AR) * ((100 - dbo.vevo_szlet.kedvezmeny) / 100)) * ((100 - dbo.vevo_szlef.kedvezmeny) / 100), dbo.vevo_szlef.VEVO, dbo.vevo_szlef.RAKTAR_KOD, dbo.vevo_szlef.TIPUS, dbo.cikkek.aru_szolg, dbo.cikkek.CIKKCSOP2, dbo.cikkek.GYARTO, dbo.cikkek.SZALLITO, dbo.stcikk2.cikk_nev, dbo.gyarto.nev, dbo.szallito.SZALL_NEV, dbo.vevok.VEVO_NEV, dbo.afa_kulcs.afaertek, dbo.vevok.vevo_csoport, dbo.vevok.vevo_lanc, dbo.vevok.vevo_cegjelleg, dbo.vevok.vevo_terulet, dbo.vevo_szlef.UZLETKOTO, dbo.ElabeSzleTetel(N'vevo_szle', dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL), dbo.vevo_szlef.kurzus, dbo.vevo_szlef.TELEP_KOD, dbo.cikkek.NORM_SZORZ, dbo.vevok.vevo_arcsoport, dbo.raktarak.nev, dbo.vevo_tel.vevo_csoport, dbo.vevo_tel.vevo_lanc, dbo.vevo_tel.vevo_cegjelleg, dbo.vevo_tel.vevo_terulet, dbo.vevo_szlef.VISSZARU GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlet_beszert] AS SELECT TOP (100) PERCENT dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM, ISNULL(SUM(dbo.mozgas.EDARAB * dbo.keszlet.EGYSEG_AR), 0) AS besz_ertek FROM dbo.vevo_szlet LEFT OUTER JOIN dbo.mozgas ON dbo.mozgas.BIZSZAM = dbo.vevo_szlet.BIZSZAM AND dbo.mozgas.TETEL = dbo.vevo_szlet.TETEL AND dbo.mozgas.MOZGASKOD LIKE 'vevo%' INNER JOIN dbo.keszlet ON dbo.keszlet.SORSZAM = dbo.mozgas.SORSZAM GROUP BY dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM ORDER BY dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, dbo.vevo_szlet.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlet_elabe] AS SELECT dbo.mozgas.BIZSZAM, dbo.mozgas.TETEL, SUM(dbo.mozgas.EDARAB * dbo.keszlet.EGYSEG_AR) AS elabe FROM dbo.mozgas INNER JOIN dbo.keszlet ON dbo.mozgas.SORSZAM = dbo.keszlet.SORSZAM WHERE (dbo.mozgas.MOZGASKOD LIKE 'vevo%') GROUP BY dbo.mozgas.BIZSZAM, dbo.mozgas.TETEL GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevo_szlet_gy] AS SELECT dbo.vevo_szlet.BIZSZAM, dbo.vevo_szlet.TETEL, CASE WHEN gycikk_szam = '' THEN vevo_szlet.CIKK_SZAM ELSE cikkek_osszevonas.cikk_szam END AS cikk_szam, CASE WHEN gycikk_szam = '' THEN vevo_szlet.cikk_nev ELSE cikkek_osszevonas.cikk_nev END AS cikk_nev, CASE WHEN gycikk_szam = '' THEN vevo_szlet.menny_egys ELSE cikkek_osszevonas.menny_egys END AS menny_egys, CASE WHEN gycikk_szam = '' THEN cikkek.cikk_nev_ang ELSE cikkek_osszevonas.cikk_nev_en END AS cikk_nev_en, CASE WHEN gycikk_szam = '' THEN cikkek.menny_egys_ang ELSE cikkek_osszevonas.menny_egys_en END AS menny_egys_en, dbo.vevo_szlet.SZORZO, dbo.vevo_szlet.AFA_KULCS, dbo.vevo_szlet.darab, dbo.vevo_szlet.EGYSEG_AR, dbo.vevo_szlet.kedvezmeny, dbo.vevo_szlet.megjegyzes, dbo.cikkek.VTSZ, dbo.vevo_szlet.akcio FROM dbo.vevo_szlet INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.cikkek_osszevonas ON dbo.cikkek.gycikk_szam = dbo.cikkek_osszevonas.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevoarak] AS SELECT cikk_szam, cikk_nev, netto_ar, kifutott, cikkcsop2, menny_egys, afa_kulcs, ut_besz_ar FROM dbo.vevoarak1(8, '') AS vevoarak1_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vVevoCikkHo] AS SELECT vevo, cikk_szam, LEFT(telj_datum, 7) AS evho, sum(darab) AS db1, sum(darab * egyseg_ar) AS o1, 0 AS db2, 0 AS o2, 0 AS db3, 0 AS o3, 0 AS db4, 0 AS o4, 0 AS db5, 0 AS o5, 0 AS db6, 0 AS o6, 0 AS db7, 0 AS o7, 0 AS db8, 0 AS o8, 0 AS db9, 0 AS o9, 0 AS db10, 0 AS o10, 0 AS db11, 0 AS o11, 0 AS db12, 0 AS o12 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '01' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, sum(darab) AS db2, sum(darab * egyseg_ar) AS o2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '02' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '03' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '04' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '05' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '06' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '07' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '08' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '09' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0, 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '10' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar), 0, 0 FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '11' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) UNION all SELECT vevo, cikk_szam, LEFT(telj_datum, 7), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, sum(darab), sum(darab * egyseg_ar) FROM vevo_szlaf INNER JOIN vevo_szlat ON vevo_szlaf.bizszam = vevo_szlat.bizszam AND substring(telj_datum, 6, 2) = '12' GROUP BY vevo, cikk_szam, LEFT(telj_datum, 7) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevok_boritek] AS SELECT CASE WHEN len(lcim) > 0 THEN lnev ELSE vevok.vevo_nev END AS nev, CASE WHEN len(lcim) > 0 THEN liranyito ELSE vevok.iranyito END AS irszam, CASE WHEN len(lcim) > 0 THEN lvaros ELSE vevok.varos END AS varos, CASE WHEN len(lcim) > 0 THEN lcim ELSE dbo.VevoCimsor(vevok.vevo_kod) END AS cim, dbo.regisztral.felhasznalo AS knev, dbo.regisztral.iranyito AS kirszam, RTRIM(dbo.regisztral.varos) AS kvaros, dbo.xrCimsor() AS kcim, dbo.vevok.VEVO_KOD, dbo.wgyujtes.KICSODA, CASE WHEN len(lcim) > 0 THEN isnull(orszagok_1.nev_hu, '') ELSE orszagok.nev_hu END AS nev_hu FROM dbo.vevok INNER JOIN dbo.wgyujtes ON dbo.vevok.VEVO_KOD = dbo.wgyujtes.VEVO_KOD INNER JOIN dbo.orszagok ON dbo.vevok.iso = dbo.orszagok.iso LEFT OUTER JOIN dbo.orszagok AS orszagok_1 ON dbo.vevok.liso = orszagok_1.iso CROSS JOIN dbo.regisztral GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvevotel_ker] AS SELECT VEVO_KOD, TELEP_KOD, TELEP_NEV, VAROS, IRANYITO, dbo.VevoTelCimsor(VEVO_KOD, TELEP_KOD) AS cim, TOROLT FROM dbo.vevo_tel GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvonal] AS SELECT dbo.cikkek.CIKK_SZAM, dbo.cikkek.CIKK_NEV, dbo.vonal.VONALKOD FROM dbo.cikkek INNER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvonal1] AS SELECT CIKK_SZAM, VONALKOD, SZORZO, MENNY_EGYS, ALAP FROM dbo.vonal WHERE (ALAP = '1') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vvonal2] AS SELECT CIKK_SZAM, VONALKOD, SZORZO, MENNY_EGYS, ALAP FROM dbo.vonal WHERE (CIKK_SZAM = VONALKOD COLLATE Hungarian_CI_AS) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwagy_szall] AS SELECT dbo.wagy_szall_szlet.szallito, dbo.szallito.SZALL_NEV, dbo.wagy_szall_szlet.rend_szam, dbo.wagy_szall_szlet.hivszam, dbo.wagy_szall_szlet.kicsoda FROM dbo.wagy_szall_szlet INNER JOIN dbo.szallito ON dbo.szallito.SZALL_KOD = dbo.wagy_szall_szlet.szallito GROUP BY dbo.szallito.SZALL_NEV, dbo.wagy_szall_szlet.rend_szam, dbo.wagy_szall_szlet.hivszam, dbo.wagy_szall_szlet.kicsoda, dbo.wagy_szall_szlet.szallito GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwagy_szall_szlet] AS SELECT dbo.wagy_szall_szlet.tetel, dbo.wagy_szall_szlet.cikk_szam, dbo.wagy_szall_szlet.cikk_nev, dbo.wagy_szall_szlet.darab, CASE WHEN wagy_szall_szlet.egyseg_ar IS NOT NULL AND wagy_szall_szlet.egyseg_ar <> 0 THEN wagy_szall_szlet.egyseg_ar ELSE CASE WHEN dbo.szall_rent.EGYSEG_AR = 0 OR dbo.szall_rent.EGYSEG_AR IS NULL THEN cikkek.ut_besz_ar END END AS egyseg_ar, dbo.wagy_szall_szlet.kicsoda, ISNULL(dbo.szall_rent.TETEL, 0) AS rend_tet, dbo.cikkek.VCIKKSZAM, ISNULL(dbo.szall_rent.afa_kulcs, dbo.cikkek.AFA_KULCS) AS afa_kulcs, ISNULL(dbo.szall_rent.MENNY_EGYS, dbo.cikkek.MENNY_EGYS) AS menny_egys, ISNULL(dbo.szall_rent.EDARAB, dbo.wagy_szall_szlet.darab) AS edarab, ISNULL(dbo.szall_rent.kedvezmeny, 0) AS kedvezmeny, dbo.wagy_szall_szlet.rend_szam, dbo.wagy_szall_szlet.szallito, dbo.wagy_szall_szlet.hivszam FROM dbo.wagy_szall_szlet INNER JOIN dbo.cikkek ON dbo.wagy_szall_szlet.cikk_szam = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.szall_rent ON dbo.wagy_szall_szlet.cikk_szam = dbo.szall_rent.CIKK_SZAM AND dbo.wagy_szall_szlet.rend_szam = dbo.szall_rent.BIZSZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwfolyosz_elore] AS SELECT dbo.wfolyoszamla.partner_tip, dbo.wfolyoszamla.bizszam, dbo.wfolyoszamla.telj_dat, dbo.wfolyoszamla.fiz_hat, dbo.wfolyoszamla.penznem, dbo.wfolyoszamla.kurzus, dbo.wfolyoszamla.kicsoda, CASE WHEN partner_tip = 'V' THEN vevok.vevo_nev ELSE szallito.szall_nev END AS partnernev, CASE WHEN partner_tip = 'V' THEN ertek ELSE 0 END AS bevetel, CASE WHEN partner_tip = 'S' THEN ertek ELSE 0 END AS kiadas, dbo.fizmodok.NEV AS fizmod_nev FROM dbo.wfolyoszamla INNER JOIN dbo.fizmodok ON dbo.wfolyoszamla.fiz_mod = dbo.fizmodok.KOD LEFT OUTER JOIN dbo.vevok ON dbo.wfolyoszamla.partner_kod = dbo.vevok.VEVO_KOD LEFT OUTER JOIN dbo.szallito ON dbo.wfolyoszamla.partner_kod = dbo.szallito.SZALL_KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwfolyoszamla] AS SELECT dbo.wfolyoszamla.tipus, dbo.wfolyoszamla.partner_tip, dbo.wfolyoszamla.partner_kod, dbo.wfolyoszamla.bizszam, dbo.wfolyoszamla.kulso_bsz, dbo.wfolyoszamla.telj_dat, dbo.wfolyoszamla.szla_dat, dbo.wfolyoszamla.fiz_mod, dbo.wfolyoszamla.fiz_hat, dbo.fizmodok.NEV AS fizmod_nev, CASE WHEN tipus < 3 THEN ertek ELSE 0 END AS tertek, CASE WHEN tipus < 3 THEN penznem ELSE '' END AS tpn, CASE WHEN tipus < 3 THEN kurzus ELSE 0 END AS tkurzus, CASE WHEN tipus > 2 THEN ertek ELSE 0 END AS jertek, CASE WHEN tipus > 2 THEN penznem ELSE '' END AS jpn, CASE WHEN tipus > 2 THEN kurzus ELSE 0 END AS jkurzus, dbo.wfolyoszamla.kicsoda FROM dbo.wfolyoszamla LEFT OUTER JOIN dbo.fizmodok ON dbo.wfolyoszamla.fiz_mod = dbo.fizmodok.KOD GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwgyujtes] AS SELECT CIKK_NEV, CSOPNEV, CIKK_SZAM, CIKKCSOP, GYARTO_NEV, GYARTO_KOD, SZALL_KOD, SZALL_NEV, VEVO_KOD, VEVO_NEV, raktar_kod, raktar_nev, EGYSEG_AR1, AFA_KULCS, MENNY_EGYS, DARAB1, EGYSEG_AR2, DARAB2, EGYSEG_AR3, DARAB3, DATUM1, DATUM2, BIZSZAM, TETEL, KICSODA, RTRIM(CIKK_NEV) + '/' + RTRIM(raktar_nev) AS vevotelep FROM dbo.wgyujtes GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwkomissio_fimp] AS SELECT dbo.wkomissio.rendel_bsz, dbo.vevo_renf.SZALL_DAT, dbo.vevok.VEVO_NEV, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.IRANYITO, dbo.vevo_tel.VAROS, dbo.VevoTelCimsor(dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim) AS vevotelcim, dbo.belepes.TELJESNEV FROM dbo.vevok INNER JOIN dbo.belepes ON dbo.vevok.KICSODA = dbo.belepes.ROVIDNEV INNER JOIN dbo.vevo_renf ON dbo.vevok.VEVO_KOD = dbo.vevo_renf.VEVO INNER JOIN dbo.wkomissio ON dbo.vevo_renf.BIZSZAM = dbo.wkomissio.rendel_bsz INNER JOIN dbo.vevo_tel ON dbo.vevok.VEVO_KOD = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_renf.VEVO = dbo.vevo_tel.VEVO_KOD AND dbo.vevo_renf.szallcim = dbo.vevo_tel.TELEP_KOD GROUP BY dbo.wkomissio.rendel_bsz, dbo.vevo_renf.SZALL_DAT, dbo.vevo_tel.TELEP_NEV, dbo.vevo_tel.IRANYITO, dbo.vevo_tel.VAROS, dbo.belepes.TELJESNEV, dbo.vevo_renf.VEVO, dbo.vevo_renf.szallcim, dbo.vevok.VEVO_NEV GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwkomissio_timp] AS SELECT rendel_bsz, rendel_tetel, raktar_kod, SUM(darab) AS komissiozva FROM dbo.wkomissio GROUP BY rendel_bsz, rendel_tetel, raktar_kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwszall_szlat] AS SELECT dbo.wszall_szlat.BIZSZAM, dbo.wszall_szlat.TETEL, dbo.wszall_szlat.VCIKKSZAM, dbo.wszall_szlat.CIKK_SZAM, dbo.wszall_szlat.CIKK_NEV, dbo.wszall_szlat.afa_kulcs, dbo.wszall_szlat.MENNY_EGYS, dbo.wszall_szlat.SZORZO, dbo.wszall_szlat.edarab, dbo.wszall_szlat.DARAB, dbo.wszall_szlat.EGYSEG_AR, dbo.wszall_szlat.kedvezmeny, dbo.wszall_szlat.rendel_bsz, dbo.wszall_szlat.rendel_tet, dbo.wszall_szlat.KICSODA, CASE isnull(dbo.wszall_szlat_td.E1, - 1) WHEN - 1 THEN ' ' ELSE '*' END AS vantermekdij FROM dbo.wszall_szlat LEFT OUTER JOIN dbo.wszall_szlat_td ON dbo.wszall_szlat.TETEL = dbo.wszall_szlat_td.TETEL AND dbo.wszall_szlat.KICSODA = dbo.wszall_szlat_td.KICSODA GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwszall_szlet] AS SELECT dbo.wszall_szlet.BIZSZAM, dbo.wszall_szlet.TETEL, dbo.wszall_szlet.VCIKKSZAM, dbo.wszall_szlet.CIKK_SZAM, dbo.wszall_szlet.CIKK_NEV, dbo.wszall_szlet.afa_kulcs, dbo.wszall_szlet.MENNY_EGYS, dbo.wszall_szlet.SZORZO, dbo.wszall_szlet.edarab, dbo.wszall_szlet.DARAB, dbo.wszall_szlet.EGYSEG_AR, dbo.wszall_szlet.kedvezmeny, dbo.wszall_szlet.rendel_bsz, dbo.wszall_szlet.rendel_tet, dbo.wszall_szlet.KICSODA, CASE isnull(dbo.wszall_szlet_td.E1, - 1) WHEN - 1 THEN ' ' ELSE '*' END AS vantermekdij FROM dbo.wszall_szlet LEFT OUTER JOIN dbo.wszall_szlet_td ON dbo.wszall_szlet.TETEL = dbo.wszall_szlet_td.TETEL AND dbo.wszall_szlet.KICSODA = dbo.wszall_szlet_td.KICSODA GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwtermeles] AS SELECT cikk_szam, cikk_nev, SUM(darab) AS darab, 0 AS szazalek, SUM(darab * egyseg_ar) / SUM(darab) AS egyseg_ar, SUM(darab * egyseg_ar) AS ertek, kicsoda FROM dbo.wtermeles GROUP BY cikk_szam, cikk_nev, kicsoda, irany, jel HAVING (irany = 2) AND (jel = '*') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwugyletek] AS SELECT bizszam, biztipus, ugyfel, penznem, datum, ugyintezo, ugyintezo_nev, allapot, allapot_nev FROM dbo.wugyletek('Sta1002181') AS wugyletek_1 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwvevo_kedv] AS SELECT vevo_kod, tipus, ertek, nev, kedvezmeny, kicsoda, CASE WHEN tipus = 1 THEN 'Cikkcsoport' WHEN tipus = 2 THEN 'Szállító' WHEN tipus = 3 THEN 'Gyártó' WHEN tipus = 4 THEN 'Ország' END AS xnev FROM dbo.wvevo_kedv GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwvevo_koz_nyug] AS SELECT dbo.wvevo_koz_nyug.JELOLES, dbo.wvevo_koz_nyug.BIZSZAM, dbo.wvevo_koz_nyug.TELJ_DATUM, dbo.wvevo_koz_nyug.KICSODA, dbo.wvevo_koz_nyug.ERTEK, dbo.vevo_szlef.penznem, dbo.vevo_szlef.afamentes, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.TIPUS, dbo.vevo_szlef.UZLETKOTO, dbo.uzletkoto.nev AS uzletkoto_nev, dbo.ertekesit_tipus.nev AS tipus_nev FROM dbo.wvevo_koz_nyug INNER JOIN dbo.vevo_szlef ON dbo.wvevo_koz_nyug.BIZSZAM = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlef.TIPUS = dbo.ertekesit_tipus.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwvevo_koz_nyug_tetel] AS SELECT dbo.wvevo_koz_nyug.JELOLES, dbo.wvevo_koz_nyug.BIZSZAM, dbo.wvevo_koz_nyug.TELJ_DATUM, dbo.wvevo_koz_nyug.KICSODA, dbo.vevo_szlef.penznem, dbo.vevo_szlef.afamentes, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlef.TIPUS, dbo.ertekesit_tipus.nev AS tipus_nev FROM dbo.wvevo_koz_nyug INNER JOIN dbo.vevo_szlef ON dbo.wvevo_koz_nyug.BIZSZAM = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlef.TIPUS = dbo.ertekesit_tipus.kod INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM INNER JOIN dbo.cikkek ON dbo.vevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwvevo_szla_nyomt] AS SELECT dbo.wvevo_szla_nyomt.bizszam, dbo.wvevo_szla_nyomt.telj_datum, dbo.wvevo_szla_nyomt.szla_datum, dbo.wvevo_szla_nyomt.fiz_modja, dbo.wvevo_szla_nyomt.fiz_esed, dbo.wvevo_szla_nyomt.penznem, dbo.wvevo_szla_nyomt.kurzus, dbo.wvevo_szla_nyomt.kedvezmeny, dbo.wvevo_szla_nyomt.megjegyzes, dbo.wvevo_szla_nyomt.teljesnev, dbo.wvevo_szla_nyomt.fizmod_nev, dbo.wvevo_szla_nyomt.tetel, dbo.wvevo_szla_nyomt.cikk_szam, dbo.wvevo_szla_nyomt.afa_kulcs, dbo.wvevo_szla_nyomt.menny_egys, dbo.wvevo_szla_nyomt.edarab, dbo.wvevo_szla_nyomt.egyseg_ar, dbo.wvevo_szla_nyomt.tet_kedvezmeny, dbo.wvevo_szla_nyomt.tet_megjegyzes, dbo.wvevo_szla_nyomt.akcio, dbo.wvevo_szla_nyomt.afaertek, dbo.wvevo_szla_nyomt.cikk_nev, dbo.wvevo_szla_nyomt.vtsz, dbo.wvevo_szla_nyomt.vevo_nev, dbo.wvevo_szla_nyomt.iranyito, dbo.wvevo_szla_nyomt.varos, dbo.wvevo_szla_nyomt.orszag, dbo.wvevo_szla_nyomt.cim, dbo.wvevo_szla_nyomt.adoszam, dbo.wvevo_szla_nyomt.jovedeki, dbo.wvevo_szla_nyomt.eu_adoszam, dbo.wvevo_szla_nyomt.netto, dbo.wvevo_szla_nyomt.tafaert, dbo.wvevo_szla_nyomt.brutto, dbo.wvevo_szla_nyomt.peldany, dbo.wvevo_szla_nyomt.szleszam, dbo.wvevo_szla_nyomt.szle_datum, CASE WHEN elesito.azonosito = '031-0126-001' THEN '' ELSE dbo.vevo_tel.TELEP_NEV + ' ' + dbo.wvevo_szla_nyomt.szle_cim END AS szle_cim, dbo.wvevo_szla_nyomt.kicsoda, ISNULL(dbo.vevo_szlat_td.E1, 0) AS E1, ISNULL(dbo.vevo_szlat_td.E2, 0) AS E2, CASE WHEN vevok.vevo_cszcsoport <> 0 THEN isnull(vevo_csz.VEVOCSZ, '') ELSE cikkek.VCIKKSZAM END AS vcikkszam, CASE WHEN vevok.vevo_cszcsoport <> 0 THEN 'I' ELSE ISNULL(parameterek.ERTEK, 'N') END AS kellvcikkszam, ISNULL(dbo.vonal.VONALKOD, '') AS VONALKOD, dbo.wvevo_szla_nyomt.idokapu, dbo.wvevo_szla_nyomt.vevo_jovedeki, dbo.cikkek.db_sulya, dbo.cikkek.db_br_sulya, dbo.wvevo_szla_nyomt.lejar, dbo.vevo_szlef.MEGJEGYZES AS szle_megjegyzes, ISNULL(dbo.vevok_csoportazon.csoport_azon, '') AS csoport_azon FROM dbo.wvevo_szla_nyomt INNER JOIN dbo.vevok ON dbo.vevok.VEVO_KOD = dbo.wvevo_szla_nyomt.vevo INNER JOIN dbo.cikkek ON dbo.wvevo_szla_nyomt.cikk_szam = dbo.cikkek.CIKK_SZAM INNER JOIN dbo.vevo_szlef ON dbo.wvevo_szla_nyomt.szleszam = dbo.vevo_szlef.BIZSZAM INNER JOIN dbo.vevo_tel ON dbo.vevo_szlef.TELEP_KOD = dbo.vevo_tel.TELEP_KOD AND dbo.vevo_szlef.VEVO = dbo.vevo_tel.VEVO_KOD LEFT OUTER JOIN dbo.vevo_cszcsoport ON dbo.vevok.vevo_cszcsoport = dbo.vevo_cszcsoport.KOD LEFT OUTER JOIN dbo.vevok_csoportazon ON dbo.vevok_csoportazon.vevo_kod = dbo.wvevo_szla_nyomt.vevo LEFT OUTER JOIN dbo.vevo_csz ON dbo.vevo_csz.VEVOCSZCSOP = dbo.vevok.vevo_cszcsoport AND dbo.wvevo_szla_nyomt.cikk_szam = dbo.vevo_csz.CIKK_SZAM LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM AND dbo.vonal.ALAP = '1' LEFT OUTER JOIN dbo.vevo_szlat_td ON dbo.wvevo_szla_nyomt.bizszam = dbo.vevo_szlat_td.BIZSZAM AND dbo.wvevo_szla_nyomt.tetel = dbo.vevo_szlat_td.TETEL CROSS JOIN dbo.parameterek CROSS JOIN dbo.elesito WHERE (dbo.parameterek.AZONOSITO = 'SzallitoCikkszam') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [vwvevo_szlet] AS SELECT dbo.wvevo_szlet.BIZSZAM, dbo.wvevo_szlet.TETEL, CASE WHEN gycikk_szam = '' THEN dbo.wvevo_szlet.CIKK_SZAM ELSE cikkek_osszevonas.cikk_szam END AS cikk_szam, CASE WHEN gycikk_szam = '' THEN dbo.cikkek.cikk_nev ELSE cikkek_osszevonas.cikk_nev_en END AS cikk_nev, CASE WHEN gycikk_szam = '' THEN dbo.cikkek.cikk_nev_ang ELSE cikkek_osszevonas.cikk_nev_en END AS cikk_nev_ang, CASE WHEN gycikk_szam = '' THEN dbo.cikkek.menny_egys ELSE cikkek_osszevonas.menny_egys END AS menny_egys, CASE WHEN gycikk_szam = '' THEN dbo.cikkek.menny_egys_ang ELSE cikkek_osszevonas.menny_egys_en END AS menny_egys_ang, dbo.cikkek.VTSZ, dbo.wvevo_szlet.AFA_KULCS, dbo.wvevo_szlet.SZORZO, dbo.wvevo_szlet.darab, dbo.wvevo_szlet.EGYSEG_AR, dbo.wvevo_szlet.kedvezmeny, dbo.wvevo_szlet.megjegyzes, dbo.wvevo_szlet.akcio, dbo.wvevo_szlet.KICSODA, ISNULL(dbo.vonal.VONALKOD, '') AS vonalkod FROM dbo.wvevo_szlet INNER JOIN dbo.cikkek ON dbo.wvevo_szlet.CIKK_SZAM = dbo.cikkek.CIKK_SZAM LEFT OUTER JOIN dbo.vonal ON dbo.cikkek.CIKK_SZAM = dbo.vonal.CIKK_SZAM LEFT OUTER JOIN dbo.cikkek_osszevonas ON dbo.cikkek.gycikk_szam = dbo.cikkek_osszevonas.cikk_szam GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [XXXSZALL_SZLAF] AS SELECT SUM((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100) AS netto, SUM((dbo.szall_szlat.edarab * dbo.szall_szlat.EGYSEG_AR) * (100 - dbo.szall_szlat.kedvezmeny) / 100 * dbo.afa_kulcs.afaertek / 100) AS afaert, dbo.szall_szlat.afa_kulcs FROM dbo.szall_szlaf INNER JOIN dbo.szall_szlat ON dbo.szall_szlaf.BIZSZAM = dbo.szall_szlat.BIZSZAM INNER JOIN dbo.afa_kulcs ON dbo.szall_szlat.afa_kulcs = dbo.afa_kulcs.AFAKULCS INNER JOIN dbo.cikkek ON dbo.szall_szlat.CIKK_SZAM = dbo.cikkek.CIKK_SZAM GROUP BY dbo.szall_szlat.afa_kulcs, dbo.afa_kulcs.afaertek GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [xxxxvvevo_ar_lis_cikk] AS SELECT dbo.vevo_arcsoport.KOD, dbo.vevo_arcsoport.NEV AS arcsoport_nev, dbo.vevo_ar_lista.datum, dbo.vevo_ar_lista.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.cikkek.AFA_KULCS, dbo.vevo_ar_lista.netto_ar, dbo.vevo_ar_lista.brutto_ar, dbo.vevo_ar_lista.beszerz_ar, dbo.vevo_ar_lista.arres, dbo.vevo_ar_lista.modositva, dbo.vevo_ar_lista.kicsoda, dbo.belepes.TELJESNEV, dbo.vevo_arcsoport.szamitas_modja, dbo.vevo_arcsoport.penznem FROM dbo.vevo_arcsoport INNER JOIN dbo.vevo_ar_lista ON dbo.vevo_arcsoport.KOD = dbo.vevo_ar_lista.arcsoport LEFT OUTER JOIN dbo.belepes ON dbo.vevo_ar_lista.kicsoda = dbo.belepes.ROVIDNEV RIGHT OUTER JOIN dbo.cikkek ON dbo.vevo_ar_lista.cikk_szam = dbo.cikkek.CIKK_SZAM GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE VIEW [xxxxx_kozosnyug] AS SELECT '' AS Expr1, dbo.vevo_szlef.BIZSZAM, dbo.vevo_szlef.TELJ_DATUM, dbo.vevo_szlef.penznem, dbo.vevo_szlef.TIPUS, dbo.ertekesit_tipus.nev AS tipus_nev, dbo.vevo_szlef.UZLETKOTO, ISNULL(dbo.uzletkoto.nev, '') AS uzletkoto_nev, dbo.vevo_szlef.kedvezmeny, dbo.vevo_szlet.darab * dbo.vevo_szlet.EGYSEG_AR AS ertek FROM dbo.ertekesit_tipus INNER JOIN dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM ON dbo.ertekesit_tipus.kod = dbo.vevo_szlef.TIPUS LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_adatok_masolasa_eszatocsbol] WITH RECOMPILE AS begin -- először az összes tabló törlése !!!!!!!!!!!!!!! SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kics char(20) declare @dat char(20) set @kics='fejleszto' set @dat=dbo.mygetdatetime() -- bevetjog set @tranznev='bevetjog'+@kics BEGIN TRANSACTION @tranznev /* delete from bevetjog dbcc checkident(bevetjog,reseed,0) insert into bevetjog select bevetnev from bolt_casaro..bevetjog COMMIT TRANSACTION @tranznev -- kivetjog set @tranznev='kivetjog'+@kics BEGIN TRANSACTION @tranznev delete from kivetjog dbcc checkident(kivetjog,reseed,0) insert into kivetjog select kivetnev from bolt_casaro..kivetjog COMMIT TRANSACTION @tranznev set @tranznev='cikkcsoportok'+@kics BEGIN TRANSACTION @tranznev -- cikkcsoportok (már létező) delete from stcikk2 insert into stcikk2 select cikk_szam,cikk_nev,'',@kics,@dat from bolt_casaro..stcikk2 COMMIT TRANSACTION @tranznev -- gyarto set @tranznev='gyarto'+@kics BEGIN TRANSACTION @tranznev delete from gyarto dbcc checkident(gyarto,reseed,0) insert into gyarto select nev from bolt_casaro..gyarto order by kod delete from xx_gyartokod dbcc checkident(xx_gyartokod,reseed,0) insert into xx_gyartokod select kod from bolt_casaro..gyarto order by kod COMMIT TRANSACTION @tranznev set @tranznev='szallito'+@kics BEGIN TRANSACTION @tranznev delete from szallito dbcc checkident(szallito,reseed,0) insert into szallito select szall_nev,varos,iranyito,cim,telefon,fax,kapcsolat, adoszam,'',bank,fizmod,fizhat,1,0,'Magyarország','','',0,@dat,@kics from bolt_casaro..szallito order by szall_kod delete from xx_szallitokod dbcc checkident(xx_szallitokod,reseed,0) insert into xx_szallitokod select szall_kod from bolt_casaro..szallito order by szall_kod COMMIT TRANSACTION @tranznev set @tranznev='cikkek'+@kics BEGIN TRANSACTION @tranznev delete from cikkek insert into cikkek select dbo.strzero(ROW_NUMBER() OVER (ORDER BY cikk_szam),12), cikk_nev,'','1',menny_egys,'',norm_me,norm_szorz,vtsz,afa_kulcs,kifutott,'1','0',gongyoleg, '1',tgon,tgonszor,ntgon,ntgonszor,cikkcsop2,xx_gyartokod.ujkod,1,'',xx_szallitokod.ujkod,'', zsur_db,db_kart,kart_sor,kart_rakl,'',1,0,0,0,0,0,0,0,1,0,beszerz_ar,atl_fogyas,min_keszlet, @kics,@dat,@kics,@dat,tizedes,'N',0,0,0,0,'0','','','','',0 from bolt_casaro..cikkek inner join xx_gyartokod on xx_gyartokod.kod=bolt_casaro..cikkek.gyarto inner join xx_szallitokod on xx_szallitokod.kod=bolt_casaro..cikkek.szallito order by cikk_szam delete from xx_cikkekkod insert into xx_cikkekkod select cikk_szam,dbo.strzero(ROW_NUMBER() OVER (ORDER BY cikk_szam),12) from bolt_casaro..cikkek order by cikk_szam update __vcikkek_eng set cikk_nev_ang=left(cikk_nev_en,80) where cikk_nev_en is not null update __vcikkek_country set szarmazasi_hely=name_hu delete from jellemzok insert into jellemzok select tag_id,tag_name_hu from __products_tags_types select * from jellemzok delete from cikkek_jellemzok insert into cikkek_jellemzok select xx_cikkekkod.ujkod,tag_id from __products_tags INNER JOIN xx_cikkekkod ON __products_tags.cikk_szam = xx_cikkekkod.kod group by xx_cikkekkod.ujkod,tag_id -- vonal delete from vonal insert into vonal select ujkod,vonalkod,szorzo,menny_egys,alap from bolt_casaro..vonal inner join xx_cikkekkod on xx_cikkekkod.kod=bolt_casaro..vonal.cikk_szam COMMIT TRANSACTION @tranznev -- vevő listaárak set @tranznev='vevo_ar_lista'+@kics BEGIN TRANSACTION @tranznev delete from vevo_arcsoport dbcc checkident(vevo_arcsoport,reseed,0) insert into vevo_arcsoport values('Lista ár','L','HUF',0) delete from vevo_ar_lista insert into vevo_ar_lista select 1,left(@dat,7),ujkod, case when afaertek=0 then brutto_ar else round(brutto_ar/((100+afaertek)/100),2) end, brutto_ar,beszerz_ar,0,@kics,@dat from bolt_casaro..cikkek inner join xx_cikkekkod on xx_cikkekkod.kod=bolt_casaro..cikkek.cikk_szam inner join afa_kulcs on afa_kulcs.afakulcs=bolt_casaro..cikkek.afa_kulcs update vevo_ar_lista set arres= CASE beszerz_ar WHEN 0 THEN 0 ELSE 100*(netto_ar-beszerz_ar)/beszerz_ar END COMMIT TRANSACTION @tranznev -- vevők és telephelyek set @tranznev='vevok'+@kics BEGIN TRANSACTION @tranznev delete from vevo_tel delete from vevok dbcc checkident(vevok,reseed,0) insert into vevok select nev,iranyito,varos,'HUN',cim,telefon,fax,kapcsolat,email,adoszam,'','','',1,0, 0,'3',0,0,0,0,0,0,'1','0',@kics,@dat,'','','','','','HU' from bolt_casaro..vevok order by kod insert into vevo_tel select vevo_kod,'0', vevo_nev,varos,iranyito,cim,kapcsolat,telefon,email,'',0,'','',0,0,0,0 from vevok order by vevo_kod */ COMMIT TRANSACTION @tranznev --exec ReindexAllTable end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_kosar_torol] WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_kosartorol if (select isnull(len(dbo.xrfuggveny('WebKosarIdo')),0))<>0 delete from _web_kosar where datediff(hour,convert(datetime,replace(kosarba_kerul,'.','-')),getdate()) > (select convert(int,ertek) from parameterek where azonosito='WebKosarIdo') COMMIT TRANSACTION t_kosartorol SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [_web_kosar_toroluj] WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_kosartorol if (select isnull(len(dbo.xrfuggveny('WebKosarIdo')),0))<>0 delete from _web_kosaruj where datediff(hour,convert(datetime,replace(kosarba_kerul,'.','-')),getdate()) > (select convert(int,ertek) from parameterek where azonosito='WebKosarIdo') COMMIT TRANSACTION t_kosartorol SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_mod] @vkod int, @nev nev, @ir nev, @va nev, @cim nev, @orsz char(2), @allam varchar(255), @tel nev, @email nev, @ado nev, @tnev nev, @tir nev, @tva nev, @tcim nev, @torsz char(2), @tallam varchar(255), @ttel nev, @kerulet varchar(50), @kozterulet_jellege varchar(50), @hazszam varchar(50), @epulet varchar(50), @lepcsohaz varchar(50), @szint varchar(50), @ajto varchar(50), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE Declare @tkod int declare @acs int declare @akccs int BEGIN TRANSACTION t_vevouj select @tkod=count(*) from vevo_tel where vevo_kod=@vkod delete from wvevo_tel where kicsoda=@kics insert into wvevo_tel select vevo_kod,telep_kod,telep_nev,varos,iranyito,cim, kerulet,kozterulet_jellege,hazszam,epulet,lepcsohaz,szint,ajto, kapcsolat,telefon,email,kartya,limit, jovedeki,torolt,@kics,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,idokapu,iso,allam, '' from vevo_tel where vevo_kod=@vkod if len(@tnev)>0 begin if (select count(*) from wvevo_tel where kicsoda=@kics)>1 update wvevo_tel set telep_nev=@tnev, iranyito=@tir, varos =@tva, cim =@tcim, iso =@torsz, allam =@tallam, telefon =@ttel where kicsoda=@kics and telep_kod='1' else insert into wvevo_tel values( @vkod, '1', @tnev, @tva, @tir, @tcim, '','','','','','','', '', @ttel, @email, '',0,'','',@kics, 0,0,0,0,'', @torsz,@tallam, '') end update vevok set vevo_nev=@nev, iranyito=@ir, varos =@va, cim =@cim, telefon =@tel, email =@email, adoszam =@ado, iso =@orsz, allam =@allam, kerulet =@kerulet, kozterulet_jellege=@kozterulet_jellege, hazszam =@hazszam, epulet =@epulet, lepcsohaz=@lepcsohaz, szint =@szint, ajto =@ajto, kicsoda =@kics, modositva=dbo.mygetdatetime() where vevo_kod=@vkod set @cim=rtrim(@cim) + ' '+rtrim(@kozterulet_jellege) + ' '+rtrim(@hazszam) + ' sz.' if len(@epulet) >0 set @cim=@cim +' '+rtrim(@epulet)+ ' ép.' if len(@lepcsohaz) >0 set @cim=@cim +' '+rtrim(@lepcsohaz)+ ' lh.' if len(@szint) >0 set @cim=@cim +' '+rtrim(@szint)+ ' em.' if len(@ajto) >0 set @cim=@cim +' '+rtrim(@ajto) update wvevo_tel set telep_nev=@nev, iranyito=@ir, varos =@va, cim =rtrim(@cim), iso =@torsz, allam =@tallam, telefon =@tel, email=@email where kicsoda=@kics and telep_kod='0' update _web_belepes set belep_nev=@email, email=@email where vevo_kod=@vkod exec vevo_beir_telmeg @vkod, @kics COMMIT TRANSACTION t_vevouj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_mod1] @vkod int, @nev nev, @ir nev, @va nev, @cim nev, @orsz char(2), @allam varchar(255), @tel nev, @kapcs nev, @email nev, @ado nev, @tnev nev, @tir nev, @tva nev, @tcim nev, @torsz char(2), @tallam varchar(255), @ttel nev, @kerulet varchar(50), @kozterulet_jellege varchar(50), @hazszam varchar(50), @epulet varchar(50), @lepcsohaz varchar(50), @szint varchar(50), @ajto varchar(50), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE Declare @tkod int declare @acs int declare @akccs int BEGIN TRANSACTION t_vevouj select @tkod=count(*) from vevo_tel where vevo_kod=@vkod delete from wvevo_tel where kicsoda=@kics insert into wvevo_tel select vevo_kod,telep_kod,telep_nev,varos,iranyito,cim, kerulet,kozterulet_jellege,hazszam,epulet,lepcsohaz,szint,ajto, kapcsolat,telefon,email,kartya,limit, jovedeki,torolt,@kics,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,idokapu,iso,allam, '' from vevo_tel where vevo_kod=@vkod if len(@tnev)>0 begin if (select count(*) from wvevo_tel where kicsoda=@kics)>1 update wvevo_tel set telep_nev=@tnev, iranyito=@tir, varos =@tva, cim =@tcim, iso =@torsz, allam =@tallam, telefon =@ttel where kicsoda=@kics and telep_kod='1' else insert into wvevo_tel values( @vkod, '1', @tnev, @tva, @tir, @tcim, '','','','','','','', '', @ttel, @email, '',0,'','',@kics, 0,0,0,0,'', @torsz,@tallam, '') end if len(rtrim(@ado))>0 and len(rtrim(@ado))=11 set @ado=left(@ado,8)+'-'+substring(@ado,9,1)+'-'+substring(@ado,10,2) update vevok set vevo_nev=@nev, iranyito=@ir, varos =@va, cim =@cim, telefon =@tel, kapcsolat=@kapcs, email =@email, adoszam =@ado, iso =@orsz, allam =@allam, kerulet =@kerulet, kozterulet_jellege=@kozterulet_jellege, hazszam =@hazszam, epulet =@epulet, lepcsohaz=@lepcsohaz, szint =@szint, ajto =@ajto, kicsoda =@kics, modositva=dbo.mygetdatetime() where vevo_kod=@vkod set @cim=rtrim(@cim) + ' '+rtrim(@kozterulet_jellege) + ' '+rtrim(@hazszam) + ' sz.' if len(@epulet) >0 set @cim=@cim +' '+rtrim(@epulet)+ ' ép.' if len(@lepcsohaz) >0 set @cim=@cim +' '+rtrim(@lepcsohaz)+ ' lh.' if len(@szint) >0 set @cim=@cim +' '+rtrim(@szint)+ ' em.' if len(@ajto) >0 set @cim=@cim +' '+rtrim(@ajto) update wvevo_tel set telep_nev=@nev, iranyito=@ir, varos =@va, cim =rtrim(@cim), iso =@torsz, allam =@tallam, telefon =@tel, email=@email where kicsoda=@kics and telep_kod='0' update _web_belepes set belep_nev=@email, email=@email where vevo_kod=@vkod exec vevo_beir_telmeg @vkod, @kics COMMIT TRANSACTION t_vevouj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_ren_uj] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @fiz_ert egyseg_ar, @fiz_mod char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @rakt kulcs set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev if dbo.xrfuggveny('RendRaktarra')='I' begin DECLARE c1 scroll CURSOR for SELECT raktar_kod from wvevo_rent inner join cikkek on cikkek.cikk_szam=wvevo_rent.cikk_szam WHERE kicsoda=@kics group by raktar_kod order by raktar_kod open c1 fetch next from c1 into @rakt while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec _web_vevo_ren_uj_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, '0', @arcsoport, @akccsoport, @megj, 5, --elektronikus @fiz_ert, @fiz_mod, @rakt, @kics END fetch next from c1 into @rakt end close c1 deallocate c1 end else exec _web_vevo_ren_uj_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, '0', @arcsoport, @akccsoport, @megj, 5, --elektronikus @fiz_ert, @fiz_mod, 0, @kics DELETE from webvevo_rent where vevo=@vevo COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_ren_uj_tranz_nelkul] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @fiz_ert egyseg_ar, @fiz_mod char(1), @rakt kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @kulcs varchar(20) declare @rakk kulcs declare @meddig char(10) declare @cn cikk_nev set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_ren' if (select count(*) from webvevo_rent where vevo=@vevo)>0 begin exec bizsorsz_no @kulcs, @sorsz output insert into vevo_renf values(@sorsz, @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @akccsoport, @arcsoport, @megj, @tipus, 'rögzített', @kics, dbo.mygetdatetime(), @rakt ) if len(@fiz_mod)>0 insert into vevo_ren_web values(@sorsz, @fiz_ert, @fiz_mod) DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, sum(edarab), sum(darab), egyseg_ar, kedvezmeny, visszaig_dat, akcio from webvevo_rent where vevo=@vevo group by cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo,egyseg_ar,kedvezmeny,visszaig_dat,akcio order by case dbo.xrBizTetRend() when 'cikk_szam' then cikk_szam else cikk_nev end set @tet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@cn,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_rent values( @sorsz, @tet, @csz, @afa, @me, @szorz, @edb, @db, @ear, @tkedv, @tvdat, @akcio) if len(rtrim(@akcio))>0 exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakk= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakk, @meddig, @kics, '','','', @sorsz,@tet end set @tet = @tet + 1 END FETCH NEXT FROM kvevo_renf INTO @csz,@cn,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_ren_uj_tranz_nelkul1] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @fiz_ert egyseg_ar, @fiz_mod char(1), @tip kulcs, @kod varchar(50), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @kulcs varchar(20) declare @rakk kulcs declare @meddig char(10) declare @cn cikk_nev declare @fog varchar(1) declare @fogr varchar(1) declare @prior bigint declare @aru_szolg char(1) declare @rendez varchar(20) declare @ndat varchar(20) set @ndat=dbo.mygetdatetime() set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_ren' set @fog=dbo.xrfuggveny('FoglalasHasznal') set @fogr=dbo.xrfuggveny('FoglalAutVevoRend') set @rakk= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) set @rendez=dbo.xrBizTetRend() if (select count(*) from webvevo_rent where vevo=@vevo)>0 begin exec bizsorsz_no @kulcs, @sorsz output insert into vevo_renf values(@sorsz, @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @akccsoport, @arcsoport, @megj, @tipus, 'rögzített', @kics, dbo.mygetdatetime(), 0 ) if len(@fiz_mod)>0 insert into vevo_ren_web values(@sorsz, @fiz_ert, @fiz_mod) insert into vevo_rent select @sorsz,ROW_NUMBER() OVER (ORDER BY case @rendez when 'cikk_szam' then cikk_szam else cikk_nev end), cikk_szam,afa_kulcs,menny_egys,szorzo,sum(edarab),sum(darab), egyseg_ar,kedvezmeny,visszaig_dat,akcio from webvevo_rent where vevo=@vevo group by cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo,egyseg_ar,kedvezmeny,visszaig_dat,akcio order by case @rendez when 'cikk_szam' then cikk_szam else cikk_nev end if @fog='I' and @fogr='I' begin select @prior= isnull(Max(prioritas),0) from foglalasok insert into foglalasok select @prior + ROW_NUMBER() OVER (ORDER BY tetel), vevo_rent.cikk_szam,darab,darab,@vevo,@rakk,@ndat,@kics,@meddig, '','','','','',@sorsz,tetel,'' from vevo_rent inner join cikkek on cikkek.cikk_szam=vevo_rent.cikk_szam where cikkek.aru_szolg='1' and bizszam=@sorsz end DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, sum(edarab), sum(darab), egyseg_ar, kedvezmeny, visszaig_dat, akcio from webvevo_rent where vevo=@vevo group by cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo,egyseg_ar,kedvezmeny,visszaig_dat,akcio order by case @rendez when 'cikk_szam' then cikk_szam else cikk_nev end set @tet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@cn,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if len(rtrim(@akcio))>0 exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb END FETCH NEXT FROM kvevo_renf INTO @csz,@cn,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf if @tip<>0 insert into _web_rend_atvetel values(@sorsz, @tip, @kod) end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_ren_uj1] -- a tip és kod paraméterek a szállítás/átvétel módja @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @fiz_ert egyseg_ar, @fiz_mod char(1), @tip kulcs, @kod varchar(50), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_renf_uj'+dbo.strzero(@vevo,10) BEGIN TRANSACTION @tranznev exec _web_vevo_ren_uj_tranz_nelkul1 @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, '0', @arcsoport, @akccsoport, @megj, 5, --elektronikus @fiz_ert, @fiz_mod, @tip, @kod, @kics DELETE from webvevo_rent where vevo=@vevo COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_uj] @nev nev, @bejel_email varchar(50), @bejel_jelszo varchar(50), @webshop varchar(50), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE Declare @vkod int declare @acs int declare @akccs int BEGIN TRANSACTION t_vevouj select @acs=convert(int,dbo.xrfuggveny('AlapArcsop')) select @akccs=convert(int,dbo.xrfuggveny('AlapAkccsop')) delete from wvevo_tel where kicsoda=@kics insert into wvevo_tel values( 0, '0', @NEV, '', '', '', '','','','','','','', '', --kapcs '', --tel @bejel_email, '',0,'','',@kics, 0,0,0,0,'','HU','', '') insert into vevok values( @NEV, '', '', 'HUN', '', '', '', '', @bejel_email, '', '', '', '', @acs, @akccs, 0, '3', 0, 0, 0, 0, 0, 0, '', '', @kics, dbo.mygetdatetime(), '', '', '', '', '', 'HU', '0', 'HU','', 'HU','', '','','','','','','','0' ) Select @vkod = @@identity exec vevo_beir_telmeg @vkod, @kics insert into _web_belepes values( @bejel_email, @bejel_jelszo, @bejel_email, @vkod, 0, '', dbo.mygetdatetime(), @webshop, 0) COMMIT TRANSACTION t_vevouj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [_web_vevo_uj1] @nev nev, @bejel_email varchar(50), @bejel_jelszo varchar(50), @webshop varchar(50), @vevotip char(1), --'0':magán; '1':cég adószámmal @adosz varchar(20), --cég adószáma, ha @vevotip='1' @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE Declare @vkod int declare @acs int declare @akccs int BEGIN TRANSACTION t_vevouj select @acs=convert(int,dbo.xrfuggveny('AlapArcsop')) select @akccs=convert(int,dbo.xrfuggveny('AlapAkccsop')) if @vevotip='0' set @adosz='' delete from wvevo_tel where kicsoda=@kics insert into wvevo_tel values( 0, '0', @NEV, '', '', '', '','','','','','','', '', --kapcs '', --tel @bejel_email, '',0,'','',@kics, 0,0,0,0,'','HU','', '') insert into vevok values( @NEV, '', '', 'HUN', '', '', '', '', @bejel_email, @adosz, --adószám '', --eu_adoszám '', '', @acs, @akccs, 0, '3', 0, 0, 0, 0, 0, 0, @vevotip, --viszonteladó '', @kics, dbo.mygetdatetime(), '', '', '', '', '', 'HU', '0', 'HU','', 'HU','', '','','','','','','','0' ) Select @vkod = @@identity exec vevo_beir_telmeg @vkod, @kics insert into _web_belepes values( @bejel_email, @bejel_jelszo, @bejel_email, @vkod, 0, '', dbo.mygetdatetime(), @webshop,1) COMMIT TRANSACTION t_vevouj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [agy_beszerzes_tetel] @szallito kulcs, @rend_szam bizonylat_szam, @hivszam varchar(50), @tetel bizonylat_tetel, @csz cikk_szam, @cn cikk_nev, @darab mennyiseg, @ear egyseg_ar, @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON BEGIN TRANSACTION wagy_szall_szlet declare @hany as int declare @tet as bizonylat_tetel select @hany=count(*) from wagy_szall_szlet where kicsoda=@kics and cikk_szam=@csz and szallito=@szallito and hivszam=@hivszam if @hany=0 begin select @tet=isnull(max(tetel),0) + 1 from wagy_szall_szlet where hivszam=@hivszam and szallito=@szallito and kicsoda=@kics insert into wagy_szall_szlet select @szallito, @rend_szam, @hivszam, @tet, @csz, @cn, @darab, @ear, @kics end else update wagy_szall_szlet set darab=darab+@darab where kicsoda=@kics and cikk_szam=@csz and hivszam=@hivszam and szallito=@szallito COMMIT TRANSACTION wagy_szall_szlet end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [agy_komissio_tetel] @rend_szam bizonylat_szam, @tetel bizonylat_tetel, @darab mennyiseg, @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON BEGIN TRANSACTION agy_komissio_tetel declare @hany as int select @hany=count(*) from wkomissio where kicsoda=@kics and rendel_bsz=@rend_szam and rendel_tetel=@tetel if @hany=0 insert into wkomissio select @rend_szam, @tetel, raktar_kod, raktar_nev, cikk_szam, cikk_nev, menny_egys, @darab, @kics from dbo.fkomissiot(@rend_szam) where tetel=@tetel else update wkomissio set darab=darab+@darab where kicsoda=@kics and rendel_bsz=@rend_szam and rendel_tetel=@tetel COMMIT TRANSACTION agy_komissio_tetel end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [akc_ke_aktualizal] @akccs kulcs, @dat datum, @csz dbo.cikk_szam, @adb dbo.mennyiseg with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @akctip int declare @kulcs timestamp SELECT @akctip=isnull(akcio_tip,0), @kulcs=kulcs from vevo_akcio where akciocsop = @akccs and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) and kdatum=( select max(kdatum) from vevo_akcio where akciocsop = @akccs and cikk_szam=@csz and ( (akcio_tip=1 and kdatum <= @dat and @dat <= vdatum) or (akcio_tip=2 and kdatum <= @dat and ke_maradek>0) ) ) if @akctip=2 update vevo_akcio set ke_maradek=ke_maradek - @adb where kulcs=@kulcs end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [AKCIO_CSOMAG_MOD] @azon int, @NEV CHAR(40), @ERV CHAR(7), @k1 float, @v1 float, @e1 float, @k2 float, @v2 float, @e2 float, @k3 float, @v3 float, @e3 float, @kics char(20), @modido char(20) WITH RECOMPILE AS SET NOCOUNT ON BEGIN TRANSACTION t_acsomaguj -- törlesek delete from akc_csom_szt where csomag_azon=@azon -- fej update akc_csom_szf set csomag_nev=@nev, idoszak=@erv, kint1=@k1, vint1=@v1, kedv1=@e1, kint2=@k2, vint2=@v2, kedv2=@e2, kint3=@k3, vint3=@v3, kedv3=@e3, kicsoda=@kics, modositva=dbo.MyGetDateTime() where csomag_azon=@azon -- tetel insert into akc_csom_szt select @azon,cikk_szam,cikkcsoport, gyarto, szallito from wakc_csom_szt where kicsoda=@kics COMMIT TRANSACTION t_acsomaguj GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [AKCIO_CSOMAG_UJ] @NEV CHAR(40), @ERV CHAR(7), @k1 float, @v1 float, @e1 float, @k2 float, @v2 float, @e2 float, @k3 float, @v3 float, @e3 float, @kics char(20), @modido char(20) WITH RECOMPILE AS SET XACT_ABORT ON SET NOCOUNT ON declare @@hany int declare @maxprior int declare @maxazon int SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_acsomaguj -- fej set @maxprior=1+(select isnull(max(prioritas),0) from akc_csom_szf where idoszak=@erv) --set @maxazon=1+(select isnull(max(csomag_azon),0) from akc_csom_szf ) insert into akc_csom_szf values( --@maxazon, @nev, @erv, @maxprior, @k1, @v1, @e1, @k2, @v2, @e2, @k3, @v3, @e3, @kics, dbo.MyGetDateTime() ) set @@hany=@@IDENTITY--(select csomag_azon from akc_csom_szf where csomag_nev=@nev and idoszak=@erv) -- tetel insert into akc_csom_szt select @@hany,cikk_szam,cikkcsoport,gyarto,szallito from wakc_csom_szt where kicsoda=@kics COMMIT TRANSACTION t_acsomaguj SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [altsorsz_no] @tipus char(10), @sorsz bizonylat_szam output with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON update altsorszam set kod=kod+1 where tipus=@tipus select @sorsz=kod from altsorszam where tipus=@tipus end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [anyag_idoszak] ( @kdat char(10), @vdat char(10), @rakk int, @kics char(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50); select @tranznev = 't_term_ido' begin transaction @tranznev delete from wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, cikk_nev, menny_egys, darab1, kicsoda) select cikkek.CIKK_SZAM, cikkek.CIKK_NEV, cikkek.menny_egys, SUM(keszre2.darab) AS darab, @kics from diszpo INNER JOIN keszre1 ON diszpo.kulcs = keszre1.diszpo INNER JOIN keszre2 ON keszre1.kulcs = keszre2.kulcs INNER JOIN cikkek ON keszre2.acikk_szam = cikkek.CIKK_SZAM where left(keszre1.modido,10)>=@kdat and left(keszre1.modido,10)<=@vdat and (@rakk=0 or diszpo.raktar_kod=@rakk) group by cikkek.CIKK_SZAM, cikkek.CIKK_NEV, cikkek.menny_egys commit transaction @tranznev end; GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO create PROCEDURE [APOLLO_KOTEG_UJ] AS SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @@hany int if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'APOLLO',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 end SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [arulog_vevo_szlaf_uj]( @bsz bizonylat_szam, @szle bizonylat_szam ) AS BEGIN --SET NOCOUNT ON; declare @datum datum declare @vnev nev declare @rakk kulcs declare @torlo char(1) declare @visszaru char(1) declare @tor_ssz bizonylat_szam declare @rendazon bizonylat_szam declare @szlesz bizonylat_szam declare @sqlstr varchar(1024) declare @eszlsz bizonylat_szam if (select ertek from parameterek where azonosito='AruLog')<>'G' return select @datum=telj_datum from vevo_szlaf where bizszam=@bsz select @vnev=vevo_nev from vevo_szlaf where bizszam=@bsz select @torlo=torlo from vevo_szlaf where bizszam=@bsz select @tor_ssz=tor_ssz from vevo_szlaf where bizszam=@bsz select @visszaru=visszaru from vevo_szlaf where bizszam=@bsz if len(@szle)>0 select @szlesz=bizszam from vevo_szlef where bizszam=@szle else select @szlesz=bizszam from vevo_szlef where szlaszam=@bsz select @rakk=raktar_kod from vevo_szlef where szlaszam=@bsz select top 1 @rendazon=rendel_bsz from vevo_szlet where bizszam=@szlesz order by tetel if @visszaru=1 begin set @torlo=1 --az eredeti száll. lev. száma select top 1 @eszlsz=rendel_bsz from vevo_szlet where bizszam=@szlesz select @tor_ssz=szlaszam from vevo_szlef where bizszam=@eszlsz end set @sqlstr='delete from ' + dbo.xrfuggveny('DBAruLog') +'..wvevo_szlat where bizszam=''' +@bsz+'''' exec (@sqlstr) set @sqlstr='insert into ' + dbo.xrfuggveny('DBAruLog') + '..wvevo_szlat '+ 'select '''+@bsz+''',tetel, cikk_szam, cikk_nev, menny_egys, szorzo, edarab, '''', ''sistem'' '+ 'from vevo_szlat where bizszam='''+@bsz+''' and cikk_szam<>''704'' and cikk_szam<>''705'' ' exec (@sqlstr) set @sqlstr='exec ' + dbo.xrfuggveny('DBAruLog') + '..vevo_szlaf_uj '+ ''''+ @bsz + ''', '+ ''''+ @bsz + ''', '+ ''''+ @datum + ''', '+ ''''+ @bsz + ''', '+ ''''+ replace(@vnev,'''','''''') + ''', '+ '0, '+ str(@rakk,3,0) + ', '+ ''''+ @torlo + ''', '+ ''''+ @tor_ssz + ''', '+ ''''+ @rendazon + ''', '+ ''''', '+ '''sistem'' ' exec (@sqlstr) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [BackupDataBase] ( @dbname varchar(50), @backupname varchar(250), @zipname varchar(250) ) AS begin SET NOCOUNT ON declare @cCmd Varchar(250); Set @cCmd='C:\Progra~1\Trans-~1\TSZip\TSZip.exe ' + @zipname + ' ' + @backupname; --Set @cCmd='C:\aruker_win\TSZip.exe ' + @zipname + ' ' + @backupname; BACKUP DATABASE @dbname TO DISK = @backupname WITH INIT , NOUNLOAD , NAME = N'Backup Manual', NOSKIP , STATS = 10, NOFORMAT; Exec master..xp_cmdshell @cCmd , NO_OUTPUT; end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [bankcsomag_zar] @kulcs kulcs, @nyito egyseg_ar, @terheles egyseg_ar, @jovairas egyseg_ar, @zaro egyseg_ar, @kics kicsoda with recompile AS begin SET NOCOUNT ON declare @tranznev varchar(50) set @tranznev = 't_bcs_zar'+@kics begin transaction @tranznev update bankcsomagf set lezart='X' where kulcs=@Kulcs Update bankcsomagf set nyito = @nyito, terheles = @terheles, jovairas = @jovairas, zaro = @zaro, Kicsoda = @kics, modido=dbo.MyGetDateTime() where kulcs = @Kulcs commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bankcsomt_beir] @bank kulcs, @kiv int, @tip char(2), @partner_tip char(1), @partner kulcs, @p_szlasz varchar(50), @osszeg egyseg_ar, @pn penznem, @kurzus kurzus, @kozl1 varchar(80), @kozl2 varchar(80), @kozl3 varchar(80), @megj varchar(254), @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @etkulcs int declare @tkulcs int select @etkulcs=isnull(max(kulcs),-1) from bankcsomagt where kicsoda=@kics set @tranznev = 't_bcs_beir'+@kics begin transaction @tranznev insert into bankcsomagt(bankszamlaszam, kivonat, tipus, partner_tip, partner, p_szamlaszam, osszeg, penznem, kurzus, kozlemeny1, kozlemeny2, kozlemeny3, megjegyzes, kicsoda, modido) values(@bank, @kiv, @tip, @partner_tip, @partner, @p_szlasz, @osszeg, @pn, @kurzus, @kozl1, @kozl2, @kozl3, @megj, @kics, dbo.myGetDateTime()) select @tkulcs=isnull(max(kulcs),-1) from bankcsomagt where kicsoda=@kics and kulcs>@etkulcs insert into bankcsomagb select @tkulcs, bizszam, ertek from wbankcsomagb where kicsoda=@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bankcsomt_beir_cib_xls] @bank kulcs, @kiv int, @tip char(2), @partner_tip char(1), @partner kulcs, @p_szlasz varchar(50), @osszeg egyseg_ar, @pn penznem, @kurzus kurzus, @kozl1 varchar(80), @kozl2 varchar(80), @kozl3 varchar(80), @megj varchar(254), @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @etkulcs int declare @tkulcs int declare @bizszam varchar(50) declare @ut_bizszam varchar(50) -- a kurzorban utolsónak szereplő bizszam declare @bizszam_keres varchar(50) declare @brutto_ertek egyseg_ar declare @sbrutto_ertek egyseg_ar declare @szla_db int -- a hátralékos számlák száma declare @found_szla int -- A közlemény 1-ben azonosított számlák select @etkulcs=isnull(max(kulcs),-1) from bankcsomagt where kicsoda=@kics set @tranznev = 't_bcs_beir'+@kics begin transaction @tranznev -- betesszük a bankcsomagt-be a tételt insert into bankcsomagt(bankszamlaszam, kivonat, tipus, partner_tip, partner, p_szamlaszam, osszeg, penznem, kurzus, kozlemeny1, kozlemeny2, kozlemeny3, megjegyzes, kicsoda, modido) values(@bank, @kiv, @tip, @partner_tip, @partner, @p_szlasz, @osszeg, @pn, @kurzus, @kozl1, @kozl2, @kozl3, @megj, @kics, dbo.myGetDateTime()) -- kivesszük a kulcsot if @tip = 'BT' or @tip = 'BJ' begin select @tkulcs=isnull(max(kulcs),-1) from bankcsomagt where kicsoda=@kics and kulcs>@etkulcs -- megpróbáljuk megkeresni melyik számlák lettek kiegyenlítve if @partner_tip = 'S' -- szállító számlák begin SELECT @szla_db = isnull(count(*),0) from vUnion_Szall_szla where szallito = @partner and fiz_modja = '4' and torolt <> '1' and torlo <> '1' and abs(brutto_ertek - kiegyenlitve) > dbo.xrfuggveny('PUKiegyenlitesTolerancia') DECLARE cszla cursor FOR SELECT kulsoszlasz, -brutto_ertek from vUnion_Szall_szla where szallito = @partner and fiz_modja = '4' and torolt <> '1' and torlo <> '1' and abs(brutto_ertek - kiegyenlitve) > dbo.xrfuggveny('PUKiegyenlitesTolerancia') order by fiz_esed end else if @partner_tip = 'V' -- vevői számlák begin SELECT @szla_db = isnull(count(*),0) from vUnion_Vevo_szla where vevo = @partner and fiz_modja = '4' and torolt <> '1' and torlo <> '1' and abs(brutto_ertek - kiegyenlitve) > dbo.xrfuggveny('PUKiegyenlitesTolerancia') DECLARE cszla cursor FOR SELECT bizszam, brutto_ertek from vUnion_Vevo_szla where vevo = @partner and fiz_modja = '4' and torolt <> '1' and torlo <> '1' and abs(brutto_ertek - kiegyenlitve) > dbo.xrfuggveny('PUKiegyenlitesTolerancia') order by fiz_esed end select @sbrutto_ertek = 0 select @found_szla = 0 open cszla FETCH NEXT FROM cszla INTO @bizszam, @brutto_ertek while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN select @ut_bizszam = @bizszam select @bizszam_keres = dbo.Bizszam_szam(@bizszam) -- a nyers biz.szám nullák, évszám, '/' nélkül if dbo.Bizszam_keres_szovegben(@bizszam_keres,@kozl1) = 1 -- megnézzük, hogy a nyers biz.szám benne van e a közleméy1 ben -- if charindex(@bizszam_keres,@kozl1) > 0 begin select @sbrutto_ertek = @sbrutto_ertek + @brutto_ertek -- az eddig azonosított számlák összes bruttó értéke select @found_szla = @found_szla + 1 -- ha az összes bruttó érték <= teljes öszzeg, betesszük a bankcsomagb-be if (@sbrutto_ertek) <= (Abs(@osszeg) + dbo.xrfuggveny('PUKiegyenlitesTolerancia')) begin --print '2' insert into bankcsomagb values (@tkulcs, @bizszam, dbo.MinValue(@brutto_ertek,@osszeg)) end else break end FETCH NEXT FROM cszla INTO @bizszam, @brutto_ertek END end close cszla deallocate cszla if @found_szla = 0 and @szla_db = 1 -- ha nem azonosítottunk számla számot a közl1-ben és 1 kiegyenlítettlen számlánk van insert into bankcsomagb values (@tkulcs, @bizszam, dbo.MinValue(@brutto_ertek,@osszeg)) end commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bankcsomt_mod] @kulcs kulcs, @tip char(2), @partner_tip char(1), @partner kulcs, @p_szlasz varchar(50), @osszeg egyseg_ar, @pn penznem, @kurzus kurzus, @kozl1 varchar(80), @kozl2 varchar(80), @kozl3 varchar(80), @megj varchar(254), @kics kicsoda with recompile AS begin SET NOCOUNT ON declare @tranznev varchar(50) set @tranznev = 't_bcs_mod'+@kics begin transaction @tranznev update bankcsomagt set tipus =@tip, partner_tip =@partner_tip, partner =@partner, p_szamlaszam =@p_szlasz, osszeg =@osszeg, penznem =@pn, kurzus =@kurzus, kozlemeny1 =@kozl1, kozlemeny2 =@kozl2, kozlemeny3 =@kozl3, megjegyzes =@megj, kicsoda =@kics, modido =dbo.myGetDateTime() where kulcs=@kulcs delete from bankcsomagb where kulcs=@kulcs insert into bankcsomagb select @kulcs, bizszam, ertek from wbankcsomagb where kicsoda=@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [BESZERZES_JOV] @dat datum, @rakk kulcs, @ccs char(18), @szal kulcs, @minden char(1), @kics kicsoda WITH RECOMPILE AS begin SET NOCOUNT ON declare @mdat char(10) declare @lccs int set @lccs=len( rtrim(@ccs) ) select @mdat=left(@dat,8)+'01' delete from wgyujtes where kicsoda=@kics --BESZERZES belföldről ---------------------------- insert into wgyujtes (cikk_szam, cikk_nev,szall_kod, datum1, gyarto_nev, darab1, kicsoda) select cikk_szam, cikk_nev,szallito, telj_datum, 'belföldről', sum(edarab*szorzo), @kics from vqszall_szle1 where orszag='HU' and visszaru<>'1' and (@minden='1' or jovedeki='1') and ( @mdat='*' or telj_datum between @mdat and @dat) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal='' or @szal=rtrim(szallito) ) group by cikk_szam, cikk_nev,szallito, telj_datum --BESZERZES tagállamból ---------------------------- insert into wgyujtes (cikk_szam, cikk_nev,szall_kod, datum1, gyarto_nev, darab1, kicsoda) select cikk_szam, cikk_nev,szallito, telj_datum, 'tagállamból', sum(edarab*szorzo), @kics from vqszall_szle1 where eu='1' and orszag<>'HU' and visszaru<>'1' and (@minden='1' or jovedeki='1') and ( @mdat='*' or telj_datum between @mdat and @dat) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal='' or @szal=rtrim(szallito) ) group by cikk_szam, cikk_nev,szallito, telj_datum --BESZERZES importból (nem tagállamból) ---------------------------- insert into wgyujtes (cikk_szam, cikk_nev,szall_kod, datum1, gyarto_nev, darab1, kicsoda) select cikk_szam, cikk_nev,szallito, telj_datum, 'importból', sum(edarab*szorzo), @kics from vqszall_szle1 where eu<>'1' and orszag<>'HU' and visszaru<>'1' and (@minden='1' or jovedeki='1') and ( @mdat='*' or telj_datum between @mdat and @dat) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal='' or @szal=rtrim(szallito) ) group by cikk_szam, cikk_nev,szallito, telj_datum --BESZERZES -ből visszaru ---------------------------- insert into wgyujtes (cikk_szam, cikk_nev,szall_kod, datum1, gyarto_nev, darab1, kicsoda) select cikk_szam, cikk_nev,szallito, telj_datum, 'visszáru', sum(edarab*szorzo), @kics from vqszall_szle1 where visszaru='1' and (@minden='1' or jovedeki='1') and ( @mdat='*' or telj_datum between @mdat and @dat) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal='' or @szal=rtrim(szallito) ) group by cikk_szam, cikk_nev,szallito, telj_datum --VEGE ---------------- delete wgyujtes where kicsoda=@kics and darab1=0 END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bevet_uj] ( @dat datum, @hivszam varchar(50), @bevj kulcs, @rakkod kulcs, @megj megjegyzes, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) set @tranznev = 't_bevet_uj'+@kics begin transaction @tranznev exec bevet_uj_tranz_nelkul @dat, @hivszam, @bevj, @rakkod, @megj, @kics delete from wbevett where kicsoda= @kics commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bevet_uj_tranz_nelkul] ( @dat datum, @hivszam varchar(50), @bevj kulcs, @rakkod kulcs, @megj megjegyzes, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @ev char(4) declare @hany bizonylat_szam declare @kulcs varchar(20) declare @tranznev varchar(50) declare @etet bizonylat_tetel declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @aruszolg char(1) set @ev = left(@dat,4) set @kulcs = @ev + 'BEVET' exec bizsorsz_no @kulcs , @hany output insert into bevetf values (@hany, @hivszam, @rakkod, @dat, @bevj, @megj, @kics, dbo.mygetdatetime()) set @tet=0 DECLARE cbevett CURSOR for SELECT tetel, wbevett.cikk_szam, wbevett.afa_kulcs, wbevett.menny_egys, szorzo, egyseg_ar, darab, cikkek.aru_szolg FROM wbevett,cikkek WHERE wbevett.cikk_szam=cikkek.cikk_szam and kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) else wbevett.cikk_nev end open cbevett fetch next from cbevett into @etet, @csz, @afa, @me, @szorz, @ear, @db, @aruszolg while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into bevett values( @hany, @tet, @csz, @afa, @me, @szorz, @ear, @db) set @_db= @db * @szorz set @_ear = @ear / @szorz if @aruszolg='1' exec karton_be @ev, 'bevet', @hany, @etet, @tet, @rakkod, @csz, @_db, @_ear, true, 0, @kics END fetch next from cbevett into @etet, @csz, @afa, @me, @szorz, @ear, @db, @aruszolg end close cbevett deallocate cbevett end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bevetjog_uj] ( @NEV nev ) AS begin SET XACT_ABORT ON SET NOCOUNT ON insert into bevetjog values (@nev); end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [biz_evnyitas] @evtip char(20) WITH RECOMPILE AS SET NOCOUNT ON declare @biztipus varchar(20) declare @cszam varchar(10) declare @szam int set @biztipus=rtrim(SUBSTRING(@evtip,5,20)) set @szam=0 if (select isnull(count(*),0) from bizsorszam where rtrim(evtipus)=rtrim(@evtip) )=0 begin if @biztipus='vevo_ren' or @biztipus='vevo_szle' or @biztipus='vevo_kassza' or @biztipus='szall_ren' begin if (select ISNULL(COUNT(*),0) from nb_parameterek) > 0 begin select @cszam=ertek from nb_parameterek where AZONOSITO='nb_biz_eltolas' set @szam=CONVERT(int,@cszam) end end if (select count(*) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='BizEltolas' )>0 begin select @cszam=ertek from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='BizEltolas' set @szam=CONVERT(int,@cszam) end insert into bizsorszam values(@evtip,@szam) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [bizsorsz_no] ( @nev varchar(30), @kssz bizonylat_szam output ) AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @hany int declare @ev char(4) declare @betu char(2) declare @cszszh char(1) declare @szszh int set @ev=left(@nev,4) if substring(@nev,5,11)='kassza_szla' and (select isnull(ertek, 'I') from parameterek where szamitogep='rendszerparameterek' and azonosito='AzonosBetujel')='I' set @nev=left(@nev,4)+'vevo_szla' update bizsorszam set kod=kod+1 where evtipus=@nev select @hany=kod from bizsorszam where evtipus=@nev if substring(@nev,5,9)='vevo_szla' begin if (select ISNULL(COUNT(*),0) from nb_parameterek) > 0 begin select @betu=isnull(ertek, '') from nb_parameterek where azonosito='nb_bizbetu' set @kssz=SUBSTRING(@nev,3,2) + ltrim(rtrim(@betu)) + dbo.strzero(@hany,6) end else begin select @betu =isnull(ertek, '') from parameterek where szamitogep='rendszerparameterek' and azonosito='szlabetu' select @cszszh=isnull(ertek, '2') from parameterek where szamitogep='rendszerparameterek' and azonosito='szlaszamform' set @szszh=convert(int, @cszszh) set @kssz=ltrim(str(@hany,6))+ '/' + right(@ev,@szszh) + upper(rtrim(@betu)) end end else if substring(@nev,5,11)='kassza_szla' begin if (select isnull(ertek, '') from parameterek where szamitogep='rendszerparameterek' and azonosito='AzonosBetujel')='I' select @betu =isnull(ertek, '') from parameterek where szamitogep='rendszerparameterek' and azonosito='szlabetu' else select @betu =isnull(ertek, '') from parameterek where szamitogep='rendszerparameterek' and azonosito='szlabetuCC' select @cszszh=isnull(ertek, '2') from parameterek where szamitogep='rendszerparameterek' and azonosito='szlaszamform' set @szszh=convert(int, @cszszh) set @kssz=ltrim(str(@hany,6))+ '/' + right(@ev,@szszh) + upper(rtrim(@betu)) end else begin set @kssz=@ev + dbo.strzero(@hany,6) end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_atvezetes] ( @csz_mit char(14), @csz_mire char(14), @vkis char(1), @kics char(20), @mit int) --1:programból; 2:tároltból as begin SET XACT_ABORT ON SET NOCOUNT ON declare @db1 numeric(18,3); declare @db2 numeric(18,3); declare @db11 numeric(18,3); declare @db21 numeric(18,3); declare @tranznev varchar(50) declare @acs kulcs declare @atip kulcs declare @kdat datum declare @vdat datum declare @csz char(14) declare @cn_mit cikk_nev declare @cn_mire cikk_nev set @tranznev = 't_cikk_atvezetes'+@kics select @db1=isnull(darab,0) from leltar where cikk_szam= @csz_mit; select @db2=isnull(fellelt,0) from leltar where cikk_szam= @csz_mit; select @db11=isnull(darab,0) from leltar where cikk_szam= @csz_mire select @db21=isnull(fellelt,0) from leltar where cikk_szam= @csz_mire begin transaction @tranznev update _web_kedvencek set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update _web_kosar set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update _web_atvetel_mod set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update _web_kiemelt_cikk set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update _web_kosaruj set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update anyagszukseglet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update anyagszukseglet set acikk_szam= @csz_mire where acikk_szam= @csz_mit; update a_leltar_felv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; -- update arvaltozas set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update akcio_tv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update akc_csom_szt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update bevett set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update cikkek_doc set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update cikkek_kep set cikk_szam= @csz_mire where cikk_szam= @csz_mit; -- update cikkek_osszevonas set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update csomagt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update diszpo set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update foglalasok set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update karton_kivet_hiba set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update keszlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update keszlet_negativ set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update keszre2 set acikk_szam= @csz_mire where acikk_szam= @csz_mit; update kivett set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update leertekeles set fcikk_szam= @csz_mire where fcikk_szam= @csz_mit; update leertekeles set ccikk_szam= @csz_mire where ccikk_szam= @csz_mit; update leltar_felv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; -- update leltar_keszlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update nb_vevo_rent set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update nb_vevo_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update nb_vevo_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update onkoltar set cikk_szam= @csz_mire where cikk_szam= @csz_mit; -- update osszevont_cikkek set cikk_szam= @csz_mire where cikk_szam= @csz_mit; -- update osszevont_cikkek set ujcikk_szam= @csz_mire where ujcikk_szam= @csz_mit; update rmozgast set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szall_arajant set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szall_art set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szall_rent set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szall_rent_torol set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szall_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szall_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szbiz_kiv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update szbiz_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update term_receptura set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update term_termeles set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update term_veszteseg set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_akcio_hh set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_akcio_me set cikk_szam= @csz_mire where cikk_szam= @csz_mit; --update vevo_arajant set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_arajanlatt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_ido_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_rent set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_ren_datum set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_szlat_nyomt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_pszlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update vevo_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wadatgyujto set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wadatgyujto_vevo_ren set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wadatgyujto1 set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wakc_csom_szt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wanyagszukseglet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wanyagszukseglet set acikk_szam= @csz_mire where acikk_szam= @csz_mit; update wbevett set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wbekivett set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wbizonylat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wcikkek set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wcikkek_jellemzok set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wcikkek_kep set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wcimke set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wcimke set tgon = @csz_mire where tgon = @csz_mit; update webvevo_rent set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_cikkek set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_cikkek1 set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_szall_art set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_vevo_akcio set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_vevo_akcio_hh set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_vevo_ar_lista set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wf_vevo_arak set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wgyujtes set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wgyujtes1 set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wjov_keszlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkassza set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkassza1 set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkeszlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkeszlet_argen set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkeszlet_argen1 set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkeszlet_cikk set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkeszlet_szamolt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkeszletsz set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wkivett set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wleertekelest set fcikk_szam=@csz_mire where fcikk_szam=@csz_mit; update wleertekelest set ccikk_szam=@csz_mire where ccikk_szam=@csz_mit; update wleltar set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wleltar_felv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wmerleg set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wrmozgast set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_arajant set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_art set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_rend_jav set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_rendelt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_rent set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_rentv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_szlet_r set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszall_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszbiz_kiv set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszbiz_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wszbiz_ujkarton set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wterm_arak set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wtermeles set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wtermeles1 set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wtr_szall_art set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wtr_vevo_akcio set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wtr_vevo_akcio_hh set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wtr_vevo_ar_lista set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_arajanlatt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_arajant set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_ren_datum set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_rendt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_rent set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_rent_term set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_szla_nyomt set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_szla_pu set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_szlat set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_szlet_r set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevo_szletm set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wvevoarak set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wwszall_rend_jav set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update wwvevo_szlet set cikk_szam= @csz_mire where cikk_szam= @csz_mit; update cikkek set tgon= @csz_mire where tgon= @csz_mit; update cikkek set ntgon= @csz_mire where ntgon= @csz_mit; if @db11 + @db1>0 update leltar set darab=@db11 + @db1 where cikk_szam= @csz_mire; if @db21 + @db2>0 update leltar set fellelt=@db21 + @db2 where cikk_szam= @csz_mire; delete from cikk_chipsado where cikk_szam= @csz_mit; delete from cikk_kulcsszavak where cikk_szam= @csz_mit; delete from cikk_termekdijak where cikk_szam= @csz_mit; delete from cikkek_jellemzok where cikk_szam= @csz_mit; delete from cikkek_osszevonas where cikk_szam= @csz_mit; delete from cikk_leiras where cikk_szam= @csz_mit; delete from cikkek_kep where cikk_szam= @csz_mit delete from cikkek_doc where cikk_szam= @csz_mit delete from hcimke_csz where cikk_szam= @csz_mit delete from leltar where cikk_szam= @csz_mit; delete from leltar_keszlet where cikk_szam= @csz_mit; delete from havi_keszlet where cikk_szam= @csz_mit; delete from vevoarak where cikk_szam= @csz_mit; delete from vevo_arak where cikk_szam= @csz_mit; delete from wvevo_arak where cikk_szam= @csz_mit; delete from vevo_csz where cikk_szam= @csz_mit; delete from wvevo_csz where cikk_szam= @csz_mit; delete from wszamolt_keszlet where cikk_szam= @csz_mit; -- vevo_akcio DECLARE cvevo_akcio CURSOR for SELECT AKCIOCSOP, akcio_tip, KDATUM, VDATUM, CIKK_SZAM FROM vevo_akcio where cikk_szam=@csz_mit for update -- lockolás SELECT count(*) FROM vevo_akcio (holdlock) where cikk_szam=@csz_mit open cvevo_akcio; fetch next from cvevo_akcio into @acs, @atip, @kdat, @vdat, @csz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if (select count(*) from vevo_akcio where AKCIOCSOP=@acs and akcio_tip=@atip and KDATUM=@kdat and VDATUM=@vdat and CIKK_SZAM=@csz) = 0 update vevo_akcio set cikk_szam=@csz_mire where current of cvevo_akcio; else delete vevo_akcio where current of cvevo_akcio; END fetch next from cvevo_akcio into @acs, @atip, @kdat, @vdat, @csz end close cvevo_akcio; deallocate cvevo_akcio; -- vevo_ar_lista DECLARE cvevo_listaar CURSOR for SELECT arcsoport, datum, cikk_szam FROM vevo_ar_lista where cikk_szam=@csz_mit for update -- lockolás SELECT count(*) FROM vevo_ar_lista (holdlock) where cikk_szam=@csz_mit open cvevo_listaar; fetch next from cvevo_listaar into @acs, @kdat, @csz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if (select count(*) from vevo_ar_lista where arcsoport=@acs and DATUM=@kdat and CIKK_SZAM=@csz) = 0 update vevo_ar_lista set cikk_szam=@csz_mire where current of cvevo_listaar; else delete vevo_ar_lista where current of cvevo_listaar; END fetch next from cvevo_listaar into @acs, @kdat, @csz end close cvevo_listaar; deallocate cvevo_listaar; if @vkis = '1' begin update vonal set alap='0' where cikk_szam = @csz_mit update vonal set cikk_szam= @csz_mire where cikk_szam= @csz_mit end else delete from vonal where cikk_szam= @csz_mit -- először be kell írni a naplóba!!!! if @mit=1 --hívás programból begin select @cn_mit=cikk_nev from cikkek where cikk_szam=@csz_mit select @cn_mire=cikk_nev from cikkek where cikk_szam=@csz_mire insert into osszevont_cikkek values(@csz_mit,@cn_mit,@csz_mire,@cn_mire,@kics,dbo.mygetdatetime()) end -- törlés a törzsből delete from cikkek where cikk_szam= @csz_mit --legenerálni a vcikk_arak tablót exec tolt_vcikk_arak exec tolt_wcikk_arak_web commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_chips] AS SET XACT_ABORT ON SET NOCOUNT ON declare @a1 float declare @a2 float declare @a3 float declare @a4 float declare @a5 float declare @a6 float declare @a7 float declare @a8 float declare @a9 float declare @a10 float declare @a11 float declare @x1 float declare @x2 float declare @x3 float declare @x4 float declare @x5 float declare @x6 float declare @x7 float declare @x8 float declare @x9 float declare @x10 float declare @x11 float declare @csz char(14) select @a1=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR1' select @a2=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR2' select @a3=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR3' select @a4=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR4' select @a5=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR5' select @a6=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR6' select @a7=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR7' select @a8=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR8' select @a9=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR9' select @a10=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR10' select @a11=convert(float,replace(ertek,',','.')) from parameterek where azonosito='CHIPSAR11' BEGIN TRANSACTION t_cikkuj DECLARE kvevo_arf SCROLL CURSOR FOR select cikk_szam,norm1,norm2,norm3,norm4,norm5,norm6,norm7,norm8,norm9,norm10,norm11 from cikk_chipsado order by cikk_szam OPEN kvevo_arf FETCH NEXT FROM kvevo_arf INTO @csz, @x1, @x2, @x3, @x4, @x5, @x6, @x7, @x8, @x9, @x10, @x11 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN update cikk_chipsado set kat1=@x1*@a1, kat2=@x2*@a2, kat3=@x3*@a3, kat4=@x4*@a4, kat5=@x5*@a5, kat6=@x6*@a6, kat7=@x7*@a7, kat8=@x8*@a8, kat9=@x9*@a9, kat10=@x10*@a10, kat11=@x11*@a11 where cikk_szam=@csz end FETCH NEXT FROM kvevo_arf INTO @csz, @x1, @x2, @x3, @x4, @x5, @x6, @x7, @x8, @x9, @x10, @x11 end CLOSE kvevo_arf DEALLOCATE kvevo_arf COMMIT TRANSACTION t_cikkuj GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_doc_karb] @csz cikk_szam, @fn varchar(255), @doc image WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(100) select @tranznev = 'xikk_doc_karb' BEGIN TRANSACTION @tranznev if len(rtrim(@fn))=0 delete from cikkek_doc where cikk_szam = @csz else begin if (select IsNull(count(*),0) from cikkek_doc where cikk_szam = @csz) > 0 update cikkek_doc set cikk_doc = @doc, file_nev = @fn where cikk_szam = @csz else Insert into cikkek_doc (cikk_szam, file_nev, cikk_doc) values(@csz, @fn, @doc) end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_kep_karb] @csz cikk_szam, @fn varchar(255), @kep image WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(100) select @tranznev = 'cikk_kep_karb' BEGIN TRANSACTION @tranznev if len(rtrim(@fn))=0 delete from cikkek_kep where cikk_szam = @csz else begin if (select IsNull(count(*),0) from cikkek_kep where cikk_szam = @csz) > 0 update cikkek_kep set cikk_kep = @kep, file_nev = @fn where cikk_szam = @csz else Insert into cikkek_kep (cikk_szam, file_nev, cikk_kep) values(@csz, @fn, @kep) end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_kep_karb1] @csz cikk_szam, @fn varchar(255), @kep image WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(100) select @tranznev = 'cikk_kep_karb' BEGIN TRANSACTION @tranznev Insert into cikkek_kep (cikk_szam, file_nev, cikk_kep) values(@csz, @fn, @kep) COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_mod] @csz cikk_szam, @nev cikk_nev, @nev_ang cikk_nev, @aru char(1), @me menny_egyseg, @me_ang menny_egyseg, @nme menny_egyseg, @nmesz mennyiseg, @Tizedes tinyint, @vt varchar(14), @afa afakulcs, @rend char(1), @kif CHAR(1), @jov char(1), @gon char(1), @alland char(1), @dattip char(1), @szav int, @alk numeric(18,3), @fajtakod varchar(10), @urtartalom numeric(18,3), @plat numeric(18,3), @jado numeric(18,3), @tgon cikk_szam, @tgonsz int, @ntgon cikk_szam, @ntgsz int, @ccs2 char(18), @gyarto kulcs, @rakkod kulcs, @pol char(14), @szal kulcs, @vcsz char(14), @rensz mennyiseg, @rencs char(10), @zsd int, @dka int, @kas int, @karrlap int, @kartho int, @kartsze int, @kartma int, @dbsuly mennyiseg, @brdbsuly mennyiseg, @kartsuly mennyiseg, @brkartsuly mennyiseg, @rmagas int, @szarmazas char(2), @td char(1), @kt419 kurzus, @kt439 kurzus, @kt459 kurzus, @kt4ri kurzus, @kte1 kurzus, @kte2 kurzus, @alapean cikk_szam, @kics kicsoda, @linkfile varchar(500), @szarm varchar(50), @gycikksz cikk_szam, @chips char(1), @chips_me1 numeric(18,3), @chips_me2 numeric(18,3), @chips_me3 numeric(18,3), @chips_me4 numeric(18,3), @chips_me5 numeric(18,3), @chips_me6 numeric(18,3), @chips_me7 numeric(18,3), @chips_me8 numeric(18,3), @chips_me9 numeric(18,3), @chips_me10 numeric(18,3), @chips_me11 numeric(18,3), @chips_ado1 numeric(18,3), @chips_ado2 numeric(18,3), @chips_ado3 numeric(18,3), @chips_ado4 numeric(18,3), @chips_ado5 numeric(18,3), @chips_ado6 numeric(18,3), @chips_ado7 numeric(18,3), @chips_ado8 numeric(18,3), @chips_ado9 numeric(18,3), @chips_ado10 numeric(18,3), @chips_ado11 numeric(18,3), @leir1 varchar(5120), @leir2 varchar(5120), @kulcssz varchar(1024), @web char(1), @webkiemelt char(1), @fordafa char(1), @kock char(1) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @regi_kif char(1) declare @ere_afa afakulcs --declare @uj_afa char(2) BEGIN TRANSACTION t_cikkuj if rtrim(dbo.rovidnev())='KALMARKET' begin select @regi_kif=kifutott from cikkek where cikk_szam=@csz if @regi_kif='1' and @kif<>'1' update cikkek set letrehozva=dbo.mygetdatetime() where cikk_szam=@csz end select @ere_afa=afa_kulcs from cikkek where cikk_szam=@csz update cikkek set cikk_nev=@nev, cikk_nev_ang=@nev_ang, menny_egys=@me, menny_egys_ang=@me_ang, norm_me=@nme, norm_szorz=@nmesz, Tizedes=@Tizedes, vtsz=@vt, afa_kulcs=@afa, cikkcsop2=@ccs2, gyarto=@gyarto, szallito=@szal, vcikkszam=@vcsz, min_rencs=@rencs, min_rensz=@rensz, polc=@pol, kifutott=@kif, rendelheto=@rend, zsugor_db=@zsd, db_kart=@dka, kart_sor=@kas, kart_rakl=@karrlap, jovedeki=@jov, gongyoleg=@gon, allando=@alland, dat_tipus=@dattip, szav_ido=@szav, vpop_alkoholfok=@alk, vpop_fajtakod=@fajtakod, vpop_urtartalom=@urtartalom, vpop_platofok=@plat, tgon=@tgon, tgonszor=@tgonsz, ntgon=@ntgon, ntgonszor=@ntgsz, raktar_kod=@rakkod, aru_szolg=@aru, rakat_mag=@rmagas, db_sulya=@dbsuly, db_br_sulya=@brdbsuly, karton_hossz=@kartho, karton_szelesseg=@kartsze, karton_magassag=@kartma, karton_sulya=@kartsuly, karton_br_sulya=@brkartsuly, termekdijas=@td, modositotta=@kics, modositva=dbo.mygetdatetime(), linkfile=@linkfile, szarmazasi_hely=@szarmazas, gycikk_szam=@gycikksz, chips_ados=@chips, web=@web, fordafa=@fordafa, kockazatos=@kock where cikk_szam=@csz exec vonal_beir @csz, @kics if len(@alapean)>0 insert into vonal values( @csz, @alapean, 1, @me, '1') delete from cikk_termekdijak where cikk_szam=@csz --mindig töröl!!! if @td='1' begin insert into cikk_termekdijak values( @csz, @kt419, @kt439, @kt459, @kt4ri, @kte1, @kte2) end delete from cikk_chipsado where cikk_szam=@csz if @chips='1' begin insert into cikk_chipsado values( @csz, @chips_me1, @chips_me2, @chips_me3, @chips_me4, @chips_me5, @chips_me6, @chips_me7, @chips_me8, @chips_me9, @chips_me10, @chips_ado1, @chips_ado2, @chips_ado3, @chips_ado4, @chips_ado5, @chips_ado6, @chips_ado7, @chips_ado8, @chips_ado9, @chips_ado10, @chips_me11, @chips_ado11 ) end delete from jov_ado where cikk_szam=@csz if @jov='1' insert into jov_ado values(@csz, @jado) delete from cikk_leiras where cikk_szam=@csz if len(@leir1)<>0 or len(@leir2)<>0 insert into cikk_leiras values(@csz,@leir1,@leir2) delete from cikk_kulcsszavak where cikk_szam=@csz if len(@kulcssz)<>0 insert into cikk_kulcsszavak values(@csz,@kulcssz) delete from _web_kiemelt_cikk where cikk_szam=@csz if @webkiemelt='1' insert into _web_kiemelt_cikk values(@csz) if @ere_afa<>@afa begin update vvevo_ar_lista set brutto_ar= Round(netto_ar * (100 + afaertek) / 100,0) where datum>=Left(dbo.mygetdate(),7) and cikk_szam=@csz update vevo_ar_lista set arres= CASE beszerz_ar WHEN 0 THEN CASE when netto_ar=0 then 0 ELSE 999 END ELSE 100*(netto_ar-beszerz_ar)/beszerz_ar END where datum>=Left(dbo.mygetdate(),7) and cikk_szam=@csz end delete from cikkek_jell where cikk_szam=@csz if (select count(*) from wcikkek_jell where kicsoda=@kics and jellemzo_ertek<>' Nincs')>0 begin insert into cikkek_jell select @csz,jellemzo,jellemzo_ertek from wcikkek_jell where kicsoda=@kics and jellemzo_ertek<>' Nincs' end --exec tolt_vcikk_arak COMMIT TRANSACTION t_cikkuj end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikk_uj] @ujcsz cikk_szam, @nev cikk_nev, @nev_ang cikk_nev, @aru char(1), @me menny_egyseg, @me_ang menny_egyseg, @nme menny_egyseg, @nmesz mennyiseg, @Tizedes tinyint, @vt varchar(14), @afa afakulcs, @rend char(1), @kif CHAR(1), @jov char(1), @gon char(1), @alland char(1), @dattip char(1), @szav int, @alk numeric(18,3), @fajtakod varchar(10), @urtartalom numeric(18,3), @plat numeric(18,3), @jado numeric(18,3), @tgon cikk_szam, @tgonsz int, @ntgon cikk_szam, @ntgsz int, @ccs2 char(18), @gyarto kulcs, @rakkod kulcs, @pol char(14), @szal kulcs, @vcsz char(14), @rensz mennyiseg, @rencs char(10), @zsd int, @dka int, @kas int, @karrlap int, @kartho int, @kartsze int, @kartma int, @dbsuly mennyiseg, @brdbsuly mennyiseg, @kartsuly mennyiseg, @brkartsuly mennyiseg, @rmagas int, @szarmazas char(2), @td char(1), @kt419 kurzus, @kt439 kurzus, @kt459 kurzus, @kt4ri kurzus, @kte1 kurzus, @kte2 kurzus, @alapean cikk_szam, @kics kicsoda, @linkfile varchar(500), @szarm varchar(50), @gycikksz cikk_szam, @chips char(1), @chips_me1 numeric(18,3), @chips_me2 numeric(18,3), @chips_me3 numeric(18,3), @chips_me4 numeric(18,3), @chips_me5 numeric(18,3), @chips_me6 numeric(18,3), @chips_me7 numeric(18,3), @chips_me8 numeric(18,3), @chips_me9 numeric(18,3), @chips_me10 numeric(18,3), @chips_me11 numeric(18,3), @chips_ado1 numeric(18,3), @chips_ado2 numeric(18,3), @chips_ado3 numeric(18,3), @chips_ado4 numeric(18,3), @chips_ado5 numeric(18,3), @chips_ado6 numeric(18,3), @chips_ado7 numeric(18,3), @chips_ado8 numeric(18,3), @chips_ado9 numeric(18,3), @chips_ado10 numeric(18,3), @chips_ado11 numeric(18,3), @leir1 varchar(5120), @leir2 varchar(5120), @kulcssz varchar(1024), @web char(1), @webkiemelt char(1), @fordafa char(1), @kock char(1) AS begin declare @hany cikk_szam declare @ddat char(7) declare @dat varchar(20) SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_cikkuj set @dat=dbo.mygetdatetime() if len(rtrim(@ujcsz))=0 exec karsorsz_no 'CIKKEK',@hany output else set @hany=@ujcsz insert into cikkek values ( @hany, @nev, @nev_ang, @aru, @me, @me_ang, @nme, @nmesz, @vt, @afa, @kif, @rend, @jov, @gon, @alland, @tgon, @tgonsz, @ntgon, @ntgsz, @ccs2, @gyarto, @rakkod, @pol, @szal, @vcsz, @zsd, @dka, @kas, @karrlap, @rencs, @rensz, @dbsuly, @brdbsuly, @kartho, @kartsze, @kartma, @kartsuly, @brkartsuly, @rmagas, 0,0,0,0, @kics, @dat, @kics, @dat, @Tizedes, @dattip, @szav, @alk, @fajtakod, @urtartalom , @td, @linkfile, @szarmazas, @gycikksz, @chips, @plat, @web, @fordafa, @kock) update wvonal set cikk_szam=@hany where kicsoda=@kics and len(cikk_szam)=0 update wcikkek_jellemzok set cikk_szam=@hany where kicsoda=@kics and len(cikk_szam)=0 exec vonal_beir @hany, @kics if len(@alapean)>0 insert into vonal values( @hany, @alapean, 1, @me, '1') if dbo.rovidnev()='KARACS' insert into vonal values( @hany, @hany, 1, @me, '0') --exec vonalkod_general @hany, @me set @ddat=left(dbo.mygetdate(),7) insert into vevo_ar_lista select arcsoport ,datum, @hany, 0, 0, 0, 0, @kics, @dat from vevo_ar_lista where datum>= @ddat group by datum, arcsoport if @td='1' begin insert into cikk_termekdijak values( @hany, @kt419, @kt439, @kt459, @kt4ri, @kte1, @kte2) end if @chips='1' begin insert into cikk_chipsado values( @hany, @chips_me1, @chips_me2, @chips_me3, @chips_me4, @chips_me5, @chips_me6, @chips_me7, @chips_me8, @chips_me9, @chips_me10, @chips_ado1, @chips_ado2, @chips_ado3, @chips_ado4, @chips_ado5, @chips_ado6, @chips_ado7, @chips_ado8, @chips_ado9, @chips_ado10, @chips_me11, @chips_ado11 ) end delete from jov_ado where cikk_szam=@hany if @jov='1' insert into jov_ado values(@hany, @jado) if len(@leir1)<>0 or len(@leir2)<>0 insert into cikk_leiras values(@hany,@leir1,@leir2) if len(@kulcssz)<>0 insert into cikk_kulcsszavak values(@hany,@kulcssz) if @webkiemelt='1' insert into _web_kiemelt_cikk values(@hany) if (select count(*) from wcikkek_jell where kicsoda=@kics and jellemzo_ertek<>' Nincs')>0 begin insert into cikkek_jell select @hany,jellemzo,jellemzo_ertek from wcikkek_jell where kicsoda=@kics and jellemzo_ertek<>' Nincs' end --exec tolt_vcikk_arak COMMIT TRANSACTION t_cikkuj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [cikkek_osszevonas_uj] @nev cikk_nev, @nev_ang cikk_nev, @me menny_egyseg, @me_ang menny_egyseg, @megj megjegyzes AS begin declare @hany cikk_szam SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_cikkosszuj exec karsorsz_no 'OCIKKEK',@hany output insert into cikkek_osszevonas values ( @hany, @nev, @nev_ang, @me, @me_ang, @megj ) COMMIT TRANSACTION t_cikkosszuj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [diszpo_keszre_jelent] ( @kulcs int, @hany decimal(18,2), @kics varchar(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @csz varchar(30) declare @acsz varchar(30) declare @db decimal(18,4) declare @adb decimal(18,4) declare @raktar int declare @tranznev varchar(50) declare @cKulcs varchar(50) declare @nKulcs int declare @ev char(4) declare @tet int declare @ear float declare @asz char(1) declare @szear float select @tranznev = 't_diszpo_mod' + @kics begin transaction @tranznev select @csz = cikk_szam, @raktar=raktar_kod, @ev=left(rogzites,4) from diszpo where kulcs = @kulcs update diszpo set darab=darab-@hany where kulcs = @kulcs insert into keszre1 values( @kulcs, @hany, @kics, dbo.myGetDateTime() ) set @nKulcs=@@IDENTITY select @cKulcs = convert(varchar(10),@nKulcs) set @tet=1 declare c1 cursor FOR select acikk_szam, darab, aru_szolg, egyseg_ar from vanyagszukseglet where cikk_szam = @csz order by acikk_szam open c1 FETCH NEXT FROM c1 INTO @acsz, @db, @asz, @szear while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) begin select @adb = @db * @hany insert into keszre2 values( @nKulcs, @tet, @acsz, @adb, @szear ) if @asz='1' begin delete from wsarzs_ki where kicsoda=@kics delete from wgyariszamok_ki where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics --alapanyagot leveszem e készletről exec karton_ki 'term_ki',@ckulcs,@tet,@tet,@raktar,@acsz,@adb,'term_ki',@kics end set @tet=@tet + 1 end FETCH NEXT FROM c1 INTO @acsz, @db, @asz, @szear end close c1 deallocate c1 select @ear=sum(-mozgas.darab * keszlet.egyseg_ar) /sum(-mozgas.darab) from mozgas inner join keszlet on mozgas.sorszam=keszlet.sorszam where mozgas.mozgaskod='term_ki' and mozgas.bizszam=@ckulcs select @ear=isnull(@ear,0) --készterméket készletre vesz exec karton_be @ev,'term_be',@ckulcs,1,1,@raktar,@csz,@hany,@ear,'0','0',@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [diszpo_pri_fel] ( @elozo_kulcs int, @akt_kulcs int ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @e_pri bigint declare @a_pri bigint declare @raktar int declare @cKulcs varchar(50) declare @email varchar(50) select @tranznev = 't_diszpo_fel' begin transaction @tranznev select @e_pri=prioritas from diszpo where kulcs=@elozo_kulcs select @a_pri=prioritas from diszpo where kulcs=@akt_kulcs update diszpo set prioritas=@a_pri where kulcs=@elozo_kulcs update diszpo set prioritas=@e_pri where kulcs=@akt_kulcs commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [diszpo_torol] ( @kulcs int, @kics varchar(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) select @tranznev = 't_diszpo_torol' + @kics begin transaction @tranznev --delete from REND_DISZPO where KULCS = @kulcs delete from diszpo where kulcs=@kulcs commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [diszpo_uj] ( @rakt int, @csz cikk_szam, @db numeric(18,3), @megj char(254), @rszam varchar(10), @rtet int, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @pri bigint set @tranznev = 'diszpo_uj' begin transaction @tranznev select @pri=isnull(max(prioritas),0)+ 1 from diszpo insert into diszpo values(@pri, @rakt, @csz, @db, @db, @megj, @kics, dbo.myGetDateTime(), @rszam, @rtet, '' ) commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [ean_ad] @tipus char(10), @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @@hany int SET TRANSACTION ISOLATION LEVEL SERIALIZABLE delete from wean_ad where kicsoda=@kics exec altsorsz_no @tipus,@@hany output insert into wean_ad values(@kics,@@hany) SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [epu_vevo_otp_pontoz] @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(100) select @tranznev = 'epu_vevo_otp_pontoz' + @kics BEGIN TRANSACTION @tranznev declare @vevokod kulcs declare @bsz bizonylat_szam declare @osszeg egyseg_ar declare @maradek egyseg_ar declare @hatralek egyseg_ar declare @brutto egyseg_ar declare @PontozErtek egyseg_ar declare @cFizetve varchar(1) declare @mennyi int DECLARE cFizetes scroll CURSOR for SELECT vevo_kod, osszeg FROM wepu_bank_impt where vevo_kod<>0 and kicsoda=@kics order by vevo_nev open cFizetes fetch next from cFizetes into @vevokod, @osszeg while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @maradek=@osszeg DECLARE cpontoz scroll CURSOR for SELECT bizszam, brutto_ertek, hatralek FROM vvevo_biz_fizetve where hatralek>0 and biz_tipus='számla' and fiz_modja='4' and torolt<>'1' and torlo<>'1' and vevo=@vevokod order by dbo.szlaszamorder(bizszam) open cpontoz fetch next from cpontoz into @bsz, @brutto, @hatralek while (@@FETCH_STATUS <> -1) and @maradek>0.0001 begin IF (@@FETCH_STATUS <> -2) BEGIN set @PontozErtek=dbo.myMin(@hatralek, @maradek) set @cFizetve=case when @hatralek=@PontozErtek then 'X' else '' end select @mennyi=isnull(count(*),0) from vevo_szl_fizetve where bizszam=@bsz and biz_tipus='számla' if @mennyi>0 update vevo_szl_fizetve set fizetve=@cFizetve, hatralek=hatralek-@PontozErtek, ut_fizetes=@PontozErtek, kicsoda=@kics, keszult=dbo.myGetDateTime() where biz_tipus='számla' and bizszam=@bsz else insert into vevo_szl_fizetve values('számla', @bsz, dbo.myGetDate(), @cFizetve, @hatralek-@PontozErtek, @PontozErtek, @kics, dbo.myGetDateTime(), @PontozErtek) insert into vevo_szl_fizetesek values('számla', @bsz, @PontozErtek, dbo.mygetDate(), @kics, dbo.MyGetDateTime() ) set @maradek=@maradek-@PontozErtek END fetch next from cpontoz into @bsz, @brutto, @hatralek end close cpontoz deallocate cpontoz END fetch next from cFizetes into @vevokod, @osszeg end close cFizetes deallocate cFizetes COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [evnyitas] @ev char(4) WITH RECOMPILE AS SET NOCOUNT ON declare @tip as char(20) set @tip = @ev + 'bevet' exec biz_evnyitas @tip set @tip = @ev + 'kivet' exec biz_evnyitas @tip set @tip = @ev + 'rmozgas' exec biz_evnyitas @tip set @tip = @ev + 'karton' exec biz_evnyitas @tip set @tip = @ev + 'szall_ren' exec biz_evnyitas @tip set @tip = @ev + 'szall_szle' exec biz_evnyitas @tip set @tip = @ev + 'szall_szla' exec biz_evnyitas @tip set @tip = @ev + 'szbiz_szle' exec biz_evnyitas @tip set @tip = @ev + 'vevo_pszla' exec biz_evnyitas @tip set @tip = @ev + 'vevo_ren' exec biz_evnyitas @tip set @tip = @ev + 'vevo_szle' exec biz_evnyitas @tip set @tip = @ev + 'vevo_szla' exec biz_evnyitas @tip set @tip = @ev + 'vevo_arajan' exec biz_evnyitas @tip set @tip = @ev + 'vevo_kassza' exec biz_evnyitas @tip set @tip = @ev + 'vevo_arajanlat' exec biz_evnyitas @tip set @tip = @ev + 'szall_arajanlat' exec biz_evnyitas @tip set @tip = @ev + 'kontir' exec biz_evnyitas @tip set @tip = @ev + 'kassza_szla' exec biz_evnyitas @tip GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_cobra] @dat char(7) AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_cobra_koteg' BEGIN TRANSACTION @tranznev declare @@hany int set @@hany=0 if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'COBRA',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 end /* if (select count(*) from szall_szlaf where koteg_sz=0 ) <>0 begin if @@hany=0 exec altsorsz_no 'PR8',@@hany output update szall_szlaf set koteg_sz=@@hany where koteg_sz=0 end */ COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_microfox] AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_preciz_koteg' BEGIN TRANSACTION @tranznev declare @@hany int if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'MICROFOX',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_pr8] @dat char(7) AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_preciz_koteg' BEGIN TRANSACTION @tranznev declare @@hany int set @@hany=0 if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'PR8',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 end if (select count(*) from szall_szlaf where koteg_sz=0 ) <>0 begin if @@hany=0 exec altsorsz_no 'PR8',@@hany output update szall_szlaf set koteg_sz=@@hany where koteg_sz=0 end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_PRECIZ] --with recompile AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_preciz_koteg' BEGIN TRANSACTION @tranznev declare @@hany int if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'PRECIZ',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_qsoft] AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_qsoft_koteg' BEGIN TRANSACTION @tranznev declare @@hany int set @@hany=0 if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'QSOFT',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_REVOLUTION] AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_preciz_koteg' BEGIN TRANSACTION @tranznev declare @@hany int if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'REVOL',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 if (select count(*) from szall_szlaf where koteg_sz=0 ) <>0 update szall_szlaf set koteg_sz=@@hany where koteg_sz=0 end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [felad_koteg_uj_RLB] AS begin SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_preciz_koteg' BEGIN TRANSACTION @tranznev declare @@hany int if (select count(*) from vevo_szlaf where koteg_sz=0 ) <>0 begin exec altsorsz_no 'RLB',@@hany output update vevo_szlaf set koteg_sz=@@hany where koteg_sz=0 if (select count(*) from szall_szlaf where koteg_sz=0 ) <>0 update szall_szlaf set koteg_sz=@@hany where koteg_sz=0 end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [FELAD_KOTEG_UJ_ZEUS] with recompile AS SET NOCOUNT ON declare @@hany int if (select count(*) from vevo_szlaf where bizszam not in (select bizszam from szamla_feladas where modul='VS') ) <>0 begin exec altsorsz_no 'ZEUS',@@hany output insert into szamla_feladas select 'VS',bizszam,@@hany from vevo_szlaf where bizszam not in (select bizszam from szamla_feladas where modul='VS') end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [foglalas_ki]( @vevo kulcs, @rakkod kulcs, @csz cikk_szam, @db mennyiseg, @kics kicsoda) AS begin SET NOCOUNT ON declare @kdb mennyiseg declare @kidb mennyiseg declare @mar mennyiseg declare @xkulcs kulcs declare @hany int SET XACT_ABORT ON delete from wfoglalasok_ki where kicsoda=@kics set @mar=@db select @hany=isnull(count(*),0) from vfoglalasok where cikk_szam=@csz and raktar_kod=@rakkod and meddig>=dbo.myGetDate() and kiadhato>0 and vevo=@vevo and darab>0 if @hany>0 -- van foglalás begin DECLARE cfoglalas CURSOR for SELECT kulcs, kiadhato FROM vfoglalasok WHERE kiadhato>0.0009 and cikk_szam=@csz and raktar_kod=@rakkod and meddig>=dbo.myGetDate() and vevo=@vevo and darab>0.0009 order by prioritas open cfoglalas fetch next from cfoglalas into @xkulcs, @kdb while (@@FETCH_STATUS <> -1) and @mar > 0 begin IF (@@FETCH_STATUS <> -2) BEGIN if @kdb>@mar set @kidb=round(- @mar,3) else set @kidb=round(- @kdb,3) insert into wfoglalasok_ki values(@xkulcs, @kidb, @kics) set @mar=round(@mar + @kidb,3) END fetch next from cfoglalas into @xkulcs, @kdb end close cfoglalas deallocate cfoglalas update foglalasok set darab=round(foglalasok.darab + wfoglalasok_ki.darab,3) from wfoglalasok_ki where foglalasok.kulcs=wfoglalasok_ki.kulcs and wfoglalasok_ki.kicsoda=@kics delete from wfoglalasok_ki where kicsoda=@kics end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [foglalas_pri_fel] ( @elozo_kulcs int, @akt_kulcs int, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @e_pri bigint declare @a_pri bigint declare @modido varchar(20) select @tranznev = 't_foglalas_fel' begin transaction @tranznev set @modido=dbo.myGetDateTime() select @e_pri=prioritas from foglalasok where kulcs=@elozo_kulcs select @a_pri=prioritas from foglalasok where kulcs=@akt_kulcs update foglalasok set prioritas=@a_pri, prior_modositotta=@kics, prior_modositva=@modido where kulcs=@elozo_kulcs update foglalasok set prioritas=@e_pri, prior_modositotta=@kics, prior_modositva=@modido where kulcs=@akt_kulcs commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [foglalas_uj] (@csz cikk_szam, @db mennyiseg, @vevo kulcs, @rakk kulcs, @meddig datum, @kics kicsoda, @szdat datum, @gyszam varchar(20), @sszam varchar(20), @rendsz bizonylat_szam, @tet bizonylat_tetel ) WITH RECOMPILE AS begin declare @tranznev char(32) declare @prior bigint set @tranznev='foglalas_uj'+@kics SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION @tranznev exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakk, @meddig, @kics, @szdat, @gyszam, @sszam, @rendsz, @tet COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [foglalas_uj_tranz_nelkul] (@csz cikk_szam, @db mennyiseg, @vevo kulcs, @rakk kulcs, @meddig datum, @kics kicsoda, @szdat datum, @gyszam varchar(20), @sszam varchar(20), @rendsz bizonylat_szam, @tet bizonylat_tetel ) WITH RECOMPILE AS begin declare @prior bigint declare @aru_szolg char(1) SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE select @aru_szolg=aru_szolg from cikkek where cikk_szam=@csz if @aru_szolg='1' --csak áru esetében begin select @prior= isnull(Max(prioritas),0) +1 from foglalasok insert into foglalasok (prioritas, cikk_szam, edarab, darab, vevo, raktar_kod, foglalva, foglalta, meddig, prior_modositotta, prior_modositva,szav_ido,gyari_szam,sarzs_szam,rend_szam,tetel,lejart) values(@prior, @csz, @db, @db, @vevo, @rakk, dbo.mygetdatetime(), @kics, @meddig, '', '', @szdat, @gyszam, @sszam,@rendsz,@tet,'') end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [fogyas_gyujt] ( @kido datum, @vido datum, @kics kicsoda ) AS begin SET NOCOUNT ON delete from wgyujtes where kicsoda= @kics; insert into wgyujtes(cikk_szam, cikk_nev,menny_egys,darab2,afa_kulcs, darab1, kicsoda) SELECT vevo_szlet.cikk_szam, vevo_szlet.cikk_nev, vevo_szlet.menny_egys, vevo_szlet.szorzo, vevo_szlet.afa_kulcs,sum(vevo_szlet.DARAB), @kics FROM vevo_szlef,vevo_szlet WHERE vevo_szlef.BIZSZAM = vevo_szlet.BIZSZAM and vevo_szlef.telj_datum>= @Kido and vevo_szlef.telj_datum<= @Vido group by vevo_szlet.cikk_szam, vevo_szlet.cikk_nev, vevo_szlet.menny_egys, vevo_szlet.szorzo, vevo_szlet.afa_kulcs end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [fogyas_szamol]( @szall kulcs, @napok int, @kellkivet char(1), @kics kicsoda ) AS SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @dat char(10) set @dat=left(replace(convert(char,getdate() - @napok - 1, 20 ),'-','.'),10) delete from wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam,cikk_nev,darab1,darab2,kicsoda) select cikk_szam,cikk_nev,0,0,@kics from cikkek where @szall=0 or @szall=szallito update wgyujtes set darab1=isnull( (select sum(vevo_szlet.edarab) from vevo_szlet inner join vevo_szlef on vevo_szlef.bizszam=vevo_szlet.bizszam where vevo_szlet.cikk_szam=wgyujtes.cikk_szam and vevo_szlef.telj_datum>=@dat),0) where kicsoda=@kics IF @kellkivet='1' update wgyujtes set darab2=isnull( (select sum(kivett.darab) from kivett inner join kivetf on kivetf.bizszam=kivett.bizszam where kivett.cikk_szam=wgyujtes.cikk_szam and kivetf.datum>=@dat),0) where kicsoda=@kics update wgyujtes set darab1=darab1 + darab2 where kicsoda=@kics update wgyujtes set darab1=darab1 / @napok where kicsoda=@kics update cikkek set napi_fogy=isnull( (select darab1 from wgyujtes where kicsoda=@kics and wgyujtes.cikk_szam=cikkek.cikk_szam),0) where @szall=0 or szallito=@szall SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [grando_vevorend_imp] ( @fuvar_csz cikk_szam, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_szamlak_uj declare @id int declare @billingFamilyName nvarchar(255) declare @billingGivenName nvarchar(255) declare @billingZip float declare @billingCity nvarchar(255) declare @billingAddress nvarchar(255) declare @shippingFamilyName nvarchar(255) declare @shippingGivenName nvarchar(255) declare @shippingZip float declare @shippingCity nvarchar(255) declare @shippingAddress nvarchar(255) declare @familyName nvarchar(255) declare @givenName nvarchar(255) declare @phone nvarchar(255) declare @email nvarchar(255) declare @PayMethod float declare @info nvarchar(255) declare @vevo_kod int declare @vevo_tel int declare @dat char(10) declare @yy varchar(20) declare @x1 varchar(255) declare @x2 varchar(255) declare @tkod varchar(4) declare @vnev nev declare @vir nev declare @vvar nev declare @vcim nev declare @bsz bizonylat_szam declare @fm char(1) declare @osuly float declare @oert float declare @tet int set @dat=dbo.mygetdate() delete from wgrando_szamla where kicsoda=@kics DECLARE cwgrandof scroll CURSOR for SELECT id, billingFamilyName, billingGivenName, billingZip, billingCity, billingAddress, shippingFamilyName, shippingGivenName, shippingZip, shippingCity, shippingAddress, familyName, givenName, phone, email, PayMethod, rtrim(info) FROM wgrando group by id, billingFamilyName, billingGivenName, billingZip, billingCity, billingAddress, shippingFamilyName, shippingGivenName, shippingZip, shippingCity, shippingAddress, familyName, givenName, phone, email, PayMethod, rtrim(info) open cwgrandof fetch next from cwgrandof into @id, @billingFamilyName, @billingGivenName, @billingZip, @billingCity, @billingAddress, @shippingFamilyName, @shippingGivenName, @shippingZip, @shippingCity, @shippingAddress, @familyName, @givenName, @phone, @email, @PayMethod, @info while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @vevo_kod=null set @vevo_tel=null select @vevo_kod=vevo_kod from vevok where vevo_nev =rtrim(@billingFamilyName) + ' '+rtrim(@billingGivenName) and iranyito=rtrim(convert(varchar(20),@billingZip)) and varos =rtrim(@billingCity) and cim =rtrim(@billingAddress) if @vevo_kod is null begin --új vevő delete from wvevo_tel where kicsoda=@kics delete from wvevo_kapcsolat where kicsoda=@kics delete from wvevo_bank where kicsoda=@kics --nullás telep insert into wvevo_tel values(0, '0', rtrim(@billingFamilyName) + ' '+rtrim(@billingGivenName), rtrim(@billingCity), rtrim(convert(varchar(20),@billingZip)), rtrim(@billingAddress), '','','','','','','', rtrim(@familyName) + ' ' +rtrim(@givenName), rtrim(@phone), rtrim(@email), '', 0, '', 0, @kics, 0, 0, 0, 0, '', 'HU','','') if rtrim(@shippingFamilyName) <> '' and (rtrim(@billingFamilyName) + ' '+rtrim(@billingGivenName) <> rtrim(@shippingFamilyName) + ' '+rtrim(@shippingGivenName) or rtrim(@billingCity) <> rtrim(@shippingCity) or @billingZip <> @shippingZip or rtrim(@billingAddress) <> rtrim(@shippingAddress) ) begin --száll cím és számlázási nem egyezik insert into wvevo_tel values(0, '1', rtrim(@shippingFamilyName) + ' '+rtrim(@shippingGivenName), rtrim(@shippingCity), rtrim(convert(varchar(20),@shippingZip)), rtrim(@shippingAddress), '','','','','','','', rtrim(@familyName) + ' ' +rtrim(@givenName), rtrim(@phone), rtrim(@email), '', 0, '', 0, @kics, 0, 0, 0, 0, '','HU','','') end set @x1=rtrim(@billingFamilyName) + ' '+rtrim(@billingGivenName) set @x2=rtrim(@FamilyName) + ' ' + rtrim(@GivenName) set @yy=rtrim(convert(varchar(20),@billingZip)) exec vevo_uj_notr @x1, @yy, @billingCity, 'HU', @billingAddress, @phone, '', @x2, @email,'', '', '', '', '', '','', '', '', '', '', '', 1, 0, 0, '3', 0, 0, 0, 0, 0, 0, '', '', 'HU', '1', '0','0','', @kics, '','','','','','','' select @vevo_kod=vevo_kod from vevok where vevo_nev =rtrim(@billingFamilyName) + ' '+rtrim(@billingGivenName) and iranyito=rtrim(convert(varchar(20),@billingZip)) and varos =rtrim(@billingCity) and cim =rtrim(@billingAddress) end if rtrim(@shippingFamilyName) <> '' begin select @vevo_tel=convert(int,telep_kod) from vevo_tel where vevo_kod=@vevo_kod and telep_nev =rtrim(@shippingFamilyName) + ' '+rtrim(@shippingGivenName) and iranyito=rtrim(convert(varchar(20),@shippingZip)) and varos =rtrim(@shippingCity) and cim =rtrim(@shippingAddress) if @vevo_tel is null begin select @vevo_tel=max(telep_kod) from vevo_tel where vevo_kod=@vevo_kod set @vevo_tel= @vevo_tel+1 insert into vevo_tel values(@vevo_kod, ltrim(rtrim(str(@vevo_tel,4,0))), rtrim(@shippingFamilyName) + ' '+rtrim(@shippingGivenName), rtrim(@shippingCity), rtrim(convert(varchar(20),@shippingZip)), rtrim(@shippingAddress), '','','','','','','', rtrim(@familyName) + ' ' +rtrim(@givenName), rtrim(@phone), rtrim(@email), '', 0, '', 0, 0, 0, 0, 0, '','HU','') end end else begin set @vevo_tel=0 end select @vnev=rtrim(vevo_nev), @vir=rtrim(iranyito), @vvar=rtrim(varos), @vcim=rtrim(cim) from vevok where vevo_kod=@vevo_kod set @tkod=ltrim(rtrim(str(@vevo_tel,4,0))) if @PayMethod=1 set @fm='4' if @PayMethod=2 set @fm='8' if @PayMethod=4 set @fm='3' delete from wvevo_szlet where kicsoda=@kics insert into wvevo_szlet select '',ROW_NUMBER() OVER (ORDER BY cikk_nev), wgrando.cikk_szam,cikk_nev,afa_kulcs,menny_egys,1,ProductQuantity,ProductQuantity, ProductPrice/((100+case when afa_kulcs='AM' or afa_kulcs='FA' then 0 else convert(float,afa_kulcs) end)/100), 0,'','','',0,@kics from wgrando inner join cikkek on cikkek.cikk_szam=wgrando.cikk_szam where @vnev =rtrim(billingFamilyName) + ' '+rtrim(billingGivenName) and @vir =rtrim(convert(varchar(20),billingZip)) and @vvar =rtrim(billingCity) and @vcim =rtrim(billingAddress) if @fm='8' begin select @osuly=SUM(ProductWeight*ProductQuantity), @oert=SUM(ProductQuantity*ProductPrice) from wgrando where @vnev =rtrim(billingFamilyName) + ' '+rtrim(billingGivenName) and @vir =rtrim(convert(varchar(20),billingZip)) and @vvar =rtrim(billingCity) and @vcim =rtrim(billingAddress) if @osuly>0 begin select @tet=MAX(tetel)+1 from wvevo_szlet where kicsoda=@kics insert into wvevo_szlet select '',@tet, cikk_szam,cikk_nev,afa_kulcs,menny_egys,1,1,1, dbo.fuvardij(@osuly,@oert)/((100+afaertek)/100), 0,'','','',0,@kics from cikkek inner join afa_kulcs on afa_kulcs.afakulcs=cikkek.afa_kulcs where cikk_szam=@fuvar_csz end end exec vevo_szle_uj_tr_nelkul '',@vevo_kod,@tkod,@dat,1,'HUF',1,'0',1,0,0,@info,5,0,@kics --kivenni a sz.lev. számot select @bsz=bizszam from wvevo_szlet where kicsoda=@kics insert into wgrando_szamla values(@bsz, @dat, @vevo_kod, @tkod, @fm, @kics) delete from wvevo_szlet where kicsoda=@kics END fetch next from cwgrandof into @id, @billingFamilyName, @billingGivenName, @billingZip, @billingCity, @billingAddress, @shippingFamilyName, @shippingGivenName, @shippingZip, @shippingCity, @shippingAddress, @familyName, @givenName, @phone, @email, @PayMethod, @info end close cwgrandof deallocate cwgrandof COMMIT TRANSACTION t_szamlak_uj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [havi_keszlet_uj] ( @dat datum ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @rkod int declare @tranznev varchar(50) set @tranznev = 'havi_keszlet_uj' begin transaction @tranznev delete from whavi_keszlet DECLARE kkeszlet SCROLL CURSOR FOR select kod from raktarak OPEN kkeszlet FETCH NEXT FROM kkeszlet INTO @rkod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into whavi_keszlet select @dat,@rkod,cikk_szam,ut_besz_ar,0 from cikkek update whavi_keszlet set darab=isnull( (select sum(darab) from keszlet where raktar_kod=@rkod and darab<>0 and keszlet.cikk_szam=whavi_keszlet.cikk_szam),0) where raktar_kod=@rkod delete from whavi_keszlet where darab=0 and raktar_kod=@rkod update whavi_keszlet set egyseg_ar=isnull( (select sum(darab*egyseg_ar)/sum(darab) from keszlet where raktar_kod=@rkod and darab<>0 and keszlet.cikk_szam=whavi_keszlet.cikk_szam),0) where raktar_kod=@rkod update whavi_keszlet set darab=darab - isnull( (select sum(darab) from keszlet_negativ where raktar_kod=@rkod and darab<>0 and keszlet_negativ.cikk_szam=whavi_keszlet.cikk_szam),0) where raktar_kod=@rkod --and --cikk_szam in (select cikk_szam from keszlet_negativ where raktar_kod=@rkod and darab>0 group by cikk_szam) END FETCH NEXT FROM kkeszlet INTO @rkod END CLOSE kkeszlet DEALLOCATE kkeszlet update whavi_keszlet set egyseg_ar= (select ut_besz_ar from cikkek where cikkek.cikk_szam=whavi_keszlet.cikk_szam) where egyseg_ar=0 insert into havi_keszlet select datum,raktar_kod,cikk_szam,egyseg_ar,darab from whavi_keszlet where darab<>0 commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [InsertDiszpoAuditLog] ( @kics varchar(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50); declare @datetime varchar(20); set @tranznev = 'diszpo_InsertDiszpoAuditLog' begin transaction @tranznev select @datetime = dbo.myGetDateTime() if (select isnull(count(*),0) from diszpoauditlog where kicsoda = @kics and idopont >= @datetime) = 0 insert into diszpoauditlog (kicsoda, idopont)values(@kics, @datetime) commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [jellemzo2_uj] ( @nev varchar(50), @web_hu varchar(50), @web_en varchar(50), @kics char(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50); declare @kulcs int select @tranznev = 't_jellemzo_UJ' begin transaction @tranznev insert into jellemzo2f (nev,web_nev_hu,web_nev_en) values(@nev, @web_hu, @web_en) select @kulcs=max(kod) from jellemzo2f insert into jellemzo2t select @kulcs, ertek_web_hu, ertek_web_en, sorrend from wjellemzo2t where kicsoda=@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kamat_szamit] ( @dat1 datum, @dat2 datum, @kics kicsoda, @osszeg egyseg_ar, @kam egyseg_ar output ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @kd char(10) declare @vd char(10) delete from wkamatszamitas where kicsoda=@kics select @kd=max(datum) from kesedelmi_kamat where datum<=@dat1 select @vd=max(datum) from kesedelmi_kamat where datum<=@dat2 insert into wkamatszamitas select datum,'',0,kamat,@kics from kesedelmi_kamat where datum>=@kd and datum<=@vd update wkamatszamitas set d2= (select isnull(min(datum),@dat2) from kesedelmi_kamat where datum>d1 and datum<=@vd) where kicsoda=@kics update wkamatszamitas set d1=@dat1 where d1<=@dat1 and kicsoda=@kics update wkamatszamitas set napok=datediff(day,d1,d2) where kicsoda=@kics select @kam=isnull(round(sum( @osszeg * kamat * napok / 36500 ),2),0) from wkamatszamitas where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kamat_szamlak_betolt] ( @kdat datum, @vdat datum, @vevo kulcs, @kamat egyseg_ar, @kics kicsoda) AS SET TRANSACTION ISOLATION LEVEL SERIALIZABLE begin declare @ssz bizonylat_szam declare @szszam bizonylat_szam declare @ut_fiz_dat datum declare @fd datum declare @utd datum declare @sz_ert egyseg_ar declare @ut_ert egyseg_ar declare @ert egyseg_ar declare @kam_ert egyseg_ar declare @tranznev char(32) set @tranznev='kam_szla_tolt'+@kics SET XACT_ABORT ON SET NOCOUNT ON BEGIN TRANSACTION @tranznev delete from wkamatszamlak where kicsoda=@kics if (select ertek from parameterek where azonosito='PURendszerTipus')='2' --van teljes PU begin insert into wkamatszamlak select vevok.VEVO_KOD,vevok.VEVO_nev, bankcsomagb.bizszam,'','',0, bankcsomagf.datum,bankcsomagb.ertek,0,'',@kics from bankcsomagb INNER JOIN bankcsomagt ON bankcsomagb.kulcs = bankcsomagt.kulcs INNER JOIN bankcsomagf ON bankcsomagt.bankszamlaszam = bankcsomagf.bankszamlaszam and bankcsomagt.kivonat = bankcsomagf.kivonat and bankcsomagt.partner_tip = 'V' INNER JOIN vevok ON bankcsomagt.partner = vevok.VEVO_KOD where bankcsomagb.bizszam in (select bizszam from vvevo_szla_ertek where fiz_modja='4' and szla_datum>=@kdat and szla_datum<=@vdat and (@vevo=0 or @vevo=vevo) ) update wkamatszamlak set szla_datum=vvevo_szla_ertek.szla_datum, szla_ertek=brutto_ertek, fiz_dat= dbo.ElsoMunkanap(fiz_esed) from vvevo_szla_ertek where wkamatszamlak.kicsoda=@kics and wkamatszamlak.szamlaszam=vvevo_szla_ertek.bizszam delete from wkamatok where kicsoda=@kics DECLARE ckam cursor FOR SELECT szamlaszam, fiz_dat, szla_ertek, utal_dat, utal_ertek from wkamatszamlak where kicsoda=@kics order by szamlaszam,utal_dat open ckam FETCH NEXT FROM ckam INTO @ssz, @fd, @ert, @utd, @ut_ert while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @szszam=@ssz set @sz_ert=@ert set @ut_fiz_dat=@fd while @szszam=@ssz and @sz_ert>0 begin exec kamat_szamit @ut_fiz_dat, @utd, @kics, @sz_ert, @kam_ert output insert into wkamatok values(@ssz, @utd, @sz_ert, @kam_ert, @kics) set @sz_ert=@sz_ert - @ut_ert set @ut_fiz_dat=@utd FETCH NEXT FROM ckam INTO @ssz, @fd, @ert, @utd, @ut_ert end END end close ckam deallocate ckam update wkamatszamlak set kamat_ertek=isnull(kamat,0) , szla_ertek=kamat_alap from wkamatok where wkamatok.kicsoda=@kics and wkamatszamlak.szamlaszam=wkamatok.bizszam and wkamatszamlak.utal_dat=wkamatok.datum and wkamatszamlak.kicsoda=@kics delete from wkamatszamlak where kicsoda=@kics and kamat_ertek<@kamat delete from wkamatszamlak where kicsoda=@kics and szamlaszam in (select szamlaszam from wkamatszamlak where kicsoda=@kics group by szamlaszam,vevo having sum(szla_ertek)>sum(utal_ertek)) end COMMIT TRANSACTION @tranznev end SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karsorsz_no] @tipus char(10), @sorsz char(12) output with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON update karsorszam set kod =dbo.strzero( convert(real,kod) + 1, 12) -- set kod =right('000000000000'+RTRIM(convert(char(12), convert(real,kod) + 1 )) , 12) where tipus=@tipus select @sorsz=kod from karsorszam where tipus=@tipus --TIPUSOK: --cikkek --összevont cikkek --vevok end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karton_be] ( @ev char(4), @mk varCHAR(10), @bsz bizonylat_szam, @etet bizonylat_tetel, @tet bizonylat_tetel, @rakkod kulcs, @csz cikk_szam, @db mennyiseg, @ear egyseg_ar, @nyug bit, @bizom bit, @kics kicsoda ) AS begin SET NOCOUNT ON DECLARE @kssz bizonylat_szam declare @kulcs varchar(30) declare @mennyi int declare @szd datum declare @gysz gyari_szam declare @sar varchar(20) declare @_db mennyiseg declare @mar mennyiseg declare @xssz bizonylat_szam declare @kdb mennyiseg declare @kidb mennyiseg declare @xtip varchar(20) declare @xbsz bizonylat_szam declare @xtet bizonylat_tetel declare @xazon varchar(32) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @kulcs = @ev +'karton' SET XACT_ABORT ON set @mennyi=(select isnull(count(*),0) from wszavatos where kicsoda=@kics and xtetel=@etet) if @mennyi>0 --van szav. idő begin DECLARE cSzavatos CURSOR for SELECT szav_lejar,darab FROM wszavatos WHERE kicsoda=@kics and xtetel=@etet open cSzavatos; fetch next from cSzavatos into @szd, @_db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@kssz output set @_db=round(@_db,3) INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, @_DB, @_DB, @EAR, @szd, @MK, @BSZ, @TET, @nyug, @bizom, '', '') INSERT INTO MOZGAS VALUES (@MK, @bSZ, @TET, @KSSZ, @_DB, @_DB) -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@rakkod and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin exec karton_be_negativ @kssz, @rakkod, @csz, @_db, @bizom, @kics end END fetch next from cSzavatos into @szd, @_db end close cSzavatos deallocate cSzavatos delete from wszavatos where kicsoda=@kics and xtetel=@etet end else begin set @mennyi=(select isnull(count(*),0) from wgyariszamok where kicsoda=@kics and xtetel=@etet and biztip=@mk) if @mennyi>0 --gyári számok begin DECLARE cGyariszamok CURSOR for SELECT gyariszam FROM wgyariszamok WHERE kicsoda=@kics and xtetel=@etet and biztip=@mk open cGyariszamok fetch next from cGyariszamok into @gysz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@kssz output INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, 1, 1, @EAR, '', @MK, @BSZ, @TET, @nyug, @bizom, @gysz, '') INSERT INTO MOZGAS VALUES (@MK, @bSZ, @TET, @KSSZ, 1, 1) -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@rakkod and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin exec karton_be_negativ @kssz, @rakkod, @csz, 1, @bizom, @kics end END fetch next from cGyariszamok into @gysz end close cGyariszamok deallocate cGyariszamok delete from wgyariszamok where kicsoda=@kics and xtetel=@etet end else begin set @mennyi=(select isnull(count(*),0) from wsarzs where kicsoda=@kics and xtetel=@etet) if @mennyi>0 --sarzs számok begin DECLARE cSarzs CURSOR for SELECT sarzs,sum(darab) FROM wsarzs WHERE kicsoda=@kics and xtetel=@etet group by sarzs open cSarzs fetch next from cSarzs into @sar, @_db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@kssz output set @_db=round(@_db,3) INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, @_DB, @_DB, @EAR, '', @MK, @BSZ, @TET, @nyug, @bizom, '', @sar) INSERT INTO MOZGAS VALUES (@MK, @bSZ, @TET, @KSSZ, @_DB, @_DB) -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@rakkod and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin exec karton_be_negativ @kssz, @rakkod, @csz, @_db, @bizom, @kics end END fetch next from cSarzs into @sar, @_db end close cSarzs deallocate cSarzs delete from wsarzs where kicsoda=@kics and xtetel=@etet end else begin --hagyományos exec bizsorsz_no @kulcs ,@kssz output set @db=round(@db,3) INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, @DB, @DB, @EAR, '', @MK, @BSZ, @TET, @nyug, @bizom, '', '') INSERT INTO MOZGAS VALUES (@MK, @bSZ, @TET, @KSSZ, @DB, @DB) -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@rakkod and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin exec karton_be_negativ @kssz, @rakkod, @csz, @db, @bizom, @kics end end end end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karton_be_bizom] ( @ev char(4), @mk varchar(10), @bsz bizonylat_szam, @etet bizonylat_tetel, @tet bizonylat_tetel, @rakkod kulcs, @csz cikk_szam, @db mennyiseg, @ear egyseg_ar, @nyug bit, @bizom bit, @kics kicsoda ) AS begin SET NOCOUNT ON DECLARE @KSSZ bizonylat_szam declare @kulcs varchar(30); declare @mennyi int declare @szd datum declare @gysz gyari_szam declare @sar varchar(20) declare @_db mennyiseg declare @mk1 varchar(10) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @kulcs = @ev +'karton' if @mk='vevo_va' set @mk1='vevo_szle' else set @mk1=@mk SET XACT_ABORT ON set @mennyi=(select isnull(count(*),0) from wszavatos where kicsoda=@kics and xtetel=@etet) if @mennyi>0 begin DECLARE cSzavatos CURSOR for SELECT szav_lejar,darab FROM wszavatos WHERE kicsoda=@kics and xtetel=@etet open cSzavatos fetch next from cSzavatos into @szd, @_db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@kssz output set @_db=round(@_db,3) INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, @_DB, @_DB, @EAR, @szd, @MK, @BSZ, @TET, @nyug, @bizom, '', '') INSERT INTO MOZGAS VALUES (@MK1, @bSZ, @TET, @KSSZ, @_DB, @_DB) END fetch next from cSzavatos into @szd, @_db end close cSzavatos deallocate cSzavatos delete from wszavatos where kicsoda=@kics and xtetel=@etet end else begin set @mennyi=(select isnull(count(*),0) from wgyariszamok where kicsoda=@kics and xtetel=@etet and biztip=@mk) if @mennyi>0 begin DECLARE cGyariszamok CURSOR for SELECT gyariszam FROM wgyariszamok WHERE kicsoda=@kics and xtetel=@etet and biztip=@mk open cGyariszamok fetch next from cGyariszamok into @gysz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@kssz output INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, 1, 1, @EAR, '', @MK, @BSZ, @TET, @nyug, @bizom, @gysz, '') INSERT INTO MOZGAS VALUES (@MK1, @bSZ, @TET, @KSSZ, 1, 1) END fetch next from cGyariszamok into @gysz end close cGyariszamok deallocate cGyariszamok delete from wgyariszamok where kicsoda=@kics and xtetel=@etet end else begin set @mennyi=(select isnull(count(*),0) from wsarzs where kicsoda=@kics and xtetel=@etet) if @mennyi>0 begin DECLARE cSarzs CURSOR for SELECT sarzs,darab FROM wsarzs WHERE kicsoda=@kics and xtetel=@etet open cSarzs fetch next from cSarzs into @sar, @_db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@kssz output set @_db=round(@_db,3) INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, @_DB, @_DB, @EAR, '', @MK, @BSZ, @TET, @nyug, @bizom, '', @sar) INSERT INTO MOZGAS VALUES (@MK, @bSZ, @TET, @KSSZ, @_DB, @_DB) END fetch next from cSarzs into @sar, @_db end close cSarzs deallocate cSarzs delete from wsarzs where kicsoda=@kics and xtetel=@etet end else begin exec bizsorsz_no @kulcs ,@kssz output set @db=round(@db,3) INSERT INTO KESZLET VALUES (@KSSZ, @rakkod, @CSZ, @DB, @DB, @EAR, '', @MK, @BSZ, @TET, @nyug, @bizom, '', '') INSERT INTO MOZGAS VALUES (@MK1, @bSZ, @TET, @KSSZ, @DB, @DB) end end end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karton_be_negativ] ( @kssz bizonylat_szam, @rakkod kulcs, @csz cikk_szam, @db mennyiseg, @bizom bit, @kics kicsoda ) AS begin SET NOCOUNT ON SET XACT_ABORT ON declare @mennyi int declare @mar mennyiseg declare @xssz bizonylat_szam declare @kdb mennyiseg declare @kidb mennyiseg declare @xtip varchar(20) declare @xbsz bizonylat_szam declare @xtet bizonylat_tetel declare @xazon varchar(32) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@rakkod and darab>0) if @mennyi>0 begin set @xazon=rtrim(ltrim(@kics)) + rtrim(ltrim(@@spid)) set @mar=@db delete from wkarton_ki where xazon=@xazon DECLARE cnegativ_keszlet CURSOR for SELECT sorszam,darab,biz_tipus,bizszam,tetel FROM keszlet_negativ WHERE cikk_szam=@csz and raktar_kod=@rakkod and darab>0 order by sorszam open cnegativ_keszlet fetch next from cnegativ_keszlet into @xssz, @kdb, @xtip, @xbsz, @xtet while (@@FETCH_STATUS <> -1) and @mar > 0 begin IF (@@FETCH_STATUS <> -2) BEGIN if @kdb>@mar set @kidb=round(- @mar,3) else set @kidb=round(- @kdb,3) insert into wkarton_ki values(@xazon, @xssz, @kidb) if len(@kssz)<>0 begin INSERT INTO MOZGAS VALUES (@xtip, @xbsz, @xtet, @kssz, @kidb, @kidb) if @xtip<>'rmozgas' and @bizom=1 insert into szbiz_kiv values ('', 0, @csz, -@kidb, @kssz, @xtip, @xbsz, @xtet, '', 0, 0, 0 ) end set @mar=round(@mar + @kidb,3) END fetch next from cnegativ_keszlet into @xssz, @kdb, @xtip, @xbsz, @xtet end close cnegativ_keszlet deallocate cnegativ_keszlet update keszlet_negativ set darab=round(keszlet_negativ.darab + wkarton_ki.darab,3) from wkarton_ki where xazon=@xazon and keszlet_negativ.sorszam=wkarton_ki.sorszam if len(@kssz)<>0 update keszlet set darab=darab + (select sum(darab) from wkarton_ki where xazon=@xazon) where sorszam=@kssz delete from wkarton_ki where xazon=@xazon end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karton_ki]( @mk varCHAR(10), @ssz bizonylat_szam, @etet bizonylat_tetel, @tet bizonylat_tetel, @rakkod kulcs, @csz cikk_szam, @db mennyiseg, @honnan varchar(28), @kics kicsoda) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @kdb mennyiseg declare @kidb mennyiseg declare @kssz bizonylat_szam declare @mar mennyiseg declare @xcsz cikk_szam declare @xazon varchar(32) declare @bizom bit declare @hany int declare @aruszolg char(1) select @aruszolg=aru_szolg from cikkek where cikk_szam=@csz if @aruszolg='1' begin set @xazon=rtrim(ltrim(@honnan)) + rtrim(ltrim(@@spid)) delete from wkarton_ki where xazon=@xazon set @mar=@db select @hany=isnull(count(*),0) from wszavatos_ki where kicsoda=@kics and xtetel=@etet and biztip=@honnan if @hany=0 -- nincs szavidő begin select @hany=isnull(count(*),0) from wgyariszamok_ki where kicsoda=@kics and xtetel=@etet and biztip=@honnan if @hany=0 -- nincs gyári szám begin select @hany=isnull(count(*),0) from wsarzs_ki where kicsoda=@kics and xtetel=@etet and biztip=@honnan if @hany=0 -- nincs sarzs szám (hagyományos FIFO) begin DECLARE cKarton_KI scroll CURSOR for SELECT cikk_szam,SORSZAM,DARAB, bizomanyos FROM KESZLET WHERE DARAB>0.0009 AND @rakkod=raktar_kod and @csz=cikk_szam order by szav_datum, bizomanyos, sorszam open cKarton_KI fetch next from cKarton_KI into @xcsz, @kssz, @kdb, @bizom while (@@FETCH_STATUS <> -1) --and @mar > 0.001 begin IF (@@FETCH_STATUS <> -2) BEGIN if @mar>=0.001 begin if @kdb>@mar set @kidb=round(- @mar,3) else set @kidb=round(- @kdb,3) insert into wkarton_ki values(@xazon, @kssz, @kidb) INSERT INTO MOZGAS VALUES (@mk, @ssz, @tet, @kssz, @kidb, @kidb) if @mk<>'rmozgas' and @bizom=1 insert into szbiz_kiv values ('', 0, @xcsz, -@kidb, @kssz, @mk, @ssz, @tet, '', 0, 0, 0 ) set @mar=round(@mar + @kidb,3) end END fetch next from cKarton_KI into @xcsz, @kssz, @kdb, @bizom end close cKarton_KI deallocate cKarton_KI if @mar>=0.001 and dbo.xrfuggveny('NegativKeszletKezel')='I' insert into keszlet_negativ values(@csz, @mar, @mar, @rakkod, @mk, @ssz, @tet) end else begin --sarzs számok DECLARE cKarton_KI scroll CURSOR for SELECT SORSZAM,DARAB FROM wsarzs_ki where kicsoda=@kics and xtetel=@etet and biztip=@honnan open cKarton_KI fetch next from cKarton_KI into @kssz,@kdb while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @kidb=round(- @kdb,3) insert into wkarton_ki values(@xazon, @kssz, @kidb) INSERT INTO MOZGAS VALUES (@MK,@SSZ,@TET, @KSSZ, @kiDB, @kiDB) select @bizom=bizomanyos from keszlet where sorszam=@kssz if @mk<>'rmozgas' and @bizom=1 insert into szbiz_kiv values ('', 0, @csz, -@kidb, @kssz, @mk, @SSZ,@TET, '', 0, 0, 0) END fetch next from cKarton_KI into @kssz,@kdb end close cKarton_KI deallocate cKarton_KI end end else begin -- gyári számos DECLARE cKarton_KI scroll CURSOR for SELECT SORSZAM,DARAB FROM wgyariszamok_ki where kicsoda=@kics and xtetel=@etet and biztip=@honnan open cKarton_KI; fetch next from cKarton_KI into @kssz,@kdb while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @kidb=round(- @kdb,3) insert into wkarton_ki values(@xazon, @kssz, @kidb) INSERT INTO MOZGAS VALUES (@MK,@SSZ,@TET, @KSSZ, @kiDB, @kiDB) select @bizom=bizomanyos from keszlet where sorszam=@kssz if @mk<>'rmozgas' and @bizom=1 insert into szbiz_kiv values ('', 0, @csz, -@kidb, @kssz, @mk, @SSZ,@TET, '', 0, 0, 0) END fetch next from cKarton_KI into @kssz,@kdb end close cKarton_KI deallocate cKarton_KI end end else begin -- szav. idős DECLARE cKarton_KI scroll CURSOR for SELECT SORSZAM,DARAB FROM wszavatos_ki where kicsoda=@kics and xtetel=@etet and biztip=@honnan open cKarton_KI; fetch next from cKarton_KI into @kssz,@kdb while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @kidb=round(- @kdb,3) insert into wkarton_ki values(@xazon, @kssz, @kidb) INSERT INTO MOZGAS VALUES (@MK,@SSZ,@TET, @KSSZ, @kiDB, @kiDB) select @bizom=bizomanyos from keszlet where sorszam=@kssz if @mk<>'rmozgas' and @bizom=1 insert into szbiz_kiv values ('', 0, @csz, -@kidb, @kssz, @mk, @SSZ,@TET, '', 0, 0, 0) END fetch next from cKarton_KI into @kssz,@kdb end close cKarton_KI deallocate cKarton_KI end update keszlet set darab=round(keszlet.darab + wkarton_ki.darab,3) from wkarton_ki where xazon=@xazon and keszlet.sorszam=wkarton_ki.sorszam delete from wkarton_ki where xazon=@xazon end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karton_ki_hibaval](@MK varCHAR(10), @SSZ bizonylat_szam, @TET bizonylat_tetel, @rakkod kulcs, @CSZ cikk_szam, @DB mennyiseg) AS begin SET NOCOUNT ON declare @kdb mennyiseg declare @kidb mennyiseg declare @kssz bizonylat_szam declare @mar mennyiseg declare @xcsz cikk_szam declare @odb mennyiseg SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE select @odb=isnull(sum(DARAB),0) FROM KESZLET WHERE DARAB>0.0009 AND @rakkod=raktar_kod and @csz=cikk_szam if @odb<@db insert into karton_kivet_hiba values(@rakkod, @csz, @db-@odb, @mk, @ssz, @tet) else begin set @mar=@db DECLARE cKarton_KI CURSOR for SELECT cikk_szam,SORSZAM,DARAB FROM KESZLET WHERE DARAB>0.0009 AND @rakkod=raktar_kod and @csz=cikk_szam order by szav_datum, sorszam for update -- lockolás Select count(*) FROM KESZLET (holdlock) WHERE DARAB>0.0009 AND @rakkod=raktar_kod and @csz=cikk_szam; open cKarton_KI; fetch next from cKarton_KI into @xcsz, @kssz,@kdb; while (@@FETCH_STATUS <> -1) and @maR > 0 --(@rek < @mrek and @mar >0 ) begin IF (@@FETCH_STATUS <> -2) BEGIN if @kdb>@mar set @kidb=round(- @mar,3) else set @kidb=round(- @kdb,3) update KESZLET set darab=round(@kdb + @kidb,3) where current of cKarton_KI; INSERT INTO MOZGAS VALUES (@MK,@SSZ,@TET, @KSSZ, @kiDB, @kiDB); set @mar=round(@mar + @kidb,3); END fetch next from cKarton_KI into @xcsz, @kssz,@kdb; end close cKarton_KI; deallocate cKarton_KI; SET TRANSACTION ISOLATION LEVEL READ COMMITTED end end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [karton_vissza]( @MK varCHAR(10), @SSZ bizonylat_szam, @TET bizonylat_tetel, @DB mennyiseg, @ren_bsz bizonylat_szam, @ren_tet bizonylat_tetel, @honnan varchar(28), @erakk kulcs, @csz cikk_szam, @kics kicsoda) AS begin declare @kdb mennyiseg declare @visszadb mennyiseg declare @xkssz bizonylat_szam declare @mar mennyiseg declare @ev char(4) declare @ear egyseg_ar declare @rakk kulcs declare @bizom bit declare @mennyi int declare @masrakt int declare @kulcs varchar(30) declare @ujkssz bizonylat_szam SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @mar=abs(@db) set @visszadb=0 -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@erakk and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin select @kdb=sum(darab) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@erakk and darab>0 if abs(@kdb) > abs(@mar) set @visszadb=round(abs( @mar),3) else set @visszadb=round(abs( @kdb),3) exec karton_be_negativ '', @erakk, @csz, @visszadb, '0', @kics end set @mar=@mar - @visszadb if (select isnull(max(raktar_kod),0) from mozgas inner join keszlet on keszlet.sorszam=mozgas.sorszam where mozgas.mozgaskod=@mk and mozgas.bizszam=@ren_bsz and mozgas.tetel= @ren_tet ) = @erakk set @masrakt=1 else set @masrakt=2 -- a régi mozgást kell átírni DECLARE cKarton_vissza CURSOR for SELECT SORSZAM, DARAB FROM mozgas WHERE mozgaskod=@mk and bizszam=@ren_bsz and tetel= @ren_tet --order by sorszam for update -- lockolás Select count(*) FROM mozgas (holdlock) WHERE mozgaskod=@mk and bizszam=@ren_bsz and tetel= @ren_tet open cKarton_vissza fetch next from cKarton_vissza into @xkssz, @kdb while (@@FETCH_STATUS <> -1) and @maR > 0 begin IF (@@FETCH_STATUS <> -2) BEGIN if abs(@kdb) > abs(@mar) set @visszadb=round(abs( @mar),3) else set @visszadb=round(abs( @kdb),3) select @bizom=bizomanyos, @rakk=raktar_kod, @csz=cikk_szam from keszlet where sorszam=@xkssz if @bizom='1' -- bizományos kartonról begin --select @rakk=raktar_kod, @csz=cikk_szam from keszlet where sorszam=@xkssz if (select count(*) from szbiz_kiv where mozgaskod='vevo_szle' and kbizszam=@ren_bsz and sorszam=@xkssz and ktetel=@ren_tet and len(rtrim(idoszak))=0 )>0 -- még nincs elszámolva begin update szbiz_kiv set darab=darab - @visszadb where mozgaskod='vevo_szle' and kbizszam=@ren_bsz and sorszam=@xkssz and ktetel=@ren_tet update KESZLET set darab=darab + round(@visszadb,3) where sorszam = @xkssz insert into mozgas values(@MK, @ssz, @tet, @xkssz, @visszadb, @visszadb) end else -- már el van számolva begin -- karton be select @ear=elszam_ar from szbiz_kiv where mozgaskod='vevo_szle' and kbizszam=@ren_bsz and ktetel=@ren_tet and sorszam=@xkssz set @ev=left(@ssz,4) exec karton_be_bizom @ev, 'vevo_szle', @SSZ , @TET, @TET, @rakk, @csz, @visszadb, @ear, 0, 0, @kics end delete from szbiz_kiv where mozgaskod='vevo_szle' and darab=0 and len(rtrim(idoszak))=0 end else --nem bizományos begin if @masrakt=1 --azonos raktárba vissza begin update KESZLET set darab=darab + round(@visszadb,3) where sorszam = @xkssz insert into mozgas values(@MK, @ssz, @tet, @xkssz, @visszadb, @visszadb) end else --másik raktárba vissza begin set @ev=left(@ssz,4) set @kulcs = @ev +'karton' exec bizsorsz_no @kulcs, @ujkssz output insert into keszlet select @ujkssz,@erakk,cikk_szam,abs(round(@visszadb,3)),abs(round(@visszadb,3)), egyseg_ar,szav_datum,mozgaskod,szamla_sz,tetel,nyugtazva,bizomanyos, gyari_szam,sarzs_szam from keszlet where sorszam=@xkssz insert into mozgas values(@MK, @ssz, @tet, @ujkssz, @visszadb, @visszadb) end end update MOZGAS set darab=darab + @visszadb where current of cKarton_vissza -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@rakk and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin exec karton_be_negativ @xkssz, @rakk, @csz, @visszadb, @bizom, @kics end set @mar=round(abs(@mar - @visszadb),3) END fetch next from cKarton_vissza into @xkssz, @kdb end close cKarton_vissza deallocate cKarton_vissza SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [keszlet_javit] AS begin -- -- A keszlet_negativ-ot kompenzálja a keszlet darabbal (ha van) -- SET XACT_ABORT ON SET NOCOUNT ON declare @kssz varchar(10) declare @csz cikk_szam declare @db mennyiseg declare @mar mennyiseg declare @rakk kulcs declare @kssz1 varchar(10) declare @db1 mennyiseg declare @dbx mennyiseg declare @tranznev varchar(50) set @tranznev = 't_kesz_jav' begin transaction @tranznev DECLARE c1 scroll cursor FOR SELECT sorszam,cikk_szam,raktar_kod,darab from keszlet where darab>0 order by sorszam open c1 FETCH NEXT FROM c1 INTO @kssz, @csz, @rakk, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if (select isnull(sum(darab),0) from keszlet_negativ where raktar_kod=@rakk and cikk_szam=@csz)>0 begin set @mar=@db DECLARE c2 scroll cursor FOR SELECT sorszam,darab from keszlet_negativ where raktar_kod=@rakk and cikk_szam=@csz and darab>0 order by sorszam open c2 FETCH NEXT FROM c2 INTO @kssz1, @db1 while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @mar>=@db1 begin update keszlet_negativ set darab=0 where sorszam=@kssz1 set @mar=@mar-@db1 end else begin set @dbx=@db1-@mar update keszlet_negativ set darab=@dbx where sorszam=@kssz1 set @mar=0 end END FETCH NEXT FROM c2 INTO @kssz1, @db1 end close c2 deallocate c2 update keszlet set darab=@mar where sorszam=@kssz end END FETCH NEXT FROM c1 INTO @kssz, @csz, @rakk, @db end close c1 deallocate c1 commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [KESZLET_JOV] @dat datum, @vdat datum, @rakk kulcs, @ccs char(18), @szal kulcs, @minden char(1), @kics kicsoda WITH RECOMPILE AS SET NOCOUNT ON declare @mdat char(10) declare @kdat char(10) declare @lccs int set @lccs=len( rtrim(@ccs) ) --select @kdat=isnull(max(datum),'*') from havi_keszlet where (raktar_kod=@rakk or @rakk=0) and datum'1' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set ertekesites_b=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --ERTEKESITES Tagállam ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqvevo_szle where eu='1' and orszag<>'HU' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set ertekesites_t=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --ERTEKESITES Export (nem tagállam) ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqvevo_szle where eu<>'1' and orszag<>'HU' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set ertekesites_e=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --BESZERZES belföldről ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(edarab*szorzo), @kics from vqszall_szle1 where orszag='HU' and visszaru<>'1' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set beszerzes_b=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --BESZERZES tagállamból ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(edarab*szorzo), @kics from vqszall_szle1 where eu='1' and orszag<>'HU' and visszaru<>'1' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set beszerzes_t=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --BESZERZES importból (nem tagállamból) ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(edarab*szorzo), @kics from vqszall_szle1 where eu<>'1' and orszag<>'HU' and visszaru<>'1' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set beszerzes_e=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --BESZERZES -ből visszaru ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqszall_szle1 where visszaru='1' and ( @dat<=telj_datum and telj_datum<=@vdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set beszerzes_v=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --NYITO keszlet -------------------------- if @kdat<>'*' begin delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab), @kics from vqhavi_keszlet where ( datum = @kdat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set nyito_keszlet=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam --BEVET ------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqbevet1 where ( @kdat<=datum and datum<@dat ) and ( raktar_k=@rakk or @rakk=0) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set zaro_keszlet=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam update wjov_keszlet set nyito_keszlet= nyito_keszlet + zaro_keszlet where kicsoda=@kics update wjov_keszlet set zaro_keszlet=0 where kicsoda=@kics -- K I V E T ------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqkivet1 where ( @kdat<=datum and datum<@dat ) and ( raktar_k=@rakk or @rakk=0) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set zaro_keszlet=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam update wjov_keszlet set nyito_keszlet= nyito_keszlet - zaro_keszlet where kicsoda=@kics update wjov_keszlet set zaro_keszlet=0 where kicsoda=@kics --BESZERZES ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqszall_szle1 where ( @kdat<=telj_datum and telj_datum<@dat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set zaro_keszlet=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam update wjov_keszlet set nyito_keszlet= nyito_keszlet + zaro_keszlet where kicsoda=@kics update wjov_keszlet set zaro_keszlet=0 where kicsoda=@kics --ERTEKESITES ---------------------------- delete wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, darab1, kicsoda) select cikk_szam, sum(darab*szorzo), @kics from vqvevo_szle where ( @kdat<=telj_datum and telj_datum<@dat ) and ( @rakk=0 or raktar_kod=@rakk ) and ( @ccs='' or rtrim(left(cikkcsop2,@lccs ))=rtrim(@ccs) ) and ( @szal=0 or @szal=rtrim(szallito) ) group by cikk_szam update wjov_keszlet set zaro_keszlet=isnull(darab1,0) from wgyujtes where wjov_keszlet.kicsoda=@kics and wgyujtes.kicsoda=@kics and wjov_keszlet.cikk_szam = wgyujtes.cikk_szam update wjov_keszlet set nyito_keszlet= nyito_keszlet - zaro_keszlet where kicsoda=@kics update wjov_keszlet set zaro_keszlet=0 where kicsoda=@kics end --ZÁRÓ keszlet -------------------------- update wjov_keszlet set zaro_keszlet=nyito_keszlet + (beszerzes_b + beszerzes_t + beszerzes_e + beszerzes_v + egyeb_be) - (ertekesites_b + ertekesites_s + ertekesites_t + ertekesites_e + egyeb_ki) where kicsoda=@kics --VÉGE ---------------- delete wjov_keszlet where kicsoda=@kics and nyito_keszlet=0 and beszerzes_b=0 and beszerzes_t=0 and beszerzes_e=0 and beszerzes_v=0 and ertekesites_b=0 and ertekesites_s=0 and ertekesites_t=0 and ertekesites_e=0 and egyeb_be=0 and egyeb_ki=0 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [keszlet_kompenzal] AS begin -- -- A keszlet_negativ-ot kompenzálja a keszlet darabbal (ha van) -- SET XACT_ABORT ON SET NOCOUNT ON declare @kssz varchar(10) declare @csz cikk_szam declare @db mennyiseg declare @mar mennyiseg declare @rakk kulcs declare @bsz bizonylat_szam declare @tet int declare @kssz1 varchar(10) declare @db1 mennyiseg declare @dbx mennyiseg declare @mennyi mennyiseg declare @tranznev varchar(50) set @tranznev = 't_kesz_jav' begin transaction @tranznev DECLARE c1 scroll cursor FOR SELECT sorszam,bizszam,tetel,cikk_szam,raktar_kod,darab from keszlet_negativ where darab>0 and biz_tipus='vevo_szle' order by sorszam open c1 FETCH NEXT FROM c1 INTO @kssz, @bsz, @tet, @csz, @rakk, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if (select isnull(sum(darab),0) from keszlet where raktar_kod=@rakk and cikk_szam=@csz)>0 begin set @mar=@db DECLARE c2 scroll cursor FOR SELECT sorszam,darab from keszlet where raktar_kod=@rakk and cikk_szam=@csz and darab>0 order by sorszam open c2 FETCH NEXT FROM c2 INTO @kssz1, @db1 while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) and @mar>0 BEGIN if @mar>=@db1 begin update keszlet set darab=0 where sorszam=@kssz1 set @mar=@mar-@db1 set @mennyi=-@db1 end else begin set @dbx=@db1-@mar update keszlet set darab=@dbx where sorszam=@kssz1 set @mennyi=-@mar set @mar=0 end insert into mozgas values('vevo_szle',@bsz,@tet,@kssz1,@mennyi,@mennyi) END FETCH NEXT FROM c2 INTO @kssz1, @db1 end close c2 deallocate c2 update keszlet_negativ set darab=@mar where sorszam=@kssz end END FETCH NEXT FROM c1 INTO @kssz, @bsz, @tet, @csz, @rakk, @db end close c1 deallocate c1 commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [Keszlet_vissza_datumra] @dat char(10), @ido char(10), @kics kicsoda WITH RECOMPILE AS begin declare @datumido char(20) declare @tranznev char(32) set @tranznev='kesz_vissza'+@kics set @datumido=@dat + ' ' + @ido SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION @tranznev delete from wmozgasok where kicsoda=@kics delete from wkeszletsz where kicsoda=@kics insert into wkeszletsz select *,@kics from keszlet --vevői szállítólevél insert into wmozgasok select mozgas.sorszam,mozgas.darab,@kics from vevo_szlef inner join vevo_szlet on vevo_szlef.bizszam=vevo_szlet.bizszam inner join mozgas on vevo_szlet.bizszam=mozgas.bizszam and vevo_szlet.tetel=mozgas.tetel and mozgas.mozgaskod='vevo_szle' where modositva>@datumido --raktár kivétek insert into wmozgasok select mozgas.sorszam,mozgas.darab,@kics from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam inner join mozgas on kivett.bizszam=mozgas.bizszam and kivett.tetel=mozgas.tetel and mozgas.mozgaskod='kivet' where modido>@datumido --raktár bevétek insert into wmozgasok select mozgas.sorszam,mozgas.darab,@kics from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam inner join mozgas on bevett.bizszam=mozgas.bizszam and bevett.tetel=mozgas.tetel and mozgas.mozgaskod='bevet' where modido>@datumido --száll. szállítólevél insert into wmozgasok select mozgas.sorszam,mozgas.darab,@kics from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam inner join mozgas on szall_szlet.bizszam=mozgas.bizszam and szall_szlet.tetel=mozgas.tetel and mozgas.mozgaskod='vetel' where modositva>@datumido --if @bizom_is='1' --bizományos szállítólevél insert into wmozgasok select mozgas.sorszam,mozgas.darab,@kics from szbiz_szlef inner join szbiz_szlet on szbiz_szlef.bizszam=szbiz_szlet.bizszam inner join mozgas on szbiz_szlet.bizszam=mozgas.bizszam and szbiz_szlet.tetel=mozgas.tetel and mozgas.mozgaskod='bizom' where modositva>@datumido update wkeszletsz set darab=round(wkeszletsz.darab - isnull( (select sum(wmozgasok.darab) from wmozgasok where wkeszletsz.sorszam=wmozgasok.sorszam and wmozgasok.kicsoda=@kics), 0) ,3) where wkeszletsz.kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [keszre_torol] ( @diszpo bigint, @keszre bigint, @kics char(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @csz char(30) declare @db float declare @acsz char(30) declare @adb float declare @rakk int declare @cKulcs varchar(10) declare @ksorsz varchar(10) declare @tet int declare @tranznev varchar(50) select @tranznev = 't_keszre_torol' begin transaction @tranznev select @rakk=raktar_kod, @csz=cikk_szam from diszpo where kulcs=@diszpo select @db=darab from keszre1 where kulcs=@keszre select @cKulcs = convert(varchar(10),@keszre) -- a készterméket leveszi a készletről select @ksorsz=sorszam from mozgas where mozgas.mozgaskod='term_be' and mozgas.bizszam=@ckulcs update keszlet set darab=0 where sorszam=@ksorsz -- exec keszlet_csokkent @rakk, @csz, @db -- a felhasznált anyagot visszateszi készletre DECLARE c1 scroll CURSOR for select tetel, rtrim(acikk_szam), darab from keszre2 where kulcs=@keszre order by tetel open c1 fetch next from c1 into @tet, @acsz, @adb while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) begin select @ksorsz=sorszam from mozgas where mozgaskod='term_ki' and bizszam=@ckulcs and tetel=@tet Update keszlet set darab = darab + @adb where sorszam=@ksorsz end fetch next from c1 into @tet, @acsz, @adb end close c1; deallocate c1; -- törli a készrejelentést delete from keszre2 where kulcs=@keszre delete from keszre1 where kulcs=@keszre -- diszpoba visszateszi a legyártott darabot update diszpo set darab=darab+@db where kulcs=@diszpo commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kivet_keszlet]( @rakkod kulcs, @hany bizonylat_szam, @kics kicsoda ) AS begin declare @csz cikk_szam declare @tet bizonylat_tetel declare @db mennyiseg declare @ki_db mennyiseg declare @aruszolg char(1) declare @szor int SET XACT_ABORT ON SET NOCOUNT ON DECLARE c1 cursor FOR SELECT wkivett.tetel, wkivett.cikk_szam, wkivett.darab, cikkek.aru_szolg, szorzo FROM wkivett,cikkek where wkivett.cikk_szam=cikkek.cikk_szam and wkivett.kicsoda = @kics order by wkivett.tetel OPEN c1 FETCH NEXT FROM c1 INTO @tet, @csz, @db, @aruszolg, @szor while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @ki_db=@db * @szor if @aruszolg='1' exec karton_ki 'kivet', @hany, @tet, @tet, @rakkod, @csz, @ki_db, 'kivet_keszlet', @kics END FETCH NEXT FROM c1 INTO @tet, @csz, @db, @aruszolg, @szor end close c1 deallocate c1 end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kivet_uj] ( @dat datum, @hivszam varchar(50), @kivj kulcs, @rakkod kulcs, @megj megjegyzes, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @hany bizonylat_szam declare @kulcs varchar(20) declare @tranznev varchar(50) set @tranznev = 't_kivet_uj'+@kics set @kulcs = left(@dat,4) + 'KIVET'; begin transaction @tranznev exec kivet_uj_tranz_nelkul @dat, @hivszam, @kivj, @rakkod, @megj, @kics delete from wkivett where kicsoda= @kics delete from wszavatos_ki where kicsoda=@kics and biztip='kivet_keszlet' delete from wsarzs_ki where kicsoda=@kics and biztip='kivet_keszlet' commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kivet_uj_logi] ( @dat datum, @hivszam varchar(50), @kivj char(12), @rakkod kulcs, @megj megjegyzes, @kics kicsoda, @rszam bizonylat_szam, @tul int, @dolg kicsoda, @kapu varchar(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @hany bizonylat_szam declare @kulcs varchar(20) declare @tranznev varchar(50) declare @pazon varchar(20) set @tranznev = 't_kivet_uj'+@kics begin transaction @tranznev if len(@dolg)>0 and len(@kapu)>0 exec arulog..keszlet_csokkent_le @kapu, @dolg, @tul, @kics set @kulcs = left(@dat,4) + 'KIVET' exec bizsorsz_no @kulcs , @hany output update wkivett set bizszam=@hany where kicsoda= @kics insert into kivetf values (@hany, @hivszam, @rakkod, @dat, @kivj, @megj, @kics, dbo.mygetdatetime()) insert into kivett select @hany, tetel, cikk_szam, menny_egys, szorzo, darab, afa_kulcs, egyseg_ar from wkivett where kicsoda= @kics exec kivet_keszlet @rakkod, @hany, @kics delete from wkivett where kicsoda= @kics delete from wszavatos_ki where kicsoda=@kics and biztip='kivet_keszlet' delete from wsarzs_ki where kicsoda=@kics and biztip='kivet_keszlet' -- törli a logisztika készletből a kapuban lévő raklapokat select @pazon=puffer_azon from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(vegrehajtva)>0 delete from arulog..keszlet where helyazon=@pazon and darab=0 insert into arulog..kom_szamlazott select @tul, 3, @hany, kulcs from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(RTrim(vegrehajtva))<>0 and keszletkulcs<>0 and not exists (select * from arulog..kom_szamlazott AS x where tulaj=@tul and x.kulcs=arulog..kom_feladat.kulcs) exec vevo_ren_allapot_akt @rszam update vevo_renf set allapot='hátralékos' where bizszam=@rszam -- törli a rendelés összes foglalását függetlenül a dátumtól update foglalasok set darab=0 where darab<>0 and rend_szam=@rszam commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kivet_uj_tranz_nelkul] ( @dat datum, @hivszam varchar(50), @kivj kulcs, @rakkod kulcs, @megj megjegyzes, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @hany bizonylat_szam declare @kulcs varchar(20) set @kulcs = left(@dat,4) + 'KIVET' exec bizsorsz_no @kulcs , @hany output update wkivett set bizszam=@hany where kicsoda= @kics insert into kivetf values (@hany, @hivszam, @rakkod, @dat, @kivj, @megj, @kics, dbo.mygetdatetime()) insert into kivett select @hany, tetel, cikk_szam, menny_egys, szorzo, darab, afa_kulcs, egyseg_ar from wkivett where kicsoda= @kics exec kivet_keszlet @rakkod, @hany, @kics SET TRANSACTION ISOLATION LEVEL READ COMMITTED end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kivetjog_uj] (@NEV nev) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE begin transaction t_kivetjog_uj -- exec karsorsz_no 'kivetjog',@hany output insert into kivetjog values (@nev); commit transaction t_kivetjog_uj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [koltseg_keszletre_torol] ( @where varchar(500), @kics varchar(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sqlstr varchar(2000) declare @tranznev varchar(50) set @tranznev = 't_koltseg_keszletre_tor'+@kics begin transaction @tranznev --készletet átírni set @sqlstr='update vkeszlet_koltseg_keszletre set egyseg_ar=egyseg_ar-terh_egyseg ' + @where exec (@sqlstr) --tételeket törölni set @sqlstr='delete from koltseg_keszletre where kulcs in '+ '(select kulcs from vkoltseg_keszletre ' + @where + ')' exec (@sqlstr) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [koltseg_keszletre_uj] ( @tbsz bizonylat_szam, @kbsz bizonylat_szam, @ktet bizonylat_tetel, @kcsz cikk_szam, @oktg numeric(18,2), @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @bsz bizonylat_Szam declare @tet bizonylat_tetel declare @kolt numeric(18,2) declare @tranznev varchar(50) set @tranznev = 't_koltseg_keszletre_uj'+@kics begin transaction @tranznev insert into koltseg_keszletre (kolt_bizszam,kolt_tetel,kolt_cikk,kolt_ertek,terh_bizszam,terh_tetel,terh_cikk,terh_egyseg, terh_koltseg,kicsoda,modositva) select @kbsz, @ktet, @kcsz, @oktg, terh_bizszam, terh_tetel, terh_cikk, kolt_egyseg, kolt_ertek, @kics, dbo.MyGetDateTime() from wkoltseg_keszletre where kicsoda=@kics and terh_bizszam=@tbsz and kolt_ertek<>0 --készletet átírni DECLARE c1 CURSOR for SELECT terh_bizszam,terh_tetel,kolt_egyseg from wkoltseg_keszletre where kicsoda=@kics and terh_bizszam=@tbsz and kolt_ertek<>0 open c1 fetch next from c1 into @bsz, @tet, @kolt while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN update keszlet set egyseg_ar=egyseg_ar + @kolt where szamla_sz=@bsz and tetel=@tet and mozgaskod='vetel' END fetch next from c1 into @bsz, @tet, @kolt end close c1 deallocate c1 commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kont_bizsorsz_no] ( @nev varchar(30), @kssz bizonylat_szam output) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @hany int declare @ev2 char(2) set @ev2=right( left(@nev,4) ,2) update bizsorszam set kod=kod+1 where evtipus=@nev select @hany=kod from bizsorszam where evtipus=@nev set @kssz=convert(char, @hany) set @kssz=@ev2 + replicate('0', 8-len(rtrim(@kssz)))+@kssz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kont_szabaly_mod] @kont_azon kulcs, @kont_anev nev, @kont_tip kulcs, @felt_tablo varchar(500), @felt_ertek varchar(500), @felt_szures varchar(500), @szoveg varchar(500), @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) set @tranznev = 'kont_szabaly_mod'+@kics begin transaction @tranznev update kont_szabalyf set kont_anev =@kont_anev, kont_tip =@kont_tip, felt_tablo =@felt_tablo, felt_ertek =@felt_ertek, felt_szures =@felt_szures, szoveg =@szoveg where kont_azon=@kont_azon delete from kont_szabalyt where kont_azon=@kont_azon insert into kont_szabalyt select @kont_azon, t_k, fk_szam,felt_tablo, felt_ertek, felt_szures, megjegyzes, lehet_nulla from wkont_szabalyt where kicsoda=@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kont_szabaly_uj] @kont_anev nev, @kont_tip kulcs, @felt_tablo varchar(500), @felt_ertek varchar(500), @felt_szures varchar(500), @szoveg varchar(500), @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @kont_azon kulcs declare @pri kulcs set @tranznev = 'kont_szabaly_uj'+@kics begin transaction @tranznev select @pri=count(*)+1 from kont_szabalyf Insert into kont_szabalyf values(@kont_anev, @kont_tip, @felt_tablo, @felt_ertek, @felt_szures, @szoveg, @pri) Select @kont_azon = @@identity Update wkont_szabalyt set kont_azon = @kont_azon where kicsoda = @kics insert into kont_szabalyt select kont_azon, t_k, fk_szam,felt_tablo, felt_ertek, felt_szures, megjegyzes, lehet_nulla from wkont_szabalyt where kicsoda=@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kont_szabalyf_pri_fel] ( @elozo_kont_azon int, @akt_kont_azon int ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @e_pri bigint declare @a_pri bigint declare @raktar int declare @cKulcs varchar(50) declare @email varchar(50) select @tranznev = 't_diszpo_fel' begin transaction @tranznev select @e_pri=prioritas from kont_szabalyf where kont_azon=@elozo_kont_azon select @a_pri=prioritas from kont_szabalyf where kont_azon=@akt_kont_azon update kont_szabalyf set prioritas=@a_pri where kont_azon=@elozo_kont_azon update kont_szabalyf set prioritas=@e_pri where kont_azon=@akt_kont_azon commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kont_szabalyf_prior_beallit] WITH RECOMPILE AS begin declare @tranznev char(32) declare @kazon int declare @ktip_old int declare @ktip int declare @X int set @tranznev='kont_szabalyf_prior_beallit' BEGIN TRANSACTION @tranznev DECLARE cX CURSOR for SELECT kont_azon,kont_tip FROM kont_szabalyf order by kont_tip, kont_anev for update SELECT count(*) FROM kont_szabalyf (holdlock); select @X = 0 select @ktip_old = 0 open cX fetch next from cX into @kazon,@ktip while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @ktip_old <> @ktip begin select @X = 0 select @ktip_old = @ktip end select @X = @X + 1 update kont_szabalyf set prioritas = @X where current of cX; END fetch next from cX into @kazon,@ktip end close cX deallocate cX COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [kontir_uj] (@kont_tip int, @kont_datum datum, @bizszam bizonylat_szam, @hivszam varchar(30), @szoveg varchar(254), @kics kicsoda) WITH RECOMPILE AS begin declare @tranznev char(32) declare @sorsz bizonylat_szam declare @kulcs varchar(20) set @tranznev='kontir_uj'+@kics set @kulcs = left( dbo.mygetdatetime() ,4) + 'kontir' SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE --először begyűjtöm @ofk_szam-ba az ellen számlaszámokat declare @etfk_szam varchar(50) declare @ekfk_szam varchar(50) declare @fk_szam varchar(18) set @etfk_szam='' set @ekfk_szam='' DECLARE cfk_ellenk CURSOR for SELECT kszamlaszam FROM wkontirozas WHERE kicsoda=@kics and len(rtrim(kszamlaszam))>0 order by kszamlaszam open cfk_ellenk fetch next from cfk_ellenk into @fk_szam while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if len(rtrim(@etfk_szam))>0 set @etfk_szam=@etfk_szam+', ' set @etfk_szam= @etfk_szam + rtrim(@fk_szam) END fetch next from cfk_ellenk into @fk_szam end close cfk_ellenk deallocate cfk_ellenk DECLARE cfk_ellent CURSOR for SELECT tszamlaszam FROM wkontirozas WHERE kicsoda=@kics and len(rtrim(tszamlaszam))>0 order by tszamlaszam open cfk_ellent fetch next from cfk_ellent into @fk_szam while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if len(rtrim(@ekfk_szam))>0 set @ekfk_szam=@ekfk_szam+', ' set @ekfk_szam= @ekfk_szam + rtrim(@fk_szam) END fetch next from cfk_ellent into @fk_szam end close cfk_ellent deallocate cfk_ellent BEGIN TRANSACTION @tranznev exec kont_bizsorsz_no @kulcs, @sorsz output insert into kontirf (azon, kont_tip, kont_datum, bizszam, hivszam, szoveg, kontirozta, kontirozva) values(@sorsz, @kont_tip, @kont_datum, @bizszam, @hivszam, @szoveg, @kics, dbo.mygetdatetime()) insert into kontirt select @sorsz, 'T', tszamlaszam, @etfk_szam, tertek from wkontirozas where kicsoda=@kics and len(rtrim(tszamlaszam))>0 insert into kontirt select @sorsz, 'K', kszamlaszam, @ekfk_szam, kertek from wkontirozas where kicsoda=@kics and len(rtrim(kszamlaszam))>0 COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leertekeles_uj] ( @dat datum, @kivj char(12), @bevj char(12), @rakkod kulcs, @megj megjegyzes, @kics kicsoda) AS begin declare @hany_b bizonylat_szam declare @hany_k bizonylat_szam declare @ujmegj megjegyzes declare @tranznev varchar(50) set @tranznev = 't_leertek_uj'+@kics SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE begin transaction @tranznev -- Bevét beírása delete from wbevett where kicsoda =@kics Insert into wbevett select '', TETEL,CCIKK_SZAM,CCIKK_NEV, AFA_KULCS, MENNY_EGYS, SZORZO, 0, DARAB, kicsoda From wleertekelest where kicsoda=@kics delete from wszavatos where kicsoda=@kics insert into wszavatos select xtetel,szav_lejar,darab,kicsoda from wszavatos_ki where kicsoda=@kics -- ??????? exec szavido_atir 'bevet', @kics -- kivét rögzítése exec kivet_uj_tranz_nelkul @dat, '', @kivj, @rakkod, @megj, @kics select @hany_k=max(bizszam) from kivetf where datum=@dat and kicsoda= @kics delete from wkivett where kicsoda= @kics delete from wszavatos_ki where kicsoda=@kics and biztip='kivet_keszlet' -- aktualizálja a bevét árakat a kivét árakból update wbevett set egyseg_ar= (select sum(mozgas.edarab*keszlet.egyseg_ar)/sum(mozgas.edarab) from mozgas,keszlet where mozgas.sorszam=keszlet.sorszam and mozgas.mozgaskod='kivet' and bizszam=@hany_k and mozgas.tetel=wbevett.tetel ) where kicsoda=@kics -- bevét rögzítése exec bevet_uj_tranz_nelkul @dat, '', @bevj, @rakkod, @megj, @kics select @hany_b=max(bizszam) from bevetf where datum=@dat and kicsoda= @kics delete from wbevett where kicsoda= @kics delete from wszavatos where kicsoda=@kics set @ujmegj='Leértékelés Bevét biz.szám: ' + @hany_b Update kivetf set megjegyzes = rtrim(@ujmegj + megjegyzes) Where bizszam = @hany_k set @ujmegj='Leértékelés Kivét biz.szám: ' + @hany_b Update bevetf set megjegyzes = rtrim(@ujmegj + megjegyzes) Where bizszam = @hany_b commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_bevtolt] ( @rakkod kulcs, @ccs varchar(19), @gyk kulcs, @szk kulcs, @kics kicsoda ) AS begin SET NOCOUNT ON declare @tet bizonylat_tetel declare @szav datum declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @afa afakulcs declare @db mennyiseg declare @ear egyseg_ar declare @dtip char(1) DECLARE c1 cursor FOR SELECT leltar.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, cikkek.afa_kulcs, round(fellelt-darab,3), isnull(vanyagszukseglet1.egyseg_ar,cikkek.ut_besz_ar), leltar.szav_ido, cikkek.dat_tipus from leltar inner join cikkek on leltar.cikk_szam = cikkek.cikk_szam left outer join vanyagszukseglet1 on cikkek.cikk_szam=vanyagszukseglet1.cikk_szam where cikkek.cikkcsop2 like @ccs and fellelt>darab and leltar.raktar_kod=@rakkod and (@gyk=0 or @gyk=cikkek.gyarto) and (@szk=0 or @szk=cikkek.szallito) order by cikkek.cikk_nev set @tet=0 open c1 FETCH NEXT FROM c1 INTO @csz, @cn, @me, @afa, @db, @ear, @szav, @dtip while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet= @tet + 1 insert into wbevett values('', @tet, @csz, @cn, @afa, @me, 1, @ear, @db, @kics) if (@dtip='L' or @dtip='G') and len(rtrim(@szav))>0 insert into wszavatos values(@tet, @szav, @db, @kics) if @dtip='S' and len(rtrim(@szav))>0 insert into wsarzs values(@tet, @szav, @db, @kics) END FETCH NEXT FROM c1 INTO @csz, @cn, @me, @afa, @db, @ear, @szav, @dtip end close c1 deallocate c1 end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_ertekel] AS begin SET NOCOUNT ON --betöltöm azokat amelyek nem szerepelnek a leltar tablóban!!!!! insert into leltar select cikk_szam, raktar_kod, 0, 0, szav_lejar from vleltar_felv where fazis=1 and not exists (select * from leltar where leltar.cikk_szam = vleltar_felv.cikk_szam and leltar.raktar_kod = vleltar_felv.raktar_kod and leltar.szav_ido = vleltar_felv.szav_lejar) group by cikk_szam, raktar_kod, szav_lejar update leltar set fellelt=isnull( (select isnull(sum(darab),0) from vleltar_felv where leltar.cikk_szam = vleltar_felv.cikk_szam and leltar.raktar_kod = vleltar_felv.raktar_kod and leltar.szav_ido = vleltar_felv.szav_lejar and fazis=1),0) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_felv_torol] AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from leltar_felv DBCC CHECKIDENT (leltar_felv, RESEED, 0) end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_iker_ellen] AS BEGIN SET NOCOUNT ON delete from wleltar_felv insert into wleltar_felv select raktar_kod, cikk_szam, szav_lejar, 0,0 from vleltar_felv --where fazis=1 group by raktar_kod, cikk_szam, szav_lejar update wleltar_felv set darab1= (select isnull(sum(darab),0) from vleltar_felv where fazis=1 and wleltar_felv.cikk_szam = vleltar_felv.cikk_szam and wleltar_felv.raktar_kod = vleltar_felv.raktar_kod and wleltar_felv.szav_datum = vleltar_felv.szav_lejar) update wleltar_felv set darab2= (select isnull(sum(darab),0) from vleltar_felv where fazis=2 and wleltar_felv.cikk_szam = vleltar_felv.cikk_szam and wleltar_felv.raktar_kod = vleltar_felv.raktar_kod and wleltar_felv.szav_datum = vleltar_felv.szav_lejar) END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_indit]( @elozotor char(1), @rakk kulcs, @rakn varchar(100), @ccs varchar(18), @ccsn varchar(100), @gyk kulcs, @gyn varchar(100), @szk kulcs, @szn varchar(100) ) AS begin SET NOCOUNT ON delete from leltar delete from wleltar if (select ertek from parameterek where azonosito='AruLog')='I' begin insert into leltar select cikk_szam, raktar_kod, sum(darab), 0, '' from keszlet group by cikk_szam, raktar_kod end else begin /* insert into leltar select cikk_szam, raktar_kod, sum(darab), 0, szav_datum from keszlet group by cikk_szam, raktar_kod, szav_datum */ insert into leltar select keszlet.cikk_szam, keszlet.raktar_kod, sum(darab), 0, case when dat_tipus='L' or dat_tipus='G' then ISNULL(szav_datum, '') else case when dat_tipus='S' then ISNULL(sarzs_szam, '') else '' end end from keszlet inner join cikkek on cikkek.cikk_szam=keszlet.cikk_szam group by keszlet.cikk_szam, keszlet.raktar_kod, case when dat_tipus='L' or dat_tipus='G' then ISNULL(szav_datum, '') else case when dat_tipus='S' then ISNULL(sarzs_szam, '') else '' end end end insert into wleltar select cikk_szam, raktar_kod, sum(darab), 0, '' from keszlet_negativ where darab>0 group by cikk_szam, raktar_kod insert into leltar select cikk_szam,raktar_kod,0,0,'' from wleltar where not exists (select * from leltar where wleltar.raktar_kod=leltar.raktar_kod and wleltar.cikk_szam=leltar.cikk_szam and len(rtrim(leltar.szav_ido))=0) group by cikk_szam,raktar_kod update leltar set darab=darab - (select darab from wleltar where wleltar.raktar_kod=leltar.raktar_kod and wleltar.cikk_szam=leltar.cikk_szam) where len(rtrim(leltar.szav_ido))=0 and exists (select * from wleltar where wleltar.raktar_kod=leltar.raktar_kod and wleltar.cikk_szam=leltar.cikk_szam) if @elozotor='1' begin delete from leltar_felv DBCC CHECKIDENT (leltar_felv, RESEED, 0) delete from wszavatos_lel delete from wsarzs_lel end else begin set @ccs=rtrim(@ccs)+'%' delete from leltar_felv where cikk_szam not in (select cikk_szam from cikkek where cikkcsop2 like @ccs) and cikk_szam not in (select cikk_szam from cikkek where @gyk=0 or @gyk=gyarto) and cikk_szam not in (select cikk_szam from cikkek where @szk=0 or @szk=szallito) end delete from leltar_szures if len(@ccs)>0 or @gyk<>0 or @szk<>0 or @rakk<>0 insert into leltar_szures values(@ccs, @ccsn, @gyk, @gyn, @szk, @szn, @rakk, @rakn) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_kivtolt] ( @rakkod kulcs, @ccs varchar(19), @gyk kulcs, @szk kulcs, @kics kicsoda ) AS begin SET NOCOUNT ON declare @tet bizonylat_tetel declare @szav datum; declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @db mennyiseg declare @sz_db mennyiseg declare @mar mennyiseg declare @kssz bizonylat_szam declare @dtip char(1) declare @afa afakulcs declare @utb egyseg_ar DECLARE c1 cursor FOR SELECT leltar.cikk_szam, cikkek.cikk_nev, cikkek.menny_egys, round(darab-fellelt,3), leltar.szav_ido, cikkek.afa_kulcs, cikkek.ut_besz_ar, cikkek.dat_tipus from leltar, cikkek where leltar.cikk_szam = cikkek.cikk_szam and cikkek.cikkcsop2 like @ccs and fellelt -1) --(@rek < @mrek ) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet= @tet + 1 insert into wkivett values('', @tet, @csz, @cn, @me, 1, @db, @afa, @utb, @kics) if (@dtip='L' or @dtip='G') and len(rtrim(@szav))>0 begin set @mar=@db DECLARE c5 cursor FOR SELECT sorszam,darab from keszlet where cikk_szam=@csz and raktar_kod=@rakkod and szav_datum=@szav and darab>0 order by sorszam open c5 FETCH NEXT FROM c5 INTO @kssz, @sz_db while (@@FETCH_STATUS <> -1) and @mar>0 begin IF (@@FETCH_STATUS <> -2) BEGIN if @mar<@sz_db insert into wszavatos_ki values(@tet, @kssz, 'kivet_keszlet', @szav, '', '', '', @mar, @mar, @kics) else begin insert into wszavatos_ki values(@tet, @kssz, 'kivet_keszlet', @szav, '', '', '', @sz_db, @sz_db, @kics) end set @mar=@mar - @sz_db END FETCH NEXT FROM c5 INTO @kssz, @sz_db end close c5 deallocate c5 end if @dtip='S' and len(rtrim(@szav))>0 --sarzs számos begin if (select COUNT(*) from keszlet where cikk_szam=@csz and raktar_kod=@rakkod and szav_datum=@szav and darab>0)>0 begin select @kssz=sorszam,@sz_db=darab from keszlet where cikk_szam=@csz and raktar_kod=@rakkod and szav_datum=@szav and darab>0 if @db<@sz_db set @mar=@db else set @mar=@sz_db insert into wsarzs_ki values(@tet, @kssz, 'kivet_keszlet', @szav, '', '', '', @mar, @mar, @kics) end end END FETCH NEXT FROM c1 INTO @csz, @cn, @me, @db, @szav, @afa, @utb, @dtip end close c1 deallocate c1 end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [leltar_zar] ( @leldat datum, @bizdat datum, @bevj char(12), @kivj char(12), @szrakkod kulcs, @ccs varchar(19), @gyk kulcs, @szk kulcs, @megj megjegyzes, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @mrek int declare @rakkod kulcs declare @tranznev varchar(50) set @tranznev = 't_LELTAR_ZAR'+@kics begin transaction @tranznev --betöltöm azokat amelyek nem szerepelnek a leltar tablóban!!!!! insert into leltar select cikk_szam, raktar_kod, 0, 0, szav_lejar from vleltar_felv where fazis=1 and not exists (select * from leltar where leltar.cikk_szam = vleltar_felv.cikk_szam and leltar.raktar_kod = vleltar_felv.raktar_kod and leltar.szav_ido = vleltar_felv.szav_lejar) group by cikk_szam, raktar_kod, szav_lejar update leltar set fellelt=isnull( (select isnull(sum(darab),0) from vleltar_felv where leltar.cikk_szam = vleltar_felv.cikk_szam and leltar.raktar_kod = vleltar_felv.raktar_kod and leltar.szav_ido = vleltar_felv.szav_lejar and fazis=1),0) --jön az átvezetés RAKTÁRONKÉNT!!!!!!!!!!!! --bevétek DECLARE clel_zar_be scroll CURSOR for SELECT leltar.raktar_kod FROM leltar, cikkek where leltar.cikk_szam = cikkek.cikk_szam and cikkek.cikkcsop2 like @ccs and (leltar.raktar_kod=@szrakkod or @szrakkod=0) and fellelt>darab and (@gyk=0 or @gyk=cikkek.gyarto) and (@szk=0 or @szk=cikkek.szallito) group by leltar.raktar_kod open clel_zar_be fetch next from clel_zar_be into @rakkod while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN delete from wbevett where kicsoda=@kics delete from wszavatos where kicsoda=@kics delete from wsarzs where kicsoda=@kics exec leltar_bevtolt @rakkod, @ccs, @gyk, @szk, @kics exec bevet_uj_tranz_nelkul @bizdat, '', @bevj, @rakkod, @megj, @kics END fetch next from clel_zar_be into @rakkod end close clel_zar_be deallocate clel_zar_be --kivétek DECLARE clel_zar_ki scroll CURSOR for SELECT leltar.raktar_kod FROM leltar, cikkek where leltar.cikk_szam = cikkek.cikk_szam and cikkek.cikkcsop2 like @ccs and (leltar.raktar_kod=@szrakkod or @szrakkod=0) and fellelt -1) begin IF (@@FETCH_STATUS <> -2) BEGIN delete from wkivett where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics delete from wsarzs_ki where kicsoda=@kics exec leltar_kivtolt @rakkod, @ccs, @gyk, @szk, @kics exec kivet_uj_tranz_nelkul @bizdat, '', @kivj, @rakkod, @megj, @kics END fetch next from clel_zar_ki into @rakkod end close clel_zar_ki deallocate clel_zar_ki -- kimentem a leltáríveket az archívba (egy-egy raktár és cikkcsoport) DECLARE clel_zar_be scroll CURSOR for SELECT leltar.raktar_kod FROM leltar, cikkek where leltar.cikk_szam = cikkek.cikk_szam and cikkek.cikkcsop2 like @ccs and (leltar.raktar_kod=@szrakkod or @szrakkod=0) and (@gyk=0 or @gyk=cikkek.gyarto) and (@szk=0 or @szk=cikkek.szallito) group by leltar.raktar_kod open clel_zar_be fetch next from clel_zar_be into @rakkod while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN Insert into a_leltar_felv (datum,oldal,fazis,raktar_kod,tetel,cikk_szam,cikk_nev,darab,szav_lejar) Select @leldat,oldal,fazis,raktar_kod,tetel,cikk_szam,cikk_nev,darab,szav_lejar From vleltar_felv where fazis=1 and raktar_kod=@rakkod and cikkcsop2 like @ccs and (@gyk=0 or @gyk=gyarto) and (@szk=0 or @szk=szallito) insert into leltar_keszlet select @leldat,keszlet.raktar_kod,keszlet.cikk_szam,sum(darab),sum(darab*egyseg_ar) from keszlet inner join cikkek on keszlet.cikk_szam=cikkek.cikk_szam where keszlet.raktar_kod=@rakkod and cikkcsop2 like @ccs and (@gyk=0 or @gyk=cikkek.gyarto) and (@szk=0 or @szk=cikkek.szallito) group by keszlet.raktar_kod,keszlet.cikk_szam Delete from leltar_felv where raktar_kod=@rakkod and fazis=1 and cikk_szam in (select cikk_szam from cikkek where cikkcsop2 like @ccs ) and cikk_szam in (select cikk_szam from cikkek where @gyk=0 or @gyk=gyarto ) and cikk_szam in (select cikk_szam from cikkek where @szk=0 or @szk=szallito ) /* NRM ÍGY KELL!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! Delete from keszlet_negativ where raktar_kod=@rakkod and cikk_szam in (select cikk_szam from cikkek where cikkcsop2 like @ccs ) and cikk_szam in (select cikk_szam from cikkek where @gyk=0 or @gyk=gyarto ) and cikk_szam in (select cikk_szam from cikkek where @szk=0 or @szk=szallito ) */ END fetch next from clel_zar_be into @rakkod end close clel_zar_be deallocate clel_zar_be commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [levonal_ad] @kics varchar(20) with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @szam int delete from wgyujtes where kicsoda=@kics update altsorszam set kod=kod+1 where tipus='leert' if (select count(*) from altsorszam where tipus='leert')>0 select @szam=kod from altsorszam where tipus='leert' else select @szam=0 if @szam<>0 insert into wgyujtes (cikk_szam,kicsoda) values ('20' + dbo.strzero(@szam,4), @kics) end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [minkesz_szamol]( @szall kulcs, @napok int, @kics kicsoda ) AS SET TRANSACTION ISOLATION LEVEL SERIALIZABLE update cikkek set min_kesz=@napok * napi_fogy where @szall=0 or szallito=@szall SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [naplo_felhasznalo] @kdat datum, @vdat datum, @kics_keres kicsoda, @kics kicsoda WITH RECOMPILE AS BEGIN SET NOCOUNT ON delete from wgyujtes where kicsoda=@kics -- Raktár bevét insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'raktár bevét',bizszam,modido, '', @kics from bevetf where kicsoda=@kics_keres and left(modido,10) between @kdat and @vdat -- Raktár kivét insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'raktár kivét',bizszam,modido,'', @kics from kivetf where kicsoda=@kics_keres and left(modido,10) between @kdat and @vdat -- Raktárközi insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'raktárközi mozgás',bizszam,modido,'', @kics from rmozgasf where kicsoda=@kics_keres and left(modido,10) between @kdat and @vdat -- Száll. árak insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Szállítói ár',bizszam,modositva,'', @kics from szall_arf where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Száll. rendelések insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Szállítói rendelés',bizszam,modositva,'', @kics from szall_renf where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Száll. szállítólevelek insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Szállítói szállítólevél',bizszam,modositva,'', @kics from szall_szlef where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Száll. bizományos szállítólevelek insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Szállítói bizományos szállítólevél',bizszam,modositva,'', @kics from szbiz_szlef where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Száll. számlák insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Szállítói számla',bizszam,modositva,'', @kics from szall_szlaf where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Vevői árcsoport insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Vevői árcsoport',nev,modositva,'', @kics from vevo_arf inner join vevo_arcsoport on vevo_arf.ARCSOPORT=vevo_arcsoport.KOD where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Vevői rendelések insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Vevői rendelés',bizszam,modositva,'', @kics from vevo_renf where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Vevői szállítólevelek insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Vevői szállítólevél',bizszam,modositva,'', @kics from vevo_szlef where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat -- Vevői számlák insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Vevői számla',bizszam,modositva,'', @kics from vevo_szlaf where kicsoda=@kics_keres and left(modositva,10) between @kdat and @vdat --Cikkek létrehozása insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Cikk létrehozás', case dbo.xrfuggveny('CikkszamAdas') when 1 then CIKK_SZAM else '' end, letrehozva, CIKK_NEV, @kics from cikkek where letrehozta=@kics_keres and left(letrehozva,10) between @kdat and @vdat --Cikkek módosítása insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Cikk módosítása', case dbo.xrfuggveny('CikkszamAdas') when 1 then CIKK_SZAM else '' end, modositva, CIKK_NEV, @kics from cikkek where modositotta=@kics_keres and left(modositva,10) between @kdat and @vdat and MODOSITVA<>letrehozva and modositotta<>letrehozta -- Vevői árak insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Vevői ár módosítása', case dbo.xrfuggveny('CikkszamAdas') when 1 then vevo_ar_lista.cikk_szam else '' end, vevo_ar_lista.modositva, left( vevo_ar_lista.datum + ' '+ rtrim(vevo_arcsoport.NEV) + ' '+rtrim(cikkek.CIKK_NEV),50), @kics from vevo_ar_lista inner join vevo_arcsoport on vevo_ar_lista.arcsoport=vevo_arcsoport.KOD inner join cikkek on vevo_ar_lista.cikk_szam=cikkek.CIKK_SZAM where modositotta=@kics_keres and left(vevo_ar_lista.modositva,10) between @kdat and @vdat --Vevői akciók insert into wgyujtes (cikk_nev,cikk_szam,gyarto_nev, SZALL_NEV,kicsoda) select 'Vevői akció', case dbo.xrfuggveny('CikkszamAdas') when 1 then vevo_akcio.CIKK_SZAM else '' end, vevo_akcio.modositva, left( vevo_akcio.kdatum +'-'+vevo_akcio.vdatum + ' '+ vevo_akc_csoport.nev+' '+rtrim(cikkek.CIKK_NEV), 50), @kics from vevo_akcio inner join vevo_akc_csoport on vevo_akcio.akciocsop=vevo_akc_csoport.KOD inner join cikkek on vevo_akcio.cikk_szam=cikkek.CIKK_SZAM where modositotta=@kics_keres and left(vevo_akcio.modositva,10) between @kdat and @vdat end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [negativ_fogyaszt] ( @kics kicsoda ) AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @mrek int declare @rakkod kulcs declare @tranznev varchar(50) declare @csz cikk_szam declare @db float declare @kdb float declare @rdb float declare @btip varchar(20) declare @bsz char(10) declare @ssz char(10) declare @tet int declare @mar float declare @xazon varchar(40) set @tranznev = 't_LELTAR_ZAR'+@kics begin transaction @tranznev set @xazon=rtrim(ltrim(@kics)) + rtrim(ltrim(@@spid)) DECLARE clel_zar_be scroll CURSOR for SELECT sorszam,raktar_kod,cikk_szam,darab,biz_tipus,bizszam,tetel FROM keszlet_negativ where darab>0 order by sorszam open clel_zar_be fetch next from clel_zar_be into @mrek, @rakkod, @csz, @db, @btip, @bsz, @tet while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN delete from wkarton_ki where xazon=@xazon set @mar=@db DECLARE c1 scroll CURSOR for SELECT sorszam, darab FROM keszlet where raktar_kod=@rakkod and cikk_szam=@csz and darab>0 order by sorszam open c1 fetch next from c1 into @ssz, @kdb while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) and @mar>0 BEGIN if @kdb>@mar set @rdb=-round(@mar,3) else set @rdb=-round(@kdb,3) insert into mozgas values (@btip, @bsz, @tet, @ssz, @rdb, @rdb) insert into wkarton_ki values(@xazon, @ssz, @rdb) set @mar=@mar + @rdb END fetch next from c1 into @ssz, @kdb end close c1 deallocate c1 update keszlet_negativ set darab=round(keszlet_negativ.darab + (select sum(wkarton_ki.darab) from wkarton_ki where xazon=@xazon) ,3) where sorszam=@mrek if @db - @mar >0 update keszlet set darab=round(keszlet.darab + wkarton_ki.darab,3) from wkarton_ki where xazon=@xazon and keszlet.sorszam=wkarton_ki.sorszam delete from wkarton_ki where xazon=@xazon END fetch next from clel_zar_be into @mrek, @rakkod, @csz, @db, @btip, @bsz, @tet end close clel_zar_be deallocate clel_zar_be commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [notebook_bedolgoz] @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @tet bizonylat_tetel declare @csz cikk_szam declare @szorz szorzo declare @edb mennyiseg declare @db mennyiseg declare @ear egyseg_ar declare @n_db mennyiseg declare @aru_szolg int declare @rakk kulcs declare @dat varchar(20) declare @ev char(4) declare @vissz char(1) declare @tor char(1) declare @t_ssz bizonylat_szam declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @afa afakulcs declare @me char(8) declare @tkedv kedvezmeny declare @vevo kulcs declare @tvdat char(10) declare @akcio char(1) declare @rendszam bizonylat_szam declare @rakt int declare @meddig char(10) declare @kics1 kicsoda set @tranznev='t_nb_vevo_biz'+@kics set @dat=replace(convert(char,getdate(), 20 ),'-','.') set @kics1='fejleszto' BEGIN TRANSACTION @tranznev -- törzsadatok még az elején!!! /* --vevők már létező update vevok set vevok.VEVO_NEV =nb_vevok.VEVO_NEV , vevok.IRANYITO =nb_vevok.IRANYITO , vevok.VAROS =nb_vevok.VAROS , vevok.orszag =nb_vevok.orszag , vevok.CIM =nb_vevok.CIM , vevok.TELEFON =nb_vevok.TELEFON , vevok.FAX =nb_vevok.FAX , vevok.KAPCSOLAT =nb_vevok.KAPCSOLAT , vevok.EMAIL =nb_vevok.EMAIL , vevok.ADOSZAM =nb_vevok.ADOSZAM , vevok.eu_adoszam =nb_vevok.eu_adoszam , vevok.BANK =nb_vevok.BANK , vevok.JOVEDEKI =nb_vevok.JOVEDEKI , vevok.vevo_arcsoport=nb_vevok.vevo_arcsoport , vevok.vevo_akc_csoport=nb_vevok.vevo_akc_csoport , vevok.KEDVEZMENY =nb_vevok.KEDVEZMENY , vevok.FIZMOD =nb_vevok.FIZMOD , vevok.FIZHAT =nb_vevok.FIZHAT , vevok.vevo_csoport =nb_vevok.vevo_csoport , vevok.vevo_lanc =nb_vevok.vevo_lanc , vevok.vevo_cegjelleg=nb_vevok.vevo_cegjelleg , vevok.vevo_terulet =nb_vevok.vevo_terulet , vevok.vevo_cszcsoport=nb_vevok.vevo_cszcsoport , vevok.Viszontelado =nb_vevok.Viszontelado , vevok.sajat_bolt =nb_vevok.sajat_bolt , vevok.modositva =@dat, vevok.utlevel =nb_vevok.utlevel , vevok.lNEV =nb_vevok.lNEV , vevok.lIRANYITO =nb_vevok.lIRANYITO , vevok.lVAROS =nb_vevok.lVAROS , vevok.lCIM =nb_vevok.lCIM , vevok.nyelv =nb_vevok.nyelv , vevok.eszamla =nb_vevok.eszamla , vevok.iso =nb_vevok.iso , vevok.allam =nb_vevok.allam , vevok.liso =nb_vevok.liso , vevok.lallam =nb_vevok.lallam from nb_vevok where vevok.vevo_kod = nb_vevok.vevo_kod and nb_vevok.vevo_kod in (select vevo_kod from vevok) --vevők nem létező SET IDENTITY_INSERT vevok ON insert into vevok (VEVO_KOD, VEVO_NEV, IRANYITO, VAROS, orszag, CIM, TELEFON, FAX, KAPCSOLAT, EMAIL, ADOSZAM, eu_adoszam, BANK, JOVEDEKI, vevo_arcsoport, vevo_akc_csoport, KEDVEZMENY, FIZMOD, FIZHAT, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, vevo_cszcsoport, Viszontelado, sajat_bolt, KICSODA, MODOSITVA, utlevel, lnev, liranyito, lvaros, lcim, nyelv, eszamla, iso, allam, liso, lallam) select VEVO_KOD, VEVO_NEV, IRANYITO, VAROS, orszag, CIM, TELEFON, FAX, KAPCSOLAT, EMAIL, ADOSZAM, eu_adoszam, BANK, JOVEDEKI, vevo_arcsoport, vevo_akc_csoport, KEDVEZMENY, FIZMOD, FIZHAT, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, vevo_cszcsoport, Viszontelado, sajat_bolt, @kics1, @dat, utlevel, lnev, liranyito, lvaros, lcim, nyelv, eszamla, iso, allam, liso, lallam from nb_vevok where not exists (select * from vevok where nb_vevok.vevo_kod=vevok.vevo_kod) SET IDENTITY_INSERT vevok OFF --vevo_tel létező update vevo_tel set vevo_tel.TELEP_NEV =nb_vevo_tel.TELEP_NEV , vevo_tel.VAROS =nb_vevo_tel.VAROS , vevo_tel.IRANYITO =nb_vevo_tel.IRANYITO , vevo_tel.CIM =nb_vevo_tel.CIM , vevo_tel.KAPCSOLAT =nb_vevo_tel.KAPCSOLAT , vevo_tel.TELEFON =nb_vevo_tel.TELEFON , vevo_tel.EMAIL =nb_vevo_tel.EMAIL , vevo_tel.KARTYA =nb_vevo_tel.KARTYA , vevo_tel.LIMIT =nb_vevo_tel.LIMIT , vevo_tel.jovedeki =nb_vevo_tel.jovedeki , vevo_tel.TOROLT =nb_vevo_tel.TOROLT, vevo_tel.vevo_csoport =nb_vevo_tel.vevo_csoport , vevo_tel.vevo_lanc =nb_vevo_tel.vevo_lanc , vevo_tel.vevo_cegjelleg =nb_vevo_tel.vevo_cegjelleg , vevo_tel.vevo_terulet =nb_vevo_tel.vevo_terulet , vevo_tel.idokapu =nb_vevo_tel.idokapu , vevo_tel.iso =nb_vevo_tel.iso , vevo_tel.allam =nb_vevo_tel.allam from nb_vevo_tel where vevo_tel.vevo_kod = nb_vevo_tel.vevo_kod and vevo_tel.telep_kod = nb_vevo_tel.telep_kod and exists (select * from vevo_tel where nb_vevo_tel.vevo_kod=vevo_tel.vevo_kod and nb_vevo_tel.telep_kod=vevo_tel.telep_kod) --vevo_tel még nem létező insert into vevo_tel select * from nb_vevo_tel where vevo_kod in (select vevo_kod from vevok) and not exists (select * from vevo_tel where nb_vevo_tel.vevo_kod=vevo_tel.vevo_kod and nb_vevo_tel.telep_kod=vevo_tel.telep_kod) --vevo_bank létező update vevo_bank set vevo_bank.bank =nb_vevo_bank.bank , vevo_bank.torolt=nb_vevo_bank.torolt from nb_vevo_bank where vevo_bank.vevo_kod = nb_vevo_bank.vevo_kod and exists (select * from vevo_bank where nb_vevo_bank.vevo_kod=vevo_bank.vevo_kod) --vevo_bank még nem létező insert into vevo_bank select * from nb_vevo_bank where vevo_kod in (select vevo_kod from vevok) and not exists (select * from vevo_bank where nb_vevo_bank.vevo_kod=vevo_bank.vevo_kod) --vevo_kapcsolat létező update vevo_kapcsolat set vevo_kapcsolat.KAPCSOLAT=nb_vevo_kapcsolat.KAPCSOLAT , vevo_kapcsolat.TELEFON =nb_vevo_kapcsolat.TELEFON , vevo_kapcsolat.EMAIL =nb_vevo_kapcsolat.EMAIL , vevo_kapcsolat.BEOSZTAS =nb_vevo_kapcsolat.BEOSZTAS from nb_vevo_kapcsolat where vevo_kapcsolat.vevo_kod = nb_vevo_kapcsolat.vevo_kod and vevo_kapcsolat.kapcs_kod = nb_vevo_kapcsolat.kapcs_kod and exists (select * from vevo_kapcsolat where nb_vevo_kapcsolat.vevo_kod=vevo_kapcsolat.vevo_kod and nb_vevo_kapcsolat.kapcs_kod=vevo_kapcsolat.kapcs_kod) --vevo_kapcsolat még nem létező insert into vevo_kapcsolat select * from nb_vevo_kapcsolat where vevo_kod in (select vevo_kod from vevok) and not exists (select * from vevo_kapcsolat where nb_vevo_kapcsolat.vevo_kod=vevo_kapcsolat.vevo_kod and nb_vevo_kapcsolat.kapcs_kod=vevo_kapcsolat.kapcs_kod) */ /* insert into vevo_renf select * from nb_vevo_renf where bizszam not in (select bizszam from vevo_renf) */ DECLARE kvevo_renf SCROLL CURSOR FOR select bizszam, vevo from nb_vevo_renf where bizszam not in (select bizszam from vevo_renf) OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @rendszam, @vevo WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakt= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) end else begin set @rakt=0 set @meddig= dbo.myDToC( getdate() ) end insert into vevo_renf select bizszam,vevo,szallcim,rend_dat,szall_dat,idopont,visszaig_dat,uzletkoto,kedvezmeny,penznem, afamentes,akciocsoport,arcsoport,megjegyzes,biztipus,allapot,@kics,modositva, case when @rakt=0 then raktar_kod else @rakt end from nb_vevo_renf where bizszam=@rendszam DECLARE kvevo_rent SCROLL CURSOR FOR select nb_vevo_rent.cikk_szam, nb_vevo_rent.afa_kulcs, nb_vevo_rent.menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, visszaig_dat, akcio from nb_vevo_rent inner join cikkek on cikkek.cikk_szam=nb_vevo_rent.cikk_szam where bizszam=@rendszam order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then nb_vevo_rent.cikk_szam else cikk_nev end set @tet=1 OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_rent values( @rendszam, @tet, @csz, @afa, @me, @szorz, @edb, @db, @ear, @tkedv, @tvdat, @akcio) -- if len(rtrim(@akcio))>0 -- exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakt, @meddig, @kics, '','','', @rendszam, @tet end set @tet = @tet + 1 END FETCH NEXT FROM kvevo_rent INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_rent DEALLOCATE kvevo_rent END FETCH NEXT FROM kvevo_renf INTO @rendszam, @vevo END CLOSE kvevo_renf DEALLOCATE kvevo_renf /* insert into vevo_rent select * from nb_vevo_rent where bizszam not in (select bizszam from vevo_rent) and bizszam in (select bizszam from vevo_renf) */ DECLARE kvevo_szlef SCROLL CURSOR FOR select bizszam, raktar_kod, visszaru, torlo, tor_ssz from nb_vevo_szlef where bizszam not in (select bizszam from vevo_szlef) order by bizszam OPEN kvevo_szlef FETCH NEXT FROM kvevo_szlef INTO @sorsz, @rakk, @vissz, @tor, @t_ssz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_szlef ([BIZSZAM] ,[HIVSZAM] ,[RENDSZAM] ,[SZLASZAM] ,[VEVO] ,[VEVO_NEV] ,[TELEP_KOD] ,[TELJ_DATUM] ,[RAKTAR_KOD] ,[penznem] ,[kurzus] ,[afamentes] ,[kedvezmeny] ,[akciocsoport] ,[arcsoport] ,[MEGJEGYZES] ,[TIPUS] ,[UZLETKOTO] ,[TOROLT] ,[TORLO] ,[TOR_SSZ] ,[VISSZARU] ,[KICSODA] ,[MODOSITVA]) select [BIZSZAM] ,[HIVSZAM] ,[RENDSZAM] ,[SZLASZAM] ,[VEVO] ,[VEVO_NEV] ,[TELEP_KOD] ,[TELJ_DATUM] ,[RAKTAR_KOD] ,[penznem] ,[kurzus] ,[afamentes] ,[kedvezmeny] ,[akciocsoport] ,[arcsoport] ,[MEGJEGYZES] ,[TIPUS] ,[UZLETKOTO] ,[TOROLT] ,[TORLO] ,[TOR_SSZ] ,[VISSZARU] ,@kics1 ,[MODOSITVA] from nb_vevo_szlef where bizszam=@sorsz DECLARE kvevo_szlet SCROLL CURSOR FOR select nb_vevo_szlet.tetel, nb_vevo_szlet.cikk_szam, nb_vevo_szlet.darab, nb_vevo_szlet.szorzo, nb_vevo_szlet.egyseg_ar, cikkek.aru_szolg, nb_vevo_szlet.rendel_bsz, nb_vevo_szlet.rendel_tet from nb_vevo_szlet inner join cikkek ON nb_vevo_szlet.cikk_szam = cikkek.cikk_szam where bizszam=@sorsz order by nb_vevo_szlet.tetel OPEN kvevo_szlet FETCH NEXT FROM kvevo_szlet INTO @tet, @csz, @db, @szorz, @ear, @aru_szolg, @ren_bsz, @ren_tet WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_szlet select * from nb_vevo_szlet where bizszam=@sorsz and tetel=@tet if @vissz<>'1' and @tor<>'1' --szállítólevél begin if @aru_szolg=1 begin set @n_db=@db * @szorz exec karton_ki 'vevo_szle', @SorSZ , 0, @TET, @RAKK, @CSZ, @n_db, 'vevo_szle_uj', @kics1 end end else --visszáru vagy stornó begin if @aru_szolg=1 begin set @n_db= - (@db * @szorz) set @ev=left(@sorsz,4) if @tor='1' begin set @ren_bsz=@t_ssz set @ren_tet=@tet end exec karton_vissza 'vevo_szle', @SorSZ , @TET, @n_db, @ren_bsz, @ren_tet, 'vevo_szle_visszaru', @kics1 end end END FETCH NEXT FROM kvevo_szlet INTO @tet, @csz, @db, @szorz, @ear, @aru_szolg, @ren_bsz, @ren_tet END CLOSE kvevo_szlet DEALLOCATE kvevo_szlet END FETCH NEXT FROM kvevo_szlef INTO @sorsz, @rakk, @vissz, @tor, @t_ssz END CLOSE kvevo_szlef DEALLOCATE kvevo_szlef insert into vevo_szlaf ([BIZSZAM] ,[VEVO] ,[VEVO_NEV] ,[TELJ_DATUM] ,[SZLA_DATUM] ,[FIZ_MODJA] ,[FIZ_ESED] ,[penznem] ,[kurzus] ,[afamentes] ,[kedvezmeny] ,[TIPUS] ,[UZLETKOTO] ,[MEGJEGYZES] ,[TOROLT] ,[TORLO] ,[TOR_SSZ] ,[VISSZARU] ,[penzugyi] ,[KOTEG_SZ] ,[KICSODA] ,[MODOSITVA] ,[peldany] ,[eszamla] ,[iranyito] ,[varos] ,[cim] ,[iso] ,[adoszam] ) select [BIZSZAM] ,[VEVO] ,[VEVO_NEV] ,[TELJ_DATUM] ,[SZLA_DATUM] ,[FIZ_MODJA] ,[FIZ_ESED] ,[penznem] ,[kurzus] ,[afamentes] ,[kedvezmeny] ,[TIPUS] ,[UZLETKOTO] ,[MEGJEGYZES] ,[TOROLT] ,[TORLO] ,[TOR_SSZ] ,[VISSZARU] ,[penzugyi] ,[KOTEG_SZ] ,@kics1 ,[MODOSITVA] ,[peldany] ,[eszamla] ,[iranyito] ,[varos] ,[cim] ,[iso] ,[adoszam] from nb_vevo_szlaf where bizszam not in (select bizszam from vevo_szlaf) insert into vevo_szlat select *,'',0 from nb_vevo_szlat where bizszam not in (select bizszam from vevo_szlat) and bizszam in (select bizszam from vevo_szlaf) delete from nb_vevo_rent delete from nb_vevo_renf delete from nb_vevo_szlet delete from nb_vevo_szlef delete from nb_vevo_szlat delete from nb_vevo_szlaf delete from nb_vevok delete from nb_vevo_tel delete from nb_vevo_bank delete from nb_vevo_kapcsolat COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [onkolt_ar_tolt] @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @datido datum_ora set @datido=dbo.mygetdatetime() insert into onkoltar select cikk_szam, 0, @kics, @datido from cikkek where cikk_szam not in (select cikk_szam from onkoltar) and (cikk_szam in (select cikk_szam from anyagszukseglet group by cikk_szam) or cikk_szam in (select cikk_szam from term_receptura group by cikk_szam)) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [osszevon_cikkek_feldolgoz] @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int declare @csz dbo.cikk_szam declare @ujcsz dbo.cikk_szam set @tranznev='t_vevo_szle_felt'+@kics BEGIN TRANSACTION @tranznev DECLARE kosszevont SCROLL CURSOR FOR select cikk_szam, ujcikk_szam from osszevont_cikkek order by modositva OPEN kosszevont FETCH NEXT FROM kosszevont INTO @csz, @ujcsz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if (select isnull(count(*),0) from cikkek where cikk_szam=@csz)>0 and (select isnull(count(*),0) from cikkek where cikk_szam=@ujcsz)>0 exec cikk_atvezetes @csz, @ujcsz, '1', @kics, 2 --nem kell beírni a naplóba END FETCH NEXT FROM kosszevont INTO @csz, @ujcsz END CLOSE kosszevont DEALLOCATE kosszevont COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [partner_tolt] @kot int, @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wpartner where kicsoda=@kics dbcc checkident(wpartner,reseed,0) insert into wpartner select 0, vevo_kod, vevo_nev, iranyito, varos, cim, 'HUF', @kics, 0 from vevok where vevo_kod in (select vevo from vevo_szlaf where koteg_sz=@kot) order by vevo_kod insert into wpartner select 1, szall_kod, szall_nev, iranyito, varos, cim, 'HUF', @kics, 0 from szallito where szall_kod in (select szallito from szall_szlaf where koteg_sz=@kot) order by szall_kod end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [partner_tolt_pr8] @kot int, @kics kicsoda, @mit int --1:uj; 2:ism AS begin SET XACT_ABORT ON SET NOCOUNT ON if @mit=1 begin insert into pr08_vevok select vevo_kod,@kot from vevok where vevo_kod not in (select vevo_kod from pr08_vevok) insert into pr08_szallito select szall_kod,@kot from szallito where szall_kod not in (select szall_kod from pr08_szallito) end delete from wpartner where kicsoda=@kics insert into wpartner select 0, vevok.vevo_kod, vevok.vevo_nev, vevok.iranyito, vevok.varos, vevok.cim, '', @kics, case when rovidnev='KOSERPIAC' then case when vevok.vevo_kod>1000000 then 2000000+vevok.vevo_kod else 3500000+vevok.vevo_kod end else case when rovidnev='PESTISUK' then vevok.vevo_kod - 1000000 + 310000 else 310000+vevok.vevo_kod end end from vevok inner join pr08_vevok on pr08_vevok.vevo_kod=vevok.vevo_kod and koteg_sz=@kot cross join regisztral order by vevok.vevo_nev insert into wpartner select 1, szallito.szall_kod, szall_nev, iranyito, varos, cim, '', @kics, 410000+szallito.szall_kod from szallito inner join pr08_szallito on pr08_szallito.szall_kod=szallito.szall_kod and koteg_sz=@kot order by szallito.szall_nev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [penztar_honap_lezar] @ptar kulcs, @honap varchar(7) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @ptip char(3) declare @pbsz varchar(20) declare @pbt char(1) declare @pkulcs int SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev = 't_pcs_beir' begin transaction @tranznev DECLARE kpenztar SCROLL CURSOR FOR select kulcs from vpenztart where datum like @honap+'%' and penztar_kod=@ptar order by datum,osszeg desc,partner_nev,hivszam OPEN kpenztar FETCH NEXT FROM kpenztar INTO @pkulcs WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @ptip=tipus from penztart where kulcs=@pkulcs if @ptip='PBJ' or @ptip='PJ' set @pbt='b' else set @pbt='k' exec ptar_bsz_no @ptar, @pbt, @pbsz output if @pbsz<>'*' update penztart set bizszam=@pbsz where kulcs=@pkulcs END FETCH NEXT FROM kpenztar INTO @pkulcs END CLOSE kpenztar DEALLOCATE kpenztar commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [penztart_atir] @pkulcs kulcs AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @ptip char(3) declare @ptar kulcs declare @pbsz varchar(20) declare @pbt char(1) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev = 't_pcs_beir' begin transaction @tranznev select @ptip=tipus, @ptar=penztar_kod from penztart where kulcs=@pkulcs if @ptip='PBJ' or @ptip='PJ' set @pbt='b' else set @pbt='k' exec ptar_bsz_no @ptar, @pbt, @pbsz output if @pbsz<>'*' update penztart set bizszam=@pbsz where kulcs=@pkulcs commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [penztart_beir] @penztar kulcs, @dat datum, @tip char(3), @hsz varchar(50), @partner_tip char(1), @partner kulcs, @osszeg egyseg_ar, @pn penznem, @kurz kurzus, @megj megjegyzes, @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev = 't_pcs_beir' + @kics begin transaction @tranznev exec penztart_beir_tranz_nelkul @penztar, @dat, @tip, @hsz, @partner_tip, @partner, @osszeg, @pn, @kurz, @megj, @kics commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [penztart_beir_tranz_nelkul] @penztar kulcs, @dat datum, @tip char(3), @hsz varchar(50), @partner_tip char(1), @partner kulcs, @osszeg egyseg_ar, @pn penznem, @kurz kurzus, @megj megjegyzes, @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @etkulcs int declare @tkulcs int declare @pbsz varchar(20) --declare @pbt char(1) select @etkulcs=isnull(max(kulcs),-1) from penztart where kicsoda=@kics /* if @osszeg>0 set @pbt='b' else set @pbt='k' exec ptar_bsz_no @penztar, @pbt, @pbsz output */ set @pbsz='' if @pbsz<>'*' begin insert into penztart(penztar_kod, bizszam, hivszam, datum, tipus, partner_tip, partner, osszeg, penznem, kurzus, megjegyzes, kicsoda, modido) values(@penztar, @pbsz, @hsz, @dat, @tip, @partner_tip, @partner, @osszeg, @pn, @kurz, @megj, @kics, dbo.myGetDateTime()) select @tkulcs=isnull(max(kulcs),-1) from penztart where kicsoda=@kics and kulcs>@etkulcs insert into penztarb select @tkulcs, bizszam, ertek from wpenztarb where kicsoda=@kics end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [penztart_lezar] @bsz bizonylat_szam, @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev = 't_pcs_beir' + @kics begin transaction @tranznev exec penztart_lezar_tranz_nelkul @bsz, @kics commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [penztart_lezar_tranz_nelkul] @bsz bizonylat_szam, @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @etkulcs int declare @tkulcs int declare @pbsz varchar(20) declare @pbt char(1) declare @penztar kulcs declare @osszeg float select @etkulcs=isnull(kulcs,-1), @penztar=penztar_kod, @osszeg=osszeg from penztart where hivszam=@bsz if @osszeg>0 set @pbt='b' else set @pbt='k' exec ptar_bsz_no @penztar, @pbt, @pbsz output if @pbsz<>'*' update penztart set bizszam=@pbsz where kulcs=@etkulcs end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [ptar_bsz_no] (@kod int, @tip char(1), @bsz varchar(20) output) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @ebsz varchar(20) declare @mar int declare @edb int declare @bh int if @tip='b' begin select @mar=bevet_idb-bevet_db from penztarak where kod=@kod end else begin select @mar=kivet_idb-kivet_db from penztarak where kod=@kod end if @mar=0 begin set @bsz='*' end else begin if @tip='b' begin select @ebsz=bevet_bsz from penztarak where kod=@kod select @edb=bevet_db from penztarak where kod=@kod end else begin select @ebsz=kivet_bsz from penztarak where kod=@kod select @edb=kivet_db from penztarak where kod=@kod end set @bh=len(cast( @edb as varchar )) set @bsz=left(@ebsz, len(@ebsz) - @bh ) + cast( dbo.strzero( cast(right(@ebsz, @bh) as int) + 1 , @bh ) as varchar) if @tip='b' update penztarak set bevet_db=bevet_db+1, bevet_bsz=@bsz where kod=@kod else update penztarak set kivet_db=kivet_db+1, kivet_bsz=@bsz where kod=@kod end end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qfk_karton] ( @kido datum, @vido datum, @kfksz varchar(18), @vfksz varchar(18), @kics kicsoda) AS begin SET NOCOUNT ON declare @kd datum declare @vd datum set @kd = @kido set @vd = @vido delete from wgyujtes where kicsoda=@kics /* insert into wgyujtes (datum1,bizszam,gyarto_nev,cikkcsop,csopnev,szall_nev,darab1,darab2,egyseg_ar1,egyseg_ar2,kicsoda) select '','','',szamlaszam,szamlanev, '', 0, 0, 0, 0, @kics from szamlatukor where konyvelheto='1' and szamlaszam>=@kfksz and szamlaszam<=@vfksz and szamlaszam in (select fk_szam FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum<=@vido and fk_szam>=@kfksz and fk_szam<=@vfksz group by fk_szam ) order by szamlaszam update wgyujtes set darab1= (select isnull(sum(ertek * case t_k when 'T' then 1 else 0 end),0) FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum<@kido and cikkcsop=kontirt.fk_szam and kicsoda=@kics) where kicsoda=@kics update wgyujtes set darab2= (select isnull(sum(ertek * case t_k when 'K' then 1 else 0 end),0) FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum<@kido and cikkcsop=kontirt.fk_szam and kicsoda=@kics) where kicsoda=@kics insert into wgyujtes (datum1,bizszam,cikkcsop,csopnev,egyseg_ar1,egyseg_ar2,kicsoda) select '','',fk_szam,szamlanev,sum(ertek * case t_k when 'T' then 1 else 0 end), sum(ertek * case t_k when 'K' then 1 else 0 end), @kics FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon INNER JOIN szamlatukor ON kontirt.fk_szam = szamlatukor.szamlaszam where kont_datum<@kido and fk_szam>=@kfksz and fk_szam<=@vfksz group by fk_szam,szamlanev */ insert into wgyujtes (datum1,bizszam,gyarto_nev,cikkcsop,csopnev,szall_nev,egyseg_ar1,egyseg_ar2,kicsoda) select kont_datum,kontirf.azon,szoveg,fk_szam,szamlanev, ellen_fk, ertek * case t_k when 'T' then 1 else 0 end, ertek * case t_k when 'K' then 1 else 0 end, @kics FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon INNER JOIN szamlatukor ON kontirt.fk_szam = szamlatukor.szamlaszam where kont_datum>=@kido and kont_datum<=@vido and fk_szam>=@kfksz and fk_szam<=@vfksz update wgyujtes set darab1= (select isnull(sum(ertek * case t_k when 'T' then 1 else 0 end),0) FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum<@kido and cikkcsop=kontirt.fk_szam and kicsoda=@kics) where kicsoda=@kics update wgyujtes set darab2= (select isnull(sum(ertek * case t_k when 'K' then 1 else 0 end),0) FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum<@kido and cikkcsop=kontirt.fk_szam and kicsoda=@kics) where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qfk_kivonat] ( @kido datum, @vido datum, @kfksz varchar(18), @vfksz varchar(18), @kics kicsoda) AS begin SET NOCOUNT ON delete from wgyujtes where kicsoda=@kics insert into wgyujtes (cikkcsop,csopnev,egyseg_ar1,egyseg_ar2,kicsoda) select fk_szam,szamlanev, 0, 0, @kics FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon INNER JOIN szamlatukor ON kontirt.fk_szam = szamlatukor.szamlaszam where kont_datum>=@kido and kont_datum<=@vido and fk_szam>=@kfksz and fk_szam<=@vfksz group by fk_szam,szamlanev update wgyujtes set egyseg_ar1= (select isnull(sum(ertek * case t_k when 'T' then 1 else 0 end),0) FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum>=@kido and kont_datum<=@vido and cikkcsop=kontirt.fk_szam and kicsoda=@kics) where kicsoda=@kics update wgyujtes set egyseg_ar2= (select isnull(sum(ertek * case t_k when 'K' then 1 else 0 end),0) FROM kontirf INNER JOIN kontirt ON kontirf.azon = kontirt.azon where kont_datum>=@kido and kont_datum<=@vido and cikkcsop=kontirt.fk_szam and kicsoda=@kics) where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qforg_sebesseg] (@kdat datum, @vdat datum, @ccs varchar(18), @szkod varchar(12), @gykod varchar(12), @kics char(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @dat as datum declare @edat as datum declare @napok integer set @napok=datediff(day, @kdat, @vdat) + 1 print @napok set @dat=dbo.mygetdate() delete from wgyujtes where kicsoda= @kics; delete from wgyujtes1 where kicsoda= @kics; --kigyujtom az aktualis keszletet insert into wgyujtes (cikk_szam, cikk_nev, darab1, darab2, darab3, egyseg_ar1, egyseg_ar2, egyseg_ar3, datum1, kicsoda) select cikkek.cikk_szam, cikkek.cikk_nev, 0, 0, isnull(sum(darab),0), 0, 0, 0, @vdat, @kics from cikkek left outer join keszlet on cikkek.cikk_szam=keszlet.cikk_szam and bizomanyos<>'1' where cikkcsop2 like rtrim(@ccs)+'%' and (@szkod=0 or @szkod=szallito) and (@gykod=0 or @gykod=gyarto) and aru_szolg=1 group by cikkek.cikk_szam, cikkek.cikk_nev --kiszamolom a vdat és akt. dátum közötti növekedést és csökkenést if @dat>@vdat begin update wgyujtes set darab3=darab3 - isnull( ( select isnull(sum(darab),0) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and telj_datum>@vdat where wgyujtes.cikk_szam=szall_szlet.cikk_szam ),0) where kicsoda=@kics update wgyujtes set darab3=darab3 + ( select isnull(sum(darab),0) from vevo_szlef inner join vevo_szlet on vevo_szlef.bizszam=vevo_szlet.bizszam and telj_datum>@vdat where wgyujtes.cikk_szam=vevo_szlet.cikk_szam ) where kicsoda=@kics update wgyujtes set darab3=darab3 - ( select isnull(sum(darab),0) from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam and datum>@vdat where wgyujtes.cikk_szam=bevett.cikk_szam ) where kicsoda=@kics update wgyujtes set darab3=darab3 + ( select isnull(sum(darab),0) from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam and datum>@vdat where wgyujtes.cikk_szam=kivett.cikk_szam ) where kicsoda=@kics end set @dat=@vdat while @dat>=@kdat begin update wgyujtes set egyseg_ar1=egyseg_ar1 + ( select isnull(sum(darab),0) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam and szall_szlef.telj_datum=@dat where wgyujtes.cikk_szam=szall_szlet.cikk_szam ) where kicsoda=@kics and datum1=@dat update wgyujtes set darab2=darab2 + ( select isnull(sum(darab),0) from vevo_szlef inner join vevo_szlet on vevo_szlef.bizszam=vevo_szlet.bizszam and telj_datum=@dat where wgyujtes.cikk_szam=vevo_szlet.cikk_szam ) where kicsoda=@kics and datum1=@dat update wgyujtes set egyseg_ar2=egyseg_ar2 + ( select isnull(sum(darab),0) from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam and datum=@dat where wgyujtes.cikk_szam=bevett.cikk_szam ) where kicsoda=@kics and datum1=@dat update wgyujtes set egyseg_ar3=egyseg_ar3 + ( select isnull(sum(darab),0) from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam and datum=@dat where wgyujtes.cikk_szam=kivett.cikk_szam ) where kicsoda=@kics and datum1=@dat /* darab1 -nyito darab2 -értékesítés darab3 -záró egyseg_ar1 -beszerzés egyseg_ar2 -bevét egyseg_ar3 -kivét */ --beírom a nyitót print @dat update wgyujtes set darab1=darab3 + darab2 - egyseg_ar1 - egyseg_ar2 + egyseg_ar3 where kicsoda=@kics and datum1=@dat set @edat=@dat set @dat=left( dbo.mydtoc( dbo.myctod(@dat)-1 ) ,10) print @dat --beírom az elöző napi zárót if @dat>=@kdat insert into wgyujtes (cikk_szam, cikk_nev, darab1, darab2, darab3, egyseg_ar1, egyseg_ar2, egyseg_ar3, datum1, kicsoda) select cikk_szam, cikk_nev, 0, 0, darab1, 0, 0, 0, @dat, @kics from wgyujtes where kicsoda=@kics and datum1=@edat end insert into wgyujtes1 (cikk_szam, cikk_nev, darab1, darab2, kicsoda) select cikk_szam, cikk_nev, sum(darab1)/@napok, sum(darab2), @kics from wgyujtes where kicsoda=@kics and darab1<>0 and darab2<>0 group by cikk_szam, cikk_nev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qgyujt_felt] ( @ccs varchar(18), @szkod int, @gykod int, @kics varchar(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @ccs1 varchar(18); set @ccs1 = rtrim(@ccs)+'%'; IF len(rtrim(@ccs))>0 begin --beirom a cikkcsoportot update wgyujtes set cikkcsop= (select cikkcsop2 from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; delete from wgyujtes where kicsoda= @kics and cikkcsop not like @ccs1; end IF @szkod<>0 begin --beirom a szállítót update wgyujtes set szall_kod= (select szallito from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; delete from wgyujtes where szall_kod<> @szkod and kicsoda= @kics; end IF @gykod<>0 begin --beirom a gyártót update wgyujtes set gyarto_kod= (select gyarto from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; delete from wgyujtes where gyarto_kod<> @gykod and kicsoda= @kics; end end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qkeszlet] ( @ccs varchar(18), @szkod int, @gykod int, @afa afakulcs, @rakk int, @kics char(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @ddd char(7) set @ddd=left(replace(convert(char,getdate(), 20 ),'-','.'),7) delete from wgyujtes where kicsoda= @kics delete from wgyujtes1 where kicsoda= @kics --kigyűjtöm a KESZLET-ből insert into wgyujtes1 (cikk_szam, darab1, egyseg_ar1, darab2, egyseg_ar2, darab3, egyseg_ar3, kicsoda) select cikk_szam, sum(darab), sum(darab*egyseg_ar), 0, sum(darab*egyseg_ar), 0, 0, @kics from keszlet where darab<>0 and (@rakk=0 or (@rakk<>0 and @rakk=raktar_kod)) group by cikk_szam union all select keszlet_negativ.cikk_szam, -sum(darab), 0, 0, 0, 0, 0, @kics from keszlet_negativ inner join cikkek on keszlet_negativ.cikk_szam= cikkek.cikk_szam where (keszlet_negativ.raktar_kod = @rakk or @rakk = 0) group by keszlet_negativ.cikk_szam --beirom a beszerz_arat az NKASSZAT tételeknél update wgyujtes1 set egyseg_ar2= (select ut_besz_ar from cikkek where wgyujtes1.cikk_szam = cikkek.cikk_szam) where darab2=-1 and kicsoda= @kics; --beirom a besz. értéket az NKASSZAT tételeknél update wgyujtes1 set egyseg_ar1=darab1*egyseg_ar2 where darab2=-1 and kicsoda= @kics; --beirom az akt. eladási egységárat update wgyujtes1 set darab3= (select brutto_ar from vevo_ar_lista where wgyujtes1.cikk_szam = vevo_ar_lista.cikk_szam and arcsoport=1 and datum=@ddd) where kicsoda= @kics; --beirom az eladási értéket update wgyujtes1 set egyseg_ar3=darab3*darab1 where kicsoda= @kics; --beirom a terhelési értéket az NKASSZAT tételeknél update wgyujtes1 set egyseg_ar2=egyseg_ar3 where darab2=-1 and kicsoda= @kics; --összetömöritem a WGYUJTES-be Insert Into wgyujtes (cikk_szam, darab1, egyseg_ar1, egyseg_ar2, egyseg_ar3, kicsoda) select cikk_szam, sum(darab1), sum(egyseg_ar1), sum(egyseg_ar2), sum(egyseg_ar3), @kics from wgyujtes1 where kicsoda=@kics group by cikk_szam; --kitörlöm a 0-ás készletet delete from wgyujtes where darab1=0 and kicsoda= @kics; --beirom a cikk nevet, áfa kulcsot update wgyujtes set cikk_nev= (select cikk_nev from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; update wgyujtes set afa_kulcs= (select afa_kulcs from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; /* --beirom a cikk átlag fogyását a darab2-be update wgyujtes set darab2= (select IsNull(atl_fogyas,0) from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; */ exec qgyujt_felt @ccs , @szkod , @gykod , @kics; --szűrés áfa kulcsra IF len(rtrim(@afa))>0 begin --beirom a cikkcsoportot update wgyujtes set afa_kulcs= (select afa_kulcs from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; delete from wgyujtes where kicsoda= @kics and afa_kulcs <> @afa ; end end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qkeszlet_mind] ( @ccs varchar(18), @szkod int, @gykod int, @afa afakulcs, @rakk int, @kics char(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @ddd char(7) set @ddd=left(replace(convert(char,getdate(), 20 ),'-','.'),7) delete from wgyujtes where kicsoda= @kics; delete from wgyujtes1 where kicsoda= @kics; --kigyűjtöm a KESZLET-ből insert into wgyujtes1 (cikk_szam, darab1, egyseg_ar1, darab2, egyseg_ar2, darab3, egyseg_ar3, kicsoda) select cikk_szam, sum(darab), sum(darab*egyseg_ar), 0, sum(darab*egyseg_ar), 0, 0, @kics from keszlet where (@rakk=0 or (@rakk<>0 and @rakk=raktar_kod)) group by cikk_szam; -- beírom a hiányzókat a cikkekből insert into wgyujtes1 (cikk_szam, darab1, egyseg_ar1, darab2, egyseg_ar2, darab3, egyseg_ar3, kicsoda) select cikk_szam, 0, 0, 0, 0, 0, 0, @kics from cikkek where cikk_szam not in (select cikk_szam from wgyujtes1 where kicsoda=@kics) group by cikk_szam union all select keszlet_negativ.cikk_szam, -sum(darab), 0, 0, 0, 0, 0, @kics from keszlet_negativ inner join cikkek on keszlet_negativ.cikk_szam= cikkek.cikk_szam where (keszlet_negativ.raktar_kod = @rakk or @rakk = 0) group by keszlet_negativ.cikk_szam --beirom a beszerz_arat az NKASSZAT tételeknél update wgyujtes1 set egyseg_ar2= (select ut_besz_ar from cikkek where wgyujtes1.cikk_szam = cikkek.cikk_szam) where darab2=-1 and kicsoda= @kics; --beirom a besz. értéket az NKASSZAT tételeknél update wgyujtes1 set egyseg_ar1=darab1*egyseg_ar2 where darab2=-1 and kicsoda= @kics; --beirom az akt. eladási egységárat update wgyujtes1 set darab3= (select brutto_ar from vevo_ar_lista where wgyujtes1.cikk_szam = vevo_ar_lista.cikk_szam and arcsoport=1 and datum=@ddd) where kicsoda= @kics; --beirom az eladási értéket update wgyujtes1 set egyseg_ar3=darab3*darab1 where kicsoda= @kics; --beirom a terhelési értéket az NKASSZAT tételeknél update wgyujtes1 set egyseg_ar2=egyseg_ar3 where darab2=-1 and kicsoda= @kics; --összetömöritem a WGYUJTES-be Insert Into wgyujtes (cikk_szam, darab1, egyseg_ar1, egyseg_ar2, egyseg_ar3, kicsoda) select cikk_szam, sum(darab1), sum(egyseg_ar1), sum(egyseg_ar2), sum(egyseg_ar3), @kics from wgyujtes1 where kicsoda=@kics group by cikk_szam; --beirom a cikk nevet, áfa kulcsot update wgyujtes set cikk_nev= (select cikk_nev from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; update wgyujtes set afa_kulcs= (select afa_kulcs from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; /* --beirom a cikk átlag fogyását a darab2-be update wgyujtes set darab2= (select IsNull(atl_fogyas,0) from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; */ exec qgyujt_felt @ccs , @szkod , @gykod , @kics; --szűrés áfa kulcsra IF len(rtrim(@afa))>0 begin --beirom a cikkcsoportot update wgyujtes set afa_kulcs= (select afa_kulcs from cikkek where wgyujtes.cikk_szam = cikkek.cikk_szam) where kicsoda= @kics; delete from wgyujtes where kicsoda= @kics and afa_kulcs <> @afa ; end end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qkibevet] (@kido datum, @vido datum, @bjc dbo.kulcs, @kjc dbo.kulcs, @rakk dbo.kulcs, @ccs varchar(18), @szkod dbo.kulcs, @gykod dbo.kulcs,@kics kicsoda) AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wgyujtes where kicsoda= @kics; delete from wgyujtes1 where kicsoda= @kics; insert into wgyujtes (cikk_szam, cikk_nev, darab1, egyseg_ar1, darab2, egyseg_ar2, kicsoda) select bevett.cikk_szam, cikk_nev, sum(darab), sum(darab*egyseg_ar), 0, 0, @kics from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam inner join cikkek on bevett.cikk_szam=cikkek.cikk_szam where datum>=@kido and datum<=@vido and (raktar_k=@rakk or 0=@rakk) and (bevet_kod=@bjc or 0=@bjc) and (szallito=@szkod or @szkod=0) and (gyarto=@gykod or @gykod=0) and cikkcsop2 like @ccs+'%' group by bevett.cikk_szam, cikk_nev insert into wgyujtes (cikk_szam, cikk_nev, darab1, egyseg_ar1, darab2, egyseg_ar2, kicsoda) select kivett.cikk_szam, cikk_nev, 0, 0, sum(darab), sum(dbo.ElabeSzleTetel('kivet', kivett.bizszam, kivett.tetel ) ), @kics from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam inner join cikkek on kivett.cikk_szam=cikkek.cikk_szam where datum>=@kido and datum<=@vido and (raktar_k=@rakk or 0=@rakk) and (kivet_kod=@kjc or 0=@kjc) and (szallito=@szkod or @szkod=0) and (gyarto=@gykod or @gykod=0) and cikkcsop2 like @ccs+'%' group by kivett.cikk_szam, cikk_nev insert into wgyujtes1 (cikk_szam, cikk_nev, egyseg_ar1, darab1, egyseg_ar2, darab2, kicsoda) select cikk_szam, cikk_nev, sum(egyseg_ar1), sum(darab1), sum(egyseg_ar2), sum(darab2), kicsoda from wgyujtes where kicsoda= @kics group by cikk_szam, cikk_nev, kicsoda; update wgyujtes1 set darab3=darab1-darab2, egyseg_ar3=egyseg_ar1-egyseg_ar2 where kicsoda= @kics; end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qmin_keszlet] (@ccs varchar(18), @szkod kulcs, @gykod kulcs, @kics varchar(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wgyujtes where kicsoda= @kics delete from wgyujtes1 where kicsoda= @kics insert into wgyujtes1 (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, sum(darab), 0, @kics from keszlet where darab<>0 group by cikk_szam insert into wgyujtes1 (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, -sum(darab), 0, @kics from keszlet_negativ where darab<>0 group by cikk_szam insert into wgyujtes (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, sum(darab1), 0, @kics from wgyujtes1 where kicsoda= @kics group by cikk_szam insert into wgyujtes (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, 0, 0, @kics from cikkek where cikk_szam not in (select cikk_szam from wgyujtes where kicsoda=@kics) update wgyujtes set cikk_nev= (select cikk_nev from cikkek where cikkek.cikk_szam=wgyujtes.cikk_szam) where kicsoda= @kics update wgyujtes set darab2= (select min_kesz from cikkek where cikkek.cikk_szam=wgyujtes.cikk_szam) where kicsoda= @kics exec qgyujt_felt @ccs, @szkod, @gykod, @kics --delete from wgyujtes where kicsoda= @kics and darab1>=darab2 delete from wgyujtes where kicsoda= @kics and cikk_szam in (select cikk_szam from cikkek where kifutott='1') /* insert into wgyujtes1 (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, sum(darab), 0, @kics from keszlet where darab<>0 group by cikk_szam; insert into wgyujtes1 (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, -sum(darab), 0, @kics from nkasszat group by cikk_szam; insert into wgyujtes (cikk_szam, darab1, darab2, kicsoda) select cikk_szam, sum(darab1), 0, @kics from wgyujtes1 where kicsoda= @kics group by cikk_szam; update wgyujtes set cikk_nev= (select cikk_nev from cikkek where cikkek.cikk_szam=wgyujtes.cikk_szam) where kicsoda= @kics; update wgyujtes set darab1= (select min_keszlet from cikkek where cikkek.cikk_szam=wgyujtes.cikk_szam) where kicsoda= @kics; delete from wgyujtes1 where kicsoda=@kics; insert into wgyujtes1 (cikk_szam, cikk_nev, darab1, darab2, kicsoda) select cikk_szam, cikk_nev, 0, min_keszlet, @kics from cikkek where not exists (select * from wgyujtes where cikkek.cikk_szam = wgyujtes.cikk_szam and wgyujtes.kicsoda= @kics); insert into wgyujtes select * from wgyujtes1 where kicsoda= @kics; exec qgyujt_felt @ccs, @szkod, @gykod, @kics; delete from wgyujtes where kicsoda= @kics and darab1>=darab2; delete from wgyujtes where kicsoda= @kics and cikk_szam in (select cikk_szam from cikkek where kifutott='1') */ end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qmozgas_cikk] ( @kido datum, @vido datum, @csz cikk_szam, @rakk kulcs, @kics kicsoda ) AS begin SET NOCOUNT ON declare @kd datum declare @vd datum set @kd = @kido set @vd = @vido declare @xrrovidnev varchar(10) declare @xrazonosito varchar(12) select @xrrovidnev=rovidnev from regisztral select @xrazonosito=azonosito from elesito delete from wgyujtes where kicsoda= @kics insert into wgyujtes(gyarto_nev, cikk_nev,szall_kod, szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '1', 'Árubeszerzés', SZALLITO.SZALL_kod, SZALLITO.SZALL_NEV, SZALL_SZLET.AFA_KULCS, SZALL_SZLET.MENNY_EGYS, SZALL_SZLET.EGYSEG_AR, SZALL_SZLET.EDARAB, SZALL_SZLEF.TELJ_DATUM, SZALL_SZLEF.BIZSZAM, SZALL_SZLET.TETEL, szall_szlef.penznem, szall_szlet.szorzo, @kics FROM SZALL_SZLEF,SZALL_SZLET,SZALLITO WHERE (SZALL_SZLEF.BIZSZAM = SZALL_SZLET.BIZSZAM) AND (SZALL_SZLEF.SZALLITO = SZALLITO.SZALL_KOD) and cikk_szam=@csz and telj_datum>= @Kido and telj_datum<= @Vido and (SZALL_SZLEF.RAKTAR_KOD=@rakk or @rakk=0); insert into wgyujtes(gyarto_nev, cikk_nev,szall_kod, szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '1', 'Árubesz. bizomány', SZALLITO.SZALL_kod, SZALLITO.SZALL_NEV, SZBIZ_SZLET.AFA_KULCS, SZBIZ_SZLET.MENNY_EGYS, SZBIZ_SZLET.EGYSEG_AR, SZBIZ_SZLET.EDARAB, SZBIZ_SZLEF.TELJ_DATUM, SZBIZ_SZLEF.BIZSZAM, SZBIZ_SZLET.TETEL, szbiz_szlef.penznem, szbiz_szlet.szorzo, @kics FROM szbiz_szlef,SZBIZ_SZLET,SZALLITO WHERE (SZBIZ_SZLEF.BIZSZAM = SZBIZ_SZLET.BIZSZAM) AND (SZBIZ_SZLEF.SZALLITO = SZALLITO.SZALL_KOD) and cikk_szam=@csz and telj_datum>= @Kido and telj_datum<= @Vido and (SZBIZ_SZLEF.RAKTAR_KOD=@rakk or @rakk=0); insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '2', 'Raktári bevét', BEVETJOG.bevetnev, BEVETT.AFA_KULCS, BEVETT.MENNY_EGYS, BEVETT.EGYSEG_AR, BEVETT.DARAB, BEVETF.DATUM, BEVETF.BIZSZAM, BEVETT.TETEL, 'HUF', bevett.szorzo, @kics FROM BEVETF,BEVETT,BEVETJOG WHERE (BEVETF.BIZSZAM = BEVETT.BIZSZAM) AND (BEVETF.BEVET_KOD = BEVETJOG.kod) and cikk_szam= @csz and datum>= @Kido and datum<= @Vido and (bevetf.RAKTAR_K=@rakk or @rakk=0); insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '5', 'Raktári kivét', kivetjog.kivetnev, cikkek.AFA_KULCS, 'db', keszlet.EGYSEG_AR, mozgas.EDARAB, kivetf.DATUM, kivetf.BIZSZAM, kivett.TETEL, 'HUF', 1, @kics FROM mozgas INNER JOIN keszlet ON mozgas.SORSZAM = keszlet.SORSZAM INNER JOIN kivetf INNER JOIN kivett ON kivetf.BIZSZAM = kivett.BIZSZAM INNER JOIN kivetjog ON kivetf.KIVET_KOD = kivetjog.kod INNER JOIN cikkek ON kivett.CIKK_SZAM = cikkek.CIKK_SZAM ON mozgas.BIZSZAM = kivett.BIZSZAM AND mozgas.TETEL = kivett.TETEL WHERE kivett.cikk_szam= @csz and mozgas.mozgaskod='kivet' and kivetf.datum>= @Kido and kivetf.datum<= @Vido and (kivetf.RAKTAR_K=@rakk or @rakk=0); insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '4', 'Raktárközi kivét', raktarak.nev AS raktar_nev, cikkek.AFA_KULCS, 'db', keszlet.EGYSEG_AR, mozgas.EDARAB, rmozgasf.DATUM, rmozgasf.BIZSZAM, rmozgast.TETEL, 'HUF', 1, @kics FROM mozgas INNER JOIN rmozgast ON mozgas.BIZSZAM = rmozgast.BIZSZAM AND mozgas.TETEL = rmozgast.TETEL AND mozgas.MOZGASKOD = 'rmozgas' AND mozgas.EDARAB < 0 INNER JOIN keszlet ON mozgas.SORSZAM = keszlet.SORSZAM INNER JOIN cikkek ON rmozgast.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN rmozgasf ON rmozgast.BIZSZAM = rmozgasf.BIZSZAM INNER JOIN raktarak ON rmozgasf.FRAKTAR_K = raktarak.kod WHERE rmozgast.cikk_szam= @csz and rmozgasf.datum>= @Kido and rmozgasf.datum<= @Vido and (rmozgasf.FRAKTAR_K=@rakk or @rakk=0); --BALOG-nál nem kell készletre venni, csak kivenni!!!! -- Az Üzletházra nem érvényes!!! if not (left(rtrim(@xrrovidnev),5)='BALOG' and @xrazonosito<>'031-0082-001') begin insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '3', 'Raktárközi bevét', raktarak.nev AS raktar_nev, cikkek.AFA_KULCS, 'db', keszlet.EGYSEG_AR, mozgas.EDARAB, rmozgasf.DATUM, rmozgasf.BIZSZAM, rmozgast.TETEL, 'HUF', 1, @kics FROM mozgas INNER JOIN rmozgast ON mozgas.BIZSZAM = rmozgast.BIZSZAM AND mozgas.TETEL = rmozgast.TETEL AND mozgas.MOZGASKOD = 'rmozgas' AND mozgas.EDARAB > 0 INNER JOIN keszlet ON mozgas.SORSZAM = keszlet.SORSZAM INNER JOIN cikkek ON rmozgast.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN rmozgasf ON rmozgast.BIZSZAM = rmozgasf.BIZSZAM INNER JOIN raktarak ON rmozgasf.CRAKTAR_K = raktarak.kod WHERE rmozgast.cikk_szam= @csz and rmozgasf.datum>= @Kido and rmozgasf.datum<= @Vido and (rmozgasf.CRAKTAR_K=@rakk or @rakk=0) end else begin insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '3', 'Raktárközi bevét', raktarak.nev AS raktar_nev, cikkek.AFA_KULCS, 'db', keszlet.EGYSEG_AR, -mozgas.EDARAB, rmozgasf.DATUM, rmozgasf.BIZSZAM, rmozgast.TETEL, 'HUF', 1, @kics FROM mozgas INNER JOIN rmozgast ON mozgas.BIZSZAM = rmozgast.BIZSZAM AND mozgas.TETEL = rmozgast.TETEL AND mozgas.MOZGASKOD = 'rmozgas' AND mozgas.EDARAB < 0 INNER JOIN keszlet ON mozgas.SORSZAM = keszlet.SORSZAM INNER JOIN cikkek ON rmozgast.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN rmozgasf ON rmozgast.BIZSZAM = rmozgasf.BIZSZAM INNER JOIN raktarak ON rmozgasf.CRAKTAR_K = raktarak.kod WHERE rmozgast.cikk_szam= @csz and rmozgasf.datum>= @Kido and rmozgasf.datum<= @Vido and (rmozgasf.CRAKTAR_K=@rakk or @rakk=0); end insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '6', 'Értékesítés', vevo_tel.telep_nev, vevo_szlet.AFA_KULCS, vevo_szlet.MENNY_EGYS, vevo_szlet.EGYSEG_AR, -vevo_szlet.EDARAB, vevo_szlef.TELJ_DATUM, vevo_szlef.BIZSZAM, vevo_szlet.TETEL, penznem, vevo_szlet.szorzo, @kics FROM vevo_szlef,vevo_szlet,vevo_tel WHERE vevo_szlef.BIZSZAM = vevo_szlet.BIZSZAM and vevo_szlef.telep_kod=vevo_tel.telep_kod and vevo_szlef.vevo=vevo_tel.vevo_kod and vevo_szlet.cikk_szam= @csz and vevo_szlef.telj_datum>= @Kido and vevo_szlef.telj_datum<= @Vido and (vevo_szlef.RAKTAR_KOD=@rakk or @rakk=0); --termelés felhasznált (hús) insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '7', 'Term. felhaszn.', '', AFA_KULCS, MENNY_EGYS, EGYSEG_AR, -DARAB, DATUM, str(kulcs,10,0), 1, 'HUF', 1, @kics FROM term_termeles inner join cikkek on cikkek.cikk_szam=term_termeles.cikk_szam WHERE term_termeles.cikk_szam= @csz and irany=1 and datum>= @Kido and datum<= @Vido -- termelés késztermék (hús) insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '8', 'Term. késztermék', '', AFA_KULCS, MENNY_EGYS, EGYSEG_AR, DARAB, DATUM, str(kulcs,10,0), 1, 'HUF', 1, @kics FROM term_termeles inner join cikkek on cikkek.cikk_szam=term_termeles.cikk_szam WHERE term_termeles.cikk_szam= @csz and irany=2 and datum>= @Kido and datum<= @Vido -- termelés késztermék (egyéb) insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '9', 'Term. késztermék', '', AFA_KULCS, cikkek.MENNY_EGYS, cikkek.ut_besz_ar, kesz_darab, left(keszrejelentes,10), str(kulcs,10,0), 1, 'HUF', 1, @kics FROM vdiszpo_keszre1 inner join cikkek on cikkek.cikk_szam=vdiszpo_keszre1.cikk_szam WHERE vdiszpo_keszre1.cikk_szam= @csz and left(keszrejelentes,10)>= @Kido and left(keszrejelentes,10)<= @Vido --termelés felhasznált (egyéb) insert into wgyujtes(gyarto_nev, cikk_nev,szall_nev, afa_kulcs, menny_egys, egyseg_ar1, darab1, datum1, bizszam, tetel, csopnev, darab2, kicsoda) SELECT '10', 'Term. felhaszn.', '', AFA_KULCS, vdiszpo_keszre2.MENNY_EGYS, cikkek.ut_besz_ar, -DARAB, left(modido,10), str(kulcs,10,0), tetel, 'HUF', 1, @kics FROM vdiszpo_keszre2 inner join cikkek on cikkek.cikk_szam=vdiszpo_keszre2.acikk_szam WHERE vdiszpo_keszre2.acikk_szam= @csz and left(modido,10)>= @Kido and left(modido,10)<= @Vido end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qszamol_evho] ( @dat datum, @vevo kulcs, @vcs kulcs, @vl kulcs, @vj kulcs, @vt kulcs, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) set @tranznev = 't_bevet_uj'+@kics begin transaction @tranznev delete from wgyevho delete from wgyevho1 insert into wgyevho1 select vevo,cikk_szam,'',db1,db2,db3,db4,db5,db6,db7,db8,db9,db10,db11,db12,0,0,0,0,0,0,0,0,0,0,0,0 from dbo.fvqVevoCikkHo(convert(char(4),convert(int,left(@dat,4))-1), @vevo, @vcs, @vl, @vj, @vt) insert into wgyevho1 select vevo,cikk_szam,'',0,0,0,0,0,0,0,0,0,0,0,0,db1,db2,db3,db4,db5,db6,db7,db8,db9,db10,db11,db12 from dbo.fvqVevoCikkHo(left(@dat,4), @vevo, @vcs, @vl, @vj, @vt) insert into wgyevho select vevo,cikk_szam,'',sum(db1),sum(db2),sum(db3),sum(db4),sum(db5),sum(db6),sum(db7),sum(db8),sum(db9),sum(db10),sum(db11),sum(db12), sum(adb1),sum(adb2),sum(adb3),sum(adb4),sum(adb5),sum(adb6),sum(adb7),sum(adb8),sum(adb9),sum(adb10),sum(adb11),sum(adb12) from wgyevho1 group by vevo,cikk_szam update wgyevho set cikk_nev= (select cikk_nev from cikkek where cikkek.cikk_szam=wgyevho.cikk_szam) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qszamolt_keszlet] ( @nyito_bsz as bizonylat_szam, @zaro_bsz as bizonylat_szam, @kdat datum, @vdat datum, @kics char(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wkeszlet_szamolt where kicsoda= @kics -- nyitó insert into wkeszlet_szamolt select 0,cikk_szam,'',menny_egys,SUM(darab),SUM(darab*egyseg_ar), 0,0,0,0,0,0,0,0,@kics from bevett where bizszam=@nyito_bsz group by cikk_szam,menny_egys --beteszi a leltárban nem szereplő cikkeket insert into wkeszlet_szamolt select 0,cikk_szam,'',menny_egys,0,0, 0,0,0,0,0,0,0,0,@kics from cikkek where cikk_szam not in (select cikk_szam from wkeszlet_szamolt where kicsoda=@kics) update wkeszlet_szamolt set rakbev=isnull( (select SUM(darab) from bevetf,bevett where bevetf.bizszam=bevett.bizszam and bevett.cikk_szam=wkeszlet_szamolt.cikk_szam and bevetf.datum>@kdat and bevetf.datum<=@vdat and bevetf.bizszam<>@nyito_bsz and bevetf.bizszam<>@zaro_bsz),0) where kicsoda=@kics update wkeszlet_szamolt set szall_szle=isnull( (select SUM(edarab) from szall_szlef,szall_szlet where szall_szlef.bizszam=szall_szlet.bizszam and szall_szlet.cikk_szam=wkeszlet_szamolt.cikk_szam and szall_szlef.telj_datum>@kdat and szall_szlef.telj_datum<=@vdat ),0) where kicsoda=@kics update wkeszlet_szamolt set rakkiv=isnull( (select SUM(darab) from kivetf,kivett where kivetf.bizszam=kivett.bizszam and kivett.cikk_szam=wkeszlet_szamolt.cikk_szam and kivetf.datum>@kdat and kivetf.datum<=@vdat ),0) where kicsoda=@kics update wkeszlet_szamolt set vevo_szle=isnull( (select SUM(edarab) from vevo_szlef,vevo_szlet where vevo_szlef.bizszam=vevo_szlet.bizszam and vevo_szlet.cikk_szam=wkeszlet_szamolt.cikk_szam and vevo_szlef.telj_datum>@kdat and vevo_szlef.telj_datum<=@vdat ),0) where kicsoda=@kics update wkeszlet_szamolt set leltar=isnull( (select SUM(darab) from bevett where bevett.cikk_szam=wkeszlet_szamolt.cikk_szam and bevett.bizszam=@zaro_bsz group by cikk_szam),0) where kicsoda=@kics update wkeszlet_szamolt set lelt_ertek=isnull( (select SUM(darab*egyseg_ar) from bevett where bevett.cikk_szam=wkeszlet_szamolt.cikk_szam and bevett.bizszam=@zaro_bsz group by cikk_szam),0) where kicsoda=@kics update wkeszlet_szamolt set zaro=nyito + (rakbev + szall_szle) - (rakkiv + vevo_szle) where kicsoda=@kics delete from wkeszlet_szamolt where kicsoda=@kics and nyito=0 and rakbev=0 and szall_szle=0 and rakkiv=0 and vevo_szle=0 and zaro=0 and leltar=0 update wkeszlet_szamolt set elteres=leltar-zaro, cikk_nev= (select cikk_nev from cikkek where cikkek.cikk_szam=wkeszlet_szamolt.cikk_szam) where kicsoda=@kics update wkeszlet_szamolt set ny_ertek= (select brutto_ar from vevo_ar_lista where datum=left(@vdat,7) and arcsoport=6 and vevo_ar_lista.cikk_szam=wkeszlet_szamolt.cikk_szam) where kicsoda=@kics update wkeszlet_szamolt set lelt_ertek= (select netto_ar from vevo_ar_lista where datum=left(@vdat,7) and arcsoport=6 and vevo_ar_lista.cikk_szam=wkeszlet_szamolt.cikk_szam) where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qszamolt_keszlet1] ( @dat1 char(10), @dat2 char(10), @kics char(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @dat3 char(10) set @tranznev = 't_sz_keszlet'+@kics begin transaction @tranznev delete from wszamolt_keszlet where kicsoda=@kics insert into wszamolt_keszlet select cikk_szam,cikk_nev,0,0,0,0,0,0,0,0,0,0,0,0,@kics from cikkek --kiszámolja a nyitó készletet if (select count(*) from leltar_keszlet where leltar_datum<=@dat1)>0 begin select @dat3=max(leltar_datum) from leltar_keszlet where leltar_datum<=@dat1 update wszamolt_keszlet set nyito=isnull( (select sum(darab) from leltar_keszlet where leltar_datum=@dat3 and leltar_keszlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set nyito_ert=isnull( (select sum(ertek) from leltar_keszlet where leltar_datum=@dat3 and leltar_keszlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics end else begin set @dat3='2000.01.01' end update wszamolt_keszlet set szall_bevet=isnull( (select sum(darab) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam where telj_datum>@dat3 and telj_datum<@dat1 and szall_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set szall_bevet_ert=isnull( (select sum(darab*egyseg_ar) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam where telj_datum>@dat3 and telj_datum<@dat1 and szall_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set bevet=isnull( (select sum(darab) from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam where datum>@dat3 and datum<@dat1 and bevett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set bevet_ert=isnull( (select sum(darab*egyseg_ar) from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam where datum>@dat3 and datum<@dat1 and bevett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set kivet=isnull( (select sum(darab) from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam where datum>@dat3 and datum<@dat1 and kivett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set kivet_ert=isnull( (select -sum(mozgas.darab*keszlet.egyseg_ar) from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam inner join mozgas on mozgas.mozgaskod='kivet' and mozgas.bizszam=kivetf.bizszam and mozgas.tetel=kivett.tetel inner join keszlet on keszlet.sorszam=mozgas.sorszam where datum>@dat3 and datum<@dat1 and kivett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set eladas=isnull( (select sum(darab) from vevo_szlet inner join vevo_szlef on vevo_szlef.bizszam=vevo_szlet.bizszam where telj_datum>=@dat1 and telj_datum<=@dat2 and vevo_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set eladas_ert=isnull( (select -sum(mozgas.darab*keszlet.egyseg_ar) from vevo_szlet inner join vevo_szlef on vevo_szlef.bizszam=vevo_szlet.bizszam inner join mozgas on mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=vevo_szlet.bizszam and mozgas.tetel=vevo_szlet.tetel inner join keszlet on mozgas.sorszam=keszlet.sorszam where telj_datum>=@dat1 and telj_datum<=@dat2 and vevo_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set nyito=nyito + szall_bevet + bevet - (kivet + eladas), nyito_ert=nyito_ert + szall_bevet_ert + bevet_ert -(kivet_ert + eladas_ert) where kicsoda=@kics update wszamolt_keszlet set szall_bevet=0,bevet=0,kivet=0,eladas=0, szall_bevet_ert=0,bevet_ert=0,kivet_ert=0,eladas_ert=0 where kicsoda=@kics --száll. bevétek update wszamolt_keszlet set szall_bevet=isnull( (select sum(darab) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam where telj_datum>=@dat1 and telj_datum<=@dat2 and szall_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set szall_bevet_ert=isnull( (select sum(darab*egyseg_ar) from szall_szlef inner join szall_szlet on szall_szlef.bizszam=szall_szlet.bizszam where telj_datum>=@dat1 and telj_datum<=@dat2 and szall_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics --raktár bevétek update wszamolt_keszlet set bevet=isnull( (select sum(darab) from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam where datum>=@dat1 and datum<=@dat2 and bevett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set bevet_ert=isnull( (select sum(darab*egyseg_ar) from bevetf inner join bevett on bevetf.bizszam=bevett.bizszam where datum>=@dat1 and datum<=@dat2 and bevett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics --raktár kivétek update wszamolt_keszlet set kivet=isnull( (select sum(darab) from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam where datum>=@dat1 and datum<=@dat2 and kivett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set kivet_ert=isnull( (select -sum(mozgas.darab*keszlet.egyseg_ar) from kivetf inner join kivett on kivetf.bizszam=kivett.bizszam inner join mozgas on mozgas.mozgaskod='kivet' and mozgas.bizszam=kivetf.bizszam and mozgas.tetel=kivett.tetel inner join keszlet on keszlet.sorszam=mozgas.sorszam where datum>=@dat1 and datum<=@dat2 and kivett.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics --eladások update wszamolt_keszlet set eladas=isnull( (select sum(darab) from vevo_szlet inner join vevo_szlef on vevo_szlef.bizszam=vevo_szlet.bizszam where telj_datum>=@dat1 and telj_datum<=@dat2 and vevo_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics update wszamolt_keszlet set eladas_ert=isnull( (select -sum(mozgas.darab*keszlet.egyseg_ar) from vevo_szlet inner join vevo_szlef on vevo_szlef.bizszam=vevo_szlet.bizszam inner join mozgas on mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=vevo_szlet.bizszam and mozgas.tetel=vevo_szlet.tetel inner join keszlet on mozgas.sorszam=keszlet.sorszam where telj_datum>=@dat1 and telj_datum<=@dat2 and vevo_szlet.cikk_szam=wszamolt_keszlet.cikk_szam),0) where kicsoda=@kics delete from wszamolt_keszlet where nyito=0 and nyito_ert=0 and szall_bevet=0 and szall_bevet_ert=0 and bevet=0 and bevet_ert=0 and kivet=0 and kivet_ert=0 and eladas=0 and eladas_ert=0 and kicsoda=@kics update wszamolt_keszlet set zaro=nyito + szall_bevet + bevet - (kivet + eladas), zaro_ert=nyito_ert + szall_bevet_ert + bevet_ert - (kivet_ert + eladas_ert) where kicsoda=@kics commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [qszszamol_evho] ( @dat datum, @szall kulcs, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) set @tranznev = 't_bevet_uj'+@kics begin transaction @tranznev delete from wgyevho delete from wgyevho1 insert into wgyevho1 select szallito,cikk_szam,'',db1,db2,db3,db4,db5,db6,db7,db8,db9,db1,db11,db12,0,0,0,0,0,0,0,0,0,0,0,0 from dbo.fvqSzallCikkHo(convert(char(4),convert(int,left(@dat,4))-1), @szall) insert into wgyevho1 select szallito,cikk_szam,'',0,0,0,0,0,0,0,0,0,0,0,0,db1,db2,db3,db4,db5,db6,db7,db8,db9,db1,db11,db12 from dbo.fvqSzallCikkHo(left(@dat,4), @Szall) insert into wgyevho select vevo,cikk_szam,'',sum(db1),sum(db2),sum(db3),sum(db4),sum(db5),sum(db6),sum(db7),sum(db8),sum(db9),sum(db10),sum(db11),sum(db12), sum(adb1),sum(adb2),sum(adb3),sum(adb4),sum(adb5),sum(adb6),sum(adb7),sum(adb8),sum(adb9),sum(adb10),sum(adb11),sum(adb12) from wgyevho1 group by vevo,cikk_szam update wgyevho set cikk_nev= (select cikk_nev from cikkek where cikkek.cikk_szam=wgyevho.cikk_szam) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [ReindexAllTable] AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @dbname varchar(50) declare @sqlstr varchar(500) declare @log_name varchar(100) DECLARE @TableName VARCHAR(100) DECLARE curTables CURSOR STATIC LOCAL FOR SELECT Table_Name FROM Information_Schema.Tables WHERE Table_Type = 'BASE TABLE' OPEN curTables FETCH NEXT FROM curTables INTO @TableName SET @TableName = RTRIM(@TableName) WHILE @@FETCH_STATUS = 0 BEGIN --SELECT 'Reindexing ' + @TableName DBCC DBREINDEX (@TableName) WITH NO_INFOMSGS FETCH NEXT FROM curTables INTO @TableName END CLOSE curTables DEALLOCATE curTables -- shrink log select @dbname=DB_NAME() SELECT @log_name=name FROM sys.master_files WHERE database_id = db_id() AND type = 1 set @sqlstr='ALTER DATABASE '+@dbname+' SET RECOVERY SIMPLE' exec(@sqlstr) -- DBCC SHRINKFILE ( N'bolt_log') WITH NO_INFOMSGS DBCC SHRINKFILE ( @log_name ) WITH NO_INFOMSGS set @sqlstr='ALTER DATABASE '+@dbname+' SET RECOVERY FULL' exec(@sqlstr) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [RendelesVisszaigazol] @vevo kulcs AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @rakk int select @rakk=convert(int,rtrim(ertek)) from parameterek where azonosito='WebKeszletRaktar' update _web_nk_kosar set visszaigazol=dbo.SzabadKeszlet(cikk_szam,@rakk,@vevo) where vevo_kod=@vevo update _web_nk_kosar set visszaigazol= case when darab0 and min_kesz< (select sum(darab) from keszlet where keszlet.cikk_szam = cikkek.cikk_szam) if @hany>0 begin insert into riasztas(riasztas_tip, cimzett, uzenet, elkuldve) select riasztas_tip, cimzett, 'Figyelem! Van min. alatti készlet!','' from riasztast_kap inner join riasztas_cimzett on riasztast_kap.cimzett_kulcs = riasztas_cimzett.kulcs where esemeny_kulcs=@kulcs end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [ria_vevo_ajan_erk] (@kulcs int) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @hany int select @hany=count(*) from vevo_arajanlatf where keres_rogzitve> (select ut_ellenorzes from riasztas_tipus where kulcs=@kulcs) if @hany>0 begin insert into wriasztas(riasztas_tip, cimzett, uzenet) select riasztas_tip, cimzett, 'Figyelem! Vevői árajánlat kérés érkezett!' from riasztast_kap inner join riasztas_cimzett on riasztast_kap.cimzett_kulcs = riasztas_cimzett.kulcs where esemeny_kulcs=@kulcs end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [rmozgas_keszlet]( @frakkod kulcs, @crakkod kulcs, @hany bizonylat_szam, @kics kicsoda ) AS begin declare @csz cikk_szam declare @tet bizonylat_tetel declare @ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @szorz szorzo declare @ev char(4) declare @kssz bizonylat_szam declare @bmkod varchar(10) declare @bszlasz bizonylat_szam declare @btet bizonylat_tetel declare @nyug bit declare @bizom bit declare @szd datum declare @ukssz bizonylat_szam declare @gysz gyari_szam declare @sar varchar(20) declare @mennyi int declare @vevo kulcs declare @rendszam char(10) declare @xrrovidnev varchar(10) declare @xrazonosito varchar(12) declare @kulcs varchar(20) SET XACT_ABORT ON SET NOCOUNT ON set @ev=left(@hany,4) set @kulcs = @ev +'karton' select @xrrovidnev=rovidnev from regisztral select @xrazonosito=azonosito from elesito select @rendszam=hivszam from rmozgasf where bizszam=@hany --KIVESZEM KÉSZLETRŐL DECLARE c1 cursor FOR SELECT tetel, cikk_szam, darab, szorzo FROM wrmozgast where kicsoda = @kics order by tetel OPEN c1 FETCH NEXT FROM c1 INTO @tet, @csz, @db, @szorz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @_db=@db * @szorz if @xrazonosito='031-0093-001' --Fleur Center begin select @vevo=isnull(vevo,0) from vevo_renf where bizszam=@rendszam exec foglalas_ki @vevo, @frakkod, @csz, @_db, @kics end exec karton_ki 'rmozgas', @hany, @tet, @tet, @frakkod, @csz, @_db, 'rmozgas_keszlet', @kics END FETCH NEXT FROM c1 INTO @tet, @csz, @db, @szorz end close c1 deallocate c1 --BALOG-nál nem kell készletre venni, csak kivenni!!!! -- Az Üzletházra nem érvényes!!! if not (left(rtrim(@xrrovidnev),5)='BALOG' and @xrazonosito<>'031-0082-001') begin --KÉSZLETRE VESZEM DECLARE c2 cursor FOR SELECT MOZGAS.TETEL, MOZGAS.SORSZAM, keszlet.cikk_szam, MOZGAS.DARAB, KESZLET.EGYSEG_AR, keszlet.szav_datum, KESZLET.MOZGASKOD, KESZLET.SZAMLA_SZ, KESZLET.TETEL AS btetel, KESZLET.NYUGTAZVA, KESZLET.bizomanyos, KESZLET.gyari_szam, keszlet.sarzs_szam FROM MOZGAS INNER JOIN KESZLET ON MOZGAS.SORSZAM = KESZLET.SORSZAM where MOZGAS.mozgaskod='rmozgas' and mozgas.bizszam= @hany and MOZGAS.edarab<0 order by tetel OPEN c2 FETCH NEXT FROM c2 INTO @tet, @kssz, @csz, @db, @ear, @szd, @bmkod, @bszlasz, @btet, @nyug, @bizom, @gysz, @sar while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@ukssz output set @_db= - @db INSERT INTO KESZLET VALUES (@uKSSZ, @crakkod, @CSZ, @_DB, @_DB, @EAR, @szd, @bmkod, @bszlasz, @btet, @nyug, @bizom, @gysz, @sar) INSERT INTO MOZGAS VALUES ('rmozgas', @hany, @TET, @uKSSZ, @_DB, @_DB) -- negatív készlet kezelése set @mennyi=(select isnull(count(*),0) from keszlet_negativ where cikk_szam=@csz and raktar_kod=@crakkod and darab>0) if @mennyi>0 and dbo.xrfuggveny('NegativKeszletKezel')='I' begin exec karton_be_negativ @ukssz, @crakkod, @csz, @_db, @bizom, @kics end END FETCH NEXT FROM c2 INTO @tet, @kssz, @csz, @db, @ear, @szd, @bmkod, @bszlasz, @btet, @nyug, @bizom, @gysz, @sar end close c2 deallocate c2 end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [rmozgas_tolt] @kdat varchar(20), @vdat varchar(20), @rakk kulcs, @cikk varchar(14), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @csz varchar(14) declare @tet int declare @dtip char(1) set @tranznev='t_rmoz_uj'+@kics delete from wrmozgast where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='rmozgas_keszlet' delete from wsarzs_ki where kicsoda=@kics and biztip='rmozgas_keszlet' BEGIN TRANSACTION @tranznev set @tet=0 DECLARE c1 cursor FOR select keszlet.cikk_szam, dat_tipus from keszre1 inner join keszlet on keszre1.kulcs=keszlet.szamla_sz and mozgaskod='term_be' inner join cikkek on cikkek.cikk_szam=keszlet.cikk_szam where keszlet.raktar_kod=@rakk and modido>=@kdat and modido<=@vdat and (len(@cikk)=0 or keszlet.cikk_szam=@cikk) group by keszlet.cikk_szam, dat_tipus OPEN c1 FETCH NEXT FROM c1 INTO @csz, @dtip while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet + 1 insert into wrmozgast select '',@tet,keszlet.cikk_szam,cikk_nev,menny_egys,1, sum(keszlet.darab),sum(keszlet.darab*egyseg_ar)/sum(keszlet.darab),@kics from keszre1 inner join keszlet on keszre1.kulcs=keszlet.szamla_sz and mozgaskod='term_be' inner join cikkek on cikkek.cikk_szam=keszlet.cikk_szam where keszlet.raktar_kod=@rakk and modido>=@kdat and modido<=@vdat and keszlet.cikk_szam=@csz and keszlet.darab<>0 group by keszlet.cikk_szam,cikk_nev,menny_egys if @dtip='S' --sarzs számos begin insert into wsarzs_ki select @tet,sorszam,'rmozgas_keszlet',sarzs_szam,bev_datum,szamla_sz,mozgaskod,darab,darab,@kics from vkeszlet_szavido where sorszam in (select sorszam from keszre1 inner join keszlet on keszre1.kulcs=keszlet.szamla_sz and mozgaskod='term_be' where keszlet.raktar_kod=@rakk and modido>=@kdat and modido<=@vdat and keszlet.cikk_szam=@csz) end if @dtip='L' or @dtip='G' --szav.idős begin insert into wszavatos_ki select @tet,sorszam,'rmozgas_keszlet',szav_datum,bev_datum,szamla_sz,mozgaskod,darab,darab,@kics from vkeszlet_szavido where sorszam in (select sorszam from keszre1 inner join keszlet on keszre1.kulcs=keszlet.szamla_sz and mozgaskod='term_be' where keszlet.raktar_kod=@rakk and modido>=@kdat and modido<=@vdat and keszlet.cikk_szam=@csz) end END FETCH NEXT FROM c1 INTO @csz, @dtip end close c1 deallocate c1 COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [rmozgas_uj] @dat datum, @hivszam varchar(50), @frakkod kulcs, @crakkod kulcs, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @hany bizonylat_szam declare @ev char(4) declare @kulcs varchar(20) set @ev= left(@dat,4) set @kulcs = @ev + 'rmozgas' set @tranznev='t_rmoz_uj'+@kics BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs , @hany output --rmozgasf beir insert into rmozgasf values(@hany, @hivszam, @frakkod, @crakkod, @dat, @megj, @kics, dbo.mygetdatetime()) insert into rmozgast select @hany,tetel,cikk_szam,menny_egys,szorzo,darab,egyseg_ar from wrmozgast where kicsoda=@kics exec rmozgas_keszlet @frakkod, @crakkod, @hany, @kics delete from wrmozgast where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='rmozgas_keszlet' delete from wsarzs_ki where kicsoda=@kics and biztip='rmozgas_keszlet' COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [rmozgas_uj_logi] @dat datum, @hivszam varchar(50), @frakkod kulcs, @crakkod kulcs, @megj megjegyzes, @kics kicsoda, @rszam bizonylat_szam, @tul int, @dolg kicsoda, @kapu varchar(20) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @hany bizonylat_szam declare @ev char(4) declare @kulcs varchar(20) declare @pazon varchar(20) set @ev= left(@dat,4) set @kulcs = @ev + 'rmozgas' set @tranznev='t_rmoz_uj'+@kics BEGIN TRANSACTION @tranznev if len(@dolg)>0 and len(@kapu)>0 exec arulog..keszlet_csokkent_le @kapu, @dolg, @tul, @kics exec bizsorsz_no @kulcs , @hany output --rmozgasf beir insert into rmozgasf values(@hany, @hivszam, @frakkod, @crakkod, @dat, @megj, @kics, dbo.mygetdatetime()) insert into rmozgast select @hany,tetel,cikk_szam,menny_egys,szorzo,darab,egyseg_ar from wrmozgast where kicsoda=@kics exec rmozgas_keszlet @frakkod, @crakkod, @hany, @kics delete from wrmozgast where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='rmozgas_keszlet' delete from wsarzs_ki where kicsoda=@kics and biztip='rmozgas_keszlet' -- törli a logisztika készletből a kapuban lévő raklapokat select @pazon=puffer_azon from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(vegrehajtva)>0 delete from arulog..keszlet where helyazon=@pazon and darab=0 insert into arulog..kom_szamlazott select @tul, 3, @hany, kulcs from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(RTrim(vegrehajtva))<>0 and keszletkulcs<>0 and not exists (select * from arulog..kom_szamlazott AS x where tulaj=@tul and x.kulcs=arulog..kom_feladat.kulcs) -- aktualizálja a darabot a rendelésben update vevo_rent set darab=darab - isnull( (select darab from rmozgast where bizszam=@hany and rmozgast.cikk_szam=vevo_rent.cikk_szam),0) where bizszam=@rszam update vevo_renf set allapot='hátralékos' where bizszam=@rszam exec vevo_ren_allapot_akt @rszam -- törli a rendelés összes foglalását függetlenül a dátumtól update foglalasok set darab=0 where darab<>0 and rend_szam=@rszam COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [rmozgas_uj_tr_nelkul] @dat datum, @hivszam varchar(50), @frakkod kulcs, @crakkod kulcs, @megj megjegyzes, @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @hany bizonylat_szam declare @ev char(4) declare @kulcs varchar(20) set @ev= left(@dat,4) set @kulcs = @ev + 'rmozgas' exec bizsorsz_no @kulcs , @hany output --rmozgasf beir insert into rmozgasf values(@hany, @hivszam, @frakkod, @crakkod, @dat, @megj, @kics, dbo.mygetdatetime()) insert into rmozgast select @hany,tetel,cikk_szam,menny_egys,szorzo,darab,egyseg_ar from wrmozgast where kicsoda=@kics exec rmozgas_keszlet @frakkod, @crakkod, @hany, @kics update wrmozgast set bizszam=@hany where kicsoda=@kics --delete from wrmozgast where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='rmozgas_keszlet' delete from wsarzs_ki where kicsoda=@kics and biztip='rmozgas_keszlet' SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [sarzs_atir] ( @bsz char(10), @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @hany bizonylat_szam declare @kulcs varchar(20) declare @tranznev varchar(50) declare @etet bizonylat_tetel declare @db mennyiseg delete from wsarzs where kicsoda=@kics DECLARE csarzs scroll CURSOR for SELECT tetel, darab FROM wszall_szlet inner join cikkek on wszall_szlet.cikk_szam=cikkek.cikk_szam WHERE wszall_szlet.kicsoda=@kics and dat_tipus='S' open csarzs fetch next from csarzs into @etet, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @db>0 begin set @hany=rtrim(@bsz) + '*' + dbo.strzero(@etet,4) insert into wsarzs values(@etet, @hany, @db, @kics) end END fetch next from csarzs into @etet, @db end close csarzs deallocate csarzs end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [String2Db]( @str varchar(200), @kics varchar(20)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @i int declare @j int WHILE (select charindex(';', @str) ) > 0 begin set @i=len(@str) set @j=charindex(';', @str ) insert into wgyujtes(tetel, kicsoda) values(convert(int,substring(@str,1,@j-1)), @kics) set @str=substring(@str,@j + 1, @i - @j) end insert into wgyujtes(tetel,kicsoda) values( @str, @kics ) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_arajan_uj] @ssz bizonylat_szam, @dat datum, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @kulcs varchar(20) declare @tranznev char(32) declare @szkod kulcs declare @ugylet char(20) declare @pont numeric(18,2) set @tranznev='t_szall_ara_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szall_arajanlat' BEGIN TRANSACTION @tranznev select @ugylet=ugyletkod from vvevo_arajanlatf where bizszam=@ssz DECLARE kszallito SCROLL CURSOR FOR select szall_kod from wszallito where kicsoda=@kics and kivalaszt='X' OPEN kszallito FETCH NEXT FROM kszallito INTO @szkod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @pont=szorzo from szallito where szall_kod=@szkod exec bizsorsz_no @kulcs, @sorsz output insert into szall_arajanf values(@sorsz, @szkod, @dat, @megj, '','','', @kics, dbo.mygetdatetime(), '','',@pont,21 ) insert into ugyletek values(@sorsz, @ugylet, 'szall_arajanlat') insert into szall_arajant select @sorsz,tetel,cikk_szam,mennyiseg,1,0,0,0,'' from vevo_arajanlatt where bizszam=@ssz END FETCH NEXT FROM kszallito INTO @szkod END CLOSE kszallito DEALLOCATE kszallito update vevo_arajanlatf set allapot=12 where bizszam=@ssz COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_arak_masol_tempbe] WITH RECOMPILE AS declare @bsz char(10) declare @szkod char(12) declare @dat CHAR(10) SET XACT_ABORT ON SET NOCOUNT ON BEGIN TRANSACTION t_boltuj set @dat=dbo.MyGetDate() delete from wtr_szall_art delete from wtr_szall_arf DECLARE kszall SCROLL CURSOR FOR select szallito from szall_arf,szallito where tipus='normál' and kdatum<=@dat and szallito=szall_kod group by szallito OPEN kszall FETCH NEXT FROM kszall INTO @szkod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wtr_szall_arf select * from szall_arf where bizszam in (select bizszam from szall_arf where tipus='normál' and szallito=@szkod and kdatum>=( select max(kdatum) from szall_arf where tipus='normál' and szallito=@szkod and kdatum<=@dat) ) END FETCH NEXT FROM kszall INTO @szkod END CLOSE kszall DEALLOCATE kszall DECLARE kszall SCROLL CURSOR FOR select szallito from szall_arf,szallito where tipus='akció' and kdatum<=@dat and szallito=szall_kod and not (szall_nev like '**%' and szall_nev not like '***%' ) group by szallito OPEN kszall FETCH NEXT FROM kszall INTO @szkod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wtr_szall_arf select * from szall_arf where bizszam in (select bizszam from szall_arf where tipus='akció' and szallito=@szkod and kdatum>=( select max(kdatum) from szall_arf where tipus='akció' and szallito=@szkod and @dat between kdatum and vdatum) ) END FETCH NEXT FROM kszall INTO @szkod END CLOSE kszall DEALLOCATE kszall insert into wtr_szall_art select * from szall_art where bizszam in (select bizszam from wtr_szall_arf) delete from wtr_szall_arf where bizszam not in (select bizszam from wtr_szall_art group by bizszam) COMMIT TRANSACTION t_boltuj GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [Szall_arak_opt] @dat datum, @ccs char(18), @gyarto kulcs, @szallito kulcs, @kics kicsoda with recompile AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @apn penznem set @apn=dbo.xrfuggveny('AlapPenznem') delete from wszall_opt where kicsoda=@kics delete from wgyujtes where kicsoda=@kics delete from wgyujtes1 where kicsoda=@kics --beteszi wgyujtes-be, a nem pref. szállítók érvényes normál árait, GYARTO-ba pedig a pref. szállítót insert into wgyujtes1 (szall_kod, kicsoda) select szallito, @kics from szall_arf where tipus='normál' group by szallito update wgyujtes1 set datum1=( select max(kdatum) from szall_arf where szall_arf.SZALLITO = wgyujtes1.szall_kod and kdatum<=@dat and szall_arf.tipus='normál') where kicsoda=@kics insert into wgyujtes(szall_kod, datum1, datum2, cikk_szam, cikk_nev, egyseg_ar1, gyarto_kod, szall_nev, kicsoda) select wgyujtes1.szall_kod, kdatum, '-', szall_art.cikk_szam, cikkek.cikk_nev, deviza.kurzus * netto_ar, cikkek.szallito, szallito.szall_nev, @kics from wgyujtes1 inner join szall_arf on wgyujtes1.kicsoda=@kics and wgyujtes1.szall_kod=szall_arf.szallito and wgyujtes1.datum1=szall_arf.kdatum and szall_arf.tipus='normál' inner join szall_art on szall_arf.bizszam=szall_art.bizszam inner join deviza on szall_arf.penznem = deviza.penznem inner join cikkek on szall_art.cikk_szam=cikkek.cikk_szam inner join szallito on wgyujtes1.szall_kod=szallito.szall_kod where --wgyujtes1.szall_kod <> cikkek.szallito and szall_art.netto_ar<>0 and cikkek.cikkcsop2 like rtrim(@ccs)+'%' and (cikkek.gyarto=@gyarto or @gyarto=0) and (cikkek.szallito=@szallito or @szallito=0) order by cikk_szam, szall_kod --beteszi wgyujtes1-be az érvényes nem pref. szállítók akciós árait, GYARTO-ba pedig a pref. szállítót delete from wgyujtes1 where kicsoda=@kics insert into wgyujtes1(szall_kod, datum1, datum2, cikk_szam, cikk_nev, egyseg_ar1, gyarto_kod, szall_nev, kicsoda) select szall_arf.szallito, kdatum, vdatum, szall_art.cikk_szam, cikkek.cikk_nev, netto_ar, cikkek.szallito, szallito.szall_nev, @kics from szall_arf inner join szall_art on szall_arf.tipus<>'normál' and szall_arf.bizszam=szall_art.bizszam and kdatum <= @dat and @dat <= vdatum inner join cikkek on szall_art.cikk_szam=cikkek.cikk_szam inner join szallito on szall_arf.szallito=szallito.szall_kod where szall_arf.szallito <> cikkek.szallito and cikkek.cikkcsop2 like rtrim(@ccs)+'%' and (cikkek.gyarto=@gyarto or @gyarto=0) and (cikkek.szallito=@szallito or @szallito=0) --wgyujtes1-ben vannak az adott datumra érv. árak insert into wgyujtes1(szall_kod, datum1, datum2, cikk_szam, cikk_nev, egyseg_ar1, gyarto_kod, szall_nev, kicsoda) select szall_kod, datum1, datum2, cikk_szam, cikk_nev, egyseg_ar1, gyarto_kod, szall_nev, kicsoda from wgyujtes where wgyujtes.kicsoda=@kics and not exists (select * from wgyujtes1 where wgyujtes.kicsoda=@kics and wgyujtes1.kicsoda=@kics and wgyujtes.szall_kod=wgyujtes1.szall_kod and wgyujtes.cikk_szam=wgyujtes1.cikk_szam ) delete from wgyujtes where kicsoda=@kics --beírja a WGYUJTES-be a legjobb árakat insert into wgyujtes (gyarto_kod, cikk_szam, cikk_nev, kicsoda) select gyarto_kod, cikk_szam, cikk_nev, @kics from wgyujtes1 where kicsoda=@kics group by gyarto_kod, cikk_szam, cikk_nev --EGYSEG_AR2-ben a pref. szállító ára update wgyujtes set egyseg_ar2=dbo.TermekNettoBeszAraAdottDat(wgyujtes.cikk_szam, @dat, @apn ) where kicsoda=@kics update wgyujtes set egyseg_ar1=(select min(egyseg_ar1) from wgyujtes1 where wgyujtes.kicsoda=wgyujtes1.kicsoda and kicsoda=@kics and wgyujtes.cikk_szam=wgyujtes1.cikk_szam and egyseg_ar1<>0) where kicsoda=@kics update wgyujtes set datum1=(select datum1 from wgyujtes1 where wgyujtes.kicsoda=wgyujtes1.kicsoda and kicsoda=@kics and wgyujtes.cikk_szam=wgyujtes1.cikk_szam and wgyujtes.egyseg_ar1=wgyujtes1.egyseg_ar1 ) where kicsoda=@kics update wgyujtes set datum2=(select datum2 from wgyujtes1 where wgyujtes.kicsoda=wgyujtes1.kicsoda and kicsoda=@kics and wgyujtes.cikk_szam=wgyujtes1.cikk_szam and wgyujtes.egyseg_ar1=wgyujtes1.egyseg_ar1 ) where kicsoda=@kics update wgyujtes set szall_kod=isnull((select top 1 szall_kod from wgyujtes1 where wgyujtes.kicsoda=wgyujtes1.kicsoda and kicsoda=@kics and wgyujtes.cikk_szam=wgyujtes1.cikk_szam and wgyujtes1.egyseg_ar1 = ( select Min(egyseg_ar1) from wgyujtes1 where kicsoda=@kics and wgyujtes.cikk_szam=wgyujtes1.cikk_szam and egyseg_ar1<>0 ) ),'0') where kicsoda=@kics update wgyujtes set szall_nev=( select szall_nev from szallito where wgyujtes.szall_kod=szallito.szall_kod) where kicsoda=@kics update wgyujtes set gyarto_nev=(select szall_nev from szallito where wgyujtes.gyarto_kod=szallito.szall_kod) where kicsoda=@kics insert into wszall_opt select cikk_szam,cikk_nev,gyarto_kod,gyarto_nev,egyseg_ar2, szall_kod,szall_nev,egyseg_ar1,datum1 + case datum2 when '-' then datum2 else '-' + datum2 end,kicsoda from wgyujtes where kicsoda=@kics and egyseg_ar10 end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_biz_szle_nyug] @elszam char(22), @szall kulcs, @szlasz varchar(50), @dat datum, @szdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @vkedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @afamentes bit, @okmanytip char(1), @szlaertek egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @szla_sorsz bizonylat_szam declare @szle_sorsz bizonylat_szam declare @sznev nev declare @ev char(4) declare @kulcs varchar(20) declare @tet bizonylat_tetel declare @rakk kulcs declare @csz cikk_szam declare @cn cikk_nev declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @kedv kedvezmeny declare @szlertek egyseg_ar DECLARE @KSSZ bizonylat_szam DECLARE @mk varCHAR(10) set @tranznev='t_szall_szle_uj'+@kics set @ev= left(@dat,4) set @sznev=(select szall_nev from szallito where szall_kod=@szall) delete from wszbiz_kiv where kicsoda=@kics delete from wszbiz_ujkarton where kicsoda=@kics --------------------------- begin transaction @tranznev --------------------------- update szbiz_kiv set bdarab=darab where idoszak=@elszam and exists (select * from wszbiz_szlat where wszbiz_szlat.kicsoda=@kics and edarab=darab) insert into wszbiz_kiv SELECT dbo.szbiz_kiv.idoszak, dbo.szbiz_kiv.szallito, dbo.szbiz_kiv.cikk_szam, dbo.cikkek.CIKK_NEV, dbo.cikkek.AFA_KULCS, dbo.cikkek.MENNY_EGYS, dbo.szbiz_kiv.darab, dbo.szbiz_kiv.sorszam, dbo.szbiz_kiv.mozgaskod, dbo.szbiz_kiv.kbizszam, dbo.szbiz_kiv.ktetel, dbo.szbiz_kiv.bbizszam, dbo.szbiz_kiv.btetel, dbo.szbiz_kiv.bdarab, CASE dbo.szbiz_kiv.mozgaskod WHEN 'vevo_szle' THEN dbo.vevo_szlef.RAKTAR_KOD WHEN 'kivet' THEN dbo.kivetf.RAKTAR_K END AS raktar_k, 0, 0, @kics FROM dbo.cikkek INNER JOIN dbo.szbiz_kiv ON dbo.cikkek.CIKK_SZAM = dbo.szbiz_kiv.cikk_szam LEFT OUTER JOIN dbo.kivetf ON dbo.szbiz_kiv.kbizszam = dbo.kivetf.BIZSZAM LEFT OUTER JOIN dbo.vevo_szlef ON dbo.szbiz_kiv.kbizszam = dbo.vevo_szlef.BIZSZAM where idoszak=@elszam and szbiz_kiv.szallito=@szall --beirja az egységárakat, kedvezményeket update wszbiz_kiv set egyseg_ar=wszbiz_szlat.egyseg_ar, kedvezmeny=wszbiz_szlat.kedvezmeny from wszbiz_szlat where wszbiz_kiv.cikk_szam=wszbiz_szlat.cikk_szam and wszbiz_kiv.kicsoda=@kics and wszbiz_kiv.szallito=@szall -- a számla biz. száma set @kulcs = @ev + 'szall_szla' exec bizsorsz_no @kulcs, @szla_sorsz output --elkészíti a raktáronkénti szállítóleveleket --------------------------------------------- DECLARE cszbiz_nyug CURSOR for SELECT raktar_k FROM wszbiz_kiv WHERE idoszak=@elszam and szallito=@szall and bdarab<>0 group by raktar_k order by raktar_k open cszbiz_nyug; fetch next from cszbiz_nyug into @rakk while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN --elkészít egy raktárba egy szállítólevelet set @kulcs = @ev + 'szall_szle' exec bizsorsz_no @kulcs, @szle_sorsz output select @szlertek=isnull( SUM((bdarab * EGYSEG_AR) * (100 - kedvezmeny) * (100 - @vkedv) * (100 + afa_kulcs.afaertek) / 1000000) ,0) from wszbiz_kiv inner join afa_kulcs on afa_kulcs.afakulcs=wszbiz_kiv.afa_kulcs where kicsoda=@kics and wszbiz_kiv.raktar_k=@rakk insert into szall_szlef values(@szle_sorsz, '', @szla_sorsz, '', @szall, @sznev, @dat, @dat, @rakk, @pn, @kurz, @afamentes, @megj, @kics, dbo.mygetdatetime(), @vkedv, '', '', '', '', @okmanytip, @szlertek ) set @tet=0 DECLARE cszbiz_szlet scroll CURSOR for SELECT cikk_szam, cikk_nev, afa_kulcs, menny_egys, egyseg_ar, kedvezmeny, sum(bdarab) from wszbiz_kiv where kicsoda=@kics and wszbiz_kiv.raktar_k=@rakk group by cikk_szam, cikk_nev, afa_kulcs, menny_egys, egyseg_ar, kedvezmeny order by case dbo.xrBizTetRend() when 'cikk_szam' then cikk_szam else cikk_nev end open cszbiz_szlet; fetch next from cszbiz_szlet into @csz, @cn, @afa, @me, @ear, @kedv, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 set @_ear= @ear * @kurz * ((100 - @kedv)/100) * ((100-@vkedv)/100) insert into szall_szlet values( @szle_sorsz, @tet, @csz, @cn, @afa, @me, 1, @ear, @kedv, @db, @db, '', 0) --készlet rendezés set @kulcs = @ev +'karton'; exec bizsorsz_no @kulcs ,@kssz output set @db=round(@db,3); INSERT INTO KESZLET VALUES (@KSSZ, @rakk, @CSZ, @DB, 0, @_ear, '', 'vetel', @szle_sorsz, @TET, 1, 0, '', '') INSERT INTO MOZGAS VALUES ('vetel', @szle_sorsz, @TET, @KSSZ, @DB, @DB) insert into wszbiz_ujkarton values(@csz, @rakk, @kssz, @kics) END fetch next from cszbiz_szlet into @csz, @cn, @afa, @me, @ear, @kedv, @db end close cszbiz_szlet deallocate cszbiz_szlet END fetch next from cszbiz_nyug into @rakk end close cszbiz_nyug deallocate cszbiz_nyug --elkészíti a számlát --------------------- insert into szall_szlaf values(@szla_sorsz, @szlasz, @szall, @sznev, @dat, @szdat, @fmod, @fhat, @pn, @kurz, @vkedv, @afamentes, @megj, @kics, dbo.mygetdatetime(), '', '', '', '', @szlaertek, 0) --számla tételek ---------------- set @tet=0 DECLARE cszbiz_szlat CURSOR for SELECT cikk_szam, cikk_nev, afa_kulcs, menny_egys, egyseg_ar, kedvezmeny, sum(bdarab) from wszbiz_kiv where kicsoda=@kics group by cikk_szam, cikk_nev, afa_kulcs, menny_egys, egyseg_ar, kedvezmeny order by case dbo.xrBizTetRend() when 'cikk_szam' then cikk_szam else cikk_nev end open cszbiz_szlat; fetch next from cszbiz_szlat into @csz, @cn, @afa, @me, @ear, @kedv, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_szlat values( @szla_sorsz, @tet, @csz, @cn, @afa, @me, 1, @ear, @kedv, @db, @db, '', 0) update szbiz_kiv set bbizszam=@szla_sorsz, btetel=@tet, elszam_ar=@ear where idoszak=@elszam and szbiz_kiv.szallito=@szall and cikk_szam=@csz END fetch next from cszbiz_szlat into @csz, @cn, @afa, @me, @ear, @kedv, @db end close cszbiz_szlat deallocate cszbiz_szlat --átírja az eladások kartonjait a normál száll. levél kartonjaira ----------------------------------------------------------------- DECLARE cszbiz_kart CURSOR for SELECT cikk_szam, raktar_k, sorszam, mozgaskod, kbizszam, ktetel from wszbiz_kiv where kicsoda=@kics order by sorszam open cszbiz_kart; fetch next from cszbiz_kart into @csz, @rakk, @kssz, @mk, @szle_sorsz, @tet while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN update mozgas set sorszam=wszbiz_ujkarton.sorszam from wszbiz_ujkarton where mozgas.mozgaskod=@mk and mozgas.sorszam=@kssz and mozgas.bizszam=@szle_sorsz and mozgas.tetel=@tet and wszbiz_ujkarton.cikk_szam=@csz and wszbiz_ujkarton.raktar_k=@rakk and wszbiz_ujkarton.kicsoda=@kics END fetch next from cszbiz_kart into @csz, @rakk, @kssz, @mk, @szle_sorsz, @tet end close cszbiz_kart deallocate cszbiz_kart COMMIT transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_biz_szle_tor] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_szall_szle_tor'+@kics BEGIN TRANSACTION @tranznev exec szall_biz_szle_tor_notr @bsz, @kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_biz_szle_tor_notr] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @kssz bizonylat_szam declare @kedv numeric(18,5) declare @kurz kurzus declare @rakkod kulcs declare @sznev nev set @kulcs= left(@bsz,4)+'szbiz_szle' exec bizsorsz_no @kulcs, @sorsz output -- set @sznev=(select szall_nev from szallito where szall_kod=@szall) select @kedv=kedvezmeny from szbiz_szlef where bizszam=@bsz select @kurz=kurzus from szbiz_szlef where bizszam=@bsz select @rakkod=raktar_kod from szbiz_szlef where bizszam=@bsz insert into szbiz_szlef select @sorsz, hivszam, '', rendszam, szallito, szall_nev, telj_datum, bev_datum, raktar_kod, penznem, kurzus, afamentes, megjegyzes, @kics, dbo.mygetdatetime(), kedvezmeny,'', '1', @bsz, '', okmany_tip from szbiz_szlef where bizszam=@bsz update szbiz_szlef set torolt='1', tor_ssz=@sorsz where bizszam=@bsz DECLARE cszall_szlet CURSOR for SELECT tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, darab, rendel_bsz, rendel_tet FROM szbiz_szlet WHERE bizszam=@bsz order by tetel open cszall_szlet; fetch next from cszall_szlet into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN insert into szbiz_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, -@db, -@db, @renbsz, @rentet) set @_db=@db * @szorz set @_ear= @ear * @kurz * ((100 - @kedv)/100) / @szorz select @kssz=sorszam from keszlet where mozgaskod='bizom' and bizomanyos='1' and szamla_sz=@bsz and tetel=@tet update keszlet set darab=0 where mozgaskod='bizom' and bizomanyos='1' and szamla_sz=@bsz and tetel=@tet INSERT INTO MOZGAS VALUES ('bizom',@sorsz,@tet, @kssz, -@_db, -@_db); if len(rtrim(@renbsz)) >0 update szall_rent set darab = darab + @db where bizszam=@renbsz and tetel=@rentet END fetch next from cszall_szlet into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet end close cszall_szlet deallocate cszall_szlet end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_biz_szle_uj] @hsz bizonylat_szam, @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @pn penznem, @kurz kurzus, @kedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @egyraktarba char(1), @afamentes bit, @okmanytip char(1) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @erakkod kulcs set @tranznev='t_biz_szle_uj'+@kics BEGIN TRANSACTION @tranznev if @egyraktarba='1' begin exec szall_biz_szle_uj_egy @hsz, @szall, @dat, @bevdat, @rakkod, 0, @pn, @kurz, @kedv, @megj, @kics, @afamentes, @okmanytip end else begin DECLARE cszall_szlef CURSOR for SELECT cikkek.raktar_kod FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics group by cikkek.raktar_kod open cszall_szlef fetch next from cszall_szlef into @erakkod while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec szall_biz_szle_uj_egy @hsz, @szall, @dat, @bevdat, @rakkod, @erakkod, @pn, @kurz, @kedv, @megj, @kics, @afamentes END fetch next from cszall_szlef into @erakkod end close cszall_szlef deallocate cszall_szlef end DELETE from wszall_szlet where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_biz_szle_uj_egy] @hsz bizonylat_szam, @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @szrakkod kulcs, @pn penznem, @kurz kurzus, @vkedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @afamentes bit, @okmanytip char(1) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @etet bizonylat_tetel declare @kulcs varchar(20) declare @aru_szolg int declare @kedv kedvezmeny declare @cn cikk_nev declare @sznev nev set @sznev=(select szall_nev from szallito where szall_kod=@szall) set @tranznev='t_biz_szle_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szbiz_szle' exec bizsorsz_no @kulcs, @sorsz output insert into szbiz_szlef values(@sorsz, @hsz, '', '', @szall, @sznev, @dat, @bevdat, @rakkod, @pn, @kurz, @afamentes, @megj, @kics, dbo.mygetdatetime(), @vkedv, '', '', '', '', @okmanytip ) set @tet=0 DECLARE cszall_szlet CURSOR for SELECT tetel, wszall_szlet.cikk_szam, wszall_szlet.cikk_nev, wszall_szlet.afa_kulcs, wszall_szlet.menny_egys, wszall_szlet.szorzo, wszall_szlet.egyseg_ar, wszall_szlet.kedvezmeny, wszall_szlet.darab, wszall_szlet.rendel_bsz, wszall_szlet.rendel_tet, cikkek.aru_szolg FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics and (cikkek.raktar_kod = @rakkod or @szrakkod=0 or (cikkek.raktar_kod is null and (@rakkod = @szrakkod or @szrakkod=0) )) order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wszall_szlet.cikk_szam else wszall_szlet.cikk_nev end open cszall_szlet fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szbiz_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @db, @renbsz, @rentet) set @_db=@db * @szorz set @_ear= @ear * @kurz * ((100 - @kedv)/100) * ((100-@vkedv)/100) / @szorz if @aru_szolg=1 begin --exec karton_be @ev, 'vetel', @sorsz, @etet, @tet, @rakkod, @csz, @_db, @_ear, 0, 1, @kics exec karton_be @ev, 'bizom', @sorsz, @etet, @tet, @rakkod, @csz, @_db, @_ear, 0, 1, @kics end update cikkek set ut_besz_ar=@_ear where cikk_szam=@csz if len(rtrim(@renbsz)) >0 update szall_rent set darab = darab - @db where bizszam=@renbsz and tetel=@rentet END fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg end close cszall_szlet deallocate cszall_szlet /* Végigmegy a rendeléseken, és aktualizálja a rendelések állapotát */ DECLARE cszall_szl_ren SCROLL CURSOR FOR select rendel_bsz from wszall_szlet where kicsoda=@kics and len(rtrim(rendel_bsz))>0 group by rendel_bsz OPEN cszall_szl_ren FETCH NEXT FROM cszall_szl_ren INTO @renbsz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec szall_ren_allapot_akt @renbsz END FETCH NEXT FROM cszall_szl_ren INTO @renbsz END CLOSE cszall_szl_ren DEALLOCATE cszall_szl_ren end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_biz_szle_visszaru] @hsz bizonylat_szam, @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @pn penznem, @kurz kurzus, @vkedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @afamentes bit, @okmanytip char(1) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @etet bizonylat_tetel declare @kulcs varchar(20) declare @aru_szolg int declare @kedv kedvezmeny declare @mar mennyiseg declare @kdb mennyiseg declare @kidb mennyiseg declare @kssz bizonylat_szam declare @cn cikk_nev declare @sznev nev set @sznev=(select szall_nev from szallito where szall_kod=@szall) set @tranznev='t_szall_szle_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szbiz_szle' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into szbiz_szlef values(@sorsz, @hsz, '', '', @szall, @sznev, @dat, @bevdat, @rakkod, @pn, @kurz, @afamentes, @megj, @kics, dbo.mygetdatetime(), @vkedv, '', '', '', '1', @okmanytip ) set @tet=0 DECLARE cszall_szlet CURSOR for SELECT tetel, wszall_szlet.cikk_szam, wszall_szlet.cikk_nev, wszall_szlet.afa_kulcs, wszall_szlet.menny_egys, wszall_szlet.szorzo, wszall_szlet.egyseg_ar, wszall_szlet.kedvezmeny, wszall_szlet.darab, wszall_szlet.rendel_bsz, wszall_szlet.rendel_tet, cikkek.aru_szolg FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wszall_szlet.cikk_szam else wszall_szlet.cikk_nev end open cszall_szlet fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szbiz_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, -@db, -@db, @renbsz, @rentet) if @aru_szolg=1 begin set @_db=@db * @szorz set @mar=@_db DECLARE cKarton_bizom CURSOR for SELECT SORSZAM, DARAB FROM KESZLET WHERE DARAB>0.0009 AND mozgaskod='bizom' and bizomanyos='1' and szamla_sz=@renbsz and tetel=@rentet for update -- lockolás Select count(*) FROM KESZLET (holdlock) WHERE DARAB>0.0009 AND mozgaskod='bizom' and bizomanyos='1' and szamla_sz=@renbsz and tetel=@rentet open cKarton_bizom fetch next from cKarton_bizom into @kssz,@kdb while (@@FETCH_STATUS <> -1) and @maR > 0 begin IF (@@FETCH_STATUS <> -2) BEGIN if @kdb>@mar set @kidb=round(- @mar,3) else set @kidb=round(- @kdb,3) update KESZLET set darab=round(@kdb + @kidb,3) where current of cKarton_bizom update mozgas set darab=darab+@kidb where sorszam=@kssz and bizszam=@renbsz and tetel=@rentet INSERT INTO MOZGAS VALUES ('bizom',@sorsz,@tet, @kssz, @kiDB, @kiDB) set @mar=round(@mar + @kidb,3) END fetch next from cKarton_bizom into @kssz,@kdb end close cKarton_bizom deallocate cKarton_bizom end if len(rtrim(@renbsz)) >0 update szbiz_szlet set darab = darab - @db where bizszam=@renbsz and tetel=@rentet END fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg END CLOSE cszall_szlet DEALLOCATE cszall_szlet delete from wszall_szlet where kicsoda= @kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_ren_allapot_akt] @ren_bsz bizonylat_szam WITH RECOMPILE AS begin SET NOCOUNT ON declare @mennyi as int select @mennyi=count(*) from szall_rent where bizszam=@ren_bsz and darab<>0 if @mennyi=0 update szall_renf set allapot='teljesült' where bizszam=@ren_bsz else begin select @mennyi=count(*) from szall_rent where bizszam=@ren_bsz and darab0 update szall_renf set allapot='hátralékos' where bizszam=@ren_bsz else update szall_renf set allapot='rögzített' where bizszam=@ren_bsz end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_ren_allapot_akt_log] @bsz bizonylat_szam AS begin SET NOCOUNT ON declare @mennyi as int declare @ren_bsz as bizonylat_szam DECLARE cszall_szl_ren SCROLL CURSOR FOR select rendel_bsz from szall_szlet where bizszam=@bsz OPEN cszall_szl_ren FETCH NEXT FROM cszall_szl_ren INTO @ren_bsz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @mennyi=count(*) from szall_rent where bizszam=@ren_bsz and darab<>0 if @mennyi=0 update szall_renf set allapot='teljesült' where bizszam=@ren_bsz else begin select @mennyi=count(*) from szall_rent where bizszam=@ren_bsz and darab0 update szall_renf set allapot='hátralékos' where bizszam=@ren_bsz else update szall_renf set allapot='rögzített' where bizszam=@ren_bsz end END FETCH NEXT FROM cszall_szl_ren INTO @ren_bsz END CLOSE cszall_szl_ren DEALLOCATE cszall_szl_ren end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_ren_mod] @sorsz bizonylat_szam, @szdat datum, @okedv kedvezmeny, @pn penznem, @megj varchar(512), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @edb mennyiseg declare @db mennyiseg set @tranznev='t_szall_ren_uj'+@kics BEGIN TRANSACTION @tranznev update szall_renf set kicsoda=@kics, modositva=dbo.mygetdatetime(), szall_dat=@szdat, kedvezmeny=@okedv, penznem=@pn, megjegyzes=@megj where bizszam=@sorsz delete from szall_rent where bizszam=@sorsz set @tet=0 DECLARE cszall_ren CURSOR for SELECT cikk_szam,vcikkszam, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, edarab, darab FROM wszall_rent WHERE kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end open cszall_ren; fetch next from cszall_ren into @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @edb, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_rent values( @sorsz, @tet, @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @edb, @db) END fetch next from cszall_ren into @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @edb, @db end close cszall_ren deallocate cszall_ren exec szall_ren_allapot_akt @sorsz DELETE from wszall_rent where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_ren_uj] @szall kulcs, @dat datum, @szdat datum, @rakkod kulcs, @pn penznem, @vokedv kedvezmeny, @megj varchar(512), @ugylet varchar(20), @ament char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_szall_ren_uj'+@kics BEGIN TRANSACTION @tranznev exec szall_ren_uj_tran_nelkul @szall, @dat, @szdat, @rakkod, @pn, @vokedv, @megj, @ugylet, @ament, @kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_ren_uj_tran_nelkul] @szall kulcs, @dat datum, @szdat datum, @rakkod kulcs, @pn penznem, @vokedv kedvezmeny, @megj varchar(512), @ugylet varchar(20), @ament char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @db mennyiseg declare @kulcs varchar(20) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @ev= left(@dat,4) set @kulcs = @ev + 'szall_ren' exec bizsorsz_no @kulcs, @sorsz output insert into szall_renf values(@sorsz, @szall, @dat, @szdat, @rakkod, @pn, @vokedv, 'rögzített', @megj, @ament, @kics, dbo.mygetdatetime() ) set @tet=0 DECLARE cszall_ren CURSOR for SELECT cikk_szam,vcikkszam, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, darab FROM wszall_rent WHERE kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end open cszall_ren; fetch next from cszall_ren into @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_rent values( @sorsz, @tet, @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db, @db) END fetch next from cszall_ren into @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db end close cszall_ren deallocate cszall_ren DELETE from wszall_rent where kicsoda=@kics if len(rtrim(@ugylet))>0 insert into ugyletek values(@sorsz, @ugylet, 'szall_rendeles') SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_ren_vevo_renbol] @szall kulcs, @vevo kulcs, @kdat datum, @vdat datum, @szdat datum, @rakkod kulcs, @mit int, @egyszall int, @rendszall kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @pn penznem declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @db mennyiseg declare @kulcs varchar(20) set @tranznev='t_szall_ren_vevo_ren'+@kics BEGIN TRANSACTION @tranznev delete from wgyujtes where kicsoda=@kics delete from wszall_rent where kicsoda=@kics if @egyszall=1 --alapértelmezett szállító begin if @mit=1 --csak a rendeléses termékek begin insert into wgyujtes (szall_kod,cikk_szam,afa_kulcs,menny_egys,darab2,darab1,csopnev,kicsoda) SELECT cikkek.SZALLITO, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, SUM(vevo_rent.EDARAB) AS edarab, cikkek.VCIKKSZAM, @kics FROM vevo_renf INNER JOIN vevo_rent ON vevo_renf.BIZSZAM = vevo_rent.BIZSZAM INNER JOIN cikkek ON vevo_rent.CIKK_SZAM = cikkek.CIKK_SZAM where cikkek.allando='2' and cikkek.SZALLITO<>0 and vevo_renf.rend_dat>=@kdat and vevo_renf.rend_dat<=@vdat and (@szall=0 or (@szall<>0 and cikkek.SZALLITO=@szall)) and (@vevo=0 or (@vevo<>0 and vevo=@vevo)) GROUP BY cikkek.SZALLITO, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, cikkek.VCIKKSZAM end else --összes termék begin insert into wgyujtes (szall_kod,cikk_szam,afa_kulcs,menny_egys,darab2,darab1,csopnev,kicsoda) SELECT cikkek.SZALLITO, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, SUM(vevo_rent.EDARAB) AS edarab, cikkek.VCIKKSZAM, @kics FROM vevo_renf INNER JOIN vevo_rent ON vevo_renf.BIZSZAM = vevo_rent.BIZSZAM INNER JOIN cikkek ON vevo_rent.CIKK_SZAM = cikkek.CIKK_SZAM where cikkek.SZALLITO<>0 and vevo_renf.rend_dat>=@kdat and vevo_renf.rend_dat<=@vdat and (@szall=0 or (@szall<>0 and cikkek.SZALLITO=@szall)) and (@vevo=0 or (@vevo<>0 and vevo=@vevo)) GROUP BY cikkek.SZALLITO, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, cikkek.VCIKKSZAM end end else --egy adott szállító begin if @mit=1 --csak a rendeléses termékek begin insert into wgyujtes (szall_kod,cikk_szam,afa_kulcs,menny_egys,darab2,darab1,csopnev,kicsoda) SELECT @rendszall, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, SUM(vevo_rent.EDARAB) AS edarab, cikkek.VCIKKSZAM, @kics FROM vevo_renf INNER JOIN vevo_rent ON vevo_renf.BIZSZAM = vevo_rent.BIZSZAM INNER JOIN cikkek ON vevo_rent.CIKK_SZAM = cikkek.CIKK_SZAM where cikkek.allando='2' and cikkek.SZALLITO<>0 and vevo_renf.rend_dat>=@kdat and vevo_renf.rend_dat<=@vdat and (@szall=0 or (@szall<>0 and cikkek.SZALLITO=@szall)) and (@vevo=0 or (@vevo<>0 and vevo=@vevo)) GROUP BY vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, cikkek.VCIKKSZAM end else --ósszes termék begin insert into wgyujtes (szall_kod,cikk_szam,afa_kulcs,menny_egys,darab2,darab1,csopnev,kicsoda) SELECT @rendszall, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, SUM(vevo_rent.EDARAB) AS edarab, cikkek.VCIKKSZAM, @kics FROM vevo_renf INNER JOIN vevo_rent ON vevo_renf.BIZSZAM = vevo_rent.BIZSZAM INNER JOIN cikkek ON vevo_rent.CIKK_SZAM = cikkek.CIKK_SZAM where cikkek.SZALLITO<>0 and vevo_renf.rend_dat>=@kdat and vevo_renf.rend_dat<=@vdat and (@szall=0 or (@szall<>0 and cikkek.SZALLITO=@szall)) and (@vevo=0 or (@vevo<>0 and vevo=@vevo)) GROUP BY vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, cikkek.VCIKKSZAM end end /* insert into wgyujtes (szall_kod,cikk_szam,afa_kulcs,menny_egys,darab2,darab1,csopnev,kicsoda) SELECT cikkek.SZALLITO, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, SUM(vevo_rent.EDARAB) AS edarab, cikkek.VCIKKSZAM,@kics FROM vevo_renf INNER JOIN vevo_rent ON vevo_renf.BIZSZAM = vevo_rent.BIZSZAM INNER JOIN cikkek ON vevo_rent.CIKK_SZAM = cikkek.CIKK_SZAM where cikkek.allando='2' and cikkek.SZALLITO<>0 and vevo_renf.rend_dat>=@kdat and vevo_renf.rend_dat<=@vdat and (@szall=0 or (@szall<>0 and cikkek.SZALLITO=@szall)) and (@vevo=0 or (@vevo<>0 and vevo=@vevo)) GROUP BY cikkek.SZALLITO, vevo_rent.CIKK_SZAM, vevo_rent.afa_kulcs, vevo_rent.MENNY_EGYS, vevo_rent.SZORZO, cikkek.VCIKKSZAM */ update wgyujtes set egyseg_ar1= (select netto_ar from dbo.TermekBeszAraAdottDat( wgyujtes.cikk_szam, @szdat) ) , egyseg_ar2= (select kedvezmeny from dbo.TermekBeszAraAdottDat( wgyujtes.cikk_szam, @szdat) ) , cikkcsop= (select penznem from dbo.TermekBeszAraAdottDat( wgyujtes.cikk_szam, @szdat) ) , gyarto_nev= (select akcio from dbo.TermekBeszAraAdottDat( wgyujtes.cikk_szam, @szdat) ) where kicsoda=@kics DECLARE cszall CURSOR for SELECT szall_kod,cikkcsop FROM wgyujtes WHERE kicsoda=@kics group by szall_kod,cikkcsop open cszall; fetch next from cszall into @szall,@pn while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=0 DECLARE cszall_tet CURSOR for SELECT cikk_szam,csopnev,afa_kulcs,menny_egys,darab2,isnull(egyseg_ar1,0),isnull(egyseg_ar2,0), darab1 FROM wgyujtes WHERE kicsoda=@kics and szall_kod=@szall open cszall_tet; fetch next from cszall_tet into @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into wszall_rent values( 0, @tet, @vcsz, @csz, '', @afa, @me, @szorz, @ear, @kedv, @db, @db, @kics) END fetch next from cszall_tet into @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db end close cszall_tet deallocate cszall_tet exec szall_ren_uj_tran_nelkul @szall, @szdat, @szdat, @rakkod, @pn, 0, '', '', '0', @kics END fetch next from cszall into @szall,@pn end close cszall deallocate cszall COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_rend_torol] @sorsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(40) set @tranznev='t_szall_rend_tor'+@kics BEGIN TRANSACTION @tranznev insert into szall_renf_torol select * from szall_renf where bizszam=@sorsz insert into szall_rent_torol select * from szall_rent where bizszam=@sorsz delete from szall_rent where bizszam=@sorsz delete from szall_renf where bizszam=@sorsz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_rend_vegyesen] @ugylet varchar(20), @vdat datum, @szdat datum, @szallcim kulcs, @pn penznem, @megj varchar(512), @ament char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @db mennyiseg declare @kulcs varchar(20) declare @cn cikk_nev declare @pn1 penznem declare @szall kulcs set @tranznev='t_szall_ren_vevo_ren'+@kics BEGIN TRANSACTION @tranznev delete from wszall_rent where kicsoda=@kics DECLARE cszall CURSOR for SELECT szallito,penznem FROM wszall_rentv WHERE kicsoda=@kics group by szallito,penznem open cszall; fetch next from cszall into @szall, @pn1 while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN delete from wszall_rent where kicsoda=@kics set @tet=0 DECLARE cszall_tet CURSOR for SELECT cikk_szam,cikk_nev,vcikkszam,afa_kulcs,menny_egys,szorzo,egyseg_ar,kedvezmeny, darab FROM wszall_rentv WHERE kicsoda=@kics and szallito=@szall order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end open cszall_tet; fetch next from cszall_tet into @csz, @cn, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into wszall_rent values( 0, @tet, @vcsz, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @db, @kics) END fetch next from cszall_tet into @csz, @cn, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db end close cszall_tet deallocate cszall_tet exec szall_ren_uj_tran_nelkul @szall, @vdat, @szdat, @szallcim, @pn1, 0, @megj, @ugylet, @ament, @kics END fetch next from cszall into @szall, @pn1 end close cszall deallocate cszall COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_rendeles_uj] @szall kulcs, @dat datum, @szdat datum, @rakkod kulcs, @pn penznem, @vokedv kedvezmeny, @megj varchar(512), @ament char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @db mennyiseg declare @kulcs varchar(20) set @tranznev='t_szall_ren_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szall_ren' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into szall_renf values(@sorsz, @szall, @dat, @szdat, @rakkod, @pn, @vokedv, 'rögzített', @megj, @ament, @kics, dbo.mygetdatetime() ) set @tet=0 set @vcsz='' set @kedv=0 DECLARE cszall_ren CURSOR for SELECT cikk_szam, afa_kulcs, menny_egys, szorzo, egyseg_ar, darab FROM wszall_rend_jav WHERE kicsoda=@kics and edarab<>0 order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end open cszall_ren; fetch next from cszall_ren into @csz, @afa, @me, @szorz, @ear, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_rent values( @sorsz, @tet, @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db, @db) END fetch next from cszall_ren into @csz, @afa, @me, @szorz, @ear, @db end close cszall_ren deallocate cszall_ren DELETE from wszall_rend_jav where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_rendeles_uj_jav1] @dat datum, @szdat datum, @rakkod kulcs, @pn penznem, @vokedv kedvezmeny, @megj varchar(512), @ament char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @db mennyiseg declare @kulcs varchar(20) declare @szall kulcs set @tranznev='t_szall_ren_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szall_ren' BEGIN TRANSACTION @tranznev DECLARE c1 CURSOR for SELECT cikkek.szallito FROM wszall_rend_jav inner join cikkek on cikkek.cikk_szam=wszall_rend_jav.cikk_szam WHERE kicsoda=@kics and edarab<>0 group by cikkek.szallito open c1; fetch next from c1 into @szall while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs, @sorsz output insert into szall_renf values(@sorsz, @szall, @dat, @szdat, @rakkod, @pn, @vokedv, 'rögzített', @megj, @ament, @kics, dbo.mygetdatetime() ) set @tet=0 set @vcsz='' set @kedv=0 DECLARE cszall_ren CURSOR for SELECT wszall_rend_jav.cikk_szam, wszall_rend_jav.afa_kulcs, wszall_rend_jav.menny_egys, szorzo, egyseg_ar, darab FROM wszall_rend_jav inner join cikkek on cikkek.cikk_szam=wszall_rend_jav.cikk_szam WHERE kicsoda=@kics and edarab<>0 and cikkek.szallito=@szall order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wszall_rend_jav.cikk_szam else wszall_rend_jav.cikk_nev end open cszall_ren; fetch next from cszall_ren into @csz, @afa, @me, @szorz, @ear, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_rent values( @sorsz, @tet, @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db, @db) END fetch next from cszall_ren into @csz, @afa, @me, @szorz, @ear, @db end close cszall_ren deallocate cszall_ren END fetch next from c1 into @szall end close c1 deallocate c1 DELETE from wszall_rend_jav where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_rendeles_uj_jav3] @szall kulcs, @dat datum, @szdat datum, @rakkod kulcs, @pn penznem, @ament char(1), @megj varchar(512), @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @vcsz varchar(20) declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @db mennyiseg declare @kulcs varchar(20) set @tranznev='t_szall_ren_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szall_ren' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into szall_renf values(@sorsz, @szall, @dat, @szdat, @rakkod, @pn, 0, 'rögzített', @megj, @ament, @kics, dbo.mygetdatetime() ) set @tet=0 set @vcsz='' set @kedv=0 DECLARE cszall_ren CURSOR for SELECT cikk_szam, afa_kulcs, menny_egys, szorzo, egyseg_ar, darab FROM wszall_rend_jav3 WHERE kicsoda=@kics and darab<>0 order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end open cszall_ren fetch next from cszall_ren into @csz, @afa, @me, @szorz, @ear, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_rent values( @sorsz, @tet, @csz, @vcsz, @afa, @me, @szorz, @ear, @kedv, @db, @db) END fetch next from cszall_ren into @csz, @afa, @me, @szorz, @ear, @db end close cszall_ren deallocate cszall_ren DELETE from wszall_rend_jav3 where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_rent_feltolt] @bizsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wszall_rent where kicsoda=@kics insert into wszall_rent select bizszam, szall_rent.tetel, cikkek.vcikkszam, szall_rent.cikk_szam, cikkek.cikk_nev, szall_rent.afa_kulcs, szall_rent.menny_egys, szall_rent.szorzo, szall_rent.egyseg_ar, szall_rent.kedvezmeny, szall_rent.edarab, szall_rent.darab, @kics from szall_rent inner join cikkek on szall_rent.cikk_szam = cikkek.cikk_szam where bizszam=@bizsz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szla_tor] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_szall_szla_tor'+@kics BEGIN TRANSACTION @tranznev exec szall_szla_tor_notr @bsz, @kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szla_tor_notr] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @kedv kedvezmeny declare @kurz kurzus declare @rakkod kulcs declare @szlszam bizonylat_szam declare @cn cikk_nev declare @sznev nev set @kulcs= left(@bsz,4)+'szall_szla' exec bizsorsz_no @kulcs, @sorsz output insert into szall_szlaf select @sorsz, kulsoszlasz, szallito, szall_nev, telj_datum, szla_datum, fiz_modja, fiz_esed, penznem, kurzus, kedvezmeny, afamentes, megjegyzes, @kics, dbo.mygetdatetime(), '', '1', @bsz, '', -brutto_ertek,0 from szall_szlaf where bizszam=@bsz update szall_szlaf set torolt='1', tor_ssz=@sorsz where bizszam=@bsz DECLARE cszall_szlat CURSOR for SELECT tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, darab, rendel_bsz, rendel_tet FROM szall_szlat WHERE bizszam=@bsz order by tetel open cszall_szlat; fetch next from cszall_szlat into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN insert into szall_szlat values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, -@db, -@db, @renbsz, @rentet) insert into szall_szlat_td select @sorsz, @tet, E1,E2 from szall_szlat_td where bizszam = @bsz and Tetel = @tet END fetch next from cszall_szlat into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet end close cszall_szlat deallocate cszall_szlat select @szlszam=bizszam from szall_szlef where szlaszam=@bsz exec szall_szle_tor_notr @szlszam, @kics update szall_szlef set szlaszam=@sorsz where tor_ssz=@szlszam and torlo='1' end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szla_tor_szlev_nelkul] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @kedv kedvezmeny declare @kurz kurzus declare @rakkod kulcs declare @szlszam bizonylat_szam declare @cn cikk_nev declare @sznev nev set @kulcs= left(@bsz,4)+'szall_szla' exec bizsorsz_no @kulcs, @sorsz output insert into szall_szlaf select @sorsz, kulsoszlasz, szallito, szall_nev, telj_datum, szla_datum, fiz_modja, fiz_esed, penznem, kurzus, kedvezmeny, afamentes, megjegyzes, @kics, dbo.mygetdatetime(), '', '1', @bsz, '', -brutto_ertek, 0 from szall_szlaf where bizszam=@bsz update szall_szlaf set torolt='1', tor_ssz=@sorsz where bizszam=@bsz DECLARE cszall_szlat CURSOR for SELECT tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, darab, rendel_bsz, rendel_tet FROM szall_szlat WHERE bizszam=@bsz order by tetel open cszall_szlat; fetch next from cszall_szlat into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN insert into szall_szlat values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, -@db, -@db, @renbsz, @rentet) insert into szall_szlat_td select @sorsz, @tet, E1,E2 from szall_szlat_td where bizszam = @bsz and Tetel = @tet END fetch next from cszall_szlat into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet end close cszall_szlat deallocate cszall_szlat /* select @szlszam=bizszam from szall_szlef where szlaszam=@bsz exec szall_szle_tor_notr @szlszam, @kics update szall_szlef set szlaszam=@sorsz where tor_ssz=@szlszam and torlo='1' */ update szall_szlef set szlaszam='' where szlaszam=@bsz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szla_uj] @hsz varchar(50), @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @pn penznem, @kurz kurzus, @kedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @egyraktarba char(1), @afamentes bit, @szdat datum, @fmod char(1), @fhat datum, @okmanytip char(1), @belep_dat datum, @vam_dat datum, @vam_okm char(15), @szlaertek egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @utmod as varchar(20) declare @sorsz bizonylat_szam declare @ev char(4) declare @kulcs varchar(20) declare @cn cikk_nev declare @sznev nev SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @sznev=(select szall_nev from szallito where szall_kod=@szall) set @tranznev='t_szall_szle_uj'+@kics set @ev= left(@dat,4) BEGIN TRANSACTION @tranznev delete from wszall_szlet where kicsoda=@kics insert into wszall_szlet select * from wszall_szlat where kicsoda=@kics select @utmod=isnull(max(modositva),'1900') from szall_szlef where kicsoda=@kics --száll. levél(ek) elkészítése exec szall_szle_uj_tranz_nelkul @hsz, @szall, @dat, @bevdat, @rakkod, @pn, @kurz, @kedv, @megj, @kics, @egyraktarba, @afamentes, @okmanytip, @belep_dat, @vam_dat, @vam_okm, @szlaertek --számla rögzítése set @kulcs = @ev + 'szall_szla' exec bizsorsz_no @kulcs, @sorsz output insert into szall_szlaf values( @sorsz, @hsz, @szall, @sznev, @dat, @szdat, @fmod, @fhat, @pn, @kurz, @kedv, @afamentes, @megj, @kics, dbo.mygetdatetime(), '', '', '', '', @szlaertek, 0) insert into szall_szlat select @sorsz, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, edarab, darab, rendel_bsz, rendel_tet from wszall_szlat where kicsoda=@kics if (select count(*) from wszall_szlat_td where kicsoda=@kics)>0 insert into szall_szlat_td select @sorsz, tetel,E1,E2 from wszall_szlat_td where kicsoda=@kics update szall_szlef set szlaszam=@sorsz where kicsoda=@kics and modositva>@utmod insert into szall_szla_afa select @sorsz,afa_kulcs,netto,afa,brutto,fizetendo from wszall_szla_afa where kicsoda=@kics delete from wszall_szlat where kicsoda=@kics delete from wszall_szlat_td where kicsoda=@kics delete from wszall_szla_afa where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szle_koz_nyug] @kulso_ssz varchar(50), @szall kulcs, @szdat datum, @tdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @megj megjegyzes, @kics kicsoda, @szlaertek egyseg_ar WITH RECOMPILE AS Begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @ssz bizonylat_szam declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @vkedv kedvezmeny declare @edb mennyiseg declare @db mennyiseg declare @afak afakulcs declare @tet bizonylat_tetel declare @szlevtet bizonylat_tetel declare @r_bsz bizonylat_szam declare @r_tet bizonylat_tetel declare @afa afakulcs declare @tmegj megjegyzes declare @kulcs varchar(20) declare @cn cikk_nev declare @sznev nev declare @fiz egyseg_ar set @sznev=(select szall_nev from szallito where szall_kod=@szall) set @tet=0 if (select count(*) from wszall_koz_nyug where jeloles='*' and kicsoda=@kics) >0 begin set @tranznev='t_szall_szle_knyug'+@kics set @ev= left(@tdat,4) set @kulcs = left(@szdat,4) + 'szall_szla' select @fiz=fizetendo from wszall_szla_afa where kicsoda=@kics select @vkedv=kedvezmeny from szall_szlef where bizszam in (select bizszam from wszall_koz_nyug where jeloles='*' and kicsoda=@kics) --begin tran BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into szall_szlaf values( @sorsz, @kulso_ssz, @szall, @sznev, @tdat, @szdat, @fmod, @fhat, @pn, @kurz, @vkedv, --vég. kedv. 0, @megj, @kics, dbo.mygetdatetime(), '', '', '', '', @fiz, 0 ) --beirom a szallitolevelre, hogy nyugtazott, es a munkaba betoltom a szall. lev teteleit DECLARE kszall_szla_knyf SCROLL CURSOR FOR select bizszam from wszall_koz_nyug where jeloles='*' and kicsoda=@kics OPEN kszall_szla_knyf FETCH NEXT FROM kszall_szla_knyf INTO @ssz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN update szall_szlef set szlaszam=@sorsz where bizszam=@ssz if dbo.xrfuggveny('Szallszalllevhsz')='1' update szall_szlef set hivszam=@kulso_ssz where bizszam=@ssz DECLARE kszall_szla_knyt SCROLL CURSOR FOR select tetel,cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, rendel_bsz, rendel_tet from szall_szlet where bizszam=@ssz order by tetel OPEN kszall_szla_knyt FETCH NEXT FROM kszall_szla_knyt INTO @szlevtet, @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @r_bsz, @r_tet WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @tet = @tet + 1 insert into szall_szlat values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @edb, @db, @r_bsz, @r_tet ) insert into szall_szlat_td select @sorsz, @tet,E1, E2 from szall_szlet_td where bizszam = @ssz and Tetel = @szlevtet END FETCH NEXT FROM kszall_szla_knyt INTO @szlevtet, @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @r_bsz, @r_tet END CLOSE kszall_szla_knyt DEALLOCATE kszall_szla_knyt update keszlet set nyugtazva=1 where mozgaskod='vetel' and szamla_sz=@ssz update keszlet set egyseg_ar = szall_szlet.egyseg_ar*@kurz*(100-kedvezmeny)*(100-@vkedv)/(szorzo * 10000) from szall_szlet where keszlet.szamla_sz=szall_szlet.bizszam and keszlet.tetel=szall_szlet.tetel and keszlet.mozgaskod='vetel' and szamla_sz=@ssz and szall_szlet.bizszam=@ssz END FETCH NEXT FROM kszall_szla_knyf INTO @ssz END CLOSE kszall_szla_knyf DEALLOCATE kszall_szla_knyf insert into szall_szla_afa select @sorsz, afa_kulcs, netto, afa, brutto, fizetendo from wszall_szla_afa where kicsoda=@kics delete from wszall_szla_afa where kicsoda=@kics COMMIT TRANSACTION @tranznev end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szle_mod_tetel] @sorsz bizonylat_szam, @tetel bizonylat_tetel, @edb mennyiseg, @db mennyiseg, --+ növel, - csökkent @ear egyseg_ar, @csz cikk_szam, @aru_szolg int, @rakk kulcs, @kics kicsoda AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kdb mennyiseg declare @mdb mennyiseg declare @kxdb mennyiseg declare @mxdb mennyiseg declare @dif_db mennyiseg declare @ki_db mennyiseg declare @ssz bizonylat_szam declare @ev char(4) set @tranznev='t_szall_szle_mod'+@kics set @ev=LEFT(@sorsz,4) BEGIN TRANSACTION @tranznev --print '@db '+str(@db,10,0) if @db=0 --tétel törlése ellen. hogy lehet-e!!!! begin --print 'tétel töröl ' delete from wszall_keszlet where kicsoda=@kics insert into wszall_keszlet select '',0,sorszam,0,@kics from mozgas where bizszam=@sorsz and mozgas.tetel=@tetel and mozgas.mozgaskod='vetel' delete from mozgas where bizszam=@sorsz and mozgas.tetel=@tetel and mozgas.mozgaskod='vetel' update mozgas set tetel=tetel - 1 where bizszam=@sorsz and mozgas.tetel > @tetel and mozgas.mozgaskod='vetel' delete from keszlet where sorszam in (select sorszam from wszall_keszlet where kicsoda=@kics) update keszlet set tetel=tetel - 1 where szamla_sz=@sorsz and tetel > @tetel delete from wszall_keszlet where kicsoda=@kics end else begin if @db<0 --csökkentés begin --print 'tétel csökkent ' select @mxdb=SUM(mozgas.darab), @kxdb=SUM(keszlet.darab) from mozgas inner join keszlet on mozgas.SORSZAM=keszlet.sorszam where bizszam=@sorsz and mozgas.mozgaskod='vetel' and mozgas.tetel=@tetel set @dif_db=abs(@db) --print '@mxdb '+str(@mxdb,10,3)+' @kxdb '+str(@kxdb,10,3)+' '+' @dif_db '+str(@dif_db,10,3) if @dif_db<=@kxdb begin delete from wszall_keszlet where kicsoda=@kics DECLARE kvevo_szle SCROLL CURSOR FOR select mozgas.darab, keszlet.darab, keszlet.sorszam from mozgas inner join keszlet on mozgas.SORSZAM=keszlet.sorszam where bizszam=@sorsz and mozgas.mozgaskod='vetel' and mozgas.tetel=@tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @mdb, @kdb, @ssz WHILE (@@FETCH_STATUS <> -1) and @dif_db>0 BEGIN IF (@@FETCH_STATUS <> -2) BEGIN --print str(@mdb,10,3)+' '+str(@kdb,10,3)+' '+@ssz+' @dif_db '+str(@dif_db,10,3) if @mdb>=@kdb --csak ha a mozgás több mint a készlet begin if @dif_db < @kdb set @ki_db=@dif_db else set @ki_db=@kdb --print str(@mdb,10,3)+' '+str(@kdb,10,3)+' '+@ssz+' @dif_db '+str(@dif_db,10,3)+' @ki_db '+str(@ki_db,10,3) insert into wszall_keszlet values(@sorsz,@tetel,@ssz,@ki_db,@kics) set @dif_db=@dif_db - @ki_db end END FETCH NEXT FROM kvevo_szle INTO @mdb, @kdb, @ssz END CLOSE kvevo_szle DEALLOCATE kvevo_szle update keszlet set edarab=edarab - (select DARAB from wszall_keszlet where kicsoda=@kics and wszall_keszlet.sorszam=keszlet.sorszam) where sorszam in (select sorszam from wszall_keszlet where kicsoda=@kics) update keszlet set darab=darab - (select DARAB from wszall_keszlet where kicsoda=@kics and wszall_keszlet.sorszam=keszlet.sorszam) where sorszam in (select sorszam from wszall_keszlet where kicsoda=@kics) update mozgas set darab=darab - (select DARAB from wszall_keszlet where kicsoda=@kics and wszall_keszlet.sorszam=mozgas.sorszam) where sorszam in (select sorszam from wszall_keszlet where kicsoda=@kics) and bizszam=@sorsz and tetel=@tetel and mozgaskod='vetel' update mozgas set edarab=edarab - (select DARAB from wszall_keszlet where kicsoda=@kics and wszall_keszlet.sorszam=mozgas.sorszam) where sorszam in (select sorszam from wszall_keszlet where kicsoda=@kics) and bizszam=@sorsz and tetel=@tetel and mozgaskod='vetel' --delete from wszall_keszlet where kicsoda=@kics end end else begin --növelés --print 'tétel növel ' select @ssz=isnull(keszlet.sorszam,'') from mozgas inner join keszlet on mozgas.SORSZAM=keszlet.sorszam where bizszam=@sorsz and mozgas.mozgaskod='vetel' and mozgas.tetel=@tetel set @ssz=isnull(@ssz,'') --print '@ssz'+isnull(@ssz,'null') if len(@ssz)=0 --új tétel begin if @aru_szolg='1' begin --print 'karton be'+@ssz exec karton_be @ev, 'vetel', @sorsz, @tetel, @tetel, @rakk, @csz, @db, @ear, 0, 0, @kics update cikkek set ut_besz_ar=@ear where cikk_szam=@csz end end else begin -- módosítás növelés --print 'keszlet-mozgas akt'+@ssz update keszlet set edarab=edarab + @db, darab=darab + @db where sorszam=@ssz update mozgas set edarab=edarab + @db, darab=darab + @db where sorszam=@ssz and bizszam=@sorsz and mozgas.mozgaskod='vetel' and mozgas.tetel=@tetel end end end COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szle_nyug] @ssz bizonylat_szam, @szlasz varchar(50), @tdat datum, @szdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @kedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @szlaertek egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @ekurz kurzus declare @kulcs varchar(20) set @tranznev='t_szal_szle_ny'+@kics set @ev= left(@szdat,4) set @kulcs = @ev + 'szall_szla' BEGIN TRANSACTION @tranznev exec szall_szle_nyug_tranz_nelkul @ssz, @szlasz, @tdat, @szdat, @fmod, @fhat, @pn, @kurz, @kedv, @megj, @kics, @szlaertek COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO Create PROCEDURE [szall_szle_nyug_felad] @bolt int, @ssz varchar(10), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @ekurz kurzus declare @kulcs varchar(20) declare @szdat varchar(10) declare @hany varchar(10) set @tranznev='t_szal_szle_ny_felad'+@kics BEGIN TRANSACTION @tranznev select @szdat = datum from jSZALL_SZLEF where bolt = @bolt and bizszam = @ssz set @ev= left(@szdat,4) set @kulcs = @ev + 'vetel' exec bizsorsz_no @kulcs , @hany output insert into jSZALL_SZLAF Select @bolt, @hany, szallito,megjegyzes, fiz_modja, fiz_esed, rend_szam, datum, kszlaszam, rogzitve,torolt,torlo,tor_ssza,kszla_tip, kotegszam, visszaaru from jSZALL_SZLEF where bolt = @bolt and bizszam = @ssz insert into jSZALL_SZLAT Select @bolt, @hany, tetel, cikk_szam, menny_egys, szorzo, afa_kulcs, darab, egyseg_ar, ealad_ar from jSZALL_SZLET where bolt = @bolt and bizszam = @ssz update jSZALL_SZLEF set szlaszam = @hany where bolt = @bolt and bizszam = @ssz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szle_nyug_feltolt] @szall kulcs, @kdat datum, @vdat datum, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wszall_koz_nyug where kicsoda=@kics insert into wszall_koz_nyug SELECT '',vszall_szle_ertek.BIZSZAM, vszall_szle_ertek.TELJ_DATUM, vszall_szle_ertek.penznem, vszall_szle_ertek.afamentes, vszall_szle_ertek.kedvezmeny, vszall_szle_ertek.netto_ertek, vszall_szle_ertek.brutto_ertek, @kics, vszall_szle_ertek.raktar_nev,vszall_szle_ertek.hivszam FROM vszall_szle_ertek /*SELECT '',szall_szlef.BIZSZAM, szall_szlef.TELJ_DATUM, szall_szlef.penznem, szall_szlef.afamentes, szall_szlef.kedvezmeny, SUM(szall_szlet.edarab * szall_szlet.EGYSEG_AR) AS ertek, @kics, dbo.raktarak.nev FROM dbo.szall_szlef INNER JOIN dbo.szall_szlet ON dbo.szall_szlef.BIZSZAM = dbo.szall_szlet.BIZSZAM INNER JOIN dbo.raktarak ON dbo.szall_szlef.RAKTAR_KOD = dbo.raktarak.kod*/ where szallito=@szall and telj_datum between @kdat and @vdat and torlo<>'1' and torolt<>'1' and len(ltrim(szlaszam))=0 /*GROUP BY szall_szlef.BIZSZAM, szall_szlef.TELJ_DATUM, szall_szlef.penznem, szall_szlef.afamentes, szall_szlef.kedvezmeny, raktarak.nev*/ end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szle_nyug_tranz_nelkul] @ssz bizonylat_szam, @szlasz varchar(50), @tdat datum, @szdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @kedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @szlaertek egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @ekurz kurzus declare @kulcs varchar(20) declare @fiz egyseg_ar set @ev= left(@szdat,4) set @kulcs = @ev + 'szall_szla' select @ekurz = kurzus from szall_szlef where bizszam=@ssz exec bizsorsz_no @kulcs, @sorsz output update szall_szlef set szlaszam=@sorsz, kurzus=@kurz where bizszam=@ssz if dbo.xrfuggveny('Szallszalllevhsz')='1' update szall_szlef set hivszam=@szlasz where bizszam=@ssz select @fiz=fizetendo from wszall_szla_afa where kicsoda=@kics insert into szall_szlaf select @sorsz, @szlasz, szallito, szall_nev, @tdat, @szdat, @fmod, @fhat, @pn, @kurz, @kedv, afamentes, @megj, @kics, dbo.mygetdatetime(), TOROLT, TORLO, '', VISSZARU, @fiz, 0 from szall_szlef where bizszam=@ssz insert into szall_szlat select @sorsz, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, edarab, darab, rendel_bsz, rendel_tet from wszall_szlet where kicsoda=@kics insert into szall_szla_afa select @sorsz, afa_kulcs, netto, afa, brutto, fizetendo from wszall_szla_afa where kicsoda=@kics insert into szall_szlat_td select @sorsz, tetel, e1, e2 from szall_szlet_td where bizszam=@ssz update keszlet set nyugtazva=1 where mozgaskod='vetel' and szamla_sz=@ssz update keszlet set egyseg_ar = wszall_szlet.egyseg_ar*@kurz*(100-wszall_szlet.kedvezmeny)*(100-@kedv)/(wszall_szlet.szorzo * 10000) from wszall_szlet where keszlet.szamla_sz=wszall_szlet.bizszam and keszlet.tetel=wszall_szlet.tetel and keszlet.mozgaskod='vetel' and szamla_sz=@ssz and wszall_szlet.kicsoda=@kics update vkeszlet_koltseg_keszletre set egyseg_ar=egyseg_ar + terh_egyseg where szamla_sz=@ssz and mozgaskod='vetel' update szall_szlet set egyseg_ar=wszall_szlet.egyseg_ar, kedvezmeny=wszall_szlet.kedvezmeny from wszall_szlet where szall_szlet.bizszam=@ssz and szall_szlet.bizszam=wszall_szlet.bizszam and szall_szlet.tetel=wszall_szlet.tetel update szall_szlef set brutto_ertek= (select sum( darab * (egyseg_ar / szorzo) * (100-kedvezmeny) * (100-@kedv) * (100 + afaertek)/1000000 ) from wszall_szlet inner join afa_kulcs on afa_kulcs.afakulcs=wszall_szlet.afa_kulcs where wszall_szlet.kicsoda=@kics) where bizszam=@ssz update cikkek set ut_besz_ar= (select max( (egyseg_ar / szorzo) * @kurz * (100-kedvezmeny) * (100-@kedv) /10000 ) from wszall_szlet where wszall_szlet.kicsoda=@kics and cikkek.cikk_szam=wszall_szlet.cikk_szam) where cikk_szam in (select cikk_szam from wszall_szlet where kicsoda=@kics ) delete from wszall_szlet where kicsoda=@kics delete from wszall_szla_afa where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szle_tor] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_szall_szle_tor'+@kics BEGIN TRANSACTION @tranznev exec szall_szle_tor_notr @bsz, @kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szle_tor_notr] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @cn cikk_nev declare @kedv numeric(18,5) declare @kurz kurzus declare @rakkod kulcs set @kulcs= left(@bsz,4)+'szall_szle' exec bizsorsz_no @kulcs, @sorsz output select @kedv=kedvezmeny from szall_szlef where bizszam=@bsz select @kurz=kurzus from szall_szlef where bizszam=@bsz select @rakkod=raktar_kod from szall_szlef where bizszam=@bsz insert into szall_szlef select @sorsz, hivszam, '', rendszam, szallito, szall_nev, telj_datum, bev_datum, raktar_kod, penznem, kurzus, afamentes, megjegyzes, @kics, dbo.mygetdatetime(), kedvezmeny, '', '1', @bsz, '', okmany_tip, -brutto_ertek from szall_szlef where bizszam=@bsz update szall_szlef set torolt='1', tor_ssz=@sorsz where bizszam=@bsz DECLARE cszall_szlet CURSOR for SELECT tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, egyseg_ar, kedvezmeny, darab, rendel_bsz, rendel_tet FROM szall_szlet WHERE bizszam=@bsz order by tetel open cszall_szlet; fetch next from cszall_szlet into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN insert into szall_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, -@db, -@db, @renbsz, @rentet) insert into szall_szlet_td select @sorsz, @tet, E1, E2 from szall_szlet_td where bizszam=@bsz and tetel = @tet set @_db=@db * @szorz set @_ear= @ear * @kurz * ((100 - @kedv)/100) / @szorz exec karton_ki 'vetel', @sorsz, @tet, @tet, @rakkod, @csz, @_db, 'szall_szle_tor_notr',@kics if len(rtrim(@renbsz)) >0 update szall_rent set darab = darab + @db where bizszam=@renbsz and tetel=@rentet END fetch next from cszall_szlet into @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet end close cszall_szlet deallocate cszall_szlet end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szle_uj] @hsz varchar(50), @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @pn penznem, @kurz kurzus, @kedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @egyraktarba char(1), @afamentes bit, @okmanytip char(1), @belep_dat datum, @vam_dat datum, @vam_okm char(15), @brutto egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_szall_szle_uj'+@kics BEGIN TRANSACTION @tranznev exec szall_szle_uj_tranz_nelkul @hsz, @szall, @dat, @bevdat, @rakkod, @pn, @kurz, @kedv, @megj, @kics, @egyraktarba, @afamentes, @okmanytip, @belep_dat, @vam_dat, @vam_okm, @brutto COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szle_uj_egy] @hsz varchar(50), @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @szrakkod kulcs, @pn penznem, @kurz kurzus, @vkedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @afamentes bit, @okmanytip char(1), @belep_dat datum, @vam_dat datum, @vam_okm char(15), @brutto egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE --declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @etet bizonylat_tetel declare @kulcs varchar(20) declare @aru_szolg int declare @kedv kedvezmeny declare @cn cikk_nev declare @sznev nev declare @dtip char(1) declare @sarzs varchar(20) set @sznev=(select szall_nev from szallito where szall_kod=@szall) set @ev= left(@dat,4) set @kulcs = @ev + 'szall_szle' exec bizsorsz_no @kulcs, @sorsz output insert into szall_szlef values(@sorsz, @hsz, '', '', @szall, @sznev, @dat, @bevdat, @rakkod, @pn, @kurz, @afamentes, @megj, @kics, dbo.mygetdatetime(), @vkedv, '', '', '', '', @okmanytip, @brutto ) if @okmanytip=4 -- csak EV okmány esetén szall_szlef_import beir insert into szall_szlef_import values(@sorsz, @belep_dat, @vam_dat, @vam_okm ) set @tet=0 DECLARE cszall_szlet scroll CURSOR for SELECT tetel, wszall_szlet.cikk_szam, wszall_szlet.cikk_nev, wszall_szlet.afa_kulcs, wszall_szlet.menny_egys, wszall_szlet.szorzo, wszall_szlet.egyseg_ar, wszall_szlet.kedvezmeny, wszall_szlet.darab, wszall_szlet.rendel_bsz, wszall_szlet.rendel_tet, cikkek.aru_szolg, cikkek.dat_tipus FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics and (cikkek.raktar_kod = @rakkod or @szrakkod=0 or (cikkek.raktar_kod is null and (@rakkod = @szrakkod or @szrakkod=0) )) order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wszall_szlet.cikk_szam else wszall_szlet.cikk_nev end open cszall_szlet fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg, @dtip while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin set @tet=@tet+1 insert into szall_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @db, @renbsz, @rentet) insert into szall_szlet_td select @sorsz, @tet, E1, E2 from wszall_szlet_td where tetel = @etet and kicsoda = @kics set @_db=@db * @szorz if @dtip='S' begin if (select count(*) from wsarzs where kicsoda=@kics and xtetel=@etet)=0 begin --delete from wsarzs where kicsoda=@kics and xtetel=@etet set @sarzs = @sorsz + dbo.strzero(@etet,3) insert into wsarzs values(@etet, @sarzs, @db, @kics) end end if (select azonosito from elesito)='031-0093-001' set @_ear= @ear * @kurz * ((100 - @kedv)/100) * ((100-@vkedv)/100) else set @_ear= @ear * @kurz * ((100 - @kedv)/100) * ((100-@vkedv)/100) / @szorz if @aru_szolg='1' begin exec karton_be @ev, 'vetel', @sorsz, @etet, @tet, @rakkod, @csz, @_db, @_ear, 0, 0, @kics end update cikkek set ut_besz_ar=@_ear where cikk_szam=@csz if len(rtrim(@renbsz)) >0 update szall_rent set darab = darab - @db where bizszam=@renbsz and tetel=@rentet end END fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg, @dtip end close cszall_szlet deallocate cszall_szlet DECLARE cszall_szlet1 scroll CURSOR for SELECT tetel, wszall_szlet.cikk_szam, wszall_szlet.cikk_nev, wszall_szlet.afa_kulcs, wszall_szlet.menny_egys, wszall_szlet.szorzo, wszall_szlet.egyseg_ar, wszall_szlet.kedvezmeny, wszall_szlet.darab, wszall_szlet.rendel_bsz, wszall_szlet.rendel_tet, cikkek.aru_szolg, cikkek.dat_tipus FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics and (cikkek.raktar_kod = @rakkod or @szrakkod=0 or (cikkek.raktar_kod is null and (@rakkod = @szrakkod or @szrakkod=0) )) order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wszall_szlet.cikk_szam else wszall_szlet.cikk_nev end open cszall_szlet1 fetch next from cszall_szlet1 into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg, @dtip while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz <0.00001 begin set @tet=@tet+1 insert into szall_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @db, @renbsz, @rentet) insert into szall_szlet_td select @sorsz, @tet, E1, E2 from wszall_szlet_td where tetel = @etet and kicsoda = @kics if len(rtrim(@renbsz)) >0 update szall_rent set darab = darab - @db where bizszam=@renbsz and tetel=@rentet end END fetch next from cszall_szlet1 into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg, @dtip end close cszall_szlet1 deallocate cszall_szlet1 /* Végigmegy a rendeléseken, és aktualizálja a rendelések állapotát */ DECLARE cszall_szl_ren SCROLL CURSOR FOR select rendel_bsz from wszall_szlet where kicsoda=@kics and len(rtrim(rendel_bsz))>0 group by rendel_bsz OPEN cszall_szl_ren FETCH NEXT FROM cszall_szl_ren INTO @renbsz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec szall_ren_allapot_akt @renbsz END FETCH NEXT FROM cszall_szl_ren INTO @renbsz END CLOSE cszall_szl_ren DEALLOCATE cszall_szl_ren SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szle_uj_tranz_nelkul] @hsz varchar(50), @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @pn penznem, @kurz kurzus, @kedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @egyraktarba char(1), @afamentes bit, @okmanytip char(1), @belep_dat datum, @vam_dat datum, @vam_okm char(15), @brutto egyseg_ar AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @erakkod kulcs if @egyraktarba='1' begin exec szall_szle_uj_egy @hsz, @szall, @dat, @bevdat, @rakkod, 0, @pn, @kurz, @kedv, @megj, @kics, @afamentes, @okmanytip, @belep_dat, @vam_dat, @vam_okm, @brutto end else begin DECLARE cszall_szlef CURSOR for SELECT cikkek.raktar_kod FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics and aru_szolg='1' group by cikkek.raktar_kod open cszall_szlef fetch next from cszall_szlef into @erakkod while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec szall_szle_uj_egy @hsz, @szall, @dat, @bevdat, @rakkod, @erakkod, @pn, @kurz, @kedv, @megj, @kics, @afamentes, @okmanytip, @belep_dat, @vam_dat, @vam_okm, @brutto END fetch next from cszall_szlef into @erakkod end close cszall_szlef deallocate cszall_szlef end DELETE from wszall_szlet where kicsoda=@kics DELETE from wszall_szlet_td where kicsoda=@kics DELETE from wszavatos where kicsoda=@kics DELETE from wgyariszamok where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szle_visszaru] @hsz varchar(50), @szall kulcs, @dat datum, @bevdat datum, @rakkod kulcs, @pn penznem, @kurz kurzus, @vkedv numeric(18,5), @megj megjegyzes, @kics kicsoda, @afamentes bit, @okmanytip char(1), @brutto egyseg_ar WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @renbsz bizonylat_szam declare @rentet bizonylat_tetel declare @etet bizonylat_tetel declare @kulcs varchar(20) declare @aru_szolg int declare @kedv kedvezmeny declare @cn cikk_nev declare @sznev nev SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @sznev=(select szall_nev from szallito where szall_kod=@szall) set @tranznev='t_szall_szle_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'szall_szle' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into szall_szlef values(@sorsz, @hsz, '', '', @szall, @sznev, @dat, @bevdat, @rakkod, @pn, @kurz, @afamentes, @megj, @kics, dbo.mygetdatetime(), @vkedv, '', '', '', '1', @okmanytip, -@brutto ) set @tet=0 DECLARE cszall_szlet CURSOR for SELECT tetel, wszall_szlet.cikk_szam, wszall_szlet.cikk_nev, wszall_szlet.afa_kulcs, wszall_szlet.menny_egys, wszall_szlet.szorzo, wszall_szlet.egyseg_ar, wszall_szlet.kedvezmeny, wszall_szlet.darab, wszall_szlet.rendel_bsz, wszall_szlet.rendel_tet, cikkek.aru_szolg FROM wszall_szlet INNER JOIN cikkek ON wszall_szlet.cikk_szam = cikkek.cikk_szam WHERE kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wszall_szlet.cikk_szam else wszall_szlet.cikk_nev end open cszall_szlet fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 insert into szall_szlet values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, -@db, -@db, @renbsz, @rentet) insert into szall_szlet_td select @sorsz, @tet, E1, E2 from wszall_szlet_td where tetel = @tet and kicsoda = @kics if @aru_szolg=1 begin set @_db=@db * @szorz exec karton_ki 'vetel', @SorSZ , @TET, @TET, @rakkod, @CSZ, @_db, 'szall_szle_visszaru', @kics end if len(rtrim(@renbsz)) >0 update szall_szlet set darab = darab - @db where bizszam=@renbsz and tetel=@rentet END fetch next from cszall_szlet into @etet, @csz, @cn, @afa, @me, @szorz, @ear, @kedv, @db, @renbsz, @rentet, @aru_szolg END CLOSE cszall_szlet DEALLOCATE cszall_szlet delete from wszall_szlet where kicsoda= @kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE procedure [szall_szlef_mod] @bsz bizonylat_szam, @essz varchar(50), @dat datum, @am char(1), @megj varchar(254), @kedv numeric(18,2), @obru numeric(18,2), @pn penznem, @kurz numeric(18,5), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_szall_szlf_mod'+@kics BEGIN TRANSACTION @tranznev update szall_szlef set HIVSZAM=@essz, telj_datum=@dat, afamentes=@am, MEGJEGYZES=@megj, kedvezmeny=@kedv, brutto_ertek=@obru where bizszam=@bsz if (select len(szlaszam) from szall_szlef where bizszam=@bsz)=0 update szall_szlef set penznem=@pn, kurzus=@kurz where bizszam=@bsz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szall_szlet_feltolt] @bizsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wszall_szlet where kicsoda=@kics insert into wszall_szlet select bizszam, szall_szlet.tetel, cikkek.vcikkszam, szall_szlet.cikk_szam, szall_szlet.cikk_nev, szall_szlet.afa_kulcs, szall_szlet.menny_egys, szall_szlet.szorzo, szall_szlet.edarab, szall_szlet.darab, szall_szlet.egyseg_ar, szall_szlet.kedvezmeny, szall_szlet.rendel_bsz, szall_szlet.rendel_tet, @kics from szall_szlet inner join cikkek on szall_szlet.cikk_szam = cikkek.cikk_szam where bizszam=@bizsz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szallev_kivet] ( @kics kicsoda, @kivkod int ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @hany bizonylat_szam declare @kulcs varchar(20) declare @tranznev varchar(50) declare @bsz bizonylat_szam declare @tet int declare @maxtet int set @tranznev = 't_kivet_uj'+@kics set @kulcs = left(dbo.MyGetDate(),4) + 'KIVET' begin transaction @tranznev exec bizsorsz_no @kulcs , @hany output delete from wgyujtes1 where kicsoda=@kics delete from wgyujtesx where kicsoda=@kics declare c1 cursor FOR select bizszam from wgyujtes where kicsoda=@kics order by bizszam open c1 FETCH NEXT FROM c1 INTO @bsz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) begin select @maxtet=count(*) from wgyujtes1 where kicsoda=@kics --bemásolja a tételeket a wgyujtes1-be insert into wgyujtes1(bizszam,tetel,cikk_szam,menny_egys,darab1,afa_kulcs,egyseg_ar1,darab2,kicsoda) select @hany,tetel + @maxtet,cikk_szam,menny_egys,darab,afa_kulcs,egyseg_ar,szorzo,@kics from vevo_szlet where bizszam=@bsz --bemásolja a mozgásokat a wgyujtesx-be insert into wgyujtesx(csopnev,bizszam,tetel,gyarto_nev,darab1,darab2,kicsoda) select mozgaskod,@hany,tetel + @maxtet,sorszam,edarab,darab,@kics from mozgas where mozgaskod='vevo_szle' and bizszam=@bsz end FETCH NEXT FROM c1 INTO @bsz end close c1 deallocate c1 --rögzítés insert into kivetf values (@hany, '', 1, dbo.mygetdate(), @kivkod, '', @kics, dbo.mygetdatetime()) insert into kivett select @hany, tetel, cikk_szam, menny_egys, darab2, darab1, afa_kulcs, egyseg_ar1 from wgyujtes1 where kicsoda= @kics insert into mozgas select 'kivet',bizszam,tetel,gyarto_nev,darab1,darab2 from wgyujtesx where kicsoda=@kics delete from mozgas where mozgaskod='vevo_szle' and bizszam in (select bizszam from wgyujtes where kicsoda=@kics) delete from vevo_szlet where bizszam in (select bizszam from wgyujtes where kicsoda=@kics) delete from vevo_szlef where bizszam in (select bizszam from wgyujtes where kicsoda=@kics) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szallito_uj] @NEV nev, @var nev, @ir char(6), @cim nev, @tel char(12), @fax char(12), @kapcs nev, @ado char(13), @euado char(13), @bank char(26), @fm char(1), @fh int, @szcs kulcs, @mkeszlet egyseg_ar, @orszag char(20), @jov char(30), @email varchar(512), @pont egyseg_ar, @edi varchar(14), @pn char(3), @modido datum_ora, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON Declare @szkod kulcs declare @tranznev char(32) set @tranznev='t_szallito'+@kics BEGIN TRANSACTION @tranznev insert into szallito values ( @nev, @var, @ir, @cim, @tel, @fax, @kapcs, @ado, @euado, @bank, @fm, @fh, @szcs, @mkeszlet, @orszag, @jov, @email, @pont, @pn, dbo.MyGetDateTime() , @kics) Select @szkod = @@identity exec szall_beir_bank @szkod, @kics if len(@edi)>0 insert into edi_partner values('S', @szkod, '0', @edi) COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szamla_tetel_afakulcs] AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) declare @tet int declare @maxtet int declare @szla bizonylat_szam declare @asz char(1) declare @afa varchar(15) set @tranznev = 't_szla_tet_afa' begin transaction @tranznev DECLARE cszla CURSOR for select vevo_szlaf.bizszam,tetel,aru_szolg from vevo_szlaf inner join vevo_szlat on vevo_szlat.bizszam=vevo_szlaf.bizszam inner join orszagok on orszagok.iso=vevo_szlaf.iso inner join cikkek on cikkek.cikk_szam=vevo_szlat.cikk_szam where vevo_szlaf.iso<>'HU' and eu='0' and afamentes='1' and telj_datum>='2021.01.01' order by vevo_szlaf.bizszam,tetel open cszla fetch next from cszla into @szla, @tet, @asz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @asz='1' set @afa='EAM' else set @afa='HO' update vevo_szlat set afa_kulcs=@afa where bizszam=@szla and tetel=@tet END fetch next from cszla into @szla, @tet, @asz end close cszla deallocate cszla commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szamla_tetel_beir_szl] AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) declare @tet int declare @maxtet int declare @szla bizonylat_szam declare @tszla bizonylat_szam declare @szlev bizonylat_szam set @tranznev = 't_szla_tet_ujx' begin transaction @tranznev DECLARE cszla CURSOR for SELECT szamla_sz FROM vevo_oszla_bizszam group by szamla_sz order by szamla_sz open cszla fetch next from cszla into @szla while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=0 DECLARE cszla1 CURSOR for SELECT storno_szamla_sz, szlevsz FROM vevo_oszla_bizszam where szamla_sz=@szla order by szlevsz open cszla1 fetch next from cszla1 into @tszla, @szlev while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN select @maxtet=max(tetel) from vevo_szlet where bizszam=@szlev update vevo_szlat set szlev_szam=@szlev, szlev_tetel_szam=tetel - @tet where bizszam=@szla and tetel>@tet and tetel<=@tet + @maxtet update vevo_szlat set szlev_szam=@szlev, szlev_tetel_szam=tetel - @tet where bizszam=@tszla and tetel>@tet and tetel<=@tet + @maxtet set @tet=@tet + @maxtet END fetch next from cszla1 into @tszla, @szlev end close cszla1 deallocate cszla1 END fetch next from cszla into @szla end close cszla deallocate cszla commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szav_szsz] ( @kics kicsoda ) AS begin DECLARE @tet bizonylat_tetel declare @mennyi int declare @szd datum declare @szd1 datum SET XACT_ABORT ON SET NOCOUNT ON DECLARE cSzavatos CURSOR for SELECT xtetel,szav_lejar FROM wszavatos WHERE kicsoda=@kics for update open cSzavatos; fetch next from cSzavatos into @tet, @szd while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @mennyi=(select szav_ido from wszall_szlet,cikkek where wszall_szlet.cikk_szam=cikkek.cikk_szam and wszall_szlet.kicsoda=@kics and wszall_szlet.tetel=@tet) if @mennyi>0 begin set @szd1=cast(year(convert(datetime, @szd)+@mennyi) as char(4)) +'.' + dbo.strzero( month(convert(datetime, @szd)+@mennyi) ,2) + '.' + dbo.strzero ( day(convert(datetime, @szd)+@mennyi) ,2) update wszavatos set szav_lejar=@szd1 where current of cSzavatos; end END fetch next from cSzavatos into @tet, @szd end close cSzavatos; deallocate cSzavatos; end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szav_vve] ( @kics kicsoda ) AS begin DECLARE @tet bizonylat_tetel declare @mennyi int declare @szd datum declare @szd1 datum SET XACT_ABORT ON SET NOCOUNT ON DECLARE cSzavatos CURSOR for SELECT xtetel,szav_lejar FROM wszavatos WHERE kicsoda=@kics for update open cSzavatos; fetch next from cSzavatos into @tet, @szd while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @mennyi=(select szav_ido from wvevo_szlet,cikkek where wvevo_szlet.cikk_szam=cikkek.cikk_szam and wvevo_szlet.kicsoda=@kics and wvevo_szlet.tetel=@tet) if @mennyi>0 begin set @szd1=cast(year(convert(datetime, @szd)+@mennyi) as char(4)) +'.' + dbo.strzero( month(convert(datetime, @szd)+@mennyi) ,2) + '.' + dbo.strzero ( day(convert(datetime, @szd)+@mennyi) ,2) update wszavatos set szav_lejar=@szd1 where current of cSzavatos; end END fetch next from cSzavatos into @tet, @szd end close cSzavatos; deallocate cSzavatos; end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szavido_atir] ( @mozg char(10), @kics kicsoda ) AS begin DECLARE @tet INT declare @mennyi int declare @szd datum declare @szd1 datum SET XACT_ABORT ON SET NOCOUNT ON /* DECLARE cSzavatos CURSOR for SELECT xtetel,szav_lejar FROM wszavatos WHERE kicsoda=@kics for update Select count(*) FROM wszavatos (holdlock) WHERE kicsoda=@kics open cSzavatos; fetch next from cSzavatos into @tet, @szd while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @mozg='bevet' set @mennyi=(select szav_ido from wbevett,cikkek where wbevett.cikk_szam=cikkek.cikk_szam and wbevett.kicsoda=@kics and wbevett.tetel=@tet) else if @mozg='szall_szle' set @mennyi=(select szav_ido from wszall_szlet,cikkek where wszall_szlet.cikk_szam=cikkek.cikk_szam and wszall_szlet.kicsoda=@kics and wszall_szlet.tetel=@tet) else if @mozg='vevo_szle' set @mennyi=(select szav_ido from wvevo_szlet,cikkek where wvevo_szlet.cikk_szam=cikkek.cikk_szam and wvevo_szlet.kicsoda=@kics and wvevo_szlet.tetel=@tet) else if @mozg='vevo_szla' set @mennyi=(select szav_ido from wvevo_szlat,cikkek where wvevo_szlat.cikk_szam=cikkek.cikk_szam and wvevo_szlat.kicsoda=@kics and wvevo_szlat.tetel=@tet) if @mennyi>0 begin set @szd1=cast(year(convert(datetime, @szd)+@mennyi) as char(4)) +'.' + dbo.strzero( month(convert(datetime, @szd)+@mennyi) ,2) + '.' + dbo.strzero ( day(convert(datetime, @szd)+@mennyi) ,2) update wszavatos set szav_lejar=@szd1 where current of cSzavatos; end END fetch next from cSzavatos into @tet, @szd end close cSzavatos; deallocate cSzavatos; */ end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [szerviz_general_keszlet] AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @kics kicsoda declare @ev char(4) declare @hany bizonylat_szam declare @tranznev varchar(50) declare @etet bizonylat_tetel declare @rakkod kulcs declare @crakkod kulcs declare @csz cikk_szam declare @afa afakulcs declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @_ear egyseg_ar declare @db mennyiseg declare @_db mennyiseg declare @aru_szolg int declare @kedv kedvezmeny declare @vkedv numeric(18,5) declare @kurz kurzus declare @tor varchar(1) declare @vissz varchar(1) declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @kulcs varchar(20) declare @kssz bizonylat_szam declare @bmkod varchar(10) declare @bszlasz bizonylat_szam declare @btet bizonylat_tetel declare @nyug bit declare @bizom bit declare @szd datum declare @ukssz bizonylat_szam declare @gysz gyari_szam declare @sarzssz varchar(20) set @kics = 'fejleszto'; delete from mozgas delete from keszlet delete from karton_kivet_hiba set @tranznev = 't_bevet_uj'+@kics begin transaction @tranznev -- raktár bevétek DECLARE cbevett CURSOR for SELECT bevetf.bizszam, raktar_k, tetel, cikk_szam, afa_kulcs, menny_egys, szorzo, egyseg_ar, darab FROM bevetf,bevett where bevetf.bizszam=bevett.bizszam order by bevetf.bizszam,tetel open cbevett; fetch next from cbevett into @hany, @rakkod, @etet, @csz, @afa, @me, @szorz, @ear, @db while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @ev = left(@hany,4) set @_db= @db * @szorz set @_ear = @ear / @szorz exec karton_be @ev, 'bevet', @hany, @etet, @etet, @rakkod, @csz, @_db, @_ear, true, @kics END fetch next from cbevett into @hany, @rakkod, @etet, @csz, @afa, @me, @szorz, @ear, @db end close cbevett deallocate cbevett -- szállítói szállítólevelek és visszáruk DECLARE cszall_szlet CURSOR for select szall_szlef.bizszam,szall_szlef.raktar_kod,kurzus,szall_szlef.kedvezmeny as vkedv, torlo, visszaru, tetel,szall_szlet.cikk_szam,szall_szlet.afa_kulcs,szall_szlet.menny_egys,szorzo,egyseg_ar, szall_szlet.kedvezmeny as tkedv, darab, cikkek.aru_szolg from szall_szlef,szall_szlet,cikkek where szall_szlef.bizszam=szall_szlet.bizszam and szall_szlet.cikk_szam=cikkek.cikk_szam and szall_szlef.torolt<>'1' and szall_szlef.torlo<>'1' order by szall_szlef.bizszam,tetel open cszall_szlet fetch next from cszall_szlet into @hany, @rakkod, @kurz, @vkedv, @tor, @vissz, @etet, @csz, @afa, @me, @szorz, @ear, @kedv, @db, @aru_szolg while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if @aru_szolg=1 begin set @ev = left(@hany,4) set @_db=@db * @szorz set @_ear= @ear * @kurz * ((100 - @kedv)/100) * ((100-@vkedv)/100) / @szorz if @vissz='1' begin set @_db=-@db exec karton_ki_hibaval 'vetel', @hany, @etet, @rakkod, @csz, @_db end else exec karton_be @ev, 'vetel', @hany, @etet, @etet, @rakkod, @csz, @_db, @_ear, 0, @kics end END fetch next from cszall_szlet into @hany, @rakkod, @kurz, @vkedv, @tor, @vissz, @etet, @csz, @afa, @me, @szorz, @ear, @kedv, @db, @aru_szolg end close cszall_szlet deallocate cszall_szlet -- csak egyedi vevői visszáruk DECLARE kvevo_szle SCROLL CURSOR FOR select vevo_szlef.bizszam,vevo_szlef.raktar_kod,visszaru,vevo_szlet.tetel,vevo_szlet.cikk_szam, vevo_szlet.darab,vevo_szlet.szorzo,rendel_bsz,rendel_tet,cikkek.aru_szolg,vevo_szlet.egyseg_ar from vevo_szlef,vevo_szlet,cikkek where vevo_szlef.bizszam=vevo_szlet.bizszam and vevo_szlet.cikk_szam=cikkek.cikk_szam and vevo_szlef.torolt<>'1' and vevo_szlef.torlo<>'1' order by vevo_szlef.bizszam,vevo_szlet.tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @hany, @rakkod, @vissz, @etet, @csz, @db, @szorz, @ren_bsz, @ren_tet, @aru_szolg, @ear WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 and @aru_szolg=1 begin if @vissz='1' begin set @ev = left(@hany,4) set @_db= @db * @szorz set @_ear= @ear / @szorz if @ren_bsz<>'' begin exec karton_be @ev, 'vevo_szle', @hany, @etet, @etet, @rakkod, @csz, @_db, @_ear, 0, @kics end end end END FETCH NEXT FROM kvevo_szle INTO @hany, @rakkod, @vissz, @etet, @csz, @db, @szorz, @ren_bsz, @ren_tet, @aru_szolg, @ear END CLOSE kvevo_szle DEALLOCATE kvevo_szle -- raktárközi mozgások DECLARE crmozgas CURSOR for SELECT rmozgasf.bizszam, rmozgasf.fraktar_k, rmozgasf.craktar_k from rmozgasf order by rmozgasf.bizszam open crmozgas; fetch next from crmozgas into @hany, @rakkod, @crakkod while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN -- először leveszi a készletről a kiadást set @ev = left(@hany,4) set @kulcs = @ev +'karton'; DECLARE c1 cursor FOR SELECT tetel, cikk_szam, darab, szorzo FROM rmozgast where bizszam = @hany order by tetel; OPEN c1; FETCH NEXT FROM c1 INTO @etet, @csz, @db, @szorz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @_db=@db * @szorz exec karton_ki_hibaval 'rmozgas', @hany, @etet, @rakkod, @csz, @_db END FETCH NEXT FROM c1 INTO @etet, @csz, @db, @szorz end close c1; deallocate c1; -- a levett tételeket készletre veszi DECLARE c2 cursor FOR SELECT MOZGAS.TETEL, MOZGAS.SORSZAM, keszlet.cikk_szam, MOZGAS.DARAB, KESZLET.EGYSEG_AR, keszlet.szav_datum, KESZLET.MOZGASKOD, KESZLET.SZAMLA_SZ, KESZLET.TETEL AS btetel, KESZLET.NYUGTAZVA, KESZLET.gyari_szam, keszlet.sarzs_szam FROM MOZGAS INNER JOIN KESZLET ON MOZGAS.SORSZAM = KESZLET.SORSZAM where MOZGAS.mozgaskod='rmozgas' and mozgas.bizszam= @hany and MOZGAS.edarab<0 order by tetel; OPEN c2; FETCH NEXT FROM c2 INTO @etet, @kssz, @csz, @db, @ear, @szd, @bmkod, @bszlasz, @btet, @nyug, @bizom, @gysz, @sarzssz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec bizsorsz_no @kulcs ,@ukssz output set @_db= - @db INSERT INTO KESZLET VALUES (@uKSSZ, @crakkod, @CSZ, @_DB, @_DB, @EAR, @szd, @bmkod, @bszlasz, @btet, @nyug, @bizom, @gysz, @sarzssz) INSERT INTO MOZGAS VALUES ('rmozgas', @hany, @eTET, @uKSSZ, @_DB, @_DB); END FETCH NEXT FROM c2 INTO @etet, @kssz, @csz, @db, @ear, @szd, @bmkod, @bszlasz, @btet, @nyug, @gysz, @sarzssz end close c2 deallocate c2 END fetch next from crmozgas into @hany, @rakkod, @crakkod end close crmozgas deallocate crmozgas -- raktár kivétek DECLARE ckivett CURSOR for SELECT kivetf.bizszam,kivetf.raktar_k,kivett.tetel,cikk_szam,darab,szorzo FROM kivetf,kivett where kivetf.bizszam=kivett.bizszam order by kivetf.bizszam,tetel open ckivett; fetch next from ckivett into @hany, @rakkod, @etet, @csz, @db, @szorz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @_db= @db * @szorz exec karton_ki_hibaval 'kivet', @hany, @etet, @rakkod, @csz, @_db END fetch next from ckivett into @hany, @rakkod, @etet, @csz, @db, @szorz end close ckivett deallocate ckivett -- vevői szállítólevelek és visszáruk DECLARE kvevo_szle SCROLL CURSOR FOR select vevo_szlef.bizszam,vevo_szlef.raktar_kod,visszaru,vevo_szlet.tetel,vevo_szlet.cikk_szam, vevo_szlet.darab,vevo_szlet.szorzo,rendel_bsz,rendel_tet,cikkek.aru_szolg,vevo_szlet.egyseg_ar from vevo_szlef,vevo_szlet,cikkek where vevo_szlef.bizszam=vevo_szlet.bizszam and vevo_szlet.cikk_szam=cikkek.cikk_szam and vevo_szlef.torolt<>'1' and vevo_szlef.torlo<>'1' order by vevo_szlef.bizszam,vevo_szlet.tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @hany, @rakkod, @vissz, @etet, @csz, @db, @szorz, @ren_bsz, @ren_tet, @aru_szolg, @ear WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 and @aru_szolg=1 begin if @vissz='1' begin set @ev = left(@hany,4) set @_db= @db * @szorz set @_ear= @ear / @szorz if @ren_bsz='' begin exec karton_be @ev, 'vevo_szle', @hany, @etet, @etet, @rakkod, @csz, @_db, @_ear, 0, @kics --exec karton_vissza 'vevo_szle', @hany, @etet, @_db, @ren_bsz, @ren_tet end else begin exec karton_vissza 'vevo_szle', @hany, @etet, @_db, @ren_bsz, @ren_tet, 'szerviz_general_keszlet' end end else begin set @_db=@db * @szorz exec karton_ki_hibaval 'vevo_szle',@hany, @etet, @rakkod, @csz, @_db end end END FETCH NEXT FROM kvevo_szle INTO @hany, @rakkod, @vissz, @etet, @csz, @db, @szorz, @ren_bsz, @ren_tet, @aru_szolg, @ear END CLOSE kvevo_szle DEALLOCATE kvevo_szle commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [term_veglegesit] ( @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) set @tranznev = 't_tr_vegl_uj'+@kics begin transaction @tranznev declare @csz cikk_szam declare @hany char(20) declare @ssz bizonylat_szam declare @kszsz bizonylat_szam declare @nkulcs kulcs declare @ear egyseg_ar declare @tkulcs kulcs declare @ev char(4) declare @sarzs varchar(20) set @ev=left(dbo.mygetdate(),4) delete from wterm_arak where kicsoda=@kics exec altsorsz_no 'term_par', @hany output set @tkulcs=convert(int, @hany) update term_termeles set term_kulcs=@tkulcs, term_datum=dbo.myGetDate() where kulcs in (select kulcs from wtermeles where kicsoda=@kics and jel='*') DECLARE cterm scroll CURSOR for SELECT wtermeles.kulcs, wtermeles.cikk_szam, keszlet.sorszam, wtermeles.egyseg_ar FROM wtermeles inner join mozgas on ltrim(rtrim(str(wtermeles.kulcs,12,0)))=mozgas.bizszam and mozgas.tetel=1 and mozgas.mozgaskod='term' inner join keszlet on keszlet.sorszam=mozgas.sorszam WHERE wtermeles.kicsoda=@kics and irany=2 and jel='*' open cterm fetch next from cterm into @nkulcs, @csz, @kszsz, @ear while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN insert into wterm_arak values( @nkulcs, @csz, @kszsz, @ear, @kics) select @sarzs=sarzs_szam from keszlet where sorszam=@kszsz update term_termeles set egyseg_ar=@ear where irany=1 and cikk_szam=@csz and sarzs=@sarzs and kulcs>@nkulcs END fetch next from cterm into @nkulcs, @csz, @kszsz, @ear end close cterm deallocate cterm update term_termeles set egyseg_ar= (select egyseg_ar from wterm_arak where kicsoda=@kics and term_termeles.kulcs=wterm_arak.kulcs) where kulcs in (select kulcs from wterm_arak where kicsoda=@kics) update keszlet set egyseg_ar= (select egyseg_ar from wterm_arak where kicsoda=@kics and keszlet.sorszam=wterm_arak.sorszam) where sorszam in (select sorszam from wterm_arak where kicsoda=@kics) delete from wtermeles where kicsoda=@kics commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [termel_idoszak] ( @kdat char(10), @vdat char(10), @rakk int, @kics char(20) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50); select @tranznev = 't_term_ido' begin transaction @tranznev delete from wgyujtes where kicsoda=@kics insert into wgyujtes (cikk_szam, cikk_nev, menny_egys, darab1, kicsoda) select cikkek.CIKK_SZAM, cikkek.CIKK_NEV, cikkek.menny_egys, SUM(keszre1.darab) AS darab, @kics from keszre1 INNER JOIN diszpo ON keszre1.diszpo = diszpo.kulcs INNER JOIN cikkek ON diszpo.cikk_szam = cikkek.CIKK_SZAM where left(keszre1.modido,10)>=@kdat and left(keszre1.modido,10)<=@vdat and (@rakk=0 or diszpo.raktar_kod=@rakk) group by cikkek.CIKK_SZAM, cikkek.CIKK_NEV, cikkek.menny_egys commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [termeles_uj] ( @dat datum, @rakk kulcs, @tev int, @ir int, @vcsz cikk_szam, @kics_merleg kicsoda, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @dat1 varchar(20) declare @tranznev varchar(50) set @dat1=dbo.myGetDateTime() set @tranznev = 't_bevet_uj'+@kics begin transaction @tranznev declare @csz cikk_szam declare @cn cikk_nev declare @db numeric(18,2) declare @edb numeric(18,2) declare @sar varchar(50) declare @dt char(1) declare @hany char(20) declare @ssz bizonylat_szam declare @kszsz bizonylat_szam declare @ev char(4) declare @ear egyseg_ar declare @utbesz egyseg_ar declare @kear egyseg_ar set @ev=left(dbo.mygetdate(),4) DECLARE cterm scroll CURSOR for SELECT wmerleg.cikk_szam, wmerleg.cikk_nev, sum(darab), sarzs, dat_tipus, egyseg_ar, cikkek.ut_besz_ar FROM wmerleg inner join cikkek on wmerleg.cikk_szam=cikkek.cikk_szam inner join onkoltar on onkoltar.cikk_szam=wmerleg.cikk_szam WHERE wmerleg.kicsoda=@kics_merleg group by wmerleg.cikk_szam, wmerleg.cikk_nev, sarzs, dat_tipus, egyseg_ar, cikkek.ut_besz_ar open cterm fetch next from cterm into @csz, @cn, @db, @sar, @dt, @ear, @utbesz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if (select COUNT(*) from term_receptura where cikk_szam=@csz)=0 set @ear=@utbesz if @ir=2 and @dt='S' --végtermék és sarzs számos begin exec altsorsz_no 'sarzs', @hany output set @sar=@hany end insert into term_termeles values( @dat, @tev, @ir, @vcsz, @csz, @db, @ear, @sar, 0,'', @dat1,@kics) select @ssz=max(kulcs) from term_termeles where datum=@dat and tevekenyseg=@tev and irany=@ir and focikk_szam=@vcsz if @ir=1 --alapanyag begin delete from wsarzs_ki where biztip='term' and kicsoda=@kics if @sar<>'' begin select @kszsz=sorszam, @edb=edarab from keszlet where sarzs_szam=@sar and cikk_szam=@csz insert into wsarzs_ki values( 1, @kszsz, 'term', @sar, '','','', @edb, @db, @kics) end exec karton_ki 'term', @ssz, 1, 1, @rakk, @csz, @db, 'term', @kics select @kear=sum(-mozgas.darab*egyseg_ar)/sum(-mozgas.darab) from mozgas inner join keszlet on keszlet.sorszam=mozgas.sorszam where bizszam=@ssz and mozgas.mozgaskod='term' update term_termeles set egyseg_ar=@kear where kulcs=@ssz end else --kesztermek begin delete from wsarzs where kicsoda=@kics if @sar<>'' begin insert into wsarzs values( 1, @sar, @db, @kics) end exec karton_be @ev, 'term', @ssz, 1, 1, @rakk, @csz, @db, @ear, '0', '0', @kics end END fetch next from cterm into @csz, @cn, @db, @sar, @dt, @ear, @utbesz end close cterm deallocate cterm delete from wmerleg where kicsoda=@kics_merleg commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [titkos_ekaer] ( @rid varchar(50), @dt varchar(30), @pw varchar(60), @ku varchar(60), @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) declare @temp varchar(150) declare @h1 varchar(512) declare @h2 varchar(512) delete from ekaer_titkos where kicsoda= @kics set @tranznev = 't_hash_uj'+@kics begin transaction @tranznev set @dt=replace(replace(replace(REPLACE(@dt,'-',''),'T',''),':',''),'Z','') set @temp=rtrim(@rid)+rtrim(@dt)+rtrim(@ku) select @h1=convert(varchar(512),HASHBYTES('SHA2_512', rtrim(@pw)),2) select @h2=convert(varchar(512),HASHBYTES('SHA2_512', rtrim(@temp)),2) insert into ekaer_titkos values(@h1, @h2, @kics) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [TokenExchangeRequest_sorszam] ( @ssz bizonylat_Szam, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) declare @rid varchar(10) delete from ekaer_titkos where kicsoda= @kics set @tranznev = 't_ssz_uj'+@kics begin transaction @tranznev insert into oszla_naplo (bizszam,statusz,valasz,transactionid,modositva) values(@ssz, '', '', '', dbo.mygetdatetime()) Select @rid = dbo.strzero(@@identity,8) insert into ekaer_titkos values(@rid,'',@kics) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [tolt_egy_wcikk_arak_web] ( @arcs int) AS begin declare @strfn varchar(50) declare @strstmt varchar(2048) set @strfn='_wcikk_arak_web' + dbo.strzero(convert(varchar(3), @arcs),2) IF OBJECT_ID ( @strfn, N'U') IS NULL begin set @strstmt='CREATE TABLE [dbo].[' + @strfn + ']( arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, lista_netto_ar egyseg_ar, lista_brutto_ar egyseg_ar, lakcios char(1), netto_akcios_ar egyseg_ar, brutto_akcios_ar egyseg_ar, akcio_kdat datum, akcio_vdat datum, mefelt_db mennyiseg, netto_meakcios_ar egyseg_ar, brutto_meakcios_ar egyseg_ar, meakcio_kdat datum, meakcio_vdat datum, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, csoport_nev_ang nev, db_kart int, db_rakl int, db_br_sulya numeric(18, 3), menny_egys menny_egyseg, menny_egys_ang menny_egyseg, norm_me menny_egyseg, norm_szorz mennyiseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), letrehozva datum, vonalkod varchar(14), keszlet mennyiseg, szarmazasi_hely char(2), nev_hu varchar(200), nev_en varchar(200) )' --print @strstmt exec(@strstmt) end set @strstmt='delete from ' + @strfn --print @strstmt exec(@strstmt) set @strstmt='insert into ' + @strfn + ' select * from vcikk_arak_web(' + convert(varchar(3),@arcs) + ',1,dbo.myGetdate(),''huf'',1,0)' --print @strstmt exec(@strstmt) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [tolt_vcikk_arak] AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) declare @arcs int declare @strfn varchar(50) declare @strstmt varchar(2048) set @tranznev = 'tolt_vcikk_arak' begin transaction @tranznev exec tolt_vcikk_arak_egy '0' DECLARE carcsop scroll CURSOR for SELECT kod FROM vevo_arcsoport open carcsop fetch next from carcsop into @arcs while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec tolt_vcikk_arak_egy @arcs END fetch next from carcsop into @arcs end close carcsop deallocate carcsop commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [tolt_vcikk_arak_egy] ( @arcs int) AS begin declare @strfn varchar(50) declare @strstmt varchar(2048) set @strfn='_wcikk_arak' + dbo.strzero(convert(varchar(3), @arcs),2) IF OBJECT_ID ( @strfn, N'U') IS NULL begin set @strstmt='CREATE TABLE [dbo].[' + @strfn + ']( arcsoport kulcs, cikk_nev cikk_nev, cikk_nev_ang cikk_nev, cikk_szam cikk_szam, netto_ar egyseg_ar, akcios_ar egyseg_ar, aru_szolg char(1), kifutott char(1), szallito kulcs, szallito_nev nev, gyarto kulcs, gyarto_nev nev, cikkcsop2 char(18), csoport_nev nev, menny_egys menny_egyseg, afa_kulcs afakulcs, tgon cikk_szam, ntgon cikk_szam, tgonszor int, ntgonszor int, akt_besz_ar egyseg_ar, dat_tipus char(1), vcikkszam cikk_szam, ut_besz_ar egyseg_ar, termekdijas char(1), vonalkod varchar(14), fordafa char(1), keszlet egyseg_ar)' --print @strstmt exec(@strstmt) set @strstmt='CREATE NONCLUSTERED INDEX [IX_'+ @strfn +'] ON [dbo].['+@strfn+'] ( [arcsoport] ASC, [cikk_szam] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]' exec(@strstmt) end delete from _wcikk_arak00 set @strstmt='insert into _wcikk_arak00' + ' select * from vcikk_arak(' + convert(varchar(3),@arcs) + ',1,dbo.myGetdate(),''huf'',1,0)' exec(@strstmt) set @strstmt='delete from ' + @strfn --print @strstmt exec(@strstmt) set @strstmt='insert into ' + @strfn + ' select * from _wcikk_arak00' --print @strstmt exec(@strstmt) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [tolt_wcikk_arak_web] AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) declare @arcs int declare @strfn varchar(50) declare @strstmt varchar(2048) set @tranznev = 'tolt_wcikk_arak_web' begin transaction @tranznev exec tolt_egy_wcikk_arak_web '0' DECLARE carcsop scroll CURSOR for SELECT kod FROM vevo_arcsoport open carcsop fetch next from carcsop into @arcs while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec tolt_egy_wcikk_arak_web @arcs END fetch next from carcsop into @arcs end close carcsop deallocate carcsop commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [torzs_kuld_EKnak] ( @dbname varchar(50), @ar_dat char(10) ) AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @dat char(10) declare @kics char(20) declare @datumido char(20) declare @bkod int declare @kapcs varchar(150) declare @arcsop int declare @akccsop int declare @akcfogad char(1) declare @szurf varchar(1500) declare @sqlstr varchar(1500) set @dat=left(replace(convert(char,getdate(), 20 ),'-','.'),10) set @datumido=dbo.mygetdatetime() set @kics='fejleszto' if @dbname<>'' begin set @dbname=@dbname + '..' --gyártó set @sqlstr='delete from '+@dbname+'wf_gyarto ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_gyarto '+ 'select * from wfx_gyarto' exec(@sqlstr) --szállító set @sqlstr='delete from '+@dbname+'wf_szallito ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_szallito '+ 'select szall_kod, szall_nev, varos, iranyito, cim, telefon, fax, kapcsolat, adoszam, bank, '''', fizmod, fizhat, 1, 0, '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''' from wfx_szallito' exec(@sqlstr) --cikkcsoport set @sqlstr='delete from '+@dbname+'wf_stcikk2 ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_stcikk2 '+ 'select cikk_szam, cikk_nev from wfx_stcikk2' exec(@sqlstr) --cikkek set @sqlstr='delete from '+@dbname+'wf_cikkek ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_cikkek '+ 'select cikk_szam, cikk_nev, menny_egys, vtsz, afa_kulcs, cikkcsop2, zsur_db, db_kart, kart_sor, kart_rakl, tgon, ntgon, tgonszor, ntgonszor, netto_ar, brutto_ar, akcio, norm_me, norm_szorz, szallito, gyarto, 0, 0, beszerz_ar, gongyoleg, kifutott, '''', tizedes, web, dbo.mygetdatetime(), ''fejleszto'', dbo.mygetdatetime(), ''fejleszto'' from wfx_cikkek' exec(@sqlstr) --cikkek set @sqlstr='delete from '+@dbname+'wf_vevo_arak ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_vevo_arak '+ 'select 1, '''+ @ar_dat+''', cikk_szam, brutto_ar from wfx_cikkek' exec(@sqlstr) --vonal set @sqlstr='delete from '+@dbname+'wf_vonal ' exec(@sqlstr) if (select ertek from parameterek where azonosito='Gyorskod')='1' begin set @sqlstr='insert into '+@dbname+'wf_vonal '+ 'select * from wfx_vonal' end else begin set @sqlstr='insert into '+@dbname+'wf_vonal '+ 'select * from wfx_vonal where LEN(rtrim(vonalkod))<>4 and '+ 'not (LEN(rtrim(vonalkod))=6 and VONALKOD like ''28%'') '+ 'and vonalkod not like ''21%'' ' end exec(@sqlstr) --kivetjog set @sqlstr='delete from '+@dbname+'wf_kivetjog ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_kivetjog '+ 'select * from wfx_kivetjog' exec(@sqlstr) --bevetjog set @sqlstr='delete from '+@dbname+'wf_bevetjog ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_bevetjog '+ 'select * from wfx_bevetjog' exec(@sqlstr) --akcio set @sqlstr='delete from '+@dbname+'wf_akcio ' exec(@sqlstr) -- beirja csak a bolt akcióit set @sqlstr='insert into '+@dbname+'wf_akcio '+ 'select bolt, cikk_szam, fdatum, kdatum, vdatum, akcios_ar, '+ 'eredeti_ar, kicsoda, keszult, kiemelt, megjegyzes, 1 '+ 'from wfx_akcio where (('''+@dat+'''>=kdatum and vdatum>='''+@dat+''') or '''+@dat+''''' begin set @dbname=@dbname + '..' --gyártó set @sqlstr='delete from '+@dbname+'wf_gyarto ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_gyarto '+ 'select * from wfx_gyarto' exec(@sqlstr) --szállító set @sqlstr='delete from '+@dbname+'wf_szallito ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_szallito '+ 'select szall_kod, szall_nev, varos, iranyito, cim, telefon, fax, kapcsolat, adoszam, bank, '''', fizmod, fizhat, 1, 0, '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''', '''' from wfx_szallito' exec(@sqlstr) --cikkcsoport set @sqlstr='delete from '+@dbname+'wf_stcikk2 ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_stcikk2 '+ 'select cikk_szam, cikk_nev from wfx_stcikk2' exec(@sqlstr) print 'cikk' --cikkek set @sqlstr='delete from '+@dbname+'wf_cikkek ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_cikkek '+ 'select cikk_szam, cikk_nev, menny_egys, vtsz, afa_kulcs, cikkcsop2, zsur_db, db_kart, kart_sor, kart_rakl, tgon, ntgon, tgonszor, ntgonszor, netto_ar, brutto_ar, akcio, norm_me, norm_szorz, szallito, gyarto, 0, 0, beszerz_ar, gongyoleg, kifutott, '''', tizedes, web, dbo.mygetdatetime(), ''fejleszto'', dbo.mygetdatetime(), ''fejleszto'' from wfx_cikkek' exec(@sqlstr) print 'von' --vonal set @sqlstr='delete from '+@dbname+'wf_vonal ' exec(@sqlstr) if (select ertek from parameterek where azonosito='Gyorskod')='1' begin set @sqlstr='insert into '+@dbname+'wf_vonal '+ 'select * from wfx_vonal' end else begin set @sqlstr='insert into '+@dbname+'wf_vonal '+ 'select * from wfx_vonal where LEN(rtrim(vonalkod))<>4 and '+ 'not (LEN(rtrim(vonalkod))=6 and VONALKOD like ''28%'') '+ 'and vonalkod not like ''21%'' ' end exec(@sqlstr) --kivetjog set @sqlstr='delete from '+@dbname+'wf_kivetjog ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_kivetjog '+ 'select * from wfx_kivetjog' exec(@sqlstr) --bevetjog set @sqlstr='delete from '+@dbname+'wf_bevetjog ' exec(@sqlstr) set @sqlstr='insert into '+@dbname+'wf_bevetjog '+ 'select * from wfx_bevetjog' exec(@sqlstr) --akcio set @sqlstr='delete from '+@dbname+'wf_akcio ' exec(@sqlstr) -- beirja csak a bolt akcióit set @sqlstr='insert into '+@dbname+'wf_akcio '+ 'select bolt, cikk_szam, fdatum, kdatum, vdatum, akcios_ar, '+ 'eredeti_ar, kicsoda, keszult, kiemelt, megjegyzes, 1 '+ 'from wfx_akcio where (('''+@dat+'''>=kdatum and vdatum>='''+@dat+''') or '''+@dat+''' -1) --and @mar > 0 begin IF (@@FETCH_STATUS <> -2) BEGIN exec altsorsz_no 'sajatean',@@hany output END fetch next from cfoglalas into @csz end close cfoglalas deallocate cfoglalas COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [utnyilv_tav_mod] (@vevo_szall char(1), @partner_kod kulcs, @telep_kod char(4), @tavolsag numeric(18,1)) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @mennyi int select @mennyi=count(*) from utnyilv_tavolsag where vevo_szall=@vevo_szall and partner_kod=@partner_kod and telep_kod=@telep_kod if @mennyi=0 insert into utnyilv_tavolsag values(@vevo_szall, @partner_kod, @telep_kod, @tavolsag) else update utnyilv_tavolsag set tavolsag=@tavolsag where vevo_szall=@vevo_szall and partner_kod=@partner_kod and telep_kod=@telep_kod end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vcikk_arak_torol] AS begin declare @strfn varchar(50) declare @strstmt varchar(2048) declare @k int set @k=0 while @k<100 begin set @strfn='_wcikk_arak' + dbo.strzero(convert(varchar(3), @k),2) IF OBJECT_ID ( @strfn, N'U') IS not NULL begin set @strstmt='drop table [dbo].[' + @strfn + ']' exec(@strstmt) end set @k=@k + 1 end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vcikk_arak_web_torol] AS begin declare @strfn varchar(50) declare @strstmt varchar(2048) declare @k int set @k=0 while @k<100 begin set @strfn='_wcikk_arak_web' + dbo.strzero(convert(varchar(3), @k),2) IF OBJECT_ID ( @strfn, N'U') IS not NULL begin set @strstmt='drop table [dbo].[' + @strfn + ']' exec(@strstmt) end set @k=@k + 1 end end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [vevo_akc_csom_szamol] @vevo_kod int, @ssz char(10), @tdat char(10) AS begin if (select count(*) FROM dbo.akc_csom_jog INNER JOIN VEVOK ON akc_csom_jog.KOD = VEVOK.vevo_ARCSOPORT where vevo_kod = @vevo_kod) >0 begin declare @kint1 float declare @kint2 float declare @kint3 float declare @kedv1 float declare @kedv2 float declare @kedv3 float declare @osszeg float declare @csomag_azon int declare @akedv float declare @akc_csom_cikkek table (cikk_szam cikk_szam) declare kacsf cursor for select csomag_azon, kint1,kedv1, kint2, kedv2, kint3, kedv3 from akc_csom_szf where idoszak like left(@tdat,7)+'%' order by prioritas open kacsf fetch next from kacsf into @csomag_azon, @kint1, @kedv1, @kint2, @kedv2, @kint3, @kedv3 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN Insert into @akc_csom_cikkek select cikk_szam from cikkek where gyarto in (select gyarto from akc_csom_szt where csomag_azon=@csomag_azon and gyarto<>0) or szallito in (select szallito from akc_csom_szt where csomag_azon=@csomag_azon and szallito<>0) or cikkcsop2 like (select rtrim(cikkcsoport)+'%' from akc_csom_szt where csomag_azon=@csomag_azon and len(rtrim(cikkcsoport))<>0 ) or cikk_szam in (select cikk_szam from akc_csom_szt where csomag_azon=@csomag_azon and len(rtrim(cikk_szam))<>0) set @osszeg= ( select sum(darab * egyseg_Ar) from vevo_szlet where bizszam = @ssz and kedvezmeny = 0 and vevo_szlet.cikk_szam in (select cikk_szam from @akc_csom_cikkek ) ) set @akedv=0 if @osszeg>= @kint1 begin set @akedv=@kedv1 end if @osszeg>= @kint2 and @kint2>0 begin set @akedv=@kedv2 end if @osszeg>= @kint3 and @kint3>0 begin set @akedv=@kedv3 end if @akedv>0 begin update vevo_szlet set kedvezmeny=@akedv where bizszam=@ssz and vevo_szlet.cikk_szam in (select cikk_szam from @akc_csom_cikkek ) end end fetch next from kacsf into @csomag_azon, @kint1, @kedv1, @kint2, @kedv2, @kint3, @kedv3 end CLOSE kacsf DEALLOCATE kacsf delete from @akc_csom_cikkek end /* update vevo_szlet set egyseg_ar= round(egyseg_ar * (100-kedvezmeny)/100,2) where bizszam=@ssz */ end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_akcio_masol_tempbe] @datum datum --WITH RECOMPILE AS declare @dat CHAR(10) BEGIN TRANSACTION t_vevo_ar_lista SET XACT_ABORT ON SET NOCOUNT ON Delete from wtr_vevo_akcio Delete from wtr_vevo_akcio_hh --set @dat=dbo.MyGetDate() set @dat=left(replace(convert(char,getdate()-3, 20 ),'-','.'),10) if len(@datum)=0 Insert into wtr_vevo_akcio (AKCIOCSOP,akcio_tip, KDATUM,VDATUM, CIKK_SZAM,EGYSEG_AR, SZOVEG,ke_keszlet, ke_maradek,KICSODA,MODOSITVA,ujsag) select AKCIOCSOP,akcio_tip, KDATUM,VDATUM, CIKK_SZAM,EGYSEG_AR, SZOVEG,ke_keszlet, ke_maradek,KICSODA,MODOSITVA,ujsag from vevo_akcio where @dat <= kdatum or @dat <= vdatum and cikk_szam in (select cikk_szam from cikkek where kifutott<>'1') else Insert into wtr_vevo_akcio (AKCIOCSOP,akcio_tip, KDATUM,VDATUM, CIKK_SZAM,EGYSEG_AR, SZOVEG,ke_keszlet, ke_maradek,KICSODA,MODOSITVA,ujsag) select AKCIOCSOP,akcio_tip, KDATUM,VDATUM, CIKK_SZAM,EGYSEG_AR, SZOVEG,ke_keszlet, ke_maradek,KICSODA,MODOSITVA,ujsag from vevo_akcio where @datum <= left(modositva,10) and cikk_szam in (select cikk_szam from cikkek where kifutott<>'1') Insert into wtr_vevo_akcio_hh select * from vevo_akcio_hh where megszunt <> '1' --Insert into wtr_vevo_akcio_ve select * from wtr_vevo_akcio_ve where megszunt <> '1' COMMIT TRANSACTION t_vevo_ar_lista GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ar_kalk] (@dat datum) AS BEGIN SET XACT_ABORT ON SET NOCOUNT ON update cikkek set akt_besz_ar= isnull((select netto_ar from dbo.TermekBeszAraAdottDat(cikkek.cikk_szam, @dat) ),0) delete from vevo_arak delete from wvevo_arak exec vevo_ar_kalk_rabatt @dat declare @kod int DECLARE Kvevo_arcsoport SCROLL CURSOR FOR select kod from vevo_arcsoport where szamitas_modja='L' order by kod OPEN Kvevo_arcsoport FETCH NEXT FROM Kvevo_arcsoport INTO @kod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_ar_kalk_lista @kod, @dat end FETCH NEXT FROM Kvevo_arcsoport INTO @kod end CLOSE Kvevo_arcsoport DEALLOCATE Kvevo_arcsoport end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ar_kalk_lista] (@acs kulcs, @dat datum) AS BEGIN SET XACT_ABORT ON SET NOCOUNT ON declare @mennyi int declare @ardatum char(7) set @ardatum = left(@dat,7) select @mennyi=isnull(count(*),0) from vevo_ar_lista where arcsoport=@acs and datum = @ardatum if @mennyi = 0 begin insert into vevo_ar_lista select arcsoport, @ardatum, cikk_szam, netto_ar, brutto_ar, beszerz_ar, arres, kicsoda, modositva from vevo_ar_lista where arcsoport=@acs and datum = ( select max(datum) from vevo_ar_lista where datum < @ardatum ) end insert into vevo_ar_lista select @acs, @ardatum, cikk_szam, 0,0,0,0, 'Fejleszto', dbo.mygetdatetime() from cikkek where not exists (select * from vevo_ar_lista where vevo_ar_lista.cikk_szam = cikkek.cikk_szam and arcsoport=@acs and datum = @ardatum ) insert into vevo_arak select arcsoport,cikk_szam, 0, 0, netto_ar, 0, '' from vevo_ar_lista where datum=@ardatum and arcsoport=@acs end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ar_kalk_rabatt] (@dat datum) AS BEGIN SET XACT_ABORT ON SET NOCOUNT ON declare @acs kulcs declare @itip char(1) declare @tfelar numeric(18,2) declare @szall kulcs declare @ccs varchar(18) --------------------------------- --Rabatt tablós árak számítása -- --------------------------------- DECLARE kvevo_arf SCROLL CURSOR FOR select arcsoport,ind_tipus from vevo_arf order by arcsoport OPEN kvevo_arf FETCH NEXT FROM kvevo_arf INTO @acs,@itip WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wvevo_arak select @acs, cikk_szam, szallito, cikkcsop2, isnull((select penznem from dbo.TermekBeszAraAdottDat(cikkek.cikk_szam, @dat) ),0), isnull((select netto_ar from dbo.TermekBeszAraAdottDat(cikkek.cikk_szam, @dat) ),0), isnull((select lista_ar from dbo.TermekBeszAraAdottDat(cikkek.cikk_szam, @dat) ),0), 0, 0, '' from cikkek update wvevo_arak set netto_ar = case @itip when 1 then n_beszerz_ar else l_beszerz_ar end where arcsoport=@acs --Megvan az általános felár, jönnek a kivételek ----------------------------------------------- DECLARE Kvevo_art SCROLL CURSOR FOR select szallito, cikk_csop, felar from vevo_art where arcsoport=@acs order by sorrend OPEN Kvevo_art FETCH NEXT FROM Kvevo_art INTO @szall, @ccs, @tfelar WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN update wvevo_arak set netto_ar = case @itip when 1 then n_beszerz_ar else l_beszerz_ar end * (100 + @tfelar) / 100 where arcsoport=@acs and (szallito=@szall or @szall=0 ) and (cikkcsoport like rtrim(@ccs)+'%' or len(rtrim(@ccs))=0) end FETCH NEXT FROM Kvevo_art INTO @szall, @ccs, @tfelar end CLOSE Kvevo_art DEALLOCATE Kvevo_art end FETCH NEXT FROM kvevo_arf INTO @acs,@itip END CLOSE kvevo_arf DEALLOCATE kvevo_arf insert into vevo_arak select arcsoport, cikk_szam, n_beszerz_ar, l_beszerz_ar, netto_ar, akcios_ar, akcio from wvevo_arak end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ar_lista_besz_ar_kalk] @dat datum, @arcs kulcs WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON DECLARE @bsz bizonylat_szam DECLARE @szal kulcs declare @mennyi numeric(18) declare @dat1 datum declare @beszartip char(1) if @dat='0000.00' set @dat1 = cast(year(getdate()) as char(4)) +'.' + dbo.strzero( month(getdate()) ,2) + '.15' else set @dat1 = rtrim(@dat) + '.15' set @beszartip = dbo.xrfuggveny('BeszArTip') if @beszartip='1' begin update vevo_ar_lista set beszerz_ar = cikkek.ut_besz_ar from cikkek WHERE cikkek.cikk_szam=vevo_ar_lista.cikk_szam and vevo_ar_lista.arcsoport= @arcs and datum = @dat end else begin DECLARE kszall_arf SCROLL CURSOR FOR select szallito from cikkek group by szallito OPEN kszall_arf FETCH NEXT FROM kszall_arf INTO @szal WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @bsz = isnull(bizszam,'') from szall_arf where szallito=@szal and kdatum=( select max(kdatum) from szall_arf where szallito=@szal and kdatum<=@dat1) if len(@bsz)>0 --beirja a megfelelo szallitoi arait a cikkek-be (egy bizonylat alapjan) update vevo_ar_lista set beszerz_ar = szall_art.netto_ar from szall_art where szall_art.BIZSZAM=@bsz and vevo_ar_lista.cikk_szam=szall_art.cikk_szam and vevo_ar_lista.arcsoport= @arcs and datum = @dat END FETCH NEXT FROM kszall_arf INTO @szal END CLOSE kszall_arf DEALLOCATE kszall_arf end update vevo_ar_lista set arres= CASE WHEN beszerz_ar=0 THEN CASE WHEN netto_ar=0 THEN 0 ELSE 999 END ELSE 100*(netto_ar-beszerz_ar)/beszerz_ar END where vevo_ar_lista.arcsoport= @arcs and datum = @dat update vevo_ar_lista set arres= -999 where arres<-999 and vevo_ar_lista.arcsoport= @arcs and datum = @dat update vevo_ar_lista set arres= 999 where arres>999 and vevo_ar_lista.arcsoport= @arcs and datum = @dat end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ar_lista_feltolt] @dat datum, @arcs kulcs, @elozo char(7) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @mennyi numeric(18) declare @dat_jovo datum declare @datido datum_ora set @datido=dbo.mygetdatetime() select @mennyi = count(*) from vevo_ar_lista where datum = @dat and arcsoport= @arcs if @mennyi =0 insert into vevo_ar_lista select @arcs, @dat, cikk_szam, netto_ar, brutto_ar, beszerz_ar, arres, kicsoda, modositva from vevo_ar_lista where datum = @elozo and arcsoport= @arcs --felveszem az szerkesztendõbe az új cikkeket if (select count(*) from vevo_ar_lista where arcsoport=@arcs and datum>=@dat) >0 begin --van már valami DECLARE kvevo_art SCROLL CURSOR FOR select datum from vevo_ar_lista where arcsoport=@arcs and datum>=@dat group by datum OPEN kvevo_art FETCH NEXT FROM kvevo_art INTO @dat_jovo WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN --vevo_art beir insert into vevo_ar_lista select @arcs, @dat_jovo, cikk_szam, 0, 0, 0, 0, 'fejleszto', @datido from cikkek where not exists (select * from vevo_ar_lista where vevo_ar_lista.cikk_szam = cikkek.cikk_szam and datum= @dat_jovo and arcsoport= @arcs) END FETCH NEXT FROM kvevo_art INTO @dat_jovo END CLOSE kvevo_art DEALLOCATE kvevo_art end else begin --még nincs tétel a listaárban insert into vevo_ar_lista select @arcs, @dat, cikk_szam, 0, 0, 0, 0, 'fejleszto', @datido from cikkek where not exists (select * from vevo_ar_lista where vevo_ar_lista.cikk_szam = cikkek.cikk_szam and datum= @dat and arcsoport= @arcs) end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE pROCEDURE [vevo_ar_lista_import] @farcs int, @fevho char(10), @carcs int, @cevho char(10), @szorzo kurzus, @ccs char(18), @gyar kulcs, @szall kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) declare @dat datum declare @volt int declare @datido datum_ora set @volt=0 set @tranznev = 't_val_imp'+@kics set @datido=dbo.mygetdatetime() begin transaction @tranznev DECLARE cval CURSOR for SELECT datum FROM vevo_ar_lista WHERE @carcs = arcsoport and datum>=@cevho group by datum open cKarton_KI; fetch next from cval into @dat while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN delete from vevo_ar_lista where arcsoport=@carcs and datum=@dat and cikk_szam in (select cikk_szam from cikkek where (gyarto=@gyar or @gyar=0) and (szallito=@szall or @szall=0) and cikkcsop2 like rtrim(@ccs)+'%' ) insert into vevo_ar_lista select @carcs, @dat, cikk_szam, netto_ar * @szorzo, brutto_ar * @szorzo, beszerz_ar, 0, @kics, @datido from vevo_ar_lista where arcsoport=@farcs and datum=@dat and cikk_szam in (select cikk_szam from cikkek where (gyarto=@gyar or @gyar=0) and (szallito=@szall or @szall=0) and cikkcsop2 like rtrim(@ccs)+'%' ) set @volt=1 END fetch next from cval into @dat end close cval; deallocate cval; if @volt=0 insert into vevo_ar_lista select @carcs, @dat, cikk_szam, netto_ar * @szorzo, brutto_ar * @szorzo, beszerz_ar, 0, @kics, @datido from vevo_ar_lista where arcsoport=@farcs and datum=@dat and cikk_szam in (select cikk_szam from cikkek where (gyarto=@gyar or @gyar=0) and (szallito=@szall or @szall=0) and cikkcsop2 like rtrim(@ccs)+'%' ) commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ar_lista_letrehoz_utemezett] AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @datido datum_ora declare @arcs kulcs declare @elozo char(7) declare @dat char(7) set @dat=left(replace(convert(char,getdate(), 20 ),'-','.'),7) set @datido=dbo.mygetdatetime() DECLARE kvevo_ar SCROLL CURSOR FOR select kod from vevo_arcsoport where szamitas_modja='L' order by kod OPEN kvevo_ar FETCH NEXT FROM kvevo_ar INTO @arcs WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @elozo=ISNULL(max(datum),'') from vevo_ar_lista where datum<@dat and arcsoport=@arcs exec vevo_ar_lista_feltolt @dat,@arcs,@elozo END FETCH NEXT FROM kvevo_ar INTO @arcs END CLOSE kvevo_ar DEALLOCATE kvevo_ar end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arajanlat_egyedi] @vevo kulcs, @dat_tol datum, @dat_ig datum, @fmod char(1), @fhat int, @pn penznem, @afamentes bit, @vkedv kedvezmeny, @arcsop kulcs, @akccsop kulcs, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @vnev nev declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @etet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @aru_szolg int declare @td char(1) declare @sorrend varchar(20) set @sorrend=dbo.xrBizTetRend() set @tranznev='t_vevo_arajanlat_uj'+@kics set @ev=left(@dat_tol,4) set @kulcs = @ev + 'vevo_arajan' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) set @rensz='' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_arajanf values(@sorsz, @vevo, @dat_tol, @dat_ig, @fmod, @fhat, @pn, @afamentes, @vkedv, @arcsop, @akccsop, @megj, @kics, dbo.myGetDateTime()) DECLARE kvevo_arajanlat SCROLL CURSOR FOR select wvevo_arajant.tetel, wvevo_arajant.cikk_szam, wvevo_arajant.cikk_nev, wvevo_arajant.afa_kulcs, wvevo_arajant.menny_egys, wvevo_arajant.szorzo, wvevo_arajant.darab, wvevo_arajant.egyseg_ar, wvevo_arajant.kedvezmeny, wvevo_arajant.megjegyzes, cikkek.aru_szolg, cikkek.termekdijas from wvevo_arajant inner join cikkek ON wvevo_arajant.cikk_szam = cikkek.cikk_szam where wvevo_arajant.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) else wvevo_arajant.cikk_nev end OPEN kvevo_arajanlat FETCH NEXT FROM kvevo_arajanlat INTO @etet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @tmegj, @aru_szolg, @td set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin insert into vevo_arajant values( @sorsz, @tet, @csz, @afak, @me, @szorz, @db, @ear, @tkedv, @tmegj ) set @tet=@tet+1 end END FETCH NEXT FROM kvevo_arajanlat INTO @etet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @tmegj, @aru_szolg, @td END CLOSE kvevo_arajanlat DEALLOCATE kvevo_arajanlat delete from wvevo_arajant where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arajanlat_kalkulalt] @sorsz bizonylat_szam, @pn char(3), @kurz kurzus, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_arajan_kalk'+@kics BEGIN TRANSACTION @tranznev update vevo_arajanlatf set vevo_penznem = @pn, allapot=13, megjegyzes = @megj, beszerzes_rogzitve=dbo.myGetDateTime(), beszerzes_rogzitette=@kics where bizszam = @sorsz delete from vevo_arajanlatt where bizszam=@sorsz insert into vevo_arajanlatt select @sorsz, tetel, cikk_szam, cikk_tipus, mennyiseg, belfoldi_ar, belfoldi_penznem, belfoldi_szallito, belfoldi_keszlet, belfoldi_szallitas_nap, kozbesz_ar, '', 0, --beszerz.bizszam,tetel beszerzesi_ar,@pn, beszerzesi_szallito, beszerzesi_keszlet, @kurz, beszerzesi_szallitas_nap, kiajanlott_ar, kiajanlott_szallitas_nap, afa_kulcs, menny_egys, szorzo, kedvezmeny, megjegyzes, garancia from wvevo_arajanlatt where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arajanlat_mod] @sorsz bizonylat_szam, @pn char(3), @megj megjegyzes, @hat datum_ora, @kics kicsoda, @ablak char(2) WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @ct kulcs declare @me menny_egyseg declare @ear egyseg_ar declare @kear egyseg_ar declare @szpn char(3) declare @szkod kulcs declare @szkesz mennyiseg declare @db mennyiseg declare @nap int declare @kulcs varchar(20) declare @bear egyseg_ar declare @bpn char(3) declare @bszkod kulcs declare @bkesz mennyiseg declare @bkurzus decimal(12,5) declare @bnap int declare @ki_ar egyseg_ar declare @ki_sznap int declare @szorz szorzo declare @afak afakulcs declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @gar varchar(20) declare @tranznev char(32) set @tranznev='t_vevo_arajan_mod'+@kics BEGIN TRANSACTION @tranznev update vevo_arajanlatf set vevo_penznem = @pn, megjegyzes = @megj, hatarido= @hat where bizszam = @sorsz delete from vevo_arajanlatt where bizszam=@sorsz DECLARE kvevo_arajan SCROLL CURSOR FOR select cikk_szam, cikk_tipus, mennyiseg, belfoldi_ar, belfoldi_penznem, belfoldi_szallito, belfoldi_keszlet, belfoldi_szallitas_nap, beszerzesi_ar, beszerzesi_penznem, beszerzesi_szallito, beszerzesi_keszlet, beszerzesi_kurzus, beszerzesi_kurzus, kiajanlott_ar, kiajanlott_szallitas_nap, kozbesz_ar, afa_kulcs, menny_egys, szorzo, kedvezmeny, megjegyzes, garancia from wvevo_arajanlatt where kicsoda=@kics + @ablak order by cikk_nev set @tet=1 OPEN kvevo_arajan FETCH NEXT FROM kvevo_arajan INTO @csz,@ct,@db,@ear,@szpn,@szkod,@szkesz,@nap, @bear, @bpn,@bszkod, @bkesz, @bkurzus, @bnap, @ki_ar, @ki_sznap, @kear, @afak, @me, @szorz, @tkedv, @tmegj, @gar set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_arajanlatt values( @sorsz, @tet, @csz, @ct, @db, @ear, @szpn, @szkod, @szkesz, @nap, @kear, '', 0, @bear, @bpn, @bszkod, @bkesz, @bkurzus, @bnap, @ki_ar, @ki_sznap, @afak, @me, @szorz, @tkedv, @tmegj, @gar ) set @tet = @tet + 1 END FETCH NEXT FROM kvevo_arajan INTO @csz,@ct,@db,@ear,@szpn,@szkod,@szkesz,@nap, @bear, @bpn, @bszkod, @bkesz, @bkurzus, @bnap, @ki_ar, @ki_sznap, @kear, @afak, @me, @szorz, @tkedv, @tmegj, @gar END CLOSE kvevo_arajan DEALLOCATE kvevo_arajan DELETE from wvevo_arajanlatt where kicsoda=@kics + @ablak COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arajanlat_uj] @vevo kulcs, @ugy char(20), @dat datum, @dat_ig datum, @fmod char(1), @fhat int, @pn penznem, @kurz kurzus, @afamentes bit, @vkedv kedvezmeny, @arcsop kulcs, @akccsop kulcs, @megj megjegyzes, @hat datum_ora, @allapot int, @kics kicsoda, @ablak char(2) WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @ct kulcs declare @me menny_egyseg declare @ear egyseg_ar declare @kear egyseg_ar declare @ajear egyseg_ar declare @szpn char(3) declare @szkod kulcs declare @szkesz mennyiseg declare @db mennyiseg declare @nap int declare @kulcs varchar(20) declare @ugylet varchar(20) declare @szorz szorzo declare @afak afakulcs declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @gar varchar(20) declare @ker_kics kicsoda declare @ki_pn penznem declare @ki_kurz kurzus declare @ki_kics kicsoda declare @ki_modido datum_ora declare @tranznev char(32) set @tranznev='t_vevo_arajan_uj'+@kics set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_arajanlat' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output if len(rtrim(@ugy))>0 exec ugyletkod_ad @dat, @ugylet output set @ki_pn='' set @ki_kurz=0 set @ki_kics='' set @ki_modido='' if @allapot=14 -- kiajánlott begin set @ki_pn=@pn set @ki_kurz=@kurz set @ki_kics=@kics set @ki_modido=dbo.mygetdatetime() end insert into vevo_arajanlatf values(@sorsz, @vevo, @dat, @dat_ig, @fmod, @fhat, @pn, @afamentes, @vkedv, @arcsop, @akccsop, @megj, @hat, @kics, dbo.mygetdatetime(), '','', @ki_pn, @ki_kurz, @ki_kics, @ki_modido, 0,'','',@allapot ) if len(rtrim(@ugylet))>0 insert into ugyletek values(@sorsz, @ugylet, 'vevo_arajan') DECLARE kvevo_arajan SCROLL CURSOR FOR select cikk_szam, cikk_tipus, mennyiseg, belfoldi_ar, belfoldi_penznem, belfoldi_szallito, belfoldi_keszlet, belfoldi_szallitas_nap, kozbesz_ar, afa_kulcs, menny_egys, szorzo, kedvezmeny, megjegyzes, kiajanlott_ar, garancia from wvevo_arajanlatt where kicsoda=@kics + @ablak order by cikk_nev set @tet=1 OPEN kvevo_arajan FETCH NEXT FROM kvevo_arajan INTO @csz,@ct,@db,@ear,@szpn,@szkod,@szkesz,@nap,@kear,@afak,@me,@szorz,@tkedv,@tmegj,@ajear,@gar set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_arajanlatt values( @sorsz, @tet, @csz, @ct, @db, @ear, @szpn, @szkod, @szkesz, @nap, @kear, '',0,0,'',0,0,0,0, @ajear,0, @afak, @me, @szorz, @tkedv, @tmegj, @gar ) set @tet = @tet + 1 END FETCH NEXT FROM kvevo_arajan INTO @csz,@ct,@db,@ear,@szpn,@szkod,@szkesz,@nap,@kear,@afak,@me,@szorz,@tkedv,@tmegj,@ajear,@gar END CLOSE kvevo_arajan DEALLOCATE kvevo_arajan DELETE from wvevo_arajanlatt where kicsoda=@kics + @ablak COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arak_masol_tempbe] @arcsop kulcs, @datum datum WITH RECOMPILE AS Declare @maxdat varchar(7) BEGIN TRANSACTION t_vevo_ar_lista SET XACT_ABORT ON SET NOCOUNT ON Delete from wtr_vevo_ar_lista set @maxdat=Left(dbo.MyGetDate(),7) -- Ha nincs e havi árlista a legfrissebbet küldjük If(select count(*) from vevo_ar_lista where datum = @maxdat ) = 0 select @maxdat=Max(datum) from vevo_ar_lista if len(rtrim(@datum))=0 --nincs moddatum begin -- Az e havi és a jövőbeli árlistát küldjük Insert wtr_vevo_ar_lista select * from vevo_ar_lista where datum >= @maxdat and cikk_szam in (select cikk_szam from cikkek where kifutott<>'1') end else begin -- Az e havi és a jövőbeli árlistát küldjük Insert wtr_vevo_ar_lista select * from vevo_ar_lista where datum >= @maxdat and (left(modositva,10)>=@datum or cikk_szam in (select cikk_szam from cikkek where kifutott<>'1' and left(modositva,10)>=@datum) ) end if @arcsop<>0 delete from wtr_vevo_ar_lista where datum >= @maxdat and arcsoport<>@arcsop COMMIT TRANSACTION t_vevo_ar_lista GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arcsop_mod] ( @kod kulcs, @nev nev, @alaparcs kulcs, @szor numeric(18,2) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_arcsopmod update vevo_arcsoport set nev=@nev where kod=@kod delete from vevo_arcs_szazalek where arcsoport=@kod Insert Into vevo_arcs_szazalek values(@kod, @alaparcs, @szor) exec tolt_vcikk_arak_egy @kod COMMIT TRANSACTION t_arcsopmod SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arcsop_uj] ( @nev nev, @tip char(1), @pn char(3), @alaparcs kulcs, @szor numeric(18,2) ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_arcsopuj declare @kod kulcs Insert Into vevo_arcsoport (nev,szamitas_modja,penznem,FelarasKod) values(@nev, @tip, @pn, 0) Select @kod = @@identity Insert Into vevo_arcs_szazalek values(@kod, @alaparcs, @szor) exec tolt_vcikk_arak_egy @kod COMMIT TRANSACTION t_arcsopuj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arkeplet_beir] @kod kulcs, @itip char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @kulcs varchar(20) set @tranznev='t_vevo_arf_uj'+@kics BEGIN TRANSACTION @tranznev delete from vevo_art where arcsoport=@kod delete from vevo_arf where arcsoport=@kod insert into vevo_arf values(@kod, @itip, @kics, dbo.myGetDateTime()) insert into vevo_art select arcsoport, sorrend, szall_kod, gyarto_kod, cikk_csop, felar from wvevo_art where kicsoda=@kics DELETE from wvevo_art where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_arkeplet_tolt] @kod kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wvevo_art where kicsoda=@kics insert into wvevo_art select arcsoport, sorrend, szallito, szall_nev, gyarto_kod, gyarto_nev, cikk_csop, cikk_nev, felar, @kics from vvevo_art where arcsoport=@kod end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_beir_telmeg] @vkod kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from vevo_tel where vevo_kod=@vkod delete from vevo_bank where vevo_kod=@vkod delete from vevo_kapcsolat where vevo_kod=@vkod insert into vevo_tel select @vkod, telep_kod, telep_nev, varos, iranyito, cim, kerulet, kozterulet_jellege, hazszam, epulet, lepcsohaz, szint, ajto, kapcsolat, telefon, email, kartya, limit, jovedeki, torolt, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, idokapu, iso, allam from wvevo_tel where kicsoda=@kics insert into vevo_bank select @vkod, bank, torolt from wvevo_bank where kicsoda=@kics and len(rtrim(bank))>0 insert into vevo_kapcsolat select @vkod, kapcs_kod, kapcsolat, telefon, email, beosztas from wvevo_kapcsolat where kicsoda=@kics delete from edi_partner where tipus='V' and partner_kod=@vkod and telep_kod<>'0' insert into edi_partner select 'V', @vkod, telep_kod, edi from wvevo_tel where kicsoda=@kics and len(edi)>0 and telep_kod<>'0' end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_cszam_mod] @vcszcs kulcs, @csz cikk_szam, @vcsz char(14) WITH RECOMPILE AS SET NOCOUNT ON if (select count(*) from vevo_csz where vevocszcsop=@vcszcs and cikk_szam=@csz ) = 0 insert into vevo_csz values( @vcszcs,@csz,@vcsz) else update vevo_csz set vevocsz=@vcsz where vevocszcsop=@vcszcs and cikk_szam=@csz GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_cszam_tolt] @vcszcs kulcs, @ccs char(18), @kics kicsoda WITH RECOMPILE AS SET NOCOUNT ON declare @lccs int set @lccs=len(rtrim(@ccs)) delete from wvevo_csz where kicsoda=@kics insert into wvevo_csz select @vcszcs, cikk_szam, cikk_nev, ' ', @kics from cikkek where left(cikkcsop2,@lccs) = rtrim(@ccs) or @lccs=0 update wvevo_csz set vevocsz=(select vevocsz from vevo_csz where vevocszcsop=@vcszcs and wvevo_csz.cikk_szam = vevo_csz.cikk_szam ) where kicsoda=@kics GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_elorent_feltolt] @bsz as char(10), @arcs as int, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON declare @kesz as float declare @csz char(14) declare @ssz as char(10) declare @dat as char(10) declare @von as varchar(14) declare @mar as float set @dat=dbo.mygetdate() delete from wvevo_rendt where kicsoda=@kics insert into wvevo_rendt select @kics,sorszam,ROW_NUMBER() OVER (ORDER BY cikk_nev,szav_datum), keszlet.cikk_szam,szav_datum,cikk_nev,menny_egys,afa_kulcs,0,keszlet.darab,0,0,0,0,0,0,0,'','','','' from keszlet inner join cikkek on keszlet.cikk_szam=cikkek.cikk_szam where keszlet.raktar_kod=1 if @bsz<>'' update wvevo_rendt set darab=isnull( (select edarab from vevo_rent inner join vevo_ren_datum on vevo_rent.bizszam=vevo_ren_datum.bizszam and vevo_rent.tetel=vevo_ren_datum.tetel and vevo_ren_datum.sorszam=wvevo_rendt.bizszam and vevo_rent.bizszam=@bsz),0) where kicsoda=@kics update wvevo_rendt set min_keszlet=darab where kicsoda=@kics /* update wvevo_rendt set keszlet_vallalati=isnull( (select isnull(sum(darab),0) from foglalasok where foglalasok.cikk_szam=wvevo_rendt.cikk_szam and foglalasok.szav_ido=wvevo_rendt.vonalkod and raktar_kod=1 and meddig>=@dat and darab>0),0) where kicsoda=@kics */ update wvevo_rendt set egyseg_ar=isnull( (select isnull(netto_ar,0) from vevo_ar_lista where vevo_ar_lista.cikk_szam=wvevo_rendt.cikk_szam and arcsoport=@arcs and datum= (select max(datum) from vevo_ar_lista where arcsoport=@arcs and datum<=left(@dat,7)) ),0) where kicsoda=@kics --delete from wvevo_rendt where kicsoda=@kics and keszlet<=0 and darab<=0 DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam,vonalkod from wvevo_rendt where kicsoda=@kics and keszlet>0 group by cikk_szam,vonalkod order by cikk_szam OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@von WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @mar=isnull(sum(darab),0) from foglalasok where foglalasok.cikk_szam=@csz and foglalasok.szav_ido=@von and raktar_kod=1 and meddig>=@dat and darab>0 if @mar>0 begin DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, keszlet from wvevo_rendt where kicsoda=@kics and cikk_szam=@csz and vonalkod=@von and keszlet>0 order by vonalkod OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @ssz,@kesz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @mar>0 begin if @mar>@kesz begin update wvevo_rendt set keszlet_vallalati=@kesz where kicsoda=@kics and bizszam=@ssz set @mar=@mar-@kesz end else begin update wvevo_rendt set keszlet_vallalati=@mar where kicsoda=@kics and bizszam=@ssz set @mar=0 end end END FETCH NEXT FROM kvevo_rent INTO @ssz,@kesz END CLOSE kvevo_rent DEALLOCATE kvevo_rent end END FETCH NEXT FROM kvevo_renf INTO @csz,@von END CLOSE kvevo_renf DEALLOCATE kvevo_renf update wvevo_rendt set keszlet=keszlet - keszlet_vallalati + darab where kicsoda=@kics and keszlet>0 --delete from wvevo_rendt where kicsoda=@kics and keszlet<=0 end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [vevo_elorent_feltolt_masodszor] @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON declare @kesz as float declare @csz char(14) declare @ssz as char(10) declare @dat as char(10) declare @von as varchar(14) declare @mar as float set @dat=dbo.mygetdate() update wvevo_rendt set rendelt=keszlet.darab from keszlet where keszlet.sorszam=wvevo_rendt.bizszam and wvevo_rendt.kicsoda=@kics DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam,vonalkod from wvevo_rendt where kicsoda=@kics and rendelt>0 group by cikk_szam,vonalkod order by cikk_szam OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@von WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @mar=isnull(sum(darab),0) from foglalasok where foglalasok.cikk_szam=@csz and foglalasok.szav_ido=@von and raktar_kod=1 and meddig>=@dat and darab>0 if @mar>0 begin DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, rendelt from wvevo_rendt where kicsoda=@kics and cikk_szam=@csz and vonalkod=@von and rendelt>0 order by vonalkod OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @ssz,@kesz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @mar>0 begin if @mar>@kesz begin update wvevo_rendt set vrendelt=@kesz where kicsoda=@kics and bizszam=@ssz set @mar=@mar-@kesz end else begin update wvevo_rendt set vrendelt=@mar where kicsoda=@kics and bizszam=@ssz set @mar=0 end end END FETCH NEXT FROM kvevo_rent INTO @ssz,@kesz END CLOSE kvevo_rent DEALLOCATE kvevo_rent end END FETCH NEXT FROM kvevo_renf INTO @csz,@von END CLOSE kvevo_renf DEALLOCATE kvevo_renf update wvevo_rendt set rendelt=rendelt - vrendelt + min_keszlet where kicsoda=@kics and rendelt>0 end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_kassza_visszaru] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @uzletkoto kulcs, @fizmod char(1), @fizhat datum, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @aru_szolg int declare @bsz bizonylat_szam set @tranznev='t_vevo_szle_va'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) set @rensz='' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, @hsz, @rensz, '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @tipus, @uzletkoto, '', '', '', '1', @kics, dbo.myGetDateTime()) 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, -@edb, -@db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) insert into vevo_szlet_td select @sorsz, @tet, E1, E2 from wvevo_szlet_td where tetel = @tet and kicsoda = @kics if @aru_szolg=1 begin set @n_db=-@db * @szorz exec karton_vissza 'vevo_szle', @SorSZ , @TET, @n_db, @ren_bsz, @ren_tet, 'vevo_szle_visszaru', @rakk, @csz, @kics end if len(rtrim(@ren_bsz))<>0 begin update vevo_szlet set darab=darab-@db where bizszam=@ren_bsz and tetel=@ren_tet end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg END CLOSE kvevo_szle DEALLOCATE kvevo_szle exec vevo_szle_kassza_nyug_tranz_nelkul @sorsz, @dat, @fizmod, @fizhat, @kurz, '', @kics delete from wvevo_szlet where kicsoda=@kics COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz, '' end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_mire_tolt] (@vevo kulcs, @kics kicsoda) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) set @tranznev = 'vevo_tolt'+@kics begin transaction @tranznev delete from wvevo_tel where kicsoda=@kics insert into wvevo_tel SELECT VEVO_KOD, TELEP_KOD, TELEP_NEV, VAROS, IRANYITO, CIM, kerulet, kozterulet_jellege, hazszam, epulet, lepcsohaz, szint, ajto, KAPCSOLAT, TELEFON, EMAIL, KARTYA, LIMIT, jovedeki, TOROLT, @kics, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, idokapu, iso, allam,'' FROM vevo_tel WHERE vevo_kod=@vevo commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_mit_tolt] (@vevo kulcs, @kics kicsoda) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev varchar(50) set @tranznev = 'vevo_tolt'+@kics begin transaction @tranznev delete from wvevo_tel1 where kicsoda=@kics insert into wvevo_tel1 SELECT VEVO_KOD, TELEP_KOD, TELEP_NEV, VAROS, IRANYITO, CIM, 'Átvisz', 0, '', '', @kics FROM vevo_tel WHERE vevo_kod=@vevo and telep_kod<>'0' commit transaction @tranznev end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_mod] @vkod kulcs, @NEV nev, @ir char(6), @va nev, @orszag char(3), @cim nev, @tel nev, @fax nev, @kap nev, @email nev, @allam varchar(255), @ln nev, @li nev, @lv nev, @lc nev, @lorsz char(2), @lallam varchar(255), @ado nev, @eu_ado nev, @utlev varchar(20), @bank nev, @jov nev, @acs kulcs, @akccs kulcs, @kedv kedvezmeny, @fm char(1), @fh int, @vcs kulcs, @vl kulcs, @vcj kulcs, @vt kulcs, @scikk kulcs, @ve char(1), @sajat char(1), @nyelv char(2), @eszla char(1), @zar char(1), @vevoweb char(1), @bejel_email varchar(50), @kics kicsoda, @kerulet varchar(50), @kozterulet_jellege varchar(50), @hazszam varchar(50), @epulet varchar(50), @lepcsohaz varchar(50), @szint varchar(50), @ajto varchar(50), @edi varchar(14), @hitkeret numeric(18,2), @fafa char(1), @vevoweb1 char(1), @bejel_email1 varchar(50), @csopaz varchar(13) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON BEGIN TRANSACTION t_vevouj update vevok set vevo_nev=@NEV , iranyito=@ir , varos=@va , --orszag=@orszag, cim=@cim , telefon=@tel , fax=@fax , kapcsolat=@kap , email=@email, lnev=@ln, liranyito=@li, lvaros=@lv, lcim=@lc, adoszam=@ado , eu_adoszam=@eu_ado , utlevel=@utlev , bank=@bank , jovedeki=@jov , vevo_arcsoport=@acs , vevo_akc_csoport=@akccs , kedvezmeny=@kedv, fizmod=@fm , fizhat=@fh , vevo_csoport=@vcs, vevo_lanc=@vl, vevo_cegjelleg=@vcj, vevo_terulet=@vt, vevo_cszcsoport=@scikk, viszontelado=@ve, sajat_bolt=@sajat, eszamla=@eszla, kicsoda=@kics, nyelv=@nyelv, modositva=dbo.mygetdatetime(), iso=@orszag, allam=@allam, liso=@lorsz, lallam=@lallam, kerulet=@kerulet, kozterulet_jellege= case @orszag when 'HU' then @kozterulet_jellege else '' end , hazszam= case @orszag when 'HU' then @hazszam else '' end , epulet=@epulet, lepcsohaz=@lepcsohaz, szint=@szint, ajto=@ajto, fordafa=@fafa where vevo_kod=@vkod exec vevo_beir_telmeg @vkod, @kics if @zar='1' begin if (select count(*) from vevok_zaradek where vevo_kod=@vkod)>0 update vevok_zaradek set zaradek=@zar where vevo_kod=@vkod else insert into vevok_zaradek values(@vkod,@zar) end else begin delete from vevok_zaradek where vevo_kod=@vkod end delete from edi_partner where tipus='V' and partner_kod=@vkod and telep_kod='0' if len(@edi)>0 insert into edi_partner values('V', @vkod, '0', @edi) delete from vevok_csoportazon where vevo_kod=@vkod if len(@csopaz)>0 insert into vevok_csoportazon values(@vkod, @csopaz) if @vevoweb='1' begin if (select count(*) from _web_belepes where vevo_kod=@vkod and belep_nev=@bejel_email)>0 begin update _web_belepes set belep_nev=@bejel_email, email=@bejel_email where vevo_kod=@vkod and belep_nev=@bejel_email end else begin insert into _web_belepes values(@bejel_email,'',@bejel_email,@vkod,0,'','','',0) end end else begin delete from _web_belepes where vevo_kod=@vkod end if @vevoweb1='1' begin if (select count(*) from _web_nk_belepes where vevo_kod=@vkod)>0 begin update _web_nk_belepes set belep_nev=@bejel_email1, email=@bejel_email1 where vevo_kod=@vkod end else begin insert into _web_nk_belepes values(@bejel_email1,'',@bejel_email1,@vkod,0,'','','') end end else begin delete from _web_nk_belepes where vevo_kod=@vkod end if @hitkeret<>0 if (select count(*) from vevok_hitelkeret where vevo_kod=@vkod)>0 update vevok_hitelkeret set hitelkeret=@hitkeret where vevo_kod=@vkod else insert into vevok_hitelkeret values(@vkod, @hitkeret) else delete from vevok_hitelkeret where vevo_kod=@vkod delete from vevo_kedv where vevo_kod=@vkod insert into vevo_kedv select @vkod, tipus, ertek, kedvezmeny from wvevo_kedv where kicsoda=@kics delete from wvevo_tel where kicsoda=@kics delete from wvevo_bank where kicsoda=@kics delete from wvevo_kapcsolat where kicsoda=@kics delete from wvevo_kedv where kicsoda=@kics COMMIT TRANSACTION t_vevouj end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_allapot_akt] @ren_bsz bizonylat_szam WITH RECOMPILE AS begin SET NOCOUNT ON declare @mennyi as int select @mennyi=count(*) from vevo_rent where bizszam=@ren_bsz and darab<>0 if @mennyi=0 update vevo_renf set allapot='teljesült' where bizszam=@ren_bsz else begin select @mennyi=count(*) from vevo_rent where bizszam=@ren_bsz and darab0 update vevo_renf set allapot='hátralékos' where bizszam=@ren_bsz else update vevo_renf set allapot='rögzített' where bizszam=@ren_bsz end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_mod] @bsz bizonylat_szam, @szcim char(4), @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @fmod char(1), @afament bit, @pn penznem, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @tet bizonylat_tetel declare @atet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @_edb mennyiseg declare @eredb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @akccsoport kulcs declare @vanfog char(1) set @tranznev='t_vevo_renf_mod'+@kics set @vanfog=dbo.xrfuggveny('FoglalAutVevoRend') BEGIN TRANSACTION @tranznev update vevo_renf set szallcim =@szcim, szall_dat =@szdat, idopont =@ido, visszaig_dat=@vdat, UZLETKOTO =@uzletkoto, kedvezmeny =@vkedv, MEGJEGYZES =@megj, BIZTIPUS =@tipus, afamentes =@afament, penznem =@pn, KICSODA =@kics, MODOSITVA =dbo.mygetdatetime() where bizszam=@bsz set @akccsoport=(select akciocsoport from vevo_renf where bizszam=@bsz) DECLARE kvevo_renf SCROLL CURSOR FOR select tetel, cikk_szam, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, visszaig_dat, akcio from wvevo_rent where kicsoda=@kics order by tetel OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @tet,@csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @vanfog='I' --van foglalas rendeléskor begin if @edb<=0 begin delete from foglalasok where rend_szam=@bsz and tetel=@tet end else begin select @eredb=edarab from foglalasok where rend_szam=@bsz and tetel=@tet if @eredb<>@edb update foglalasok set edarab=@edb,darab=@edb where rend_szam=@bsz and tetel=@tet end end if len(rtrim(@akcio))>0 begin set @_edb=-@edb exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @_edb end END FETCH NEXT FROM kvevo_renf INTO @tet,@csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf delete from vevo_rent where bizszam=@bsz DECLARE kvevo_renf SCROLL CURSOR FOR select tetel, cikk_szam, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, visszaig_dat, akcio from wvevo_rent where kicsoda=@kics --and edarab>0 order by tetel set @atet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @tet,@csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_rent values( @bsz, @atet, @csz, @afa, @me, @szorz, @edb, @db, @ear, @tkedv, @tvdat, @akcio) if @vanfog='I' and @edb>0 --van foglalas rendeléskor update foglalasok set tetel=@atet where rend_szam=@bsz and tetel=@tet if len(rtrim(@akcio))>0 exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb set @atet=@atet + 1 END FETCH NEXT FROM kvevo_renf INTO @tet,@csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf exec vevo_ren_allapot_akt @bsz if len(@fmod)>0 if (select count(*) from vevo_ren_web where bizszam=@bsz)=0 insert into vevo_ren_web values(@bsz,0,@fmod) else update vevo_ren_web set fiz_mod=@fmod where bizszam=@bsz DELETE from wvevo_rent where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_mod_datum] @sorsz bizonylat_szam, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @kulcs varchar(20) declare @rakk kulcs declare @meddig char(10) declare @kssz bizonylat_szam declare @vevo kulcs set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev DELETE from wvevo_rendt where darab<=0 and kicsoda=@kics if (select count(*) from wvevo_rendt where kicsoda=@kics)>0 begin delete from vevo_ren_datum where bizszam=@sorsz delete from foglalasok where rend_szam=@sorsz delete from vevo_rent where bizszam=@sorsz update vevo_renf set megjegyzes=@megj where bizszam=@sorsz select @vevo=vevo from vevo_renf where bizszam=@sorsz DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam, afa_kulcs, menny_egys, darab, egyseg_ar, vonalkod, bizszam from wvevo_rendt where kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end set @tet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@db,@ear,@tvdat,@kssz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_rent values( @sorsz, @tet, @csz, @afa, @me, 1, @db, @db, @ear, 0, '', '0') insert into vevo_ren_datum values(@sorsz,@tet,@csz,@tvdat,@kssz) if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakk= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakk, @meddig, @kics, @tvdat, '','', @sorsz,@tet end set @tet = @tet + 1 END FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@db,@ear,@tvdat,@kssz END CLOSE kvevo_renf DEALLOCATE kvevo_renf end DELETE from wvevo_rendt where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [vevo_ren_term_uj] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @ukod varchar(20), @fmod char(1), @kics kicsoda AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev exec vevo_ren_term_uj_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @arcsoport, @akccsoport, @megj, @tipus, @ukod, @fmod, @kics DELETE from wvevo_rent_term where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_term_uj_tranz_nelkul] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @ukod varchar(20), @fmod char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @kulcs varchar(20) declare @rakk kulcs declare @meddig char(10) set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_ren' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_renf values(@sorsz, @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @akccsoport, @arcsoport, @megj, @tipus, 'rögzített', @kics, dbo.mygetdatetime(), 0 ) DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, visszaig_dat, akcio from wvevo_rent_term where kicsoda=@kics order by cikk_nev set @tet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_rent values( @sorsz, @tet, @csz, @afa, @me, @szorz, @edb, @db, @ear, @tkedv, @tvdat, @akcio) if len(rtrim(@akcio))>0 exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakk= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakk, @meddig, @kics, '','','', @sorsz,@tet end set @tet = @tet + 1 END FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf /* if len(@fmod)>0 insert into vevo_ren_web values(@sorsz, 0, @fmod) if len( @ukod )>0 --van ügyletkód insert into ugyletek values(@sorsz, @ukod, 'vevo_rendeles') */ SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_uj] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @ukod varchar(20), @fmod char(1), @rakk kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @rakt kulcs set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev if dbo.xrfuggveny('RendRaktarra')='I' begin if @rakk=0 begin DECLARE c1 scroll CURSOR for SELECT raktar_kod from wvevo_rent inner join cikkek on cikkek.cikk_szam=wvevo_rent.cikk_szam WHERE kicsoda=@kics and aru_szolg='1' group by raktar_kod order by raktar_kod open c1 fetch next from c1 into @rakt while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_ren_uj_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @arcsoport, @akccsoport, @megj, @tipus, @ukod, @fmod, @rakt, @kics END fetch next from c1 into @rakt end close c1 deallocate c1 end else exec vevo_ren_uj_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @arcsoport, @akccsoport, @megj, @tipus, @ukod, @fmod, @rakk, @kics end else exec vevo_ren_uj_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @arcsoport, @akccsoport, @megj, @tipus, @ukod, @fmod, 0, @kics DELETE from wvevo_rent where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_uj_tranz_nelkul] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @ukod varchar(20), @fmod char(1), @rakk kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @kulcs varchar(20) declare @rakt kulcs declare @meddig char(10) declare @szall kulcs declare @raktar kulcs set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_ren' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_renf values(@sorsz, @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @akccsoport, @arcsoport, @megj, @tipus, 'rögzített', @kics, dbo.mygetdatetime(), @rakk ) DECLARE kvevo_renf SCROLL CURSOR FOR select wvevo_rent.cikk_szam, wvevo_rent.afa_kulcs, wvevo_rent.menny_egys, wvevo_rent.szorzo, edarab, darab, egyseg_ar, kedvezmeny, visszaig_dat, wvevo_rent.akcio from wvevo_rent inner join cikkek on cikkek.cikk_szam=wvevo_rent.cikk_szam where kicsoda=@kics and (@rakk=0 or @rakk=cikkek.raktar_kod) order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_rent.cikk_szam else wvevo_rent.cikk_nev end set @tet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_rent values( @sorsz, @tet, @csz, @afa, @me, @szorz, @edb, @db, @ear, @tkedv, @tvdat, @akcio) if len(rtrim(@akcio))>0 exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakt= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakt, @meddig, @kics, '','','', @sorsz,@tet end set @tet = @tet + 1 END FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf if len(@fmod)>0 insert into vevo_ren_web values(@sorsz, 0, @fmod) if len( @ukod )>0 --van ügyletkód insert into ugyletek values(@sorsz, @ukod, 'vevo_rendeles') if dbo.xrfuggveny('KeszletSzrend')='I' or dbo.xrfuggveny('MinKeszletSzrend')='I' begin select @raktar=min(kod) from stelephely DECLARE kszall SCROLL CURSOR FOR select szallito from wvevo_rent inner join vszall_utanrend on wvevo_rent.cikk_szam=vszall_utanrend.cikk_szam where kicsoda=@kics and darab+min_kesz>=szabad_keszlet+szrend group by szallito order by szallito OPEN kszall FETCH NEXT FROM kszall INTO @szall WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN delete from wszall_rent where kicsoda=@kics insert into wszall_rent select '',ROW_NUMBER() OVER (ORDER BY wvevo_rent.cikk_nev),'',wvevo_rent.cikk_szam,wvevo_rent.cikk_nev, wvevo_rent.afa_kulcs,wvevo_rent.menny_egys,1,ut_besz_ar,0,darab+min_kesz-(szabad_keszlet+szrend), darab+min_kesz-(szabad_keszlet+szrend),@kics from wvevo_rent inner join vszall_utanrend on wvevo_rent.cikk_szam=vszall_utanrend.cikk_szam where kicsoda=@kics and darab+min_kesz>=szabad_keszlet+szrend and szallito=@szall exec szall_ren_uj_tran_nelkul @szall,@dat,@dat,@raktar,'HUF',0,'Automatikus rendelés','','0',@kics END FETCH NEXT FROM kszall INTO @szall END CLOSE kszall DEALLOCATE kszall end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_uj_web] --Ezt használja a FirstBestFruit @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev exec vevo_ren_uj_web_tranz_nelkul @vevo, @szcim, @dat, @szdat, '', @vdat, @uzletkoto, @vkedv, @pn, '0', @arcsoport, @akccsoport, @megj, 5, --elektronikus 0,'', @kics DELETE from webvevo_rent where vevo=@vevo COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_uj_web_tranz_nelkul] @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @tipus kulcs, @fiz_ert egyseg_ar, @fiz_mod char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @akcio char(1) declare @afa afakulcs declare @tkedv kedvezmeny declare @tvdat datum declare @kulcs varchar(20) declare @rakk kulcs declare @meddig char(10) declare @raktar kulcs declare @szall kulcs declare @szrbsz megjegyzes set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_ren' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_renf values(@sorsz, @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @akccsoport, @arcsoport, @megj, @tipus, 'rögzített', @kics, dbo.mygetdatetime(), 0 ) if len(@fiz_mod)>0 insert into vevo_ren_web values(@sorsz, @fiz_ert, @fiz_mod) DECLARE kvevo_renf SCROLL CURSOR FOR select cikk_szam, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, visszaig_dat, akcio from webvevo_rent where vevo=@vevo order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then cikk_szam else cikk_nev end set @tet=1 OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @afamentes='1' set @afa='AM' insert into vevo_rent values( @sorsz, @tet, @csz, @afa, @me, @szorz, @edb, @db, @ear, @tkedv, @tvdat, @akcio) if len(rtrim(@akcio))>0 exec akc_ke_aktualizal @akccsoport, @szdat, @csz, @edb if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakk= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakk, @meddig, @kics, '','','', @sorsz,@tet end set @tet = @tet + 1 END FETCH NEXT FROM kvevo_renf INTO @csz,@afa,@me,@szorz,@edb,@db,@ear,@tkedv,@tvdat,@akcio END CLOSE kvevo_renf DEALLOCATE kvevo_renf if dbo.xrfuggveny('KeszletSzrend')='I' or dbo.xrfuggveny('MinKeszletSzrend')='I' begin select @raktar=min(kod) from stelephely DECLARE kszall SCROLL CURSOR FOR select szallito from webvevo_rent inner join vszall_utanrend on webvevo_rent.cikk_szam=vszall_utanrend.cikk_szam where vevo=@vevo and darab+min_kesz>=szabad_keszlet+szrend group by szallito order by szallito OPEN kszall FETCH NEXT FROM kszall INTO @szall WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN delete from wszall_rent where kicsoda=@kics insert into wszall_rent select '',ROW_NUMBER() OVER (ORDER BY webvevo_rent.cikk_nev),'',webvevo_rent.cikk_szam,webvevo_rent.cikk_nev, webvevo_rent.afa_kulcs,webvevo_rent.menny_egys,1,ut_besz_ar,0,darab+min_kesz-(szabad_keszlet+szrend), darab+min_kesz-(szabad_keszlet+szrend),@kics from webvevo_rent inner join vszall_utanrend on webvevo_rent.cikk_szam=vszall_utanrend.cikk_szam where vevo=@vevo and darab+min_kesz>=szabad_keszlet+szrend and szallito=@szall set @szrbsz=rtrim(@megj) +' ÁrukerID:' + @sorsz exec szall_ren_uj_tran_nelkul @szall,@dat,@dat,@raktar,'HUF',0,@szrbsz,'','0',@kics END FETCH NEXT FROM kszall INTO @szall END CLOSE kszall DEALLOCATE kszall end SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_ren_uj_web1] --Ezt használja a Kalmarket @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @ido varchar(20), @vdat datum, @uzletkoto kulcs, @vkedv kedvezmeny, @pn penznem, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @megj megjegyzes, @fiz_ert egyseg_ar, @fiz_mod char(1), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev exec vevo_ren_uj_web_tranz_nelkul @vevo, @szcim, @dat, @szdat, @ido, @vdat, @uzletkoto, @vkedv, @pn, @afamentes, @arcsoport, @akccsoport, @megj, 5, --elektronikus @fiz_ert, @fiz_mod, @kics DELETE from webvevo_rent where vevo=@vevo COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_rend_hatralekbol] @rendszam bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_renf_uj'+@kics BEGIN TRANSACTION @tranznev declare @sorsz bizonylat_szam declare @ev char(4) declare @kulcs varchar(20) declare @fmod char(1) declare @rakt int declare @meddig varchar(10) declare @dat char(10) declare @tet int declare @vevo int declare @csz cikk_szam declare @db mennyiseg set @dat=dbo.mygetdate() set @ev= left(@dat,4) set @kulcs = @ev + 'vevo_ren' select @fmod=isnull(fiz_mod,'') from vevo_ren_web where bizszam=@rendszam select @vevo=vevo from vevo_renf where bizszam=@rendszam exec bizsorsz_no @kulcs, @sorsz output insert into vevo_renf select @sorsz, vevo, szallcim, @dat, @dat, idopont, @dat, uzletkoto, kedvezmeny, penznem, afamentes, akciocsoport, arcsoport, megjegyzes, biztipus, 'rögzített', @kics, dbo.mygetdatetime(), raktar_kod from vevo_renf where bizszam=@rendszam insert into vevo_rent select @sorsz,ROW_NUMBER() OVER (ORDER BY cikk_nev), vevo_rent.cikk_szam,vevo_rent.afa_kulcs,vevo_rent.menny_egys, szorzo,darab,darab,egyseg_ar,kedvezmeny,dbo.mygetdate(),'' from vevo_rent inner join cikkek on cikkek.cikk_szam=vevo_rent.cikk_szam where darab>0 and bizszam=@rendszam if dbo.xrfuggveny('FoglalasHasznal')='I' and dbo.xrfuggveny('FoglalAutVevoRend')='I' begin set @rakt= convert(int, dbo.xrfuggveny('FoglalVevoRendRaktar')) set @meddig= left(dbo.myDToC( getdate() + convert(int, dbo.xrfuggveny('FoglalNapig')) ) ,10) DECLARE kvevo_renf SCROLL CURSOR FOR select tetel,cikk_szam,darab*szorzo from vevo_rent where bizszam=@sorsz order by tetel OPEN kvevo_renf FETCH NEXT FROM kvevo_renf INTO @tet,@csz,@db WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec foglalas_uj_tranz_nelkul @csz, @db, @vevo, @rakt, @meddig, @kics, '','','', @sorsz,@tet END FETCH NEXT FROM kvevo_renf INTO @tet,@csz,@db END CLOSE kvevo_renf DEALLOCATE kvevo_renf end if len(@fmod)>0 insert into vevo_ren_web values(@sorsz, 0, @fmod) COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [VEVO_REND_TERM_AR_GEN_2014] @arcs as int, @elso as char(1) AS declare @dat as char(10) declare @dat1 as char(10) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @dat=left(replace(convert(char,getdate() - 14, 20 ),'-','.'),10) set @dat1=left(replace(convert(char,getdate(), 20 ),'-','.'),10) if @elso='1' begin delete from vevo_rend_term_ar_2014 --ellenőrzi van-e listaár, ha nincs, akkor létrehozza if (select count(*) from vevo_ar_lista where arcsoport=43 and datum=left(@dat1,7))=0 begin insert into vevo_ar_lista select arcsoport,left(@dat1,7),cikk_szam,netto_ar,brutto_ar,beszerz_ar,arres,kicsoda,modositva from vevo_ar_lista where arcsoport=43 and datum=left(@dat,7) end --keszlet kiszamolas delete from WKESZLET_ARGEN delete from WKESZLET_ARGEN1 insert into wkeszlet_argen select cikk_szam, '', sum( darab), 0, 0, 'fejleszto' from keszlet where darab>0 and raktar_kod=1 group by cikk_szam insert into wkeszlet_argen1 select cikk_szam,sum(darab*szorzo),'fejleszto' from vevo_rent INNER JOIN vevo_renf ON vevo_renf.BIZSZAM = vevo_rent.BIZSZAM where (vevo_renf.allapot='rögzitett' or vevo_renf.allapot='komissio alatt') and vevo_renf.rend_dat>=@dat group by cikk_szam update wkeszlet_argen set egyseg_ar=isnull( (select darab from wkeszlet_argen1 where wkeszlet_argen.cikk_szam=wkeszlet_argen1.cikk_szam), 0) update wkeszlet_argen set darab= case when darab-egyseg_ar>0 then darab-egyseg_ar else 0 end insert into vevo_rend_term_ar_2014 select cikkek.cikk_szam, left(cikkek.cikk_nev,45), cikkek.menny_egys, cikkek.vtsz, cikkek.afa_kulcs, cikkek.cikkcsop2, cikkek.zsugor_db, cikkek.db_kart, cikkek.kart_sor, cikkek.kart_rakl, cikkek.tgon, cikkek.ntgon, cikkek.tgonszor, cikkek.ntgonszor, 0, 0, vevo_ar_lista.netto_ar, vevo_ar_lista.netto_ar*(100 + afaertek ) /100, '', 0, 0, '', isnull(wkeszlet_argen.darab,0), cikkek.norm_me, cikkek.norm_szorz, cikkek.szallito, gongyoleg, cikkek.gyarto from CIKKEK INNER JOIN vevo_ar_lista ON CIKKEK.CIKK_SZAM = vevo_ar_lista.CIKK_SZAM and vevo_ar_lista.arcsoport=43 and datum=left(@dat1,7) INNER JOIN AFA_KULCS ON CIKKEK.AFA_KULCS = AFA_KULCS.AFAKULCS LEFT OUTER JOIN wkeszlet_argen ON CIKKEK.CIKK_SZAM = wkeszlet_argen.CIKK_SZAM where cikkek.kifutott<>'1' -- a nem boltra szállítós: beszerz_ar=nettó ár update vevo_rend_term_ar_2014 set beszerz_ar=isnull( (select ut_besz_ar from cikkek where cikkek.cikk_szam=vevo_rend_term_ar_2014.cikk_szam ),0) update vevo_rend_term_ar_2014 set beszerz_br_ar=beszerz_ar * (100 + case when afa_kulcs='AM' or afa_kulcs='FA' then 0 else convert(float,afa_kulcs) end )/100 --ide jönnek a szállítók rendezése -- *-al kezdödőek ->Arzenál import,... vagy ..-ra végződő termékek is -> Arzenál import,... update vevo_rend_term_ar_2014 set szallito=673 where right(rtrim(cikk_nev),2)='..' or szallito in (SELECT SZALL_KOD from szallito where szall_nev like '*%') update vevo_rend_term_ar_2014 set gyarto=159 where right(rtrim(cikk_nev),2)='..' or gyarto in (SELECT KOD from gyarto where nev like '*%') --vonalkodok generalasa delete from wf_vonal insert into wf_vonal select CIKK_SZAM, VONALKOD, SZORZO, MENNY_EGYS, ALAP from vonal where len(rtrim(vonalkod))>4 and cikk_szam in (select cikk_szam from cikkek where kifutott<>'1') delete from wf_vonal where (vonalkod like '28%' and len(vonalkod)=6) or (vonalkod>'9' and len(vonalkod)<6) or vonalkod<'0' or vonalkod like '2110%' end else begin update vevo_rend_term_ar_2014 set beszerz_ar =vevo_ar_lista.netto_ar, beszerz_br_ar =vevo_ar_lista.netto_ar * (100 + case when afa_kulcs='AM' or afa_kulcs='FA' then 0 else convert(float,afa_kulcs) end )/100 from vevo_ar_lista where vevo_rend_term_ar_2014.cikk_szam=vevo_ar_lista.cikk_szam and vevo_ar_lista.arcsoport=@arcs and datum=left(@dat1,7) end SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [VEVO_REND_TERM_UJ] @emailcim char(40), @emailjelszo char(20), @vevo char(12), @szcim char(4), @szcnev char(50), @szla_kiv char(1), @kivkod int, @prg char(1), @odbc char(20), @emailuser char(30) AS SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @@sorsz int declare @tranznev char(32) set @tranznev='t_rend_term' --begin tran BEGIN TRANSACTION @tranznev --uj sorszam exec altsorsz_no 'rend_term', @@sorsz output insert into vevo_rend_term values(@@sorsz, @vevo, @szcim, @szcnev, @emailcim, @emailjelszo, @szla_kiv, @kivkod, '', @prg, @odbc, @emailuser ) --end tran COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_rend_tor] @bsz bizonylat_szam WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_vevorendtor delete from foglalasok where rend_szam=@bsz delete from _web_rend_atvetel where bizszam=@bsz delete from vevo_ren_web where bizszam=@bsz delete from vevo_ren_datum where bizszam=@bsz delete from vevo_rent where bizszam=@bsz delete from vevo_renf where bizszam=@bsz COMMIT TRANSACTION t_vevorendtor SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_rend_tor_log] @bsz bizonylat_szam WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION t_vevorendtor delete from foglalasok where rend_szam=@bsz delete from _web_rend_atvetel where bizszam=@bsz delete from vevo_ren_web where bizszam=@bsz delete from vevo_ren_datum where bizszam=@bsz delete from vevo_rent where bizszam=@bsz delete from vevo_renf where bizszam=@bsz delete from arulog..kom_feladat where bizszam=@bsz and tulaj=dbo.xrfuggveny('AruLogTulaj') COMMIT TRANSACTION t_vevorendtor SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_rent_feltolt] @bizsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON delete from wvevo_rent where kicsoda=@kics insert into wvevo_rent select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, darab, edarab, egyseg_ar, kedvezmeny, visszaig_dat, akcio, @kics from vvevo_rent where bizszam=@bizsz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_rent_feltolt1] @bizsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON delete from wvevo_rent where kicsoda=@kics insert into wvevo_rent select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, edarab, egyseg_ar, kedvezmeny, visszaig_dat, akcio, @kics from vvevo_rent where bizszam=@bizsz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_egyedi] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @fmod char(1), @fhat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @uzletkoto kulcs, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500), @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @bsz bizonylat_szam set @tranznev='t_vevo_szle_uj'+@kics BEGIN TRANSACTION @tranznev exec vevo_szla_egyedi_tr_nelkul @hsz, @vevo, @szcim, @dat, @szdat, @fmod, @fhat, @rakk, @pn, @kurz, @afamentes, @arcsoport, @akccsoport, @vkedv, @megj, @tipus, @uzletkoto, @rendsz, @sz_felt, @sz_mod, @csom, @nsu, @bsu, @zar, @kics delete from wvevo_szlet where kicsoda=@kics delete from wkomissio where rendel_bsz=@rendsz COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz, '' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_egyedi_tr_nelkul] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @szdat datum, @fmod char(1), @fhat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @uzletkoto kulcs, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500), @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @vnev nev declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @etet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @aru_szolg int declare @td char(1) declare @sorrend varchar(20) set @sorrend=dbo.xrBizTetRend() set @rensz='' -- set @tranznev='t_vevo_szle_uj'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' select @vnev=vevo_nev from vevok where vevo_kod=@vevo -- BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, @hsz, @rensz, '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @tipus, @uzletkoto, '', '', '', '', @kics, dbo.myGetDateTime()) DECLARE kvevo_szle SCROLL CURSOR FOR select wvevo_szlet.tetel, 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, cikkek.termekdijas from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin if @aru_szolg=1 begin set @n_db=@db * @szorz -- kiveszi a foglalt mennyiségből exec foglalas_ki @vevo, @rakk, @csz, @n_db, @kics exec karton_ki 'vevo_szle', @SorSZ , @ETET, @TET, @RAKK, @CSZ, @n_db, 'vevo_szle_uj', @kics end insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) if @td='1' --csak ha termékdíjas exec vevo_szlet_td_uj @sorsz, @vevo, @tet, @csz if len(rtrim(@ren_bsz))<>0 begin update vevo_rent set darab= CASE WHEN darab<@db THEN 0 ELSE darab-@db END where bizszam=@ren_bsz and tetel=@ren_tet end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td END CLOSE kvevo_szle DEALLOCATE kvevo_szle DECLARE kvevo_szle1 SCROLL CURSOR FOR select wvevo_szlet.tetel, 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, cikkek.termekdijas from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle1 FETCH NEXT FROM kvevo_szle1 INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz <0.00001 begin insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle1 INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td END CLOSE kvevo_szle1 DEALLOCATE kvevo_szle1 /* Végigmegy a rendeléseken, és aktualizálja a rendelések állapotát */ DECLARE kvevo_szl_ren SCROLL CURSOR FOR select rendel_ssz from wvevo_szlet where kicsoda=@kics and len(rtrim(rendel_ssz))>0 group by rendel_ssz OPEN kvevo_szl_ren FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_ren_allapot_akt @ren_bsz END FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz END CLOSE kvevo_szl_ren DEALLOCATE kvevo_szl_ren update wvevo_szlet set bizszam=@sorsz where kicsoda=@kics -- szállítólevél nyugtázása exec vevo_szle_nyug_tranz_nelkul @sorsz, @szdat, @fmod, @fhat, @kurz, @megj, @kics, @rendsz, @sz_felt, @sz_mod, @csom, @nsu, @bsu, @zar -- delete from wvevo_szlet where kicsoda=@kics -- COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [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 SET NOCOUNT 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 cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @afak afakulcs 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 case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end 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 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 case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc 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 GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_pu] @vkod kulcs, @tdat datum, @szdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @kedv kedvezmeny, @tipus kulcs, @uzletkoto kulcs, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @ev char(4) declare @vnev nev declare @cn cikk_nev declare @tet bizonylat_tetel declare @csz cikk_szam declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @db mennyiseg declare @afak afakulcs declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @kulcs varchar(20) declare @export int declare @nyelv char(1) declare @orsz char(3) declare @ir nev declare @va nev declare @ci nev declare @ado nev declare @ker nev declare @jell nev declare @hsz nev declare @epu nev declare @lcs nev declare @szi nev declare @ajt nev set @export=0 set @nyelv='1' set @tranznev='t_vevo_puj_uj'+@kics set @ev=left(@szdat,4) set @kulcs = @ev + 'vevo_szla' if (select count(*) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv')>0 select @nyelv=rtrim(ertek) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv' select @vnev=vevo_nev, @orsz=iso, @ir=iranyito, @va=varos, @ci=cim, @ado=case when iso='HU' then adoszam else eu_adoszam end, @ker=kerulet, @jell=kozterulet_jellege, @hsz=hazszam, @epu=epulet, @lcs=lepcsohaz, @szi=szint, @ajt=ajto from vevok where vevo_kod=@vkod if @orsz<>'HU' set @export=1 BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlaf select @sorsz, @vkod, @vnev, @tdat, @szdat, @fmod, @fhat, @pn, @kurz, 0, @kedv, @tipus, @uzletkoto, @megj, '', '', '', '', '1', 0, @kics, dbo.myGetDateTime(),0,'', @ir, @va, @ci, @orsz, @ado, @ker,@jell,@hsz, @epu, @lcs, @szi, @ajt, adoszam,felhasznalo,iranyito,varos,kerulet,cim,kozterulet_jellege, hazszam,epulet,lepcsohaz,szint,ajto,ev_nev,ev_szam from regisztral DECLARE kvevo_szla_pu SCROLL CURSOR FOR select wvevo_szlat.cikk_szam, CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.cikk_nev_ang='' then cikkek.cikk_nev else cikkek.cikk_nev_ang end ELSE cikkek.cikk_nev END, --wvevo_szlat.cikk_nev, CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.menny_egys_ang='' then wvevo_szlat.menny_egys else cikkek.menny_egys_ang end ELSE wvevo_szlat.menny_egys END, --wvevo_szlat.menny_egys, wvevo_szlat.szorzo, wvevo_szlat.afa_kulcs, wvevo_szlat.darab, wvevo_szlat.egyseg_ar, wvevo_szlat.kedvezmeny, wvevo_szlat.megjegyzes from wvevo_szlat inner join cikkek on wvevo_szlat.cikk_szam=cikkek.cikk_szam where kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlat.cikk_szam else CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.cikk_nev_ang='' then cikkek.cikk_nev else cikkek.cikk_nev_ang end ELSE cikkek.cikk_nev END end OPEN kvevo_szla_pu FETCH NEXT FROM kvevo_szla_pu INTO @csz, @cn, @me, @szorz, @afak, @db, @ear, @tkedv, @tmegj set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into vevo_szlat values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, @tmegj, '', '',0) set @tet=@tet+1 END FETCH NEXT FROM kvevo_szla_pu INTO @csz, @cn, @me, @szorz, @afak, @db, @ear, @tkedv, @tmegj END CLOSE kvevo_szla_pu DEALLOCATE kvevo_szla_pu delete from wvevo_szlat where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_tor] @bsz bizonylat_szam, @dat datum, @vrakk kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @bsz1 bizonylat_szam declare @pu char(1) declare @szle bizonylat_szam set @tranznev='t_vevo_szla_tor'+@kics BEGIN TRANSACTION @tranznev select @szle=bizszam from vevo_szlef where szlaszam=@bsz exec vevo_szla_tor_tranz_nelkul @bsz, @dat, @vrakk, @kics COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam, @pu=penzugyi from vevo_szlaf where kicsoda=@kics and torlo='1' order by modositva desc if @pu<>'1' exec arulog_vevo_szlaf_uj @bsz1, '' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_tor_szl_nelkul] @bsz bizonylat_szam, @dat datum, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @bsz1 bizonylat_szam declare @pu char(1) set @tranznev='t_vevo_szla_tor'+@kics BEGIN TRANSACTION @tranznev exec vevo_szla_tor_szl_nelkul_tranz_nelkul @bsz, @dat, @kics COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam, @pu=penzugyi from vevo_szlaf where kicsoda=@kics and torlo='1' order by modositva desc if @pu<>'1' exec arulog_vevo_szlaf_uj @bsz1, '' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_tor_szl_nelkul_tranz_nelkul] @ebsz bizonylat_szam, @dat bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @_edb mennyiseg declare @db mennyiseg declare @_db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @kulcs varchar(20) declare @vanjel int declare @btip char(1) declare @szlsz bizonylat_szam declare @sztet bizonylat_tetel set @ev=left(@dat,4) set @vanjel= CHARINDEX('/', @ebsz) select @btip=tipus from vevo_szlef where szlaszam=@ebsz set @kulcs = @ev + 'vevo_szla' if @vanjel=0 set @kulcs = @ev + 'vevo_kassza' else begin if @btip='6' set @kulcs = @ev + 'kassza_szla' end exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlaf select @sorsz, vevo, vevo_nev, telj_datum, @dat, fiz_modja, fiz_esed, penznem, kurzus, afamentes, kedvezmeny, tipus, uzletkoto, left('Törlő számla. Törli a '+@ebsz+'. számú számlát. '+rtrim(megjegyzes),254), '', '1', @ebsz, '', penzugyi, 0, @kics, dbo.myGetDateTime(),0,'', iranyito, varos, cim, iso, adoszam, kerulet,kozterulet_jellege,hazszam,epulet,lepcsohaz,szint,ajto, kadoszam,knev,kiranyito,kvaros,kkerulet,kkozterulet,kkozterulet_jellege,khazszam,kepulet,klepcsohaz, kszint,kajto,ev_nev,ev_szam from vevo_szlaf where bizszam= @ebsz update vevo_szlaf set torolt='1', tor_ssz=@sorsz where bizszam=@ebsz DECLARE kvevo_szla SCROLL CURSOR FOR select tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, megjegyzes, akcio, szlev_szam, szlev_tetel_szam from vevo_szlat where vevo_szlat.bizszam=@ebsz order by tetel OPEN kvevo_szla FETCH NEXT FROM kvevo_szla INTO @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @szlsz, @sztet set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if abs(@edb * @szorz) >0.00001 begin set @_edb = - @edb set @_db = - @db insert into vevo_szlat values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @_edb, @_db, @ear, @tkedv, @tmegj, @akc, @szlsz, @sztet) end END FETCH NEXT FROM kvevo_szla INTO @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @szlsz, @sztet END CLOSE kvevo_szla DEALLOCATE kvevo_szla --szállítólevelek mentése a törlés miatt if (select count(*) from vevo_szlef where szlaszam=@ebsz)>1 insert into vevo_oszla_bizszam select @ebsz, @sorsz, bizszam from vevo_szlef where szlaszam=@ebsz order by bizszam update vevo_szlef set szlaszam='' where szlaszam=@ebsz insert into vevo_szlat_td select @sorsz, tetel, e1, e2 from vevo_szlat_td where bizszam=@ebsz if (select count(*) from vevo_szlaf_export where bizszam=@ebsz)<>0 begin insert into vevo_szlaf_export select @sorsz,vevotel,rendszam,szall_felt,szall_mod,csomag,suly,zaradek from vevo_szlaf_export where bizszam=@ebsz end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szla_tor_tranz_nelkul] @ebsz bizonylat_szam, @dat datum, @vrakk kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @_edb mennyiseg declare @db mennyiseg declare @_db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @kssz bizonylat_szam declare @kulcs varchar(20) declare @szlesz bizonylat_szam declare @vanjel int declare @btip char(1) declare @szlsz bizonylat_szam declare @sztet bizonylat_tetel declare @uj_szlsz bizonylat_szam set @ev=left(@dat,4) set @vanjel= CHARINDEX('/', @ebsz) select @btip=tipus from vevo_szlef where szlaszam= @ebsz set @kulcs = @ev + 'vevo_szla' if @vanjel=0 set @kulcs = @ev + 'vevo_kassza' else begin if @btip='6' set @kulcs = @ev + 'kassza_szla' end exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlaf select @sorsz, vevo, vevo_nev, telj_datum, @dat, fiz_modja, fiz_esed, penznem, kurzus, afamentes, kedvezmeny, tipus, uzletkoto, left('Törlő számla. Törli a '+@ebsz+'. számú számlát. '+rtrim(megjegyzes),254), '', '1', @ebsz, '', penzugyi, 0, @kics, dbo.myGetDateTime(),0,'', iranyito, varos, cim, iso, adoszam, kerulet,kozterulet_jellege,hazszam,epulet,lepcsohaz,szint,ajto, kadoszam,knev,kiranyito,kvaros,kkerulet,kkozterulet,kkozterulet_jellege,khazszam,kepulet,klepcsohaz, kszint,kajto,ev_nev,ev_szam from vevo_szlaf where bizszam= @ebsz if (select count(*) from vevo_szlaf_export where bizszam=@ebsz)<>0 begin insert into vevo_szlaf_export select @sorsz,vevotel,rendszam,szall_felt,szall_mod,csomag,suly,zaradek from vevo_szlaf_export where bizszam= @ebsz end update vevo_szlaf set torolt='1', tor_ssz=@sorsz where bizszam=@ebsz DECLARE kvevo_szla SCROLL CURSOR FOR select tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, megjegyzes, akcio, szlev_szam, szlev_tetel_szam from vevo_szlat where vevo_szlat.bizszam=@ebsz order by tetel OPEN kvevo_szla FETCH NEXT FROM kvevo_szla INTO @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @szlsz, @sztet set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if Abs(@edb * @szorz) >0.00001 begin set @_edb = - @edb set @_db = - @db insert into vevo_szlat values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @_edb, @_db, @ear, @tkedv, @tmegj, @akc, @szlsz, @sztet) end END FETCH NEXT FROM kvevo_szla INTO @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @szlsz, @sztet END CLOSE kvevo_szla DEALLOCATE kvevo_szla insert into vevo_szlat_td select @sorsz, tetel, e1, e2 from vevo_szlat_td where bizszam=@ebsz --szállítólevelek mentése a törlés miatt if (select count(*) from vevo_szlef where szlaszam=@ebsz)>1 insert into vevo_oszla_bizszam select @ebsz, @sorsz, bizszam from vevo_szlef where szlaszam=@ebsz order by bizszam --szállítólevelek törlése DECLARE kvevo_szlef SCROLL CURSOR FOR select bizszam from vevo_szlef where szlaszam=@ebsz order by bizszam OPEN kvevo_szlef FETCH NEXT FROM kvevo_szlef INTO @szlesz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_szle_tor_tranz_nelkul @szlesz, @dat, @vrakk, @kics update vevo_szlef set szlaszam=@sorsz where torlo='1' and tor_ssz=@szlesz select @uj_szlsz=bizszam from vevo_szlef where torlo='1' and tor_ssz=@szlesz update vevo_szlat set szlev_szam=@uj_szlsz where bizszam=@sorsz and szlev_szam=@szlesz END FETCH NEXT FROM kvevo_szlef INTO @szlesz END CLOSE kvevo_szlef DEALLOCATE kvevo_szlef end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_ccnyug] @ssz bizonylat_szam, @szdat datum, @fmod char(1), @fhat datum, @kurz kurzus, @megj megjegyzes, @kics kicsoda, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @elozo_szla_szam bizonylat_szam declare @vevo kulcs declare @vevonev nev declare @szcim char(4) declare @btip char(1) set @tranznev='t_vevo_szle_ccnyug'+@kics BEGIN TRANSACTION @tranznev select @elozo_szla_szam=szlaszam, @vevo=vevo, @vevonev=vevo_nev, @szcim=telep_kod, @btip=tipus from vevo_szlef where bizszam=@ssz if @btip='6' set @kulcs = left(@szdat,4) + 'kassza_szla' else set @kulcs = left(@szdat,4) + 'vevo_szla' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlaf select @sorsz, @vevo, @vevonev, telj_datum, @szdat, @fmod, @fhat, penznem, @kurz, afamentes, vevo_szlaf.kedvezmeny, tipus, uzletkoto, @megj, torolt, torlo, tor_ssz, visszaru, penzugyi, koteg_sz, @kics, dbo.mygetdatetime(), 0, '', vevok.iranyito, vevok.varos, vevok.cim, vevok.iso, vevok.adoszam, vevok.kerulet,vevok.kozterulet_jellege,vevok.hazszam,vevok.epulet,vevok.lepcsohaz,vevok.szint,vevok.ajto, kadoszam,knev,kiranyito,kvaros,kkerulet,kkozterulet,kkozterulet_jellege,khazszam,kepulet,klepcsohaz, kszint,kajto,ev_nev,ev_szam from vevo_szlaf inner join vevok on vevok.vevo_kod=@vevo where bizszam=@elozo_szla_szam if @rendsz<>'' or @sz_felt<>'' or @sz_mod<>'' or @csom<>'' or @nsu<>0 or @bsu<>0 or @zar<>'' begin insert into vevo_szlaf_export values( @sorsz, @szcim, @rendsz, @sz_felt, @sz_mod, @csom, 'Nettó súly: ' + ltrim(str(@nsu,12,2)) + ' Kg; Bruttó súly: ' + ltrim(str(@bsu,12,2)) + ' Kg', @zar ) end insert into vevo_szlat select @sorsz, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, megjegyzes, akcio, szlev_szam, szlev_tetel_szam from vevo_szlat where bizszam=@elozo_szla_szam delete vevo_szlat where bizszam=@elozo_szla_szam delete vevo_szlaf where bizszam=@elozo_szla_szam update vevo_szlef set szlaszam=@sorsz where bizszam=@ssz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_eszla_nyug] @ssz bizonylat_szam, @szdat datum, @fmod char(1), @fhat datum, @kurz kurzus, @kics kicsoda, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500), @sorsz bizonylat_szam AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @vevonev nev declare @szcim char(4) set @tranznev='t_vevo_szle_ccnyug'+@kics BEGIN TRANSACTION @tranznev insert into vevo_szlaf select @sorsz, vevo, vevo_szlef.vevo_nev, telj_datum, @szdat, @fmod, @fhat, penznem, @kurz, afamentes, vevo_szlef.kedvezmeny, tipus, uzletkoto, MEGJEGYZES, '', '', '', '', '', 0, @kics, dbo.mygetdatetime(), 0, '', vevok.iranyito, vevok.varos, vevok.cim, vevok.iso, vevok.adoszam, vevok.kerulet,vevok.kozterulet_jellege,vevok.hazszam,vevok.epulet,vevok.lepcsohaz,vevok.szint,vevok.ajto, regisztral.adoszam,regisztral.felhasznalo,regisztral.iranyito,regisztral.varos,regisztral.kerulet,regisztral.cim, regisztral.kozterulet_jellege,regisztral.hazszam,regisztral.epulet,regisztral.lepcsohaz, regisztral.szint,regisztral.ajto,regisztral.ev_nev,regisztral.ev_szam from vevo_szlef inner join vevok on vevok.vevo_kod=vevo_szlef.vevo cross join regisztral where bizszam=@ssz if @szcim<>'' or @rendsz<>'' or @sz_felt<>'' or @sz_mod<>'' or @csom<>'' or @nsu<>0 or @bsu<>0 or @zar<>'' begin insert into vevo_szlaf_export values( @sorsz, @szcim, @rendsz, @sz_felt, @sz_mod, @csom, 'Nettó súly: ' + ltrim(str(@nsu,12,2)) + ' Kg; Bruttó súly: ' + ltrim(str(@bsu,12,2)) + ' Kg', @zar ) end insert into vevo_szlat select @sorsz, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, megjegyzes, akcio, bizszam, tetel from vevo_szlet where bizszam=@ssz update vevo_szlef set szlaszam=@sorsz where bizszam=@ssz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_gongy_uj] @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @fizmod char(1), @fizhat datum, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @ear egyseg_ar declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @kulcs varchar(20) declare @aru_szolg int declare @bsz1 bizonylat_szam SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_vevo_szle_va'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, '', '', '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, 6, 0, '', '', '', '1', @kics, dbo.myGetDateTime()) DECLARE kvevo_szle SCROLL CURSOR FOR select wkassza.cikk_szam, wkassza.cikk_nev, wkassza.afa_kulcs, cikkek.menny_egys, wkassza.darab, wkassza.egyseg_ar, wkassza.kedvezmeny, wkassza.akcio, cikkek.aru_szolg from wkassza inner join cikkek ON wkassza.cikk_szam = cikkek.cikk_szam where wkassza.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wkassza.cikk_szam else wkassza.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @db, @ear, @tkedv, @akc, @aru_szolg set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db >0.00001 begin insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, 1, -@db, -@db, @ear, @tkedv, '', @akc, '', 0) if @aru_szolg=1 begin set @n_db=@db exec karton_be @ev, 'vevo_szle', @SorSZ , @TET, @TET, @rakk, @csz, @n_db, @ear, 0, 0, @kics end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @db, @ear, @tkedv, @akc, @aru_szolg END CLOSE kvevo_szle DEALLOCATE kvevo_szle exec vevo_szle_kassza_nyug_tranz_nelkul @sorsz, @dat, @fizmod, @fizhat, @kurz, '', @kics delete from wkassza where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz1,'' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_kassza_nyug_tranz_nelkul] @ssz bizonylat_szam, @szdat datum, @fmod char(1), @fhat datum, @kurz kurzus, @megj megjegyzes, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @kulcs varchar(20) set @kulcs = left(@szdat,4) + 'vevo_kassza' exec bizsorsz_no @kulcs, @sorsz output update vevo_szlef set szlaszam=@sorsz where bizszam=@ssz insert into vevo_szlaf select @sorsz, vevo, vevo_szlef.vevo_nev, telj_datum, @szdat, @fmod, @fhat, penznem, @kurz, afamentes, vevo_szlef.kedvezmeny, tipus, uzletkoto, @megj, torolt, torlo, tor_ssz, visszaru, '', 0, @kics, dbo.myGetDateTime(), 0, '', vevok.iranyito, vevok.varos, vevok.cim, vevok.iso, vevok.adoszam, vevok.kerulet,vevok.kozterulet_jellege,vevok.hazszam,vevok.epulet,vevok.lepcsohaz,vevok.szint,vevok.ajto, regisztral.adoszam,regisztral.felhasznalo,regisztral.iranyito,regisztral.varos,regisztral.kerulet,regisztral.cim, regisztral.kozterulet_jellege,regisztral.hazszam,regisztral.epulet,regisztral.lepcsohaz, regisztral.szint,regisztral.ajto,regisztral.ev_nev,regisztral.ev_szam from vevo_szlef inner join vevok on vevok.vevo_kod=vevo_szlef.vevo cross join regisztral where bizszam=@ssz insert into vevo_szlat select @sorsz, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, megjegyzes, akcio, bizszam, tetel from vevo_szlet where bizszam=@ssz insert into vevo_szlat_td select @sorsz,tetel,e1,e2 from vevo_szlet_td where bizszam=@ssz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_kassza_uj] @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @fizmod char(1), @fizhat datum, @nyugtazni_is char(1), @megj megjegyzes, @mics char(1), @uzletk kulcs, @biztip int, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev --declare @szlaszam char(10) declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @kulcs varchar(20) declare @aru_szolg int declare @td char(1) declare @vevo_char char(10) declare @btip int declare @bsz1 bizonylat_szam SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_kassza_szle_uj'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) BEGIN TRANSACTION @tranznev if @biztip=1 or @biztip=3 set @btip=1 else set @btip=6 if @mics='1' --virag + nem kell számla begin update wszavatos_ki set biztip='rmozgas_keszlet' where kicsoda=@kics and biztip='C + C' select @vevo_char=rtrim(str(@vevo,10,0)) delete from wrmozgast where kicsoda=@kics insert into wrmozgast select bizszam,tetel,wkassza.cikk_szam,wkassza.cikk_nev,menny_egys,1,darab,egyseg_ar,@kics from wkassza inner join cikkek on wkassza.cikk_szam=cikkek.cikk_szam where kicsoda=@kics order by tetel exec rmozgas_uj @dat,'',@rakk,2,@vevo_char,@kics end else begin exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, '', '', '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @btip, @uzletk, --uzletk '', '', '', '', @kics, dbo.myGetDateTime()) DECLARE kvevo_szle SCROLL CURSOR FOR select wkassza.cikk_szam, wkassza.cikk_nev, wkassza.afa_kulcs, cikkek.menny_egys, wkassza.darab, wkassza.egyseg_ar, wkassza.kedvezmeny, wkassza.akcio, cikkek.aru_szolg, cikkek.termekdijas from wkassza inner join cikkek ON wkassza.cikk_szam = cikkek.cikk_szam where wkassza.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wkassza.cikk_szam else wkassza.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @db, @ear, @tkedv, @akc, @aru_szolg, @td set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if abs(@db) >0.00001 begin if @aru_szolg=1 begin if @db >0.00001 begin set @n_db=@db -- kiveszi a foglalt mennyiségből exec foglalas_ki @vevo, @rakk, @csz, @n_db, @kics exec karton_ki 'vevo_szle', @SorSZ , 0, @TET, @RAKK, @CSZ, @n_db, 'vevo_szle_kassza_uj', @kics end else begin set @n_db=-@db exec karton_be @ev, 'vevo_szle', @SorSZ , @TET, @TET, @rakk, @csz, @n_db, @ear, 0, 0, @kics end end insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, 1, @db, @db, @ear, @tkedv, '', @akc, '', 0) if @td='1' --csak ha termékdíjas exec vevo_szlet_td_uj @sorsz, @vevo, @tet, @csz if len(rtrim(@akc))>0 exec akc_ke_aktualizal @akccsoport, @dat, @csz, @db set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @db, @ear, @tkedv, @akc, @aru_szolg, @td END CLOSE kvevo_szle DEALLOCATE kvevo_szle if @nyugtazni_is = '1' and (@biztip=1 or @biztip=3) exec vevo_szle_nyug_tranz_nelkul @sorsz, @dat, @fizmod, @fizhat, @kurz, '', @kics, '', '', '', '', 0, 0, '' else begin if @biztip=2 exec vevo_szle_kassza_nyug_tranz_nelkul @sorsz, @dat, @fizmod, @fizhat, @kurz, '', @kics end end COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz1,'' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_kassza_uj1] @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv dbo.kedvezmeny, @fizmod char(1), @fizhat datum, @nyugtazni_is char(1), @megj megjegyzes, @uzletk kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev --declare @szlaszam char(10) declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @bear egyseg_ar declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv dbo.kedvezmeny declare @kulcs varchar(20) declare @aru_szolg int declare @td char(1) declare @bsz1 bizonylat_szam SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_kassza_szle_uj'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, '', '', '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, 6, @uzletk, '', '', '', '', @kics, dbo.myGetDateTime()) DECLARE kvevo_szle SCROLL CURSOR FOR select wkassza1.cikk_szam, wkassza1.cikk_nev, wkassza1.afa_kulcs, cikkek.menny_egys, wkassza1.darab, wkassza1.egyseg_ar, wkassza1.engedmeny, wkassza1.akcio, cikkek.aru_szolg, cikkek.termekdijas from wkassza1 inner join cikkek ON wkassza1.cikk_szam = cikkek.cikk_szam where wkassza1.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wkassza1.cikk_szam else wkassza1.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @db, @bear, @tkedv, @akc, @aru_szolg, @td set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @ear=dbo.Brutto2Netto(@bear, @afak) if abs(@db) >0.00001 begin if @aru_szolg=1 begin if @db >0.00001 begin set @n_db=@db -- kiveszi a foglalt mennyiségből exec foglalas_ki @vevo, @rakk, @csz, @n_db, @kics exec karton_ki 'vevo_szle', @SorSZ , 0, @TET, @RAKK, @CSZ, @n_db, 'vevo_szle_kassza_uj', @kics end else begin set @n_db=-@db exec karton_be @ev, 'vevo_szle', @SorSZ , @TET, @TET, @rakk, @csz, @n_db, @ear, 0, 0, @kics end end insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, 1, @db, @db, @ear, @tkedv, '', @akc, '', 0) if @td='1' --csak ha termékdíjas exec vevo_szlet_td_uj @sorsz, @vevo, @tet, @csz if len(rtrim(@akc))>0 exec akc_ke_aktualizal @akccsoport, @dat, @csz, @db set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @db, @bear, @tkedv, @akc, @aru_szolg, @td END CLOSE kvevo_szle DEALLOCATE kvevo_szle if @nyugtazni_is = '1' exec vevo_szle_nyug_tranz_nelkul @sorsz, @dat, @fizmod, @fizhat, @kurz, '', @kics, '', '', '', '', 0, 0, '' else exec vevo_szle_kassza_nyug_tranz_nelkul @sorsz, @dat, @fizmod, @fizhat, @kurz, '', @kics delete from wkassza1 where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz1,'' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_koz_nyug] @vevo kulcs, @szdat datum, @tdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @afamentes bit, @vkedv kedvezmeny, @tipus kulcs, @uzletkoto kulcs, @megj megjegyzes, @szcim char(4), @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500), @kics kicsoda WITH RECOMPILE AS Begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @ssz bizonylat_szam declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @edb mennyiseg declare @db mennyiseg declare @afak afakulcs declare @tet bizonylat_tetel declare @etet bizonylat_tetel declare @akc char(1) declare @afa afakulcs declare @tmegj megjegyzes declare @kulcs varchar(20) declare @export int declare @nyelv char(1) declare @orsz char(3) declare @ir nev declare @va nev declare @ci nev declare @ado nev declare @ker nev declare @jell nev declare @hsz nev declare @epu nev declare @lcs nev declare @szi nev declare @ajt nev declare @teljd varchar(10) declare @bsz1 bizonylat_szam declare @eu char(1) declare @aruszolg char(1) declare @adosz varchar(15) set @export=0 set @nyelv='1' set @tet=0 if (select count(*) from wvevo_koz_nyug where jeloles='*' and kicsoda=@kics) >0 begin set @tranznev='t_vevo_szle_knyug'+@kics set @ev= left(@tdat,4) set @kulcs = left(@szdat,4) + 'vevo_szla' if (select count(*) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv')>0 select @nyelv=rtrim(ertek) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv' select @vnev=vevo_nev, @orsz=vevok.iso, @ir=iranyito, @va=varos, @ci=cim, @ado=case when vevok.iso='HU' then adoszam else eu_adoszam end, @ker=kerulet, @jell=kozterulet_jellege, @hsz=hazszam, @epu=epulet, @lcs=lepcsohaz, @szi=szint, @ajt=ajto, @eu=eu from vevok inner join orszagok on orszagok.iso=vevok.iso where vevo_kod=@vevo select @adosz=adoszam from regisztral if @orsz<>'HU' set @export=1 select @teljd=max(telj_datum) from wvevo_koz_nyug where kicsoda=@kics and jeloles='*' --begin tran BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlaf select @sorsz, @vevo, @vnev, @tdat, @szdat, @fmod, @fhat, @pn, @kurz, @afamentes, @vkedv, @tipus, @uzletkoto, @megj, '', '', '', '', '', 0, @kics, dbo.mygetdatetime(),0,'', @ir, @va, @ci, @orsz, @ado, @ker,@jell,@hsz, @epu, @lcs, @szi, @ajt, regisztral.adoszam,regisztral.felhasznalo,regisztral.iranyito,regisztral.varos,regisztral.kerulet,regisztral.cim, regisztral.kozterulet_jellege,regisztral.hazszam,regisztral.epulet,regisztral.lepcsohaz, regisztral.szint,regisztral.ajto,regisztral.ev_nev,regisztral.ev_szam from regisztral if @szcim<>'' or @rendsz<>'' or @sz_felt<>'' or @sz_mod<>'' or @csom<>'' or @nsu<>0 or @bsu<>0 or @zar<>'' begin insert into vevo_szlaf_export values( @sorsz, @szcim, @rendsz, @sz_felt, @sz_mod, @csom, 'Nettó súly: ' + ltrim(str(@nsu,12,2)) + ' Kg; Bruttó súly: ' + ltrim(str(@bsu,12,2)) + ' Kg', @zar ) end --beirom a szallitolevelre, hogy nyugtazott, es a munkaba betoltom a szall. lev teteleit DECLARE kvevo_szla_knyf SCROLL CURSOR FOR select bizszam from wvevo_koz_nyug where jeloles='*' and kicsoda=@kics order by bizszam OPEN kvevo_szla_knyf FETCH NEXT FROM kvevo_szla_knyf INTO @ssz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN update vevo_szlef set szlaszam=@sorsz where bizszam=@ssz DECLARE kvevo_szla_knyt SCROLL CURSOR FOR select vevo_szlet.cikk_szam, CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.cikk_nev_ang='' then cikkek.cikk_nev else cikkek.cikk_nev_ang end ELSE cikkek.cikk_nev END, --vevo_szlet.cikk_nev, vevo_szlet.afa_kulcs, CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.menny_egys_ang='' then vevo_szlet.menny_egys else cikkek.menny_egys_ang end ELSE vevo_szlet.menny_egys END, --vevo_szlet.menny_egys, vevo_szlet.szorzo, vevo_szlet.edarab, vevo_szlet.darab, vevo_szlet.egyseg_ar, vevo_szlet.kedvezmeny, vevo_szlet.megjegyzes, --case when vevo_szlef.szlaszam is null then vevo_szlet.megjegyzes else 'Eredeti bizonylat: ' + vevo_szlef.szlaszam + '/' + str(vevo_szlet.rendel_tet,4,0) end, vevo_szlet.akcio, vevo_szlet.tetel, cikkek.aru_szolg from vevo_szlet inner join cikkek on vevo_szlet.cikk_szam=cikkek.cikk_szam left outer join vevo_szlet as v on v.bizszam=vevo_szlet.rendel_bsz and v.tetel=vevo_szlet.rendel_tet left outer join vevo_szlef on vevo_szlef.bizszam=v.bizszam where vevo_szlet.bizszam=@ssz order by tetel --from vevo_szlet inner join cikkek on vevo_szlet.cikk_szam=cikkek.cikk_szam --where bizszam=@ssz --order by tetel OPEN kvevo_szla_knyt FETCH NEXT FROM kvevo_szla_knyt INTO @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @tmegj, @akc, @etet, @aruszolg WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @tet = @tet + 1 insert into vevo_szlat values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @tmegj, @akc, @ssz, @etet) insert into vevo_szlat_td select @sorsz,@tet,e1,e2 from vevo_szlat_td where bizszam=@ssz and tetel=@etet END FETCH NEXT FROM kvevo_szla_knyt INTO @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @tmegj, @akc, @etet, @aruszolg END CLOSE kvevo_szla_knyt DEALLOCATE kvevo_szla_knyt END FETCH NEXT FROM kvevo_szla_knyf INTO @ssz END CLOSE kvevo_szla_knyf DEALLOCATE kvevo_szla_knyf COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz1, '' end end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_koz_nyug_osszevon] @vevo kulcs, @szdat datum, @tdat datum, @fmod char(1), @fhat datum, @pn penznem, @kurz kurzus, @afamentes bit, @vkedv kedvezmeny, @tipus kulcs, @uzletkoto kulcs, @megj megjegyzes, @szcim char(4), @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500), @kics kicsoda WITH RECOMPILE AS Begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @ssz bizonylat_szam declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @kedv kedvezmeny declare @edb mennyiseg declare @db mennyiseg declare @afak afakulcs declare @tet bizonylat_tetel declare @akc char(1) declare @afa afakulcs declare @tmegj megjegyzes declare @kulcs varchar(20) declare @vantd int declare @kt419 float declare @kt439 float declare @kt459 float declare @kt4ri float declare @xkt419 numeric(18,2) declare @xkt439 numeric(18,2) declare @xkt459 numeric(18,2) declare @xkt4ri numeric(18,2) declare @td char(1) declare @suly float declare @vir nev declare @vva nev declare @vci nev declare @viso char(2) declare @vado nev declare @ker nev declare @jell nev declare @hsz nev declare @epu nev declare @lcs nev declare @szi nev declare @ajt nev declare @bsz1 bizonylat_szam set @tet=0 if (select count(*) from wvevo_koz_nyug where jeloles='*' and kicsoda=@kics) >0 begin set @tranznev='t_vevo_szle_knyug'+@kics set @ev= left(@tdat,4) set @kulcs = left(@szdat,4) + 'vevo_szla' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) select @vantd = Convert(int,IsNull(dbo.xrfuggveny('TermekdijKezel'),'0')) --select @vir=iranyito,@vva=varos,@vci=cim,@viso=iso,@vado=adoszam from vevok --where vevo_kod=@vevo select @vir=iranyito, @vva=varos, @vci=cim, @viso=iso, @vado=adoszam, @ker=kerulet, @jell=kozterulet_jellege, @hsz=hazszam, @epu=epulet, @lcs=lepcsohaz, @szi=szint, @ajt=ajto from vevok where vevo_kod=@vevo if @vantd=1 --van termékdíj kezelés begin select @xkt419= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT419'),'0'),',','.')) select @xkt439= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT439'),'0'),',','.')) select @xkt459= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT459'),'0'),',','.')) select @xkt4ri= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT4RI'),'0'),',','.')) end --begin tran BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlaf select @sorsz, @vevo, @vnev, @tdat, @szdat, @fmod, @fhat, @pn, @kurz, @afamentes, @vkedv, @tipus, @uzletkoto, @megj, '', '', '', '', '', 0, @kics, dbo.mygetdatetime(), 0, '', @vir, @vva, @vci, @viso, @vado, @ker,@jell,@hsz, @epu, @lcs, @szi, @ajt, regisztral.adoszam,regisztral.felhasznalo,regisztral.iranyito,regisztral.varos,regisztral.kerulet,regisztral.cim, regisztral.kozterulet_jellege,regisztral.hazszam,regisztral.epulet,regisztral.lepcsohaz, regisztral.szint,regisztral.ajto,regisztral.ev_nev,regisztral.ev_szam from regisztral if @szcim<>'' or @rendsz<>'' or @sz_felt<>'' or @sz_mod<>'' or @csom<>'' or @nsu<>0 or @bsu<>0 or @zar<>'' begin insert into vevo_szlaf_export values( @sorsz, @szcim, @rendsz, @sz_felt, @sz_mod, @csom, 'Nettó súly: ' + ltrim(str(@nsu,12,2)) + ' Kg; Bruttó súly: ' + ltrim(str(@bsu,12,2)) + ' Kg', @zar ) end --beirom a szallitolevelre, hogy nyugtazott, es a munkaba betoltom a szall. lev teteleit update vevo_szlef set szlaszam=@sorsz where bizszam in (select bizszam from wvevo_koz_nyug where jeloles='*' and kicsoda=@kics ) DECLARE kvevo_szla_knyt SCROLL CURSOR FOR SELECT vevo_szlet.cikk_szam, vevo_szlet.cikk_nev, vevo_szlet.afa_kulcs, vevo_szlet.menny_egys, szorzo, sum(edarab) as edarab, sum(darab) as darab, vevo_szlet.egyseg_ar, vevo_szlet.kedvezmeny, vevo_szlet.megjegyzes, vevo_szlet.akcio, cikkek.termekdijas, isnull(cikk_termekdijak.kt419,0) as kt419, isnull(cikk_termekdijak.kt439,0) as kt439, isnull(cikk_termekdijak.kt459,0) as kt459, isnull(cikk_termekdijak.kt4ri,0) as kt4ri FROM vevo_szlet inner join cikkek ON vevo_szlet.CIKK_SZAM = cikkek.CIKK_SZAM LEFT OUTER JOIN cikk_termekdijak ON cikkek.CIKK_SZAM = cikk_termekdijak.cikk_szam where bizszam in (select bizszam from wvevo_koz_nyug where jeloles='*' and kicsoda=@kics ) group by vevo_szlet.cikk_szam, vevo_szlet.cikk_nev, vevo_szlet.afa_kulcs, vevo_szlet.menny_egys, vevo_szlet.szorzo, vevo_szlet.egyseg_ar, vevo_szlet.kedvezmeny, vevo_szlet.megjegyzes, vevo_szlet.akcio, cikkek.termekdijas, cikk_termekdijak.kt419, cikk_termekdijak.kt439, cikk_termekdijak.kt459, cikk_termekdijak.kt4ri order by cikk_szam OPEN kvevo_szla_knyt FETCH NEXT FROM kvevo_szla_knyt INTO @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @tmegj, @akc, @td, @kt419, @kt439, @kt459, @kt4ri WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @tet = @tet + 1 insert into vevo_szlat values( @sorsz, @tet, @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @tmegj, @akc, '',0) -- a termékdíjat tételesen kell létrehozni!! /* insert into vevo_szlat_td select @sorsz,tetel,e1,e2 from vevo_szlet_td where bizszam=@ssz */ if @vantd=1 and @td='1' --termékdíjas begin set @suly=@db * @szorz if @kt419 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt419', @suly * @kt419, @xkt419 ) if @kt439 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt439', @suly * @kt439, @xkt439) if @kt459 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt459', @suly * @kt459, @xkt459) if @kt4ri > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt4ri', @suly * @kt4ri, @xkt4ri) end END FETCH NEXT FROM kvevo_szla_knyt INTO @csz, @cn, @afa, @me, @szorz, @edb, @db, @ear, @kedv, @tmegj, @akc, @td, @kt419, @kt439, @kt459, @kt4ri END CLOSE kvevo_szla_knyt DEALLOCATE kvevo_szla_knyt if IsNull(dbo.xrfuggveny('GyujtoCikkszamok'),'N')='I' insert into vevo_szlat_nyomt select @sorsz,ROW_NUMBER() OVER (ORDER BY cikk_szam), vtsz,cikk_szam,cikk_nev,cikk_nev_en,afa_kulcs, menny_egys,menny_egys_en,szorzo,SUM(darab),egyseg_ar,kedvezmeny,megjegyzes,akcio from vvevo_szlet_gy where bizszam in (select bizszam from wvevo_koz_nyug where jeloles='*' and kicsoda=@kics ) group by vtsz,cikk_szam,cikk_nev,cikk_nev_en,afa_kulcs, menny_egys,menny_egys_en,szorzo,egyseg_ar,kedvezmeny,megjegyzes,akcio COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz1, '' end end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_mod] @sorsz bizonylat_szam, @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @kedv kedvezmeny, @megj megjegyzes, @uzletkoto kulcs, @rakk kulcs, @tdat datum, @pn penznem, @kurz kurzus, @afamentes bit, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @ren_bsz char(10) declare @ren_tet int declare @_kdb mennyiseg declare @_kert egyseg_ar declare @ear egyseg_ar declare @vnev varchar(100) set @tranznev='t_vevo_szle_mod'+@kics BEGIN TRANSACTION @tranznev select @vnev=vevo_nev from vevok where vevo_kod=@vevo update vevo_szlef set hivszam=@hsz, vevo=@vevo, vevo_nev=@vnev, telep_kod=@szcim, kedvezmeny=@kedv, uzletkoto=@uzletkoto, megjegyzes=@megj, telj_datum=@tdat, penznem=@pn, kurzus=@kurz, afamentes=@afamentes, kicsoda=@kics, modositva=dbo.myGetDateTime() where bizszam=@sorsz /* /* Végigmegy a szállítólevélen és aktualizálja az árakat saját bolt esetében */ if (select sajat_bolt from vvevo_szlef where bizszam=@sorsz)='1' --csak saját boltnál begin DECLARE kvevo_szl_ear SCROLL CURSOR FOR select bizszam,tetel from vevo_szlet where bizszam=@sorsz order by tetel OPEN kvevo_szl_ear FETCH NEXT FROM kvevo_szl_ear INTO @ren_bsz, @ren_tet WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @ear=0 select @_kdb=sum(mozgas.darab), @_kert=sum(mozgas.darab * keszlet.egyseg_ar) from mozgas,keszlet where mozgas.sorszam=keszlet.sorszam and mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=@ren_bsz and mozgas.tetel=@ren_tet if @_kdb<>0 set @ear=@_kert / @_kdb update vevo_szlet set egyseg_ar=@ear where bizszam=@ren_bsz and tetel=@ren_tet END FETCH NEXT FROM kvevo_szl_ear INTO @ren_bsz, @ren_tet END CLOSE kvevo_szl_ear DEALLOCATE kvevo_szl_ear end */ /* Végigmegy a rendeléseken, és aktualizálja a rendelések állapotát */ DECLARE kvevo_szl_ren SCROLL CURSOR FOR select rendel_ssz from wvevo_szlet where kicsoda=@kics and len(rtrim(rendel_ssz))>0 group by rendel_ssz OPEN kvevo_szl_ren FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_ren_allapot_akt @ren_bsz END FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz END CLOSE kvevo_szl_ren DEALLOCATE kvevo_szl_ren COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_mod_kivet] @sorsz bizonylat_szam, @rakk kulcs, @kics kicsoda AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @tet as int declare @xtet as int declare @edb mennyiseg declare @ere_db mennyiseg declare @mar mennyiseg declare @kdb mennyiseg declare @ssz bizonylat_szam declare @n_db mennyiseg declare @ndb mennyiseg declare @jogc int declare @dat char(20) declare @csz cikk_szam declare @me menny_egyseg declare @szor int declare @afa afakulcs declare @ear egyseg_ar set @tranznev='t_vevo_szle_mod'+@kics delete from wmozgas where kicsoda=@kics BEGIN TRANSACTION @tranznev declare @hany bizonylat_szam declare @kulcs varchar(20) set @dat=dbo.mygetdatetime() set @xtet=0 set @kulcs = left(@sorsz,4) + 'KIVET' exec bizsorsz_no @kulcs , @hany output select @jogc=convert(int,ertek) from parameterek where azonosito='TermelesKivetJogcim' insert into kivetf values(@hany, @sorsz, @rakk, left(@dat,10), @jogc, '', @kics, @dat) DECLARE kvevo_szle SCROLL CURSOR FOR select tetel,cikk_szam,menny_egys,szorzo,edarab,ere_darab,afa_kulcs,egyseg_ar from wvevo_szletm where kicsoda=@kics and edarab -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @mar=@ere_db - @edb set @xtet=@xtet + 1 insert into kivett values (@hany, @xtet, @csz, @me, @szor, @mar, @afa, @ear) update vevo_szlet set edarab=edarab-@mar,darab=darab-@mar where bizszam=@sorsz and tetel=@tet DECLARE kmozgas SCROLL CURSOR FOR select sorszam,darab from mozgas where mozgaskod='vevo_szle' and bizszam=@sorsz and tetel=@tet order by sorszam OPEN kmozgas FETCH NEXT FROM kmozgas INTO @ssz, @n_db WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) and @mar>0 BEGIN if @mar < -@n_db --belefér set @kdb=-@mar else set @kdb=@n_db insert into mozgas values('kivet', @hany, @xtet, @ssz, @kdb, @kdb) insert into wmozgas values('kivet', @sorsz, @tet, @ssz, @kdb, @kics) set @mar=@mar + @kdb END FETCH NEXT FROM kmozgas INTO @ssz, @n_db END CLOSE kmozgas DEALLOCATE kmozgas update mozgas set edarab=edarab - isnull( (select darab from wmozgas as m where m.mozgaskod='kivet' and mozgas.bizszam=m.bizszam and mozgas.tetel=m.tetel and mozgas.sorszam=m.sorszam and m.kicsoda=@kics),0) where mozgas.mozgaskod='vevo_szle' and bizszam=@sorsz and tetel=@tet update mozgas set darab=darab - isnull( (select darab from wmozgas as m where m.mozgaskod='kivet' and mozgas.bizszam=m.bizszam and mozgas.tetel=m.tetel and mozgas.sorszam=m.sorszam and m.kicsoda=@kics),0) where mozgas.mozgaskod='vevo_szle' and bizszam=@sorsz and tetel=@tet END FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @me, @szor, @edb, @ere_db, @afa, @ear END CLOSE kvevo_szle DEALLOCATE kvevo_szle COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_mod_tetel] @sorsz bizonylat_szam, @tetel bizonylat_tetel, @edb mennyiseg, @db mennyiseg, @csz cikk_szam, @aru_szolg int, @rakk kulcs, @kics kicsoda, @vanszav int, --1:van; 0:nincs @akccsoport kulcs, @dat datum, @vevo kulcs WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @ssz bizonylat_szam declare @n_db mennyiseg declare @akc char(1) declare @e_db mennyiseg declare @sajatbolt char(1) --1:saját declare @_kdb mennyiseg declare @_kert egyseg_ar declare @ear egyseg_ar set @tranznev='t_vevo_szle_mod'+@kics BEGIN TRANSACTION @tranznev select @sajatbolt=sajat_bolt from vevok where vevo_kod= (select vevo from vevo_szlef where bizszam=@sorsz) delete from wszavatos_ki where biztip='vevo_szle_mod' and xtetel=@tetel and kicsoda=@kics and darab=0 select @akc=akcio, @e_db=darab-ere_darab from wvevo_szletm where kicsoda=@kics and tetel=@tetel -- visszateszi a készletre az eredetileg kiadott mennyiséget és törli a megfelelő mozgást DECLARE kvevo_szle SCROLL CURSOR FOR select sorszam,darab from mozgas where mozgaskod='vevo_szle' and bizszam=@sorsz and tetel=@tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @ssz, @n_db WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN update keszlet set darab=darab-@n_db where sorszam=@ssz END FETCH NEXT FROM kvevo_szle INTO @ssz, @n_db END CLOSE kvevo_szle DEALLOCATE kvevo_szle delete from mozgas where mozgaskod='vevo_szle' and bizszam=@sorsz and tetel=@tetel update keszlet_negativ set darab=0 where biz_tipus='vevo_szle' and bizszam=@sorsz and tetel=@tetel --leveszi a készletről az új mennyiséget if @aru_szolg=1 and @db>0 begin -- kiveszi a foglalt mennyiségből exec foglalas_ki @vevo, @rakk, @csz, @db, @kics exec karton_ki 'vevo_szle', @SorSZ , @TETEL, @TETEL, @RAKK, @CSZ, @db, 'vevo_szle_mod', @kics if len(rtrim(@akc))>0 exec akc_ke_aktualizal @akccsoport, @dat, @csz, @e_db end if @sajatbolt='1' --ha saját bolt begin set @ear=0 select @_kdb=sum(mozgas.darab), @_kert=sum(mozgas.darab * keszlet.egyseg_ar) from mozgas,keszlet where mozgas.sorszam=keszlet.sorszam and mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=@sorsz and mozgas.tetel=@tetel if @_kdb<>0 set @ear=@_kert / @_kdb update vevo_szlet set egyseg_ar=@ear where bizszam=@sorsz and tetel=@tetel update wvevo_szletm set egyseg_ar=@ear where kicsoda=@kics and tetel=@tetel end update wvevo_szletm set ere_darab=@db, ere_edarab=@db where kicsoda=@kics and tetel=@tetel COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_nyug] @ssz bizonylat_szam, @szdat datum, @fmod char(1), @fhat datum, @kurz kurzus, @megj megjegyzes, @kics kicsoda, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500) AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @bsz1 bizonylat_szam set @tranznev='t_vevo_szle_nyug'+@kics BEGIN TRANSACTION @tranznev exec vevo_szle_nyug_tranz_nelkul @ssz, @szdat, @fmod, @fhat, @kurz, @megj, @kics, @rendsz, @sz_felt, @sz_mod, @csom, @nsu, @bsu, @zar COMMIT TRANSACTION @tranznev if (select ertek from parameterek where azonosito='AruLog') = 'G' --csak ha gebotools begin select top 1 @bsz1=bizszam from vevo_szlaf where kicsoda=@kics order by modositva desc exec arulog_vevo_szlaf_uj @bsz1, '' end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_nyug_feltolt] @vevo kulcs, @szcim char(4), @kdat datum, @vdat datum, @pn penznem, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wvevo_koz_nyug where kicsoda=@kics insert into wvevo_koz_nyug SELECT '',vevo_szlef.BIZSZAM, vevo_szlef.TELJ_DATUM, vevo_szlef.penznem, vevo_szlef.afamentes, ertekesit_tipus.kod AS tipus, ertekesit_tipus.nev AS tipus_nev, isnull(uzletkoto.kod,0) AS uzletkoto, isnull(uzletkoto.nev,'') AS uzletkoto_nev, vevo_szlef.kedvezmeny, SUM(vevo_szlet.edarab * vevo_szlet.EGYSEG_AR) AS ertek, @kics FROM dbo.vevo_szlef INNER JOIN dbo.vevo_szlet ON dbo.vevo_szlef.BIZSZAM = dbo.vevo_szlet.BIZSZAM LEFT OUTER JOIN dbo.uzletkoto ON dbo.vevo_szlef.UZLETKOTO = dbo.uzletkoto.kod INNER JOIN dbo.ertekesit_tipus ON dbo.vevo_szlef.TIPUS = dbo.ertekesit_tipus.kod where vevo=@vevo and (len(@szcim)=0 or (len(@szcim)>0 and telep_kod=@szcim)) and telj_datum>=@kdat and telj_datum<=@vdat and torlo<>'1' and torolt<>'1' and len(ltrim(szlaszam))=0 and penznem=@pn GROUP BY vevo_szlef.BIZSZAM, vevo_szlef.TELJ_DATUM, vevo_szlef.penznem, vevo_szlef.afamentes, ertekesit_tipus.kod, ertekesit_tipus.nev, uzletkoto.kod, uzletkoto.nev, vevo_szlef.kedvezmeny end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_nyug_logi] @ssz bizonylat_szam, @szdat datum, @fmod char(1), @fhat datum, @kurz kurzus, @megj megjegyzes, @kics kicsoda, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500), @rszam bizonylat_szam, @tul int WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @vevo kulcs declare @vantd int declare @suly float declare @export int declare @nyelv char(1) declare @szcim char(4) declare @kt419 float declare @kt439 float declare @kt459 float declare @kt4ri float declare @xkt419 numeric(18,2) declare @xkt439 numeric(18,2) declare @xkt459 numeric(18,2) declare @xkt4ri numeric(18,2) declare @tet bizonylat_tetel declare @csz cikk_szam declare @szorz szorzo declare @db mennyiseg declare @td char(1) declare @pazon varchar(20) set @tranznev='t_vevo_szle_nyug'+@kics BEGIN TRANSACTION @tranznev set @kulcs = left(@szdat,4) + 'vevo_szla' set @nyelv='1' if (select count(*) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv')>0 select @nyelv=rtrim(ertek) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv' set @export=0 select @vevo=vevo, @szcim=telep_kod from vevo_szlef where bizszam=@ssz if (select iso from vevok where vevo_kod=@vevo)<>'HU' set @export=1 exec bizsorsz_no @kulcs, @sorsz output update vevo_szlef set szlaszam=@sorsz where bizszam=@ssz insert into vevo_szlaf select @sorsz, vevo, vevo_szlef.vevo_nev, telj_datum, @szdat, @fmod, @fhat, penznem, @kurz, afamentes, vevo_szlef.kedvezmeny, tipus, uzletkoto, @megj, torolt, torlo, tor_ssz, visszaru, '', 0, @kics, dbo.myGetDateTime(), 0, '', vevok.iranyito, vevok.varos, vevok.cim, vevok.iso, case when vevok.iso='HU' then vevok.adoszam else vevok.eu_adoszam end, vevok.kerulet,vevok.kozterulet_jellege,vevok.hazszam,vevok.epulet,vevok.lepcsohaz,vevok.szint,vevok.ajto, regisztral.adoszam,regisztral.felhasznalo,regisztral.iranyito,regisztral.varos,regisztral.kerulet,regisztral.cim, regisztral.kozterulet_jellege,regisztral.hazszam,regisztral.epulet,regisztral.lepcsohaz, regisztral.szint,regisztral.ajto,regisztral.ev_nev,regisztral.ev_szam from vevo_szlef inner join vevok on vevok.vevo_kod=vevo_szlef.vevo cross join regisztral where bizszam=@ssz if @rendsz<>'' or @sz_felt<>'' or @sz_mod<>'' or @csom<>'' or @nsu<>0 or @bsu<>0 or @zar<>'' begin insert into vevo_szlaf_export values( @sorsz, @szcim, @rendsz, @sz_felt, @sz_mod, @csom, 'Nettó súly: ' + ltrim(str(@nsu,12,2)) + ' Kg; Bruttó súly: ' + ltrim(str(@bsu,12,2)) + ' Kg', @zar ) end insert into vevo_szlat select @sorsz, vevo_szlet.tetel, vevo_szlet.cikk_szam, /* CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.cikk_nev_ang='' then cikkek.cikk_nev else cikkek.cikk_nev_ang end ELSE cikkek.cikk_nev END, */ vevo_szlet.cikk_nev, vevo_szlet.afa_kulcs, /* CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.menny_egys_ang='' then vevo_szlet.menny_egys else cikkek.menny_egys_ang end ELSE vevo_szlet.menny_egys END, */ vevo_szlet.menny_egys, vevo_szlet.szorzo, vevo_szlet.edarab, vevo_szlet.darab, vevo_szlet.egyseg_ar, vevo_szlet.kedvezmeny, vevo_szlet.megjegyzes, vevo_szlet.akcio, vevo_szlet.bizszam, vevo_szlet.tetel from vevo_szlet inner join cikkek on vevo_szlet.cikk_szam=cikkek.cikk_szam where bizszam=@ssz insert into vevo_szlat_td select @sorsz,tetel,e1,e2 from vevo_szlet_td where bizszam=@ssz select @vantd = Convert(int,IsNull(dbo.xrfuggveny('TermekdijKezel'),'0')) if @vantd=1 --van termékdíj kezelés begin select @xkt419= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT419'),'0'),',','.')) select @xkt439= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT439'),'0'),',','.')) select @xkt459= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT459'),'0'),',','.')) select @xkt4ri= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT4RI'),'0'),',','.')) DECLARE kvevo_szle SCROLL CURSOR FOR select vevo_szlet.TETEL, vevo_szlet.CIKK_SZAM, vevo_szlet.SZORZO, vevo_szlet.darab, cikkek.termekdijas, isnull(cikk_termekdijak.kt419,0) as kt419, isnull(cikk_termekdijak.kt439,0) as kt439, isnull(cikk_termekdijak.kt459,0) as kt459, isnull(cikk_termekdijak.kt4ri,0) as kt4ri from vevo_szlet INNER JOIN cikkek ON vevo_szlet.CIKK_SZAM = cikkek.CIKK_SZAM LEFT OUTER JOIN cikk_termekdijak ON cikkek.CIKK_SZAM = cikk_termekdijak.cikk_szam where bizszam=@ssz order by tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @szorz, @db, @td, @kt419, @kt439, @kt459, @kt4ri set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @td='1' --termékdíjas begin set @suly=@db * @szorz if @kt419 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt419', @suly * @kt419, @xkt419 ) if @kt439 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt439', @suly * @kt439, @xkt439) if @kt459 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt459', @suly * @kt459, @xkt459) if @kt4ri > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt4ri', @suly * @kt4ri, @xkt4ri) end END FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @szorz, @db, @td, @kt419, @kt439, @kt459, @kt4ri END CLOSE kvevo_szle DEALLOCATE kvevo_szle end --itt nincs összevonás, csak ha összevonjuk a tételeket is!!!! if IsNull(dbo.xrfuggveny('GyujtoCikkszamok'),'N')='I' insert into vevo_szlat_nyomt select @sorsz,ROW_NUMBER() OVER (ORDER BY cikk_szam), vtsz,cikk_szam,cikk_nev,cikk_nev_en,afa_kulcs, menny_egys,menny_egys_en,szorzo,SUM(darab),egyseg_ar,kedvezmeny,megjegyzes,akcio from vvevo_szlet_gy where bizszam=@ssz group by vtsz,cikk_szam,cikk_nev,cikk_nev_en,afa_kulcs, menny_egys,menny_egys_en,szorzo,egyseg_ar,kedvezmeny,megjegyzes,akcio select @pazon=puffer_azon from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(vegrehajtva)>0 insert into arulog..kom_szamlazott select @tul, 2, @sorsz, kulcs from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(RTrim(vegrehajtva))<>0 and keszletkulcs<>0 and not exists (select * from arulog..kom_szamlazott AS x where tulaj=@tul and x.kulcs=arulog..kom_feladat.kulcs) COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_nyug_tranz_nelkul] @ssz bizonylat_szam, @szdat datum, @fmod char(1), @fhat datum, @kurz kurzus, @megj megjegyzes, @kics kicsoda, @rendsz varchar(50), @sz_felt varchar(50), @sz_mod varchar(50), @csom varchar(50), @nsu float, @bsu float, @zar varchar(1500) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @sorsz bizonylat_szam declare @kulcs varchar(20) declare @vevo kulcs declare @vantd int declare @suly float declare @export int declare @nyelv char(1) declare @szcim char(4) declare @kt419 float declare @kt439 float declare @kt459 float declare @kt4ri float declare @xkt419 numeric(18,2) declare @xkt439 numeric(18,2) declare @xkt459 numeric(18,2) declare @xkt4ri numeric(18,2) declare @tet bizonylat_tetel declare @csz cikk_szam declare @szorz szorzo declare @db mennyiseg declare @td char(1) declare @btip char(1) set @nyelv='1' if (select count(*) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv')>0 select @nyelv=rtrim(ertek) from parameterek where szamitogep='RENDSZERPARAMETEREK' and azonosito='ExpSzlaNyelv' set @export=0 select @vevo=vevo, @szcim=telep_kod, @btip=tipus from vevo_szlef where bizszam=@ssz if (select iso from vevok where vevo_kod=@vevo)<>'HU' set @export=1 if @btip='6' set @kulcs = left(@szdat,4) + 'kassza_szla' else set @kulcs = left(@szdat,4) + 'vevo_szla' exec bizsorsz_no @kulcs, @sorsz output update vevo_szlef set szlaszam=@sorsz where bizszam=@ssz insert into vevo_szlaf select @sorsz, vevo, vevo_szlef.vevo_nev, telj_datum, @szdat, @fmod, @fhat, penznem, @kurz, afamentes, vevo_szlef.kedvezmeny, tipus, uzletkoto, @megj, torolt, torlo, tor_ssz, visszaru, '', 0, @kics, dbo.myGetDateTime(), 0, '', vevok.iranyito,vevok.varos,vevok.cim,vevok.iso,case when vevok.iso='HU' then vevok.adoszam else vevok.eu_adoszam end, vevok.kerulet,vevok.kozterulet_jellege,vevok.hazszam,vevok.epulet,vevok.lepcsohaz,vevok.szint,vevok.ajto, regisztral.adoszam,regisztral.felhasznalo,regisztral.iranyito,regisztral.varos,regisztral.kerulet,regisztral.cim, regisztral.kozterulet_jellege,regisztral.hazszam,regisztral.epulet,regisztral.lepcsohaz, regisztral.szint,regisztral.ajto,regisztral.ev_nev,regisztral.ev_szam from vevo_szlef inner join vevok on vevok.VEVO_KOD=vevo_szlef.vevo cross join regisztral where bizszam=@ssz if @rendsz<>'' or @sz_felt<>'' or @sz_mod<>'' or @csom<>'' or @nsu<>0 or @bsu<>0 or @zar<>'' begin insert into vevo_szlaf_export values( @sorsz, @szcim, @rendsz, @sz_felt, @sz_mod, @csom, 'Nettó súly: ' + ltrim(str(@nsu,12,2)) + ' Kg; Bruttó súly: ' + ltrim(str(@bsu,12,2)) + ' Kg', @zar ) end insert into vevo_szlat select @sorsz, vevo_szlet.tetel, vevo_szlet.cikk_szam, /* CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.cikk_nev_ang='' then cikkek.cikk_nev else cikkek.cikk_nev_ang end ELSE cikkek.cikk_nev END, */ vevo_szlet.cikk_nev, vevo_szlet.afa_kulcs, /* CASE WHEN @nyelv='2' and @export=1 THEN case when cikkek.menny_egys_ang='' then vevo_szlet.menny_egys else cikkek.menny_egys_ang end ELSE vevo_szlet.menny_egys END, */ vevo_szlet.menny_egys, vevo_szlet.szorzo, vevo_szlet.edarab, vevo_szlet.darab, vevo_szlet.egyseg_ar, vevo_szlet.kedvezmeny, vevo_szlet.megjegyzes, --case when vevo_szlef.szlaszam is null then vevo_szlet.megjegyzes else 'Eredeti bizonylat: ' + vevo_szlef.szlaszam + '/' + str(vevo_szlet.rendel_tet,4,0) end, vevo_szlet.akcio, vevo_szlet.bizszam, vevo_szlet.tetel from vevo_szlet inner join cikkek on vevo_szlet.cikk_szam=cikkek.cikk_szam left outer join vevo_szlet as v on v.bizszam=vevo_szlet.rendel_bsz and v.tetel=vevo_szlet.rendel_tet left outer join vevo_szlef on vevo_szlef.bizszam=v.bizszam where vevo_szlet.bizszam=@ssz -- from vevo_szlet inner join cikkek on vevo_szlet.cikk_szam=cikkek.cikk_szam -- where bizszam=@ssz insert into vevo_szlat_td select @sorsz,tetel,e1,e2 from vevo_szlet_td where bizszam=@ssz select @vantd = Convert(int,IsNull(dbo.xrfuggveny('TermekdijKezel'),'0')) if @vantd=1 --van termékdíj kezelés begin select @xkt419= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT419'),'0'),',','.')) select @xkt439= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT439'),'0'),',','.')) select @xkt459= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT459'),'0'),',','.')) select @xkt4ri= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijKT4RI'),'0'),',','.')) DECLARE kvevo_szle SCROLL CURSOR FOR select vevo_szlet.TETEL, vevo_szlet.CIKK_SZAM, vevo_szlet.SZORZO, vevo_szlet.darab, cikkek.termekdijas, isnull(cikk_termekdijak.kt419,0) as kt419, isnull(cikk_termekdijak.kt439,0) as kt439, isnull(cikk_termekdijak.kt459,0) as kt459, isnull(cikk_termekdijak.kt4ri,0) as kt4ri from vevo_szlet INNER JOIN cikkek ON vevo_szlet.CIKK_SZAM = cikkek.CIKK_SZAM LEFT OUTER JOIN cikk_termekdijak ON cikkek.CIKK_SZAM = cikk_termekdijak.cikk_szam where bizszam=@ssz order by tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @szorz, @db, @td, @kt419, @kt439, @kt459, @kt4ri set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @td='1' --termékdíjas begin set @suly=@db * @szorz if @kt419 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt419', @suly * @kt419, @xkt419 ) if @kt439 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt439', @suly * @kt439, @xkt439) if @kt459 > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt459', @suly * @kt459, @xkt459) if @kt4ri > 0 insert into vevo_szlat_td1 values( @sorsz, @tet, 'kt4ri', @suly * @kt4ri, @xkt4ri) end END FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @szorz, @db, @td, @kt419, @kt439, @kt459, @kt4ri END CLOSE kvevo_szle DEALLOCATE kvevo_szle end --itt nincs összevonás, csak ha összevonjuk a tételeket is!!!! if IsNull(dbo.xrfuggveny('GyujtoCikkszamok'),'N')='I' insert into vevo_szlat_nyomt select @sorsz,ROW_NUMBER() OVER (ORDER BY cikk_szam), vtsz,cikk_szam,cikk_nev,cikk_nev_en,afa_kulcs, menny_egys,menny_egys_en,szorzo,SUM(darab),egyseg_ar,kedvezmeny,megjegyzes,akcio from vvevo_szlet_gy where bizszam=@ssz group by vtsz,cikk_szam,cikk_nev,cikk_nev_en,afa_kulcs, menny_egys,menny_egys_en,szorzo,egyseg_ar,kedvezmeny,megjegyzes,akcio end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_osszevon] ( @vevo kulcs, @bsz1 bizonylat_szam, @bsz2 bizonylat_szam, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @bsz bizonylat_szam declare @atet bizonylat_tetel declare @tet bizonylat_tetel declare @xtet bizonylat_tetel declare @csz cikk_szam declare @db mennyiseg declare @ear egyseg_ar declare @kedv egyseg_ar declare @vnev varchar(100) declare @kulcs varchar(20) declare @tranznev varchar(50) set @tranznev = 't_bevet_uj'+@kics begin transaction @tranznev set @kulcs=left(@bsz1,4) + 'vevo_szle' select @atet=max(tetel) from vevo_szlet where bizszam=@bsz1 DECLARE cbevett CURSOR for SELECT bizszam FROM vevo_szlef WHERE bizszam>@bsz1 and bizszam<=@bsz2 and torlo<>'1' and torolt<>'1' and visszaru<>'1' order by bizszam open cbevett fetch next from cbevett into @bsz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN DECLARE ctetel CURSOR for SELECT tetel, cikk_szam, darab, egyseg_ar, kedvezmeny FROM vevo_szlet WHERE bizszam=@bsz order by tetel open ctetel fetch next from ctetel into @tet, @csz, @db, @ear, @kedv while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN if (select COUNT(*) from vevo_szlet where bizszam=@bsz1 and cikk_szam=@csz and egyseg_ar=@ear and kedvezmeny=@kedv)=0 begin set @atet=@atet+1 insert into vevo_szlet select @bsz1,@atet,cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo,edarab,darab, egyseg_ar,kedvezmeny,megjegyzes,akcio,rendel_bsz,rendel_tet from vevo_szlet where bizszam=@bsz and tetel=@tet update mozgas set bizszam=@bsz1, tetel=@atet where bizszam=@bsz and tetel=@tet and mozgaskod='vevo_szle' end else begin select @xtet=tetel from vevo_szlet where bizszam=@bsz1 and cikk_szam=@csz and egyseg_ar=@ear and kedvezmeny=@kedv update vevo_szlet set edarab=edarab + @db, darab=darab + @db where bizszam=@bsz1 and tetel=@xtet update mozgas set bizszam=@bsz1, tetel=@xtet where bizszam=@bsz and tetel=@tet and mozgaskod='vevo_szle' end END fetch next from ctetel into @tet, @csz, @db, @ear, @kedv end close ctetel deallocate ctetel END fetch next from cbevett into @bsz end close cbevett deallocate cbevett delete from vevo_szlet WHERE bizszam>@bsz1 and bizszam<=@bsz2 delete from vevo_szlef WHERE bizszam>@bsz1 and bizszam<=@bsz2 --visszaállítja a sorszámot update bizsorszam set kod=convert(int,RIGHT(@bsz1,6)) where evtipus=@kulcs select @vnev=vevo_nev from vevok where vevo_kod=@vevo update vevo_szlef set vevo=@vevo, telep_kod='0', vevo_nev=@vnev where bizszam=@bsz1 commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_szetbont] ( @bizszam varchar(10), @ccs varchar(18), @szall kulcs, @gyarto kulcs, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @ev char(4) declare @kulcs varchar(20) declare @dat datum declare @sorsz bizonylat_szam declare @cikkcs varchar(18) declare @sz kulcs declare @gy kulcs declare @tet int declare @xtet int declare @tetuj int declare @iCount int declare @tranznev varchar(50) set @tranznev = 'v_szle_szetbont'+@kics set @dat=left(replace(convert(char,getdate(), 20 ),'-','.'),10) begin transaction @tranznev if (select count(*) from vevo_szlet inner join cikkek on cikkek.cikk_szam=vevo_szlet.cikk_szam where (@ccs='' or cikkcsop2 like @ccs+'%') and (@szall=0 or szallito=@szall) and (@gyarto=0 or gyarto=@gyarto))>0 begin set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef select @sorsz,hivszam,rendszam,szlaszam,vevo,vevo_nev,telep_kod,telj_datum,raktar_kod,penznem,kurzus,afamentes, kedvezmeny,akciocsoport,arcsoport,megjegyzes,tipus,uzletkoto,torolt,torlo,tor_ssz,visszaru,kicsoda,modositva from vevo_szlef where bizszam=@bizszam set @tet=0 set @tetuj=0 DECLARE c1 CURSOR for SELECT tetel,szallito,gyarto,cikkcsop2 FROM vevo_szlet inner join cikkek on cikkek.cikk_szam=vevo_szlet.cikk_szam WHERE bizszam=@bizszam order by tetel for update -- lockolás Select @iCount = count(*) FROM vevo_szlet (holdlock) WHERE bizszam=@bizszam open c1 fetch next from c1 into @xtet, @sz, @gy, @cikkcs while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) begin if (@ccs='' or @cikkcs like @ccs+'%') and (@szall=0 or @sz=@szall) and (@gyarto=0 or @gy=@gyarto) begin set @tetuj=@tetuj + 1 update vevo_szlet set bizszam=@sorsz, tetel=@tetuj where current of c1 /* insert into vevo_szlet select @sorsz,@tetuj,cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo,edarab,darab, egyseg_ar,kedvezmeny,megjegyzes,akcio,rendel_bsz,rendel_tet from vevo_szlet where bizszam=@bizszam and tetel=@xtet */ update mozgas set bizszam=@sorsz, tetel=@tetuj where bizszam=@bizszam and tetel=@xtet and mozgaskod='vevo_szle' --delete from vevo_szlet where bizszam=@bizszam and tetel=@xtet end else begin set @tet=@tet + 1 update mozgas set tetel=@tet where bizszam=@bizszam and tetel=@xtet and mozgaskod='vevo_szle' update vevo_szlet set tetel=@tet where current of c1 end end fetch next from c1 into @xtet, @sz, @gy, @cikkcs end close c1 deallocate c1 end commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_tor] @bsz bizonylat_szam, @dat datum, @vrakk int, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_vevo_szle_tor'+@kics BEGIN TRANSACTION @tranznev exec vevo_szle_tor_tranz_nelkul @bsz, @dat, @vrakk, @kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_tor_tranz_nelkul] @szlsz bizonylat_szam, @dat datum, @vrakk kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @_edb mennyiseg declare @db mennyiseg declare @_db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @akccsoport kulcs declare @rakk kulcs declare @xkssz bizonylat_szam declare @xtet as int declare @xbsz bizonylat_szam declare @ujkssz bizonylat_szam set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' exec bizsorsz_no @kulcs, @sorsz output set @akccsoport=(select akciocsoport from vevo_szlef where bizszam=@szlsz) insert into vevo_szlef select @sorsz, hivszam, rendszam, szlaszam, vevo, vevo_nev, telep_kod, telj_datum, case when @vrakk=0 then raktar_kod else @vrakk end, penznem, kurzus, afamentes, kedvezmeny, akciocsoport, arcsoport, megjegyzes, tipus, uzletkoto, '', '1', @szlsz, '', @kics, dbo.myGetDateTime() from vevo_szlef where bizszam= @szlsz update vevo_szlef set torolt='1', tor_ssz=@sorsz where bizszam=@szlsz DECLARE kvevo_szle SCROLL CURSOR FOR select tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, megjegyzes, akcio, rendel_bsz, rendel_tet from vevo_szlet where vevo_szlet.bizszam=@szlsz order by tetel OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if Abs(@db * @szorz) >0.00001 begin set @_edb = - @edb set @_db = - @db insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @_edb, @_db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) if len(rtrim(@ren_bsz))<>0 begin update vevo_rent set darab=darab + @db where bizszam=@ren_bsz and tetel=@ren_tet end else begin if len(rtrim(@akc))>0 exec akc_ke_aktualizal @akccsoport, @dat, @csz, @_edb end end END FETCH NEXT FROM kvevo_szle INTO @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet END CLOSE kvevo_szle DEALLOCATE kvevo_szle DECLARE kvevo_szle_mozg SCROLL CURSOR FOR select vevo_szlet.bizszam, isnull(sorszam,''), isnull(mozgas.edarab,-vevo_szlet.darab*vevo_szlet.szorzo), vevo_szlet.tetel, vevo_szlet.cikk_szam from vevo_szlet left outer join mozgas on mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=vevo_szlet.bizszam and mozgas.tetel=vevo_szlet.tetel where vevo_szlet.bizszam=@szlsz order by tetel OPEN kvevo_szle_mozg FETCH NEXT FROM kvevo_szle_mozg INTO @xbsz, @xkssz, @edb, @xtet, @csz WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @_edb = - @edb if @xkssz='' begin if dbo.xrfuggveny('NegativKeszletKezel')='I' delete from keszlet_negativ where biz_tipus='vevo_szle' and bizszam=@szlsz and tetel=@xtet end else begin if (select bizomanyos from keszlet where sorszam=@xkssz)='1' -- bizományos kartonról begin select @rakk=raktar_kod, @csz=cikk_szam from keszlet where sorszam=@xkssz if (select count(*) from szbiz_kiv where mozgaskod='vevo_szle' and kbizszam=@szlsz and sorszam=@xkssz and ktetel=@xtet and len(rtrim(idoszak))=0 )>0 -- még nincs elszámolva begin update szbiz_kiv set darab=darab - @_edb where mozgaskod='vevo_szle' and kbizszam=@szlsz and sorszam=@xkssz and ktetel=@xtet update KESZLET set darab=darab + round(@_edb,3) where sorszam = @xkssz insert into mozgas values('vevo_szle', @sorsz, @xtet, @xkssz, @_edb, @_edb) end else -- már el van számolva begin -- karton be select @ear=elszam_ar from szbiz_kiv where mozgaskod='vevo_szle' and kbizszam=@szlsz and ktetel=@xtet and sorszam=@xkssz exec karton_be_bizom @ev, 'vevo_szle', @sorsz , @xtet, @xtet, @rakk, @csz, @_edb, @ear, 0, 0, @kics end delete from szbiz_kiv where mozgaskod='vevo_szle' and darab=0 and len(rtrim(idoszak))=0 end else --nem bizományos begin if @vrakk=0 begin update KESZLET set darab=darab + round(@_edb,3) where sorszam = @xkssz insert into mozgas values('vevo_szle', @sorsz, @xtet, @xkssz, @_edb, @_edb) end else begin set @ev=left(@sorsz,4) set @kulcs = @ev +'karton' exec bizsorsz_no @kulcs, @ujkssz output insert into keszlet select @ujkssz,@vrakk,cikk_szam,abs(round(@_edb,3)),abs(round(@_edb,3)), egyseg_ar,szav_datum,mozgaskod,szamla_sz,tetel,nyugtazva,bizomanyos, gyari_szam,sarzs_szam from keszlet where sorszam=@xkssz insert into mozgas values('vevo_szle', @sorsz, @xtet, @ujkssz, @_edb, @_edb) end delete from keszlet_negativ where biz_tipus='vevo_szle' and bizszam=@szlsz and tetel=@xtet end end END FETCH NEXT FROM kvevo_szle_mozg INTO @xbsz, @xkssz, @edb, @xtet, @csz END CLOSE kvevo_szle_mozg DEALLOCATE kvevo_szle_mozg insert into vevo_szlet_td select @sorsz,tetel,e1,e2 from vevo_szlet_td where bizszam=@szlsz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_torol_biz] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_vevo_szle_torol_biz'+@kics BEGIN TRANSACTION @tranznev delete from mozgas where mozgaskod='vevo_szle' and bizszam=@bsz delete from vevo_szlet where bizszam=@bsz delete from vevo_szlef where bizszam=@bsz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_uj] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @uzletkoto kulcs, @rendszam bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_vevo_szle_uj'+@kics BEGIN TRANSACTION @tranznev exec vevo_szle_uj_tr_nelkul @hsz, @vevo, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @arcsoport, @akccsoport, @vkedv, @megj, @tipus, @uzletkoto, @kics delete from wvevo_szlet where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='vevo_szle_uj' delete from wkomissio where rendel_bsz=@rendszam and raktar_kod=@rakk COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_uj_koros] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @uzletkoto kulcs, @rendszam bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @mennyi int SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_vevo_szle_uj'+@kics BEGIN TRANSACTION @tranznev delete from wvevo_szlet_koros where kicsoda=@kics insert into wvevo_szlet_koros select * from wvevo_szlet where darab<0 and kicsoda=@kics delete from wvevo_szlet where darab<0 and kicsoda=@kics select @mennyi=COUNT(*) from wvevo_szlet where kicsoda=@kics if @mennyi>0 begin exec vevo_szle_uj_tr_nelkul @hsz, @vevo, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @arcsoport, @akccsoport, @vkedv, @megj, @tipus, @uzletkoto, @kics delete from wvevo_szlet where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='vevo_szle_uj' delete from wkomissio where rendel_bsz=@rendszam and raktar_kod=@rakk end insert into wvevo_szlet select * from wvevo_szlet_koros where darab<0 and kicsoda=@kics update wvevo_szlet set darab=-darab, edarab=-edarab where kicsoda=@kics exec vevo_szle_visszaru_egyedi_tr_nelkul @hsz, @vevo, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @arcsoport, @akccsoport, @vkedv, @megj, @tipus, @uzletkoto, @kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_uj_logi] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @pn penznem, @kurz kurzus, @afamentes bit, @arcsoport kulcs, @akccsoport kulcs, @vkedv kedvezmeny, @megj megjegyzes, @tipus kulcs, @uzletkoto kulcs, @kics kicsoda, @rszam bizonylat_szam, @tul int, @dolg kicsoda, @kapu varchar(20) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @etet bizonylat_tetel declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @aru_szolg int declare @td char(1) declare @sajatbolt char(1) --1:saját declare @_kdb mennyiseg declare @_kert egyseg_ar declare @rovnev varchar(10) declare @tranznev char(32) declare @pazon varchar(20) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @tranznev='t_vevo_szle_uj'+@kics BEGIN TRANSACTION @tranznev if len(@dolg)>0 and len(@kapu)>0 exec arulog..keszlet_csokkent_le @kapu, @dolg, @tul, @kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' select @vnev=vevo_nev, @sajatbolt=sajat_bolt from vevok where vevo_kod=@vevo select @rovnev=rovidnev from regisztral set @rensz='' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, @hsz, @rensz, '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @tipus, @uzletkoto, '', '', '', '', @kics, dbo.myGetDateTime()) DECLARE kvevo_szle SCROLL CURSOR FOR select wvevo_szlet.tetel, 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, cikkek.termekdijas from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin if @aru_szolg=1 begin set @n_db=@db * @szorz -- kiveszi a foglalt mennyiségből (ezt még a karton_ki előtt!) exec foglalas_ki @vevo, @rakk, @csz, @n_db, @kics exec karton_ki 'vevo_szle', @SorSZ , @ETET, @TET, @RAKK, @CSZ, @n_db, 'vevo_szle_uj', @kics if @sajatbolt='1' and @rovnev='KARACS' --ha saját bolt + KARACS begin set @ear=0 select @_kdb=sum(mozgas.darab), @_kert=sum(mozgas.darab * keszlet.egyseg_ar) from mozgas,keszlet where mozgas.sorszam=keszlet.sorszam and mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=@sorsz and mozgas.tetel=@tet if @_kdb<>0 set @ear=@_kert / @_kdb set @ear=@ear * @szorz end end insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) if @td='1' --csak ha termékdíjas exec vevo_szlet_td_uj @sorsz, @vevo, @tet, @csz if len(rtrim(@ren_bsz))<>0 begin update vevo_rent set darab= CASE WHEN darab<@db THEN 0 ELSE darab-@db END where bizszam=@ren_bsz and tetel=@ren_tet end else begin if len(rtrim(@akc))>0 exec akc_ke_aktualizal @akccsoport, @dat, @csz, @edb end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td END CLOSE kvevo_szle DEALLOCATE kvevo_szle DECLARE kvevo_szle1 SCROLL CURSOR FOR select wvevo_szlet.tetel, 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, cikkek.termekdijas from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle1 FETCH NEXT FROM kvevo_szle1 INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz <0.00001 begin insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle1 INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td END CLOSE kvevo_szle1 DEALLOCATE kvevo_szle1 /* Végigmegy a rendeléseken, és aktualizálja a rendelések állapotát */ DECLARE kvevo_szl_ren SCROLL CURSOR FOR select rendel_ssz from wvevo_szlet where kicsoda=@kics and len(rtrim(rendel_ssz))>0 group by rendel_ssz OPEN kvevo_szl_ren FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_ren_allapot_akt @ren_bsz END FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz END CLOSE kvevo_szl_ren DEALLOCATE kvevo_szl_ren -- kiszámolja a végén az akciócsomagból járó akciót!!!! --exec vevo_akc_csom_szamol @vevo, @sorsz, @dat -- a végén törli a munkatablót delete from wvevo_szlet where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='vevo_szle_uj' -- törli a logisztika készletből a kapuban lévő raklapokat select @pazon=puffer_azon from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(vegrehajtva)>0 delete from arulog..keszlet where helyazon=@pazon and darab=0 insert into arulog..kom_szamlazott select @tul, 1, @sorsz, kulcs from arulog..kom_feladat where tulaj=@tul and bizszam=@rszam and Len(RTrim(vegrehajtva))<>0 and keszletkulcs<>0 and not exists (select * from arulog..kom_szamlazott AS x where tulaj=@tul and x.kulcs=arulog..kom_feladat.kulcs) -- törli a rendelés összes foglalását függetlenül a dátumtól update foglalasok set darab=0 where darab<>0 and rend_szam=@rszam COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_uj_tr_nelkul] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @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 SET NOCOUNT ON declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @etet bizonylat_tetel declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @aru_szolg int declare @td char(1) declare @sajatbolt char(1) --1:saját declare @_kdb mennyiseg declare @_kert egyseg_ar declare @rovnev varchar(10) SET TRANSACTION ISOLATION LEVEL SERIALIZABLE set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' select @vnev=vevo_nev, @sajatbolt=sajat_bolt from vevok where vevo_kod=@vevo select @rovnev=rovidnev from regisztral set @rensz='' exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, @hsz, @rensz, '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @tipus, @uzletkoto, '', '', '', '', @kics, dbo.myGetDateTime()) DECLARE kvevo_szle SCROLL CURSOR FOR select wvevo_szlet.tetel, 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, cikkek.termekdijas from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin --if @afamentes='1' and @afak<>'FA' --set @afak='AM' if @aru_szolg=1 begin set @n_db=@db * @szorz -- kiveszi a foglalt mennyiségből (ezt még a karton_ki előtt!) exec foglalas_ki @vevo, @rakk, @csz, @n_db, @kics exec karton_ki 'vevo_szle', @SorSZ , @ETET, @TET, @RAKK, @CSZ, @n_db, 'vevo_szle_uj', @kics if @sajatbolt='1' and @rovnev<>'SANTE' --ha saját bolt és nem SANTE begin set @ear=0 select @_kdb=sum(mozgas.darab), @_kert=sum(mozgas.darab * keszlet.egyseg_ar) from mozgas,keszlet where mozgas.sorszam=keszlet.sorszam and mozgas.mozgaskod='vevo_szle' and mozgas.bizszam=@sorsz and mozgas.tetel=@tet if @_kdb<>0 set @ear=@_kert / @_kdb set @ear=@ear * @szorz end end insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) if @td='1' --csak ha termékdíjas exec vevo_szlet_td_uj @sorsz, @vevo, @tet, @csz if len(rtrim(@ren_bsz))<>0 begin update vevo_rent set darab= CASE WHEN darab<@db THEN 0 ELSE darab-@db END where bizszam=@ren_bsz and tetel=@ren_tet end else begin if len(rtrim(@akc))>0 exec akc_ke_aktualizal @akccsoport, @dat, @csz, @edb end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td END CLOSE kvevo_szle DEALLOCATE kvevo_szle DECLARE kvevo_szle1 SCROLL CURSOR FOR select wvevo_szlet.tetel, 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, cikkek.termekdijas from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle1 FETCH NEXT FROM kvevo_szle1 INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz <0.00001 begin --if @afamentes='1' and @afak<>'FA' --set @afak='AM' insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle1 INTO @etet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @td END CLOSE kvevo_szle1 DEALLOCATE kvevo_szle1 /* Végigmegy a rendeléseken, és aktualizálja a rendelések állapotát */ DECLARE kvevo_szl_ren SCROLL CURSOR FOR select rendel_ssz from wvevo_szlet where kicsoda=@kics and len(rtrim(rendel_ssz))>0 group by rendel_ssz OPEN kvevo_szl_ren FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN exec vevo_ren_allapot_akt @ren_bsz END FETCH NEXT FROM kvevo_szl_ren INTO @ren_bsz END CLOSE kvevo_szl_ren DEALLOCATE kvevo_szl_ren SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_visszaru] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @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 --SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @rensz bizonylat_szam declare @kulcs varchar(20) declare @aru_szolg int declare @ere_bsz bizonylat_szam declare @ere_tet bizonylat_tetel set @tranznev='t_vevo_szle_va'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) set @rensz='' BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, @hsz, @rensz, '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @tipus, @uzletkoto, '', '', '', '1', @kics, dbo.myGetDateTime()) 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, -@edb, -@db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) insert into vevo_szlet_td select @sorsz, @tet, E1, E2 from wvevo_szlet_td where tetel = @tet and kicsoda = @kics if @aru_szolg=1 begin if charindex('/',@ren_bsz)>0 begin select @ere_bsz=szlev_szam, @ere_tet=szlev_tetel_szam from vevo_szlat where bizszam=@ren_bsz and tetel=@ren_tet end else begin set @ere_bsz=@ren_bsz set @ere_tet=@ren_tet end set @n_db=-@db * @szorz exec karton_vissza 'vevo_szle', @SorSZ , @TET, @n_db, @ere_bsz, @ere_tet, 'vevo_szle_visszaru', @rakk, @csz, @kics end if len(rtrim(@ere_bsz))<>0 begin update vevo_szlet set darab= CASE WHEN darab<@db THEN 0 ELSE darab-@db END where bizszam=@ere_bsz and tetel=@ere_tet end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg END CLOSE kvevo_szle DEALLOCATE kvevo_szle delete from wvevo_szlet where kicsoda=@kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_visszaru_egyedi] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @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 SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='t_vevo_szle_va'+@kics BEGIN TRANSACTION @tranznev exec vevo_szle_visszaru_egyedi_tr_nelkul @hsz , @vevo , @szcim , @dat , @rakk, @pn , @kurz , @afamentes , @arcsoport , @akccsoport , @vkedv , @megj , @tipus , @uzletkoto , @kics COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_szle_visszaru_egyedi_tr_nelkul] @hsz bizonylat_szam, @vevo kulcs, @szcim char(4), @dat datum, @rakk kulcs, @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 SET NOCOUNT ON --SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) declare @sorsz bizonylat_szam declare @vnev nev declare @ev char(4) declare @tet bizonylat_tetel declare @csz cikk_szam declare @cn cikk_nev declare @me menny_egyseg declare @szorz szorzo declare @ear egyseg_ar declare @edb mennyiseg declare @db mennyiseg declare @n_db mennyiseg declare @afak afakulcs declare @akc char(1) declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @ren_bsz bizonylat_szam declare @ren_tet bizonylat_tetel declare @kulcs varchar(20) declare @aru_szolg int declare @etet bizonylat_tetel declare @_ear egyseg_ar set @tranznev='t_vevo_szle_va'+@kics set @ev=left(@dat,4) set @kulcs = @ev + 'vevo_szle' set @vnev=(select vevo_nev from vevok where vevo_kod=@vevo) --BEGIN TRANSACTION @tranznev exec bizsorsz_no @kulcs, @sorsz output insert into vevo_szlef values(@sorsz, @hsz, '', '', @vevo, @vnev, @szcim, @dat, @rakk, @pn, @kurz, @afamentes, @vkedv, @akccsoport, @arcsoport, @megj, @tipus, @uzletkoto, '', '', '', '1', @kics, dbo.myGetDateTime()) 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, wvevo_szlet.rendel_ssz, wvevo_szlet.rendel_tet, cikkek.aru_szolg, wvevo_szlet.tetel from wvevo_szlet inner join cikkek ON wvevo_szlet.cikk_szam = cikkek.cikk_szam where wvevo_szlet.kicsoda=@kics order by case dbo.xrBizTetRend() when 'tetel' then dbo.strzero(tetel,6) when 'cikk_szam' then wvevo_szlet.cikk_szam else wvevo_szlet.cikk_nev end OPEN kvevo_szle FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @etet set @tet=1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @db * @szorz >0.00001 begin insert into vevo_szlet values( @sorsz, @tet, @csz, @cn, @afak, @me, @szorz, -@edb, -@db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet) if @aru_szolg=1 begin set @n_db=@db * @szorz select @_ear=ut_besz_ar from cikkek where cikk_szam=@csz --set @_ear= @ear * @kurz * ((100 - @tkedv)/100) * ((100-@vkedv)/100) / @szorz exec karton_be @ev, 'vevo_szle', @SorSZ , @etet, @TET, @rakk, @csz, @n_db, @_ear, 0, 0, @kics end set @tet=@tet+1 end END FETCH NEXT FROM kvevo_szle INTO @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @tmegj, @akc, @ren_bsz, @ren_tet, @aru_szolg, @etet END CLOSE kvevo_szle DEALLOCATE kvevo_szle delete from wvevo_szlet where kicsoda=@kics --COMMIT TRANSACTION @tranznev --SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [VEVO_SZLET_TD_UJ] @sorsz bizonylat_szam, @vevo kulcs, @tet bizonylat_tetel, @csz cikk_szam WITH RECOMPILE AS SET NOCOUNT ON declare @e1 egyseg_ar declare @e2 egyseg_ar declare @re1 egyseg_ar declare @re2 egyseg_ar declare @orsz char(30) declare @Viszontelado char(1) declare @kssz bizonylat_szam select @re1= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijE1'),'0'),',','.')) select @re2= Convert(decimal(18,2),Replace(IsNull(dbo.xrfuggveny('TermekdijE2'),'0'),',','.')) select @Viszontelado = Viszontelado from vevok where vevo_kod=@vevo select @kssz=sorszam from mozgas where mozgaskod='vevo_szle' and bizszam=@sorsz and tetel=@tet if (select mozgaskod from keszlet where sorszam=@kssz) = 'vetel' begin SELECT @e1= ISNULL(szall_szlet_td.E1, 0), @e2= ISNULL(szall_szlet_td.E2, 0), @orsz=rtrim(szallito.orszag) FROM szallito INNER JOIN szall_szlef ON szallito.SZALL_KOD = szall_szlef.SZALLITO INNER JOIN keszlet ON szall_szlef.BIZSZAM = keszlet.SZAMLA_SZ LEFT OUTER JOIN szall_szlet_td ON keszlet.TETEL = szall_szlet_td.TETEL AND keszlet.SZAMLA_SZ = szall_szlet_td.BIZSZAM WHERE keszlet.SORSZAM = @kssz if @orsz<>'HU' -- behozatal begin if @Viszontelado='1' begin select @e1=@re1 set @e2=0 end else begin select @e1= @re1 select @e2= @re2 end end else begin if @e1>0 --elso kereskedo begin set @e1=0 select @e2= @re2 end else begin set @e1=0 set @e2=0 end end if @e1+@e2>0 insert into vevo_szlet_td values( @sorsz,@tet,@e1,@e2) end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_tolt] @vkod kulcs, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wvevo_tel where kicsoda=@kics delete from wvevo_bank where kicsoda=@kics delete from wvevo_kapcsolat where kicsoda=@kics delete from wvevo_kedv where kicsoda=@kics insert into wvevo_tel select vevo_kod, vevo_tel.telep_kod, telep_nev, varos, iranyito, cim, kerulet, kozterulet_jellege, hazszam, epulet, lepcsohaz, szint, ajto, kapcsolat, telefon, email, kartya, limit, jovedeki, torolt, @kics, vevo_csoport, vevo_lanc, vevo_cegjelleg, vevo_terulet, idokapu, iso, allam, isnull(edi_azon,'') from vevo_tel left outer join edi_partner on vevo_kod=partner_kod and vevo_tel.telep_kod=edi_partner.telep_kod and tipus='V' where vevo_kod=@vkod insert into wvevo_bank select vevo_kod, bank, torolt, @kics from vevo_bank where vevo_kod=@vkod insert into wvevo_kapcsolat select vevo_kod, kapcs_kod, kapcsolat, telefon, email, beosztas, @kics from vevo_kapcsolat where vevo_kod=@vkod insert into wvevo_kedv select 0, tipus, ertek, megnevezes, kedvezmeny, @kics from vvevo_kedv where vevo_kod=@vkod end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_uj] @NEV nev, @ir nev, @va nev, @orszag char(2), @cim nev, @tel nev, @fax nev, @kap nev, @email nev, @allam varchar(255), @ln nev, @li nev, @lv nev, @lc nev, @lorsz char(2), @lallam varchar(255), @ado nev, @eu_ado nev, @utlev varchar(20), @bank nev, @jov nev, @acs kulcs, @akccs kulcs, @kedv kedvezmeny, @fm char(1), @fh int, @vcs kulcs, @vl kulcs, @vcj kulcs, @vt kulcs, @scikk kulcs, @ve char(1), @sajat char(1), @nyelv char(2), @eszla char(1), @zar char(1), @vevoweb char(1), @bejel_email varchar(50), @kics kicsoda, @kerulet varchar(50), @kozterulet_jellege varchar(50), @hazszam varchar(50), @epulet varchar(50), @lepcsohaz varchar(50), @szint varchar(50), @ajto varchar(50), @edi varchar(14), @hitkeret numeric(18,2), @fafa char(1), @vevoweb1 char(1), @bejel_email1 varchar(50), @csopaz varchar(13) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE --Declare @vkod int BEGIN TRANSACTION t_vevouj exec vevo_uj_notr @NEV, @ir, @va, @orszag, @cim, @tel, @fax, @kap, @email, @allam, @ln, @li, @lv, @lc, @lorsz, @lallam, @ado, @eu_ado, @utlev, @bank, @jov, @acs, @akccs, @kedv, @fm, @fh, @vcs, @vl, @vcj, @vt, @scikk, @ve, @sajat, @nyelv, @eszla, @zar, @vevoweb, @bejel_email, @kics, @kerulet, @kozterulet_jellege, @hazszam, @epulet, @lepcsohaz, @szint, @ajto, @edi, @hitkeret, @fafa, @vevoweb1, @bejel_email1, @csopaz COMMIT TRANSACTION t_vevouj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_uj_nemreg] @NEV nev, @ir nev, @va nev, @orszag char(2), @cim nev, @tel nev, @email nev, @allam varchar(255), --telep adatok @ln nev, @li nev, @lv nev, @lc nev, @lorsz char(2), @lallam varchar(255), --általános @ado nev, @kics kicsoda, --vevő cim @kerulet varchar(50), @kozterulet_jellege varchar(50), @hazszam varchar(50), @epulet varchar(50), @lepcsohaz varchar(50), @szint varchar(50), @ajto varchar(50) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE Declare @acs int Declare @akccs int BEGIN TRANSACTION t_vevouj select @acs=convert(int,dbo.xrfuggveny('AlapArcsop')) select @akccs=convert(int,dbo.xrfuggveny('AlapAkccsop')) insert into wvevo_tel values(0, '0', @ln, @lv, @li, @lc, '', '', '', '', '', '', '', '', '', '', --email '', 0, '', '', @kics, 0,0,0,0,'', @lorsz, @lallam, '') exec vevo_uj_notr @NEV, @ir, @va, @orszag, @cim, @tel, '', '', '', @allam, '', '', '', '', '', @email, @ado, '', '', '', '', @acs, @akccs, 0, '3', 0, 0, 0, 0, 0, 0, '0', '0', 'HU', '0', '0', '0', '', @kics, @kerulet, @kozterulet_jellege, @hazszam, @epulet, @lepcsohaz, @szint, @ajto, '', 0, '0', '0', '', '' COMMIT TRANSACTION t_vevouj SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevo_uj_notr] @NEV nev, @ir nev, @va nev, @orszag char(2), @cim nev, @tel nev, @fax nev, @kap nev, @email nev, @allam varchar(255), @ln nev, @li nev, @lv nev, @lc nev, @lorsz char(2), @lallam varchar(255), @ado nev, @eu_ado nev, @utlev varchar(20), @bank nev, @jov nev, @acs kulcs, @akccs kulcs, @kedv kedvezmeny, @fm char(1), @fh int, @vcs kulcs, @vl kulcs, @vcj kulcs, @vt kulcs, @scikk kulcs, @ve char(1), @sajat char(1), @nyelv char(2), @eszla char(1), @zar char(1), @vevoweb char(1), @bejel_email varchar(50), @kics kicsoda, @kerulet varchar(50), @kozterulet_jellege varchar(50), @hazszam varchar(50), @epulet varchar(50), @lepcsohaz varchar(50), @szint varchar(50), @ajto varchar(50), @edi varchar(14), @hitkeret numeric(18,2), @fafa char(1), @vevoweb1 char(1), @bejel_email1 varchar(50), @csopaz varchar(13) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON Declare @vkod int insert into vevok values( @NEV, @ir, @va, '', @cim, @tel, @fax, @kap, @email, @ado, @eu_ado, @bank, @jov, @acs, @akccs, @kedv, @fm, @fh, @vcs, @vl, @vcj, @vt, @scikk, @ve, @sajat, @kics, dbo.mygetdatetime(), @utlev, @ln, @li, @lv, @lc, @nyelv, @eszla, @orszag, @allam, @lorsz, @lallam, @kerulet, case @orszag when 'HU' then @kozterulet_jellege else '' end , case @orszag when 'HU' then @hazszam else '' end , @epulet, @lepcsohaz, @szint, @ajto, @fafa) Select @vkod = @@identity exec vevo_beir_telmeg @vkod, @kics if @zar='1' insert into vevok_zaradek values(@vkod,'1') if len(@edi)>0 insert into edi_partner values('V', @vkod, '0', @edi) if len(@csopaz)>0 insert into vevok_csoportazon values(@vkod,@csopaz) if @vevoweb='1' begin if (select count(*) from _web_belepes where vevo_kod=@vkod)>0 begin update _web_belepes set belep_nev=@bejel_email, email=@bejel_email where vevo_kod=@vkod end else begin insert into _web_belepes values(@bejel_email,'',@bejel_email,@vkod,0,'','','',0) end end else begin delete from _web_belepes where vevo_kod=@vkod end if @vevoweb1='1' begin if (select count(*) from _nkweb_belepes where vevo_kod=@vkod)>0 begin update _nkweb_belepes set belep_nev=@bejel_email1, email=@bejel_email1 where vevo_kod=@vkod end else begin insert into _nkweb_belepes values(@bejel_email1,'',@bejel_email1,@vkod,0,'','','') end end else begin delete from _nkweb_belepes where vevo_kod=@vkod end if @hitkeret<>0 if (select count(*) from vevok_hitelkeret where vevo_kod=@vkod)>0 update vevok_hitelkeret set hitelkeret=@hitkeret where vevo_kod=@vkod else insert into vevok_hitelkeret values(@vkod, @hitkeret) else delete from vevok_hitelkeret where vevo_kod=@vkod insert into vevo_kedv select @vkod, tipus, ertek, kedvezmeny from wvevo_kedv where kicsoda=@kics delete from wvevo_tel where kicsoda=@kics delete from wvevo_bank where kicsoda=@kics delete from wvevo_kapcsolat where kicsoda=@kics delete from wvevo_kedv where kicsoda=@kics end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevoarak_feltolt] ( @arcs kulcs, @kics kicsoda ) AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev varchar(50) set @tranznev = 'vevoarak'+@kics begin transaction @tranznev insert into vevoarak select cikk_szam, left(letrehozva,10), '', 0, 0,@arcs from cikkek where cikk_szam not in (select cikk_szam from vevoarak where arcsoport=@arcs group by cikk_szam) commit transaction @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end; GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vevoarak_vevo_tolt] @vkod kulcs, @kics kicsoda AS begin SET XACT_ABORT ON delete from wvevoarak where kicsoda=@kics insert into wvevoarak select vevoarak.cikk_szam, datum + dbo.DatumTipusVevo(vevo,datum,vdatum,vevoarak.cikk_szam,dbo.MyDToC(getdate()),1), vdatum, vevo, egyseg_ar, cikk_nev, @kics from vevoarak,cikkek where vevoarak.cikk_szam=cikkek.cikk_szam and vevo=@vkod end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vonal_beir] @csz cikk_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from vonal where cikk_szam=@csz insert into vonal select @csz, rtrim(vonalkod), szorzo, menny_egys, alap from wvonal where kicsoda=@kics and cikk_szam=@csz delete from cikkek_jellemzok where cikk_szam=@csz insert into cikkek_jellemzok select @csz, jellemzo from wcikkek_jellemzok where kicsoda=@kics and cikk_szam=@csz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vonal_feltolt] @csz cikk_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wvonal where kicsoda=@kics if dbo.xrfuggveny ('EanEgyszeruKezel')='I' --EAN a főlapon insert into wvonal select cikk_szam, vonalkod, szorzo, menny_egys, alap, @kics from vonal where cikk_szam=@csz and alap<>'1' else insert into wvonal select cikk_szam, vonalkod, szorzo, menny_egys, alap, @kics from vonal where cikk_szam=@csz delete from wcikkek_jellemzok where kicsoda=@kics insert into wcikkek_jellemzok select cikk_szam, jellemzo, jellemzo_nev, @kics from vcikkek_jellemzok where cikk_szam=@csz delete from wcikkek_kep where kicsoda=@kics insert into wcikkek_kep select cikk_szam, file_nev, '', '', @kics from cikkek_kep where cikk_szam=@csz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vonal_feltolt1] @csz cikk_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON delete from wvonal where kicsoda=@kics if dbo.xrfuggveny ('EanEgyszeruKezel')='I' --EAN a főlapon insert into wvonal select cikk_szam, vonalkod, szorzo, menny_egys, alap, @kics from vonal where cikk_szam=@csz and alap<>'1' else insert into wvonal select cikk_szam, vonalkod, szorzo, menny_egys, alap, @kics from vonal where cikk_szam=@csz end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [vonalkod_beir] AS SET XACT_ABORT ON SET NOCOUNT ON declare @vk varchar(14) declare @csz char(14) declare @me varchar(10) declare @i int BEGIN TRANSACTION t_cikkuj DECLARE kcikkek SCROLL CURSOR FOR select cikk_szam,menny_egys from cikkek where cikk_szam like '%A%' or cikk_szam like '%B%' or cikk_szam like '%c%' or cikk_szam like '%d%' or cikk_szam like '%e%' or cikk_szam like '%f%' or cikk_szam like '%g%' or cikk_szam like '%h%' or cikk_szam like '%i%' or cikk_szam like '%j%' or cikk_szam like '%k%' or cikk_szam like '%l%' or cikk_szam like '%m%' or cikk_szam like '%n%' or cikk_szam like '%o%' or cikk_szam like '%p%' or cikk_szam like '%q%' or cikk_szam like '%r%' or cikk_szam like '%s%' or cikk_szam like '%t%' or cikk_szam like '%u%' or cikk_szam like '%v%' or cikk_szam like '%w%' or cikk_szam like '%x%' or cikk_szam like '%y%' or cikk_szam like '%z%' or cikk_szam like '%sz%' or cikk_szam like '%-%' or cikk_szam like '%/%' or cikk_szam like '%.%' or cikk_szam like '%,%' or cikk_szam like '%#%' order by cikk_szam OPEN kcikkek FETCH NEXT FROM kcikkek INTO @csz, @me WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN set @vk=replace(@csz,'A','2') set @vk=replace(@vk,'B','2') set @vk=replace(@vk,'C','2') set @vk=replace(@vk,'D','2') set @vk=replace(@vk,'E','2') set @vk=replace(@vk,'F','2') set @vk=replace(@vk,'G','2') set @vk=replace(@vk,'H','2') set @vk=replace(@vk,'I','2') set @vk=replace(@vk,'J','2') set @vk=replace(@vk,'K','2') set @vk=replace(@vk,'L','2') set @vk=replace(@vk,'M','2') set @vk=replace(@vk,'N','2') set @vk=replace(@vk,'O','2') set @vk=replace(@vk,'P','2') set @vk=replace(@vk,'Q','2') set @vk=replace(@vk,'R','2') set @vk=replace(@vk,'S','2') set @vk=replace(@vk,'T','2') set @vk=replace(@vk,'U','2') set @vk=replace(@vk,'V','2') set @vk=replace(@vk,'W','2') set @vk=replace(@vk,'X','2') set @vk=replace(@vk,'Y','2') set @vk=replace(@vk,'Z','2') set @vk=replace(@vk,'a','2') set @vk=replace(@vk,'b','2') set @vk=replace(@vk,'c','2') set @vk=replace(@vk,'d','2') set @vk=replace(@vk,'e','2') set @vk=replace(@vk,'f','2') set @vk=replace(@vk,'g','2') set @vk=replace(@vk,'h','2') set @vk=replace(@vk,'i','2') set @vk=replace(@vk,'j','2') set @vk=replace(@vk,'k','2') set @vk=replace(@vk,'l','2') set @vk=replace(@vk,'m','2') set @vk=replace(@vk,'n','2') set @vk=replace(@vk,'o','2') set @vk=replace(@vk,'p','2') set @vk=replace(@vk,'q','2') set @vk=replace(@vk,'r','2') set @vk=replace(@vk,'s','2') set @vk=replace(@vk,'t','2') set @vk=replace(@vk,'u','2') set @vk=replace(@vk,'v','2') set @vk=replace(@vk,'w','2') set @vk=replace(@vk,'x','2') set @vk=replace(@vk,'y','2') set @vk=replace(@vk,'z','2') set @vk=replace(@vk,'-','0') set @vk=replace(@vk,'/','1') set @vk=replace(@vk,'.','2') set @vk=replace(@vk,',','2') set @vk=replace(@vk,'#','2') set @vk=replace(@vk,' ','') set @vk=rtrim(@vk) if (select isnull(count(*),0) from vonal where vonalkod=@vk)=0 begin update vonal set alap='0' where cikk_szam=@csz insert into vonal values(@csz,@vk,1,@me,'1') print @vk end else begin if len(@vk)<14 begin update vonal set alap='0' where cikk_szam=@csz set @i=1 while @i<10 begin if (select isnull(count(*),0) from vonal where vonalkod=@vk+dbo.strzero(@i,1))=0 begin print @vk+dbo.strzero(@i,1) insert into vonal values(@csz,@vk+dbo.strzero(@i,1),1,@me,'1') set @i=10 end set @i=@i+1 end end end end FETCH NEXT FROM kcikkek INTO @csz, @me end CLOSE kcikkek DEALLOCATE kcikkek COMMIT TRANSACTION t_cikkuj GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [vonalkod_general] @csz char(14), @me varchar(10) AS SET XACT_ABORT ON SET NOCOUNT ON declare @vk varchar(14) declare @i int if (select isnull(count(*),0) from vonal where vonalkod=@csz)=0 begin insert into vonal values(@csz,@csz,1,@me,'0') end set @vk=replace(@csz,'CS','22') set @vk=replace(@vk,'NY','22') set @vk=replace(@vk,'TY','22') set @vk=replace(@vk,'LY','22') set @vk=replace(@vk,'SZ','22') set @vk=replace(@vk,'ZS','22') set @vk=replace(@vk,'GY','22') set @vk=replace(@vk,'cs','22') set @vk=replace(@vk,'ny','22') set @vk=replace(@vk,'ty','22') set @vk=replace(@vk,'ly','22') set @vk=replace(@vk,'sz','22') set @vk=replace(@vk,'zs','22') set @vk=replace(@vk,'gy','22') set @vk=replace(@vk,'A','2') set @vk=replace(@vk,'B','2') set @vk=replace(@vk,'C','2') set @vk=replace(@vk,'D','2') set @vk=replace(@vk,'E','2') set @vk=replace(@vk,'F','2') set @vk=replace(@vk,'G','2') set @vk=replace(@vk,'H','2') set @vk=replace(@vk,'I','2') set @vk=replace(@vk,'J','2') set @vk=replace(@vk,'K','2') set @vk=replace(@vk,'L','2') set @vk=replace(@vk,'M','2') set @vk=replace(@vk,'N','2') set @vk=replace(@vk,'O','2') set @vk=replace(@vk,'P','2') set @vk=replace(@vk,'Q','2') set @vk=replace(@vk,'R','2') set @vk=replace(@vk,'S','2') set @vk=replace(@vk,'T','2') set @vk=replace(@vk,'U','2') set @vk=replace(@vk,'V','2') set @vk=replace(@vk,'W','2') set @vk=replace(@vk,'X','2') set @vk=replace(@vk,'Y','2') set @vk=replace(@vk,'Z','2') set @vk=replace(@vk,'a','2') set @vk=replace(@vk,'b','2') set @vk=replace(@vk,'c','2') set @vk=replace(@vk,'d','2') set @vk=replace(@vk,'e','2') set @vk=replace(@vk,'f','2') set @vk=replace(@vk,'g','2') set @vk=replace(@vk,'h','2') set @vk=replace(@vk,'i','2') set @vk=replace(@vk,'j','2') set @vk=replace(@vk,'k','2') set @vk=replace(@vk,'l','2') set @vk=replace(@vk,'m','2') set @vk=replace(@vk,'n','2') set @vk=replace(@vk,'o','2') set @vk=replace(@vk,'p','2') set @vk=replace(@vk,'q','2') set @vk=replace(@vk,'r','2') set @vk=replace(@vk,'s','2') set @vk=replace(@vk,'t','2') set @vk=replace(@vk,'u','2') set @vk=replace(@vk,'v','2') set @vk=replace(@vk,'w','2') set @vk=replace(@vk,'x','2') set @vk=replace(@vk,'y','2') set @vk=replace(@vk,'z','2') set @vk=replace(@vk,'á','2') set @vk=replace(@vk,'é','2') set @vk=replace(@vk,'í','2') set @vk=replace(@vk,'ó','2') set @vk=replace(@vk,'ö','2') set @vk=replace(@vk,'ő','2') set @vk=replace(@vk,'ú','2') set @vk=replace(@vk,'ü','2') set @vk=replace(@vk,'ű','2') set @vk=replace(@vk,'-','') set @vk=replace(@vk,'/','') set @vk=replace(@vk,'+','') set @vk=replace(@vk,'_','') set @vk=replace(@vk,'.','') set @vk=replace(@vk,',','') set @vk=replace(@vk,'#','') set @vk=replace(@vk,' ','') set @vk=rtrim(@vk) if (select isnull(count(*),0) from vonal where vonalkod=@vk)=0 begin update vonal set alap='0' where cikk_szam=@csz insert into vonal values(@csz,@vk,1,@me,'1') --print @vk end else begin if len(@vk)<13 begin update vonal set alap='0' where cikk_szam=@csz set @i=1 while @i<20 begin if (select isnull(count(*),0) from vonal where vonalkod=@vk+dbo.strzero(@i, case when @i>9 then 2 else 1 end ))=0 begin --print @vk+dbo.strzero(@i,1) insert into vonal values(@csz,@vk+dbo.strzero(@i, case when @i>9 then 2 else 1 end ),1,@me,'1') set @i=20 end set @i=@i+1 end end end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wbekivett_tolt] @tip int, @arcsop int, @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_bekivett_felt'+@kics BEGIN TRANSACTION @tranznev delete from wbekivett where kicsoda=@kics if @tip=1 --bevét begin insert into wbekivett select BIZSZAM, TETEL, CIKK_SZAM, AFA_KULCS, MENNY_EGYS, SZORZO, EGYSEG_AR, DARAB, @kics,0 from bevett where bizszam=@bsz end else --kivét vagy rmozgás begin if @tip=2 --kivét begin insert into wbekivett select kivett.BIZSZAM, kivett.TETEL, kivett.CIKK_SZAM, '', kivett.MENNY_EGYS, kivett.SZORZO, - SUM(mozgas.DARAB * keszlet.EGYSEG_AR), - SUM(mozgas.DARAB), @kics, 0 from kivett INNER JOIN mozgas ON kivett.BIZSZAM = mozgas.BIZSZAM AND kivett.TETEL = mozgas.TETEL INNER JOIN keszlet ON mozgas.SORSZAM = keszlet.SORSZAM where mozgas.MOZGASKOD = N'kivet' and kivett.bizszam=@bsz group by kivett.BIZSZAM, kivett.TETEL, kivett.CIKK_SZAM, kivett.MENNY_EGYS, kivett.SZORZO end else -- rmozgás begin insert into wbekivett select rmozgast.BIZSZAM, rmozgast.TETEL, rmozgast.CIKK_SZAM, '', rmozgast.MENNY_EGYS, rmozgast.SZORZO, - SUM(mozgas.DARAB * keszlet.EGYSEG_AR), - SUM(mozgas.DARAB), @kics, 0 from rmozgast INNER JOIN mozgas ON rmozgast.BIZSZAM = mozgas.BIZSZAM AND rmozgast.TETEL = mozgas.TETEL INNER JOIN keszlet ON mozgas.SORSZAM = keszlet.SORSZAM where mozgas.MOZGASKOD = N'rmozgas' and rmozgast.bizszam=@bsz group by rmozgast.BIZSZAM, rmozgast.TETEL, rmozgast.CIKK_SZAM, rmozgast.MENNY_EGYS, rmozgast.SZORZO end update wbekivett set egyseg_ar=egyseg_ar/darab where kicsoda=@kics and darab<>0 update wbekivett set afa_kulcs= (select afa_kulcs from cikkek where cikkek.cikk_szam=wbekivett.cikk_szam) where kicsoda=@kics end update wbekivett set brutto_ar= (select netto_ar from _wcikk_arak01 where _wcikk_arak01.cikk_szam=wbekivett.cikk_szam) where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wf_cikk_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kics char(20) declare @dat char(20) declare @sqlstr varchar(3000) declare @str varchar(200) declare @szall_kodja int set @kics='fejleszto' set @dat=dbo.mygetdatetime() set @tranznev='cikkcsoportok'+@kics BEGIN TRANSACTION @tranznev -- cikkcsoportok (már létező) update stcikk2 set cikk_nev= (select cikk_nev from wf_stcikk2 where stcikk2.cikk_szam=wf_stcikk2.cikk_szam) where cikk_szam in (select cikk_szam from wf_stcikk2) -- cikkcsoportok (még nem létező) insert into stcikk2 select cikk_szam,cikk_nev,cikk_nev_eng,@kics,left(modositva,20) from wf_stcikk2 where cikk_szam not in (select cikk_szam from stcikk2) COMMIT TRANSACTION @tranznev -- gyarto set @tranznev='gyarto'+@kics BEGIN TRANSACTION @tranznev --már létező update gyarto set nev= (select nev from wf_gyarto where gyarto.kod=wf_gyarto.kod) where kod in (select kod from wf_gyarto) --Új SET IDENTITY_INSERT gyarto ON insert into gyarto (nev, kod) select nev, kod from wf_gyarto where kod not in (select kod from gyarto) SET IDENTITY_INSERT gyarto OFF COMMIT TRANSACTION @tranznev set @tranznev='szallcsoportok'+@kics BEGIN TRANSACTION @tranznev -- szállító csoportok (már létező) update szallcsoport set nev= (select nev from wf_szallcsoport where szallcsoport.kod=wf_szallcsoport.kod) where kod in (select kod from wf_szallcsoport) -- szállító csoportok (még nem létező) SET IDENTITY_INSERT szallcsoport ON insert into szallcsoport (nev, kod) select nev,kod from wf_szallcsoport where kod not in (select kod from szallcsoport) SET IDENTITY_INSERT szallcsoport OFF COMMIT TRANSACTION @tranznev set @tranznev='szallito'+@kics BEGIN TRANSACTION @tranznev if dbo.xrfuggveny('SzallitoKell')='1' begin -- szállítók (már létező) update szallito set szallito.szall_nev =wf_szallito.szall_nev, szallito.VAROS =wf_szallito.VAROS , szallito.IRANYITO =wf_szallito.IRANYITO , szallito.CIM =wf_szallito.CIM , szallito.TELEFON =wf_szallito.TELEFON , szallito.FAX =wf_szallito.FAX , szallito.KAPCSOLAT =wf_szallito.KAPCSOLAT , szallito.ADOSZAM =wf_szallito.ADOSZAM , szallito.eu_ADOSZAM =wf_szallito.eu_ADOSZAM , szallito.BANK =wf_szallito.BANK , szallito.FIZMOD =wf_szallito.FIZMOD , szallito.FIZHAT =wf_szallito.FIZHAT , szallito.SZALLCSOP =wf_szallito.SZALLCSOP , szallito.max_keszlet=wf_szallito.max_keszlet , szallito.orszag =wf_szallito.orszag , szallito.jovedeki =wf_szallito.jovedeki , szallito.email =wf_szallito.email , szallito.szorzo =wf_szallito.szorzo , szallito.penznem =wf_szallito.penznem , szallito.modositva =@dat FROM wf_szallito WHERE szallito.szall_kod = wf_szallito.szall_kod and szallito.szall_kod in (select szall_kod from wf_szallito) -- szállítók (még nem létező) SET IDENTITY_INSERT szallito ON insert into szallito (szall_kod, SZALL_NEV, VAROS, IRANYITO, CIM, TELEFON, FAX, KAPCSOLAT, ADOSZAM, EU_ADOSZAM, BANK, FIZMOD, FIZHAT, SZALLCSOP, MAX_KESZLET, orszag, jovedeki, email, szorzo, penznem, modositva, kicsoda ) select szall_kod, SZALL_NEV, VAROS, IRANYITO, CIM, TELEFON, FAX, KAPCSOLAT, ADOSZAM, EU_ADOSZAM, BANK, FIZMOD, FIZHAT, SZALLCSOP, MAX_KESZLET, orszag, jovedeki, email, szorzo, penznem, @dat, @kics from wf_szallito where szall_kod not in (select szall_kod from szallito) order by szall_kod SET IDENTITY_INSERT szallito OFF end COMMIT TRANSACTION @tranznev set @tranznev='cikkek'+@kics BEGIN TRANSACTION @tranznev select @szall_kodja=isnull(min(szall_kod),0) from szallito -- cikkek (már létező) update cikkek set cikkek.cikk_nev =wf_cikkek.cikk_nev, cikkek.cikk_nev_ang =wf_cikkek.cikk_nev_ang, cikkek.aru_szolg =wf_cikkek.aru_szolg, cikkek.MENNY_EGYS =wf_cikkek.MENNY_EGYS , cikkek.NORM_ME =wf_cikkek.NORM_ME , cikkek.NORM_SZORZ =wf_cikkek.NORM_SZORZ , cikkek.VTSZ =wf_cikkek.VTSZ , cikkek.AFA_KULCS =wf_cikkek.AFA_KULCS , --cikkek.KIFUTOTT =wf_cikkek.KIFUTOTT , cikkek.RENDELHETO =wf_cikkek.RENDELHETO , cikkek.JOVEDEKI =wf_cikkek.JOVEDEKI , cikkek.GONGYOLEG =wf_cikkek.GONGYOLEG , cikkek.Allando =wf_cikkek.Allando , cikkek.TGON =wf_cikkek.TGON , cikkek.TGONSZOR =wf_cikkek.TGONSZOR , cikkek.NTGON =wf_cikkek.NTGON , cikkek.NTGONSZOR =wf_cikkek.NTGONSZOR , cikkek.CIKKCSOP2 =wf_cikkek.CIKKCSOP2 , cikkek.GYARTO =wf_cikkek.GYARTO , --cikkek.SZALLITO =wf_cikkek.SZALLITO , cikkek.VCIKKSZAM =wf_cikkek.VCIKKSZAM , cikkek.ZSUGOR_DB =wf_cikkek.ZSUGOR_DB , cikkek.DB_KART =wf_cikkek.DB_KART , cikkek.KART_SOR =wf_cikkek.KART_SOR , cikkek.KART_RAKL =wf_cikkek.KART_RAKL , cikkek.MIN_RENCS =wf_cikkek.MIN_RENCS , cikkek.MIN_RENSZ =wf_cikkek.MIN_RENSZ , cikkek.db_sulya =wf_cikkek.db_sulya , cikkek.db_br_sulya =wf_cikkek.db_br_sulya , cikkek.karton_hossz =wf_cikkek.karton_hossz , cikkek.karton_szelesseg =wf_cikkek.karton_szelesseg , cikkek.karton_magassag =wf_cikkek.karton_magassag , cikkek.karton_sulya =wf_cikkek.karton_sulya , cikkek.karton_br_sulya =wf_cikkek.karton_br_sulya , cikkek.rakat_mag =wf_cikkek.rakat_mag , cikkek.letrehozva =wf_cikkek.letrehozva , cikkek.MODOSITVA =@dat , cikkek.DAT_TIPUS =wf_cikkek.dat_tipus , cikkek.SZAV_IDO =wf_cikkek.SZAV_IDO, cikkek.vpop_alkoholfok =wf_cikkek.vpop_alkoholfok , cikkek.vpop_fajtakod =wf_cikkek.vpop_fajtakod , cikkek.vpop_urtartalom =wf_cikkek.vpop_urtartalom , cikkek.linkfile =wf_cikkek.linkfile , cikkek.szarmazasi_hely =wf_cikkek.szarmazasi_hely , cikkek.gycikk_szam =wf_cikkek.gycikk_szam, cikkek.chips_ados =wf_cikkek.chips_ados, cikkek.vpop_platofok =wf_cikkek.vpop_platofok, cikkek.termekdijas =wf_cikkek.termekdijas, cikkek.web =wf_cikkek.web, cikkek.fordafa =wf_cikkek.fordafa, cikkek.kockazatos =wf_cikkek.kockazatos, cikkek.tizedes =wf_cikkek.tizedes FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) -- cikkek (még nem létező) insert into cikkek select CIKK_SZAM,CIKK_NEV,cikk_nev_ang,aru_szolg,MENNY_EGYS,menny_egys_ang, NORM_ME,NORM_SZORZ,VTSZ,AFA_KULCS,'0', RENDELHETO,JOVEDEKI,GONGYOLEG,'1',TGON,TGONSZOR,NTGON,NTGONSZOR,CIKKCSOP2,gyarto,1, POLC,@szall_kodja,VCIKKSZAM,ZSUGOR_DB,DB_KART,KART_SOR,KART_RAKL,MIN_RENCS,MIN_RENSZ,db_sulya, db_br_sulya,karton_hossz,karton_szelesseg,karton_magassag,karton_sulya,karton_br_sulya,rakat_mag, 0,0,0,0,@kics,letrehozva,@kics,@dat,tizedes,dat_tipus,szav_ido, vpop_alkoholfok,vpop_fajtakod,vpop_urtartalom,termekdijas,linkfile,szarmazasi_hely,gycikk_szam, chips_ados,vpop_platofok,web,fordafa,kockazatos from wf_cikkek where cikk_szam not in (select cikk_szam from cikkek) --update cikkek set kifutott='0' where cikk_szam in (select cikk_szam from wf_cikkek) --update cikkek set kifutott='1' where cikk_szam not in (select cikk_szam from wf_cikkek) if dbo.xrfuggveny('SzallitoKell')='1' begin update cikkek set cikkek.SZALLITO =wf_cikkek.SZALLITO FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) end -- vonal if dbo.xrfuggveny('UjVonalkodKell')='1' begin insert into vonal select * from wf_vonal where cikk_szam in (select cikk_szam from wf_cikkek) and cikk_szam in (select cikk_szam from cikkek) and vonalkod not in (select vonalkod from vonal) end else begin delete from vonal where cikk_szam in (select cikk_szam from wf_vonal) or vonalkod in (select vonalkod from wf_vonal) insert into vonal select * from wf_vonal where cikk_szam in (select cikk_szam from wf_cikkek) and cikk_szam in (select cikk_szam from cikkek) and vonalkod not in (select vonalkod from vonal) end COMMIT TRANSACTION @tranznev -- törli a már törölt tételeket ---delete from stcikk2 where cikk_szam not in (select cikk_szam from wf_stcikk2) --exec ReindexAllTable end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wpenztarb_tolt] @kulcs int, @kics char(20) WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @tet bizonylat_tetel declare @bsz bizonylat_szam set @tranznev='t_vevo_szle_felt'+@kics set @tet=0 BEGIN TRANSACTION @tranznev delete from wpenztarb where kicsoda=@kics insert into wpenztarb select 0, bizszam, ertek, @kics FROM penztarb WHERE kulcs=@kulcs DECLARE ctetel CURSOR for SELECT bizszam FROM wpenztarb WHERE kicsoda=@kics for update -- lockolás Select count(*) FROM wpenztarb (holdlock) WHERE kicsoda=@kics open ctetel; fetch next from ctetel into @bsz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 update wpenztarb set tetel=@tet where current of ctetel; END fetch next from ctetel into @bsz end close ctetel; deallocate ctetel; COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wszall_rentv_feltolt] @pn penznem, @szdat datum, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet bizonylat_tetel declare @bsz bizonylat_szam declare @tet bizonylat_tetel declare @vcsz cikk_szam declare @csz cikk_szam declare @cn cikk_nev declare @afak afakulcs declare @me menny_egyseg declare @szorz szorzo declare @db mennyiseg declare @ear egyseg_ar declare @szall kulcs declare @sznev nev declare @BeszArTip char(1) declare @rovid varchar(10) set @tranznev='t_wszall_rentv_felt'+@kics select @maxtet=isnull(max(tetel),0) from wszall_rentv where kicsoda=@kics select @BeszArTip=dbo.xrfuggveny('BeszArTip') select @rovid=left(dbo.rovidnev(),6) BEGIN TRANSACTION @tranznev DECLARE kszall_rent SCROLL CURSOR FOR SELECT wgyujtes.CIKK_SZAM, cikkek.CIKK_NEV, cikkek.VCIKKSZAM, cikkek.AFA_KULCS, cikkek.MENNY_EGYS, cikkek.ut_besz_ar, sum(wgyujtes.DARAB1) as darab1, cikkek.SZALLITO, szallito.SZALL_NEV FROM wgyujtes INNER JOIN cikkek ON wgyujtes.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON cikkek.SZALLITO = szallito.SZALL_KOD where wgyujtes.kicsoda=@kics group by wgyujtes.CIKK_SZAM, cikkek.CIKK_NEV, cikkek.VCIKKSZAM, cikkek.AFA_KULCS, cikkek.MENNY_EGYS, cikkek.ut_besz_ar, cikkek.SZALLITO, szallito.SZALL_NEV order by wgyujtes.CIKK_SZAM OPEN kszall_rent FETCH NEXT FROM kszall_rent INTO @csz, @cn, @vcsz, @afak, @me, @ear, @db, @szall, @sznev set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @BeszArTip<>'1' set @ear=dbo.TermekNettoBeszAraAdottDat(@csz, @szdat, @pn) else set @ear=dbo.CikkUtBeszAr(@csz) if @rovid='KARACS' and (select count(*) from vevo_akcio where kdatum<=@szdat and @szdat<=vdatum and cikk_szam=@csz)>0 set @cn='*'+left(rtrim(@cn),49) insert into wszall_rentv values( '', @maxtet, @vcsz, @csz, @cn, @afak, @me, 1, @ear, 0, @db, @kics, @szall, @sznev, @pn) set @maxtet=@maxtet+1 END FETCH NEXT FROM kszall_rent INTO @csz, @cn, @vcsz, @afak, @me, @ear, @db, @szall, @sznev END CLOSE kszall_rent DEALLOCATE kszall_rent delete from wgyujtes where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wszall_rentv2_feltolt] @ukod varchar(20), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @bsz bizonylat_szam declare @tranznev char(32) set @tranznev='t_wszall_rentv_felt'+@kics BEGIN TRANSACTION @tranznev --select @ukod=ugyletkod from ugyletek where bizszam=@ssz and biztipus='vevo_rendeles' select @bsz=bizszam from ugyletek where ugyletkod=@ukod and biztipus='vevo_arajan' insert into wszall_rentv select vevo_arajanlatt.bizszam, vevo_arajanlatt.tetel, cikkek.vcikkszam, vevo_arajanlatt.cikk_szam, cikkek.cikk_nev, vevo_arajanlatt.afa_kulcs, vevo_arajanlatt.menny_egys, vevo_arajanlatt.szorzo, szall_arajant.egyseg_ar, vevo_arajanlatt.kedvezmeny, vevo_arajanlatt.mennyiseg, @kics, vevo_arajanlatt.beszerzesi_szallito,szallito.szall_nev, szall_arajanf.penznem from vevo_arajanlatt INNER JOIN cikkek ON vevo_arajanlatt.CIKK_SZAM = cikkek.CIKK_SZAM INNER JOIN szallito ON vevo_arajanlatt.beszerzesi_szallito = szallito.SZALL_KOD INNER JOIN szall_arajanf on szall_arajanf.bizszam=vevo_arajanlatt.beszerzesi_bizszam INNER JOIN szall_arajant on szall_arajant.bizszam=vevo_arajanlatt.beszerzesi_bizszam and szall_arajant.tetel=vevo_arajanlatt.beszerzesi_tetel where vevo_arajanlatt.bizszam=@bsz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wszall_szlat_feltolt] @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet bizonylat_tetel declare @bsz bizonylat_szam declare @tet bizonylat_tetel declare @vcsz cikk_szam declare @csz cikk_szam declare @cn cikk_nev declare @afak afakulcs declare @me menny_egyseg declare @szorz szorzo declare @db mennyiseg declare @ear egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) declare @xszav char(1) set @tranznev='t_szall_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wszall_szlat where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kszall_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, v_darab, v_egyseg_ar, v_kedv, akcio from wszall_szlet_r where kicsoda=@kics and v_darab>0 order by tetel OPEN kszall_rent FETCH NEXT FROM kszall_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @vcsz=vcikkszam, @xszav=dat_tipus from cikkek where cikk_szam=@csz insert into wszall_szlat values( '', @maxtet, @vcsz, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, @bsz, @tet, @kics) if dbo.xrfuggveny('Szavatos')='I' and (@xszav='G' or @xszav='L') and (select rovidnev from regisztral)='VIRAG' -- száll. levél + szav.idő begin delete from wszavatos where kicsoda=@kics and xtetel=@maxtet insert into wszavatos values(@maxtet, dbo.mygetdate(), @db, @kics) end set @maxtet=@maxtet+1 END FETCH NEXT FROM kszall_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc END CLOSE kszall_rent DEALLOCATE kszall_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wszall_szlet_feltolt] @micsoda int, --1:szall.lev; 2:visszáru @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet bizonylat_tetel declare @bsz bizonylat_szam declare @tet bizonylat_tetel declare @vcsz cikk_szam declare @csz cikk_szam declare @cn cikk_nev declare @afak afakulcs declare @me menny_egyseg declare @szorz szorzo declare @db mennyiseg declare @ear egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) declare @xszav char(1) set @tranznev='t_szall_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wszall_szlet where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kszall_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, v_darab, v_egyseg_ar, v_kedv, akcio from wszall_szlet_r where kicsoda=@kics and v_darab>0 order by tetel OPEN kszall_rent FETCH NEXT FROM kszall_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @vcsz=vcikkszam, @xszav=dat_tipus from cikkek where cikk_szam=@csz insert into wszall_szlet values( '', @maxtet, @vcsz, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, @bsz, @tet, @kics) insert into wszall_szlet_td select '',@maxtet,e1,e2,@kics from szall_szlet_td where bizszam = @bsz and tetel = @tet if @micsoda=1 -- száll. levél update wgyariszamok set xtetel=@maxtet where kicsoda=@kics and xtetel=@tet else update wgyariszamok_ki set xtetel=@maxtet where kicsoda=@kics and xtetel=@tet if @micsoda=1 and dbo.xrfuggveny('Szavatos')='I' and (@xszav='G' or @xszav='L') and (select rovidnev from regisztral)='VIRAG' -- száll. levél + szav.idő begin delete from wszavatos where kicsoda=@kics and xtetel=@maxtet insert into wszavatos values(@maxtet, dbo.mygetdate(), @db, @kics) end set @maxtet=@maxtet+1 END FETCH NEXT FROM kszall_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc END CLOSE kszall_rent DEALLOCATE kszall_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wszall_szletm_feltolt] @bizsz char(10), @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) --declare @maxtet bizonylat_tetel declare @bsz bizonylat_szam declare @tet bizonylat_tetel declare @vcsz cikk_szam declare @csz cikk_szam declare @cn cikk_nev declare @afak afakulcs declare @me menny_egyseg declare @szorz szorzo declare @edb mennyiseg declare @db mennyiseg declare @ear egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) declare @xszav char(1) declare @rbsz char(10) declare @rtet int set @tranznev='t_szall_szle_felt'+@kics delete from wszall_szletm where kicsoda=@kics delete from wszavatos where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kszall_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, edarab, darab, egyseg_ar, kedvezmeny, rendel_bsz, rendel_tet from szall_szlet where bizszam=@bizsz order by tetel OPEN kszall_rent FETCH NEXT FROM kszall_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @rbsz, @rtet WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN select @vcsz=vcikkszam, @xszav=dat_tipus from cikkek where cikk_szam=@csz insert into wszall_szletm values( @bsz, @tet, @vcsz, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @rbsz, @rtet, @kics) if dbo.xrfuggveny('Szavatos')='I' and (@xszav='G' or @xszav='L') begin insert into wszavatos select mozgas.tetel,szav_datum,keszlet.darab,@kics from mozgas inner join keszlet on keszlet.sorszam=mozgas.sorszam where bizszam=@bsz and mozgas.tetel=@tet and mozgas.mozgaskod='vetel' end insert into wgyariszamok select @tet,'vetel',gyari_szam,@kics from mozgas inner join keszlet on keszlet.sorszam=mozgas.sorszam where bizszam=@bsz and mozgas.tetel=@tet and mozgas.mozgaskod='vetel' and keszlet.gyari_szam<>'' /* insert into wszall_szlet_td select '',@maxtet,e1,e2,@kics from szall_szlet_td where bizszam = @bsz and tetel = @tet */ END FETCH NEXT FROM kszall_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @edb, @db, @ear, @tkedv, @rbsz, @rtet END CLOSE kszall_rent DEALLOCATE kszall_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wszbiz_szlat_tolt] @idoszak char(25), @szkod int, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @tet as dbo.bizonylat_tetel declare @xcsz cikk_szam set @tranznev='t_vevo_szle_felt'+@kics set @tet=0 BEGIN TRANSACTION @tranznev delete from wszbiz_szlat where kicsoda=@kics insert into wszbiz_szlat select '', 0, szbiz_kiv.cikk_szam, cikkek.CIKK_NEV, cikkek.AFA_KULCS, cikkek.MENNY_EGYS, cikkek.NORM_SZORZ, sum(darab) as darab, 0, sum(darab*elszam_ar) as egyseg_ar, 0, @kics FROM cikkek INNER JOIN szbiz_kiv ON cikkek.CIKK_SZAM = szbiz_kiv.cikk_szam WHERE szbiz_kiv.idoszak=@idoszak and szbiz_kiv.szallito=@szkod group by szbiz_kiv.cikk_szam, cikkek.CIKK_NEV, cikkek.AFA_KULCS, cikkek.MENNY_EGYS, cikkek.NORM_SZORZ DECLARE ctetel CURSOR for SELECT cikk_szam FROM wszbiz_szlat WHERE kicsoda=@kics for update -- lockolás Select count(*) FROM wszbiz_szlat (holdlock) WHERE kicsoda=@kics open ctetel; fetch next from ctetel into @xcsz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN set @tet=@tet+1 update wszbiz_szlat set tetel=@tet, egyseg_ar=egyseg_ar/edarab where current of ctetel; END fetch next from ctetel into @xcsz end close ctetel; deallocate ctetel; COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wtf_mindent_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON exec wtf_torzs_bedolgoz exec wtf_szall_arak_bedolgoz exec wtf_vevo_arak_bedolgoz --exec ReindexAllTable end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wtf_szall_arak_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kics char(20) declare @szkod char(12) declare @dat char(10) set @dat=left(replace(convert(char,getdate(), 20 ),'-','.'),10) set @kics='fejleszto' set @tranznev='szallar'+@kics BEGIN TRANSACTION @tranznev -- szallitói árak delete from szall_art delete from szall_arf DECLARE kszall SCROLL CURSOR FOR select szallito from wf_szall_arf where tipus='normál' and kdatum<@dat group by szallito OPEN kszall FETCH NEXT FROM kszall INTO @szkod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into szall_arf select BIZSZAM,szallito,TIPUS,penznem,KDATUM,VDATUM,RKDATUM,RVDATUM, kedvezmeny,MEGJEGYZES,@kics,left(MODOSITVA,20) from wf_szall_arf where bizszam in (select bizszam from wf_szall_arf where tipus='normál' and szallito=@szkod and kdatum>=( select max(kdatum) from wf_szall_arf where tipus='normál' and szallito=@szkod and kdatum<=@dat) ) END FETCH NEXT FROM kszall INTO @szkod END CLOSE kszall DEALLOCATE kszall -- akció DECLARE kszall SCROLL CURSOR FOR select szallito from wf_szall_arf where tipus='akció' and kdatum<@dat group by szallito OPEN kszall FETCH NEXT FROM kszall INTO @szkod WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into szall_arf select BIZSZAM,szallito,TIPUS,penznem,KDATUM,VDATUM,RKDATUM,RVDATUM, kedvezmeny,MEGJEGYZES,@kics,left(MODOSITVA,20) from wf_szall_arf where bizszam in (select bizszam from wf_szall_arf where tipus='akció' and szallito=@szkod and kdatum>=( select max(kdatum) from wf_szall_arf where tipus='akció' and szallito=@szkod and kdatum<=@dat) ) END FETCH NEXT FROM kszall INTO @szkod END CLOSE kszall DEALLOCATE kszall insert into szall_art select BIZSZAM,CIKK_SZAM,VCIKKSZAM,LISTA_AR,KEDVEZMENY,NETTO_AR from wf_szall_art where bizszam in (select bizszam from szall_arf) and wf_szall_art.cikk_szam in (select cikk_szam from cikkek) COMMIT TRANSACTION @tranznev --exec ReindexAllTable end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wtf_torzs_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kics char(20) declare @dat char(20) declare @sqlstr varchar(3000) declare @str varchar(200) declare @szall_kodja int set @kics='fejleszto' set @dat=dbo.mygetdatetime() -- deviza set @tranznev='deviza'+@kics BEGIN TRANSACTION @tranznev --már létező update deviza set kurzus= (select kurzus from wf_deviza where deviza.penznem=wf_deviza.penznem) where penznem in (select penznem from wf_deviza) --Új insert into deviza (penznem, kurzus) select penznem, kurzus from wf_deviza where penznem not in (select penznem from deviza) COMMIT TRANSACTION @tranznev -- bevetjog set @tranznev='bevetjog'+@kics BEGIN TRANSACTION @tranznev SET IDENTITY_INSERT bevetjog ON insert into bevetjog (bevetnev, kod) select bevetnev, kod from wf_bevetjog where kod not in (select kod from bevetjog) SET IDENTITY_INSERT bevetjog OFF COMMIT TRANSACTION @tranznev -- kivetjog set @tranznev='kivetjog'+@kics BEGIN TRANSACTION @tranznev SET IDENTITY_INSERT kivetjog ON insert into kivetjog (kivetnev, kod) select kivetnev, kod from wf_kivetjog where kod not in (select kod from kivetjog) SET IDENTITY_INSERT kivetjog OFF COMMIT TRANSACTION @tranznev /*- set @tranznev='orszagok'+@kics BEGIN TRANSACTION @tranznev -- országok insert into orszag select upper(left(orszag,3)),orszag,eu from wf_orszag where orszag not in (select orszag from orszag) COMMIT TRANSACTION @tranznev */ set @tranznev='cikkcsoportok'+@kics BEGIN TRANSACTION @tranznev -- cikkcsoportok (már létező) update stcikk2 set cikk_nev= (select cikk_nev from wf_stcikk2 where stcikk2.cikk_szam=wf_stcikk2.cikk_szam) where cikk_szam in (select cikk_szam from wf_stcikk2) -- cikkcsoportok (még nem létező) insert into stcikk2 select cikk_szam,cikk_nev,cikk_nev_eng,@kics,left(modositva,20) from wf_stcikk2 where cikk_szam not in (select cikk_szam from stcikk2) COMMIT TRANSACTION @tranznev -- gyarto set @tranznev='gyarto'+@kics BEGIN TRANSACTION @tranznev --már létező update gyarto set nev= (select nev from wf_gyarto where gyarto.kod=wf_gyarto.kod) where kod in (select kod from wf_gyarto) --Új SET IDENTITY_INSERT gyarto ON insert into gyarto (nev, kod) select nev, kod from wf_gyarto where kod not in (select kod from gyarto) SET IDENTITY_INSERT gyarto OFF COMMIT TRANSACTION @tranznev -- vevo arcsoport set @tranznev='vevo_arcsoport'+@kics BEGIN TRANSACTION @tranznev if len(dbo.xrfuggveny('ArcsoportKell'))=0 begin --már létező update vevo_arcsoport set vevo_arcsoport.nev=wf_vevo_arcsoport.nev, vevo_arcsoport.szamitas_modja=wf_vevo_arcsoport.szamitas_modja , vevo_arcsoport.penznem=wf_vevo_arcsoport.penznem, vevo_arcsoport.felaraskod=wf_vevo_arcsoport.felaraskod from wf_vevo_arcsoport where vevo_arcsoport.kod=wf_vevo_arcsoport.kod and vevo_arcsoport.kod in (select kod from wf_vevo_arcsoport) --Új SET IDENTITY_INSERT vevo_arcsoport ON insert into vevo_arcsoport (kod, nev, szamitas_modja, penznem, felaraskod) select kod, nev, szamitas_modja, penznem, felaraskod from wf_vevo_arcsoport where kod not in (select kod from vevo_arcsoport) SET IDENTITY_INSERT vevo_arcsoport OFF end else begin set @str=dbo.xrfuggveny('ArcsoportKell') delete from wgyujtes where kicsoda=@kics exec String2Db @str, @kics --már létező update vevo_arcsoport set vevo_arcsoport.nev=wf_vevo_arcsoport.nev, vevo_arcsoport.szamitas_modja=wf_vevo_arcsoport.szamitas_modja , vevo_arcsoport.penznem=wf_vevo_arcsoport.penznem, vevo_arcsoport.felaraskod=wf_vevo_arcsoport.felaraskod from wf_vevo_arcsoport where vevo_arcsoport.kod=wf_vevo_arcsoport.kod and vevo_arcsoport.kod in (select tetel from wgyujtes where kicsoda=@kics) --Új SET IDENTITY_INSERT vevo_arcsoport ON insert into vevo_arcsoport (kod, nev, szamitas_modja, penznem, felaraskod) select kod, nev, szamitas_modja, penznem, felaraskod from wf_vevo_arcsoport where kod not in (select kod from vevo_arcsoport) and kod in (select tetel from wgyujtes where kicsoda=@kics) SET IDENTITY_INSERT vevo_arcsoport OFF end COMMIT TRANSACTION @tranznev -- vevo_akc_csoport set @tranznev='vevo_akc_csoport'+@kics BEGIN TRANSACTION @tranznev if len(dbo.xrfuggveny('AkciocsoportKell'))=0 begin --már létező update vevo_akc_csoport set vevo_akc_csoport.nev=wf_vevo_akc_csoport.nev, vevo_akc_csoport.penznem=wf_vevo_akc_csoport.penznem from wf_vevo_akc_csoport where vevo_akc_csoport.kod=wf_vevo_akc_csoport.kod and vevo_akc_csoport.kod in (select kod from wf_vevo_akc_csoport) --Új SET IDENTITY_INSERT vevo_akc_csoport ON insert into vevo_akc_csoport (kod, nev, penznem) select kod, nev, penznem from wf_vevo_akc_csoport where kod not in (select kod from vevo_akc_csoport) SET IDENTITY_INSERT vevo_akc_csoport OFF end else begin set @str=dbo.xrfuggveny('AkciocsoportKell') delete from wgyujtes where kicsoda=@kics exec String2Db @str, @kics --már létező update vevo_akc_csoport set vevo_akc_csoport.nev=wf_vevo_akc_csoport.nev, vevo_akc_csoport.penznem=wf_vevo_akc_csoport.penznem from wf_vevo_akc_csoport where vevo_akc_csoport.kod=wf_vevo_akc_csoport.kod and vevo_akc_csoport.kod in (select kod from wf_vevo_akc_csoport) and vevo_akc_csoport.kod in (select tetel from wgyujtes where kicsoda=@kics) --Új SET IDENTITY_INSERT vevo_akc_csoport ON insert into vevo_akc_csoport (kod, nev, penznem) select kod, nev, penznem from wf_vevo_akc_csoport where kod not in (select kod from vevo_akc_csoport) and kod in (select tetel from wgyujtes where kicsoda=@kics) SET IDENTITY_INSERT vevo_akc_csoport OFF end COMMIT TRANSACTION @tranznev set @tranznev='szallcsoportok'+@kics BEGIN TRANSACTION @tranznev -- szállító csoportok (már létező) update szallcsoport set nev= (select nev from wf_szallcsoport where szallcsoport.kod=wf_szallcsoport.kod) where kod in (select kod from wf_szallcsoport) -- szállító csoportok (még nem létező) SET IDENTITY_INSERT szallcsoport ON insert into szallcsoport (nev, kod) select nev,kod from wf_szallcsoport where kod not in (select kod from szallcsoport) SET IDENTITY_INSERT szallcsoport OFF COMMIT TRANSACTION @tranznev set @tranznev='szallito'+@kics BEGIN TRANSACTION @tranznev if dbo.xrfuggveny('SzallitoKell')='1' begin -- szállítók (már létező) update szallito set szallito.szall_nev =wf_szallito.szall_nev, szallito.VAROS =wf_szallito.VAROS , szallito.IRANYITO =wf_szallito.IRANYITO , szallito.CIM =wf_szallito.CIM , szallito.TELEFON =wf_szallito.TELEFON , szallito.FAX =wf_szallito.FAX , szallito.KAPCSOLAT =wf_szallito.KAPCSOLAT , szallito.ADOSZAM =wf_szallito.ADOSZAM , szallito.eu_ADOSZAM =wf_szallito.eu_ADOSZAM , szallito.BANK =wf_szallito.BANK , szallito.FIZMOD =wf_szallito.FIZMOD , szallito.FIZHAT =wf_szallito.FIZHAT , szallito.SZALLCSOP =wf_szallito.SZALLCSOP , szallito.max_keszlet=wf_szallito.max_keszlet , szallito.orszag =wf_szallito.orszag , szallito.jovedeki =wf_szallito.jovedeki , szallito.email =wf_szallito.email , szallito.szorzo =wf_szallito.szorzo , szallito.penznem =wf_szallito.penznem , szallito.modositva =@dat FROM wf_szallito WHERE szallito.szall_kod = wf_szallito.szall_kod and szallito.szall_kod in (select szall_kod from wf_szallito) -- szállítók (még nem létező) SET IDENTITY_INSERT szallito ON insert into szallito (szall_kod, SZALL_NEV, VAROS, IRANYITO, CIM, TELEFON, FAX, KAPCSOLAT, ADOSZAM, EU_ADOSZAM, BANK, FIZMOD, FIZHAT, SZALLCSOP, MAX_KESZLET, orszag, jovedeki, email, szorzo, penznem, modositva, kicsoda ) select szall_kod, SZALL_NEV, VAROS, IRANYITO, CIM, TELEFON, FAX, KAPCSOLAT, ADOSZAM, EU_ADOSZAM, BANK, FIZMOD, FIZHAT, SZALLCSOP, MAX_KESZLET, orszag, jovedeki, email, szorzo, penznem, @dat, @kics from wf_szallito where szall_kod not in (select szall_kod from szallito) order by szall_kod SET IDENTITY_INSERT szallito OFF end COMMIT TRANSACTION @tranznev set @tranznev='cikkek'+@kics BEGIN TRANSACTION @tranznev select @szall_kodja=isnull(min(szall_kod),0) from szallito if len(dbo.xrfuggveny('WebDomain'))=0 --nincs domain begin -- cikkek (már létező) update cikkek set cikkek.cikk_nev =wf_cikkek.cikk_nev, cikkek.cikk_nev_ang =wf_cikkek.cikk_nev_ang, cikkek.aru_szolg =wf_cikkek.aru_szolg, cikkek.MENNY_EGYS =wf_cikkek.MENNY_EGYS , cikkek.NORM_ME =wf_cikkek.NORM_ME , cikkek.NORM_SZORZ =wf_cikkek.NORM_SZORZ , cikkek.VTSZ =wf_cikkek.VTSZ , cikkek.AFA_KULCS =wf_cikkek.AFA_KULCS , --cikkek.KIFUTOTT =wf_cikkek.KIFUTOTT , cikkek.RENDELHETO =wf_cikkek.RENDELHETO , cikkek.JOVEDEKI =wf_cikkek.JOVEDEKI , cikkek.GONGYOLEG =wf_cikkek.GONGYOLEG , cikkek.Allando =wf_cikkek.Allando , cikkek.TGON =wf_cikkek.TGON , cikkek.TGONSZOR =wf_cikkek.TGONSZOR , cikkek.NTGON =wf_cikkek.NTGON , cikkek.NTGONSZOR =wf_cikkek.NTGONSZOR , cikkek.CIKKCSOP2 =wf_cikkek.CIKKCSOP2 , cikkek.GYARTO =wf_cikkek.GYARTO , --cikkek.SZALLITO =wf_cikkek.SZALLITO , cikkek.VCIKKSZAM =wf_cikkek.VCIKKSZAM , cikkek.ZSUGOR_DB =wf_cikkek.ZSUGOR_DB , cikkek.DB_KART =wf_cikkek.DB_KART , cikkek.KART_SOR =wf_cikkek.KART_SOR , cikkek.KART_RAKL =wf_cikkek.KART_RAKL , cikkek.MIN_RENCS =wf_cikkek.MIN_RENCS , cikkek.MIN_RENSZ =wf_cikkek.MIN_RENSZ , cikkek.db_sulya =wf_cikkek.db_sulya , cikkek.db_br_sulya =wf_cikkek.db_br_sulya , cikkek.karton_hossz =wf_cikkek.karton_hossz , cikkek.karton_szelesseg =wf_cikkek.karton_szelesseg , cikkek.karton_magassag =wf_cikkek.karton_magassag , cikkek.karton_sulya =wf_cikkek.karton_sulya , cikkek.karton_br_sulya =wf_cikkek.karton_br_sulya , cikkek.rakat_mag =wf_cikkek.rakat_mag , cikkek.letrehozva =wf_cikkek.letrehozva , cikkek.MODOSITVA =@dat , cikkek.DAT_TIPUS =wf_cikkek.dat_tipus , cikkek.SZAV_IDO =wf_cikkek.SZAV_IDO, cikkek.vpop_alkoholfok =wf_cikkek.vpop_alkoholfok , cikkek.vpop_fajtakod =wf_cikkek.vpop_fajtakod , cikkek.vpop_urtartalom =wf_cikkek.vpop_urtartalom , cikkek.linkfile =wf_cikkek.linkfile , cikkek.szarmazasi_hely =wf_cikkek.szarmazasi_hely , cikkek.gycikk_szam =wf_cikkek.gycikk_szam, cikkek.chips_ados =wf_cikkek.chips_ados, cikkek.vpop_platofok =wf_cikkek.vpop_platofok, cikkek.termekdijas =wf_cikkek.termekdijas, --cikkek.web =wf_cikkek.web, cikkek.fordafa =wf_cikkek.fordafa, cikkek.kockazatos =wf_cikkek.kockazatos, cikkek.tizedes =wf_cikkek.tizedes FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) -- cikkek (még nem létező) insert into cikkek select CIKK_SZAM,CIKK_NEV,cikk_nev_ang,aru_szolg,MENNY_EGYS,menny_egys_ang, NORM_ME,NORM_SZORZ,VTSZ,AFA_KULCS,'0', RENDELHETO,JOVEDEKI,GONGYOLEG,'1',TGON,TGONSZOR,NTGON,NTGONSZOR,CIKKCSOP2,gyarto,1, POLC,@szall_kodja,VCIKKSZAM,ZSUGOR_DB,DB_KART,KART_SOR,KART_RAKL,MIN_RENCS,MIN_RENSZ,db_sulya, db_br_sulya,karton_hossz,karton_szelesseg,karton_magassag,karton_sulya,karton_br_sulya,rakat_mag, 0,0,0,0,@kics,letrehozva,@kics,@dat,tizedes,dat_tipus,szav_ido, vpop_alkoholfok,vpop_fajtakod,vpop_urtartalom,termekdijas,linkfile,szarmazasi_hely,gycikk_szam, chips_ados,vpop_platofok,'1',fordafa,kockazatos from wf_cikkek where cikk_szam not in (select cikk_szam from cikkek) --update cikkek set kifutott='0' where cikk_szam in (select cikk_szam from wf_cikkek) --update cikkek set kifutott='1' where cikk_szam not in (select cikk_szam from wf_cikkek) if (select left(rovidnev,8) from regisztral)<>'PESTISUK' begin update cikkek set cikkek.web =wf_cikkek.web FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) end if dbo.xrfuggveny('SzallitoKell')='1' begin update cikkek set cikkek.SZALLITO =wf_cikkek.SZALLITO FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) end if dbo.xrfuggveny('KifutottKell')='1' begin update cikkek set cikkek.kifutott =wf_cikkek.kifutott FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) end end else -- van WebDomain begin set @sqlstr='insert into cikkek '+ 'select CIKK_SZAM,CIKK_NEV,cikk_nev_ang,aru_szolg,MENNY_EGYS,menny_egys_ang, '+ 'NORM_ME,NORM_SZORZ,VTSZ,AFA_KULCS,''0'','+ 'RENDELHETO,JOVEDEKI,GONGYOLEG,''1'',TGON,TGONSZOR,NTGON,NTGONSZOR,CIKKCSOP2,gyarto,1,'+ 'POLC,'+str(@szall_kodja,8,0)+',VCIKKSZAM,ZSUGOR_DB,DB_KART,KART_SOR,KART_RAKL,MIN_RENCS,MIN_RENSZ,db_sulya,'+ 'db_br_sulya,karton_hossz,karton_szelesseg,karton_magassag,karton_sulya,karton_br_sulya,rakat_mag,'+ '0,0,0,0,'''+@kics+''',letrehozva,'''+@kics+''','''+@dat+''',tizedes,dat_tipus,szav_ido,'+ 'vpop_alkoholfok,vpop_fajtakod,vpop_urtartalom,termekdijas,linkfile,szarmazasi_hely,gycikk_szam,'+ 'chips_ados,vpop_platofok,web,fordafa,kockazatos '+ 'from wf_cikkek '+ 'where cikk_szam not in (select cikk_szam from cikkek) '+ 'and cikk_szam in (select cikk_szam from wf_cikk_webaruhaz where len(domain'+rtrim(dbo.xrfuggveny('WebDomain'))+')<>0)' print @sqlstr exec(@sqlstr) update cikkek set cikkek.cikk_nev =wf_cikkek.cikk_nev, cikkek.cikk_nev_ang =wf_cikkek.cikk_nev_ang, cikkek.aru_szolg =wf_cikkek.aru_szolg, cikkek.MENNY_EGYS =wf_cikkek.MENNY_EGYS , cikkek.NORM_ME =wf_cikkek.NORM_ME , cikkek.NORM_SZORZ =wf_cikkek.NORM_SZORZ , cikkek.VTSZ =wf_cikkek.VTSZ , cikkek.AFA_KULCS =wf_cikkek.AFA_KULCS , --cikkek.KIFUTOTT =wf_cikkek.KIFUTOTT , cikkek.RENDELHETO =wf_cikkek.RENDELHETO , cikkek.JOVEDEKI =wf_cikkek.JOVEDEKI , cikkek.GONGYOLEG =wf_cikkek.GONGYOLEG , cikkek.Allando =wf_cikkek.Allando , cikkek.TGON =wf_cikkek.TGON , cikkek.TGONSZOR =wf_cikkek.TGONSZOR , cikkek.NTGON =wf_cikkek.NTGON , cikkek.NTGONSZOR =wf_cikkek.NTGONSZOR , cikkek.CIKKCSOP2 =wf_cikkek.CIKKCSOP2 , cikkek.GYARTO =wf_cikkek.GYARTO , --cikkek.SZALLITO =wf_cikkek.SZALLITO , cikkek.VCIKKSZAM =wf_cikkek.VCIKKSZAM , cikkek.ZSUGOR_DB =wf_cikkek.ZSUGOR_DB , cikkek.DB_KART =wf_cikkek.DB_KART , cikkek.KART_SOR =wf_cikkek.KART_SOR , cikkek.KART_RAKL =wf_cikkek.KART_RAKL , cikkek.MIN_RENCS =wf_cikkek.MIN_RENCS , cikkek.MIN_RENSZ =wf_cikkek.MIN_RENSZ , cikkek.db_sulya =wf_cikkek.db_sulya , cikkek.db_br_sulya =wf_cikkek.db_br_sulya , cikkek.karton_hossz =wf_cikkek.karton_hossz , cikkek.karton_szelesseg =wf_cikkek.karton_szelesseg , cikkek.karton_magassag =wf_cikkek.karton_magassag , cikkek.karton_sulya =wf_cikkek.karton_sulya , cikkek.karton_br_sulya =wf_cikkek.karton_br_sulya , cikkek.rakat_mag =wf_cikkek.rakat_mag , cikkek.letrehozva =wf_cikkek.letrehozva , cikkek.MODOSITVA =@dat , cikkek.DAT_TIPUS =wf_cikkek.dat_tipus , cikkek.SZAV_IDO =wf_cikkek.SZAV_IDO, cikkek.vpop_alkoholfok =wf_cikkek.vpop_alkoholfok , cikkek.vpop_fajtakod =wf_cikkek.vpop_fajtakod , cikkek.vpop_urtartalom =wf_cikkek.vpop_urtartalom , cikkek.linkfile =wf_cikkek.linkfile , cikkek.szarmazasi_hely =wf_cikkek.szarmazasi_hely , cikkek.gycikk_szam =wf_cikkek.gycikk_szam, cikkek.chips_ados =wf_cikkek.chips_ados, cikkek.vpop_platofok =wf_cikkek.vpop_platofok, cikkek.termekdijas =wf_cikkek.termekdijas, --cikkek.web =wf_cikkek.web, cikkek.fordafa =wf_cikkek.fordafa, cikkek.kockazatos =wf_cikkek.kockazatos, cikkek.tizedes =wf_cikkek.tizedes FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) if dbo.xrfuggveny('SzallitoKell')='1' begin update cikkek set cikkek.SZALLITO =wf_cikkek.SZALLITO FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from cikkek) end if dbo.xrfuggveny('KifutottKell')='1' begin update cikkek set cikkek.kifutott =wf_cikkek.kifutott FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from cikkek) end if (select left(rovidnev,8) from regisztral)<>'PESTISUK' begin update cikkek set cikkek.web =wf_cikkek.web FROM wf_cikkek WHERE cikkek.cikk_szam = wf_cikkek.cikk_szam and cikkek.cikk_szam in (select cikk_szam from wf_cikkek) end end -- vonal if dbo.xrfuggveny('UjVonalkodKell')='1' begin insert into vonal select * from wf_vonal where cikk_szam in (select cikk_szam from wf_cikkek) and cikk_szam in (select cikk_szam from cikkek) and vonalkod not in (select vonalkod from vonal) end else begin -- kitörlöm azokat, amelyeket törölte a központban delete from vonal where cikk_szam in (select cikk_szam from wf_vonal) and vonalkod not in (select vonalkod from wf_vonal) --még nem létező vonalkódok insert into vonal select * from wf_vonal where cikk_szam in (select cikk_szam from cikkek) and vonalkod not in (select vonalkod from vonal) update vonal set cikk_szam= (select cikk_szam from wf_vonal where vonal.vonalkod=wf_vonal.vonalkod and cikk_szam in (select cikk_szam from cikkek)) where vonalkod in (select vonalkod from wf_vonal where cikk_szam in (select cikk_szam from cikkek)) update vonal set alap='0' where cikk_szam in (select cikk_szam from wf_cikkek) update vonal set vonal.alap = wf_vonal.alap FROM wf_vonal WHERE vonal.cikk_szam = wf_vonal.cikk_szam and vonal.vonalkod = wf_vonal.vonalkod and wf_vonal.alap='1' update vonal set szorzo= (select szorzo from wf_vonal where vonal.vonalkod=wf_vonal.vonalkod) where vonalkod in (select vonalkod from wf_vonal where cikk_szam in (select cikk_szam from cikkek)) update vonal set menny_egys= (select menny_egys from wf_vonal where vonal.vonalkod=wf_vonal.vonalkod) where vonalkod in (select vonalkod from wf_vonal where cikk_szam in (select cikk_szam from cikkek)) end -- cikk_leiras update cikk_leiras set cikk_leiras.leiras1 =wf_cikk_leiras.leiras1, cikk_leiras.leiras2 =wf_cikk_leiras.leiras2 FROM wf_cikk_leiras WHERE cikk_leiras.cikk_szam = wf_cikk_leiras.cikk_szam and cikk_leiras.cikk_szam in (select cikk_szam from wf_cikk_leiras) insert into cikk_leiras select * from wf_cikk_leiras where cikk_szam in (select cikk_szam from cikkek) and cikk_szam not in (select cikk_szam from cikk_leiras) -- cikk_webaruhaz delete from cikk_webaruhaz insert into cikk_webaruhaz select * from wf_cikk_webaruhaz where cikk_szam in (select cikk_szam from cikkek) COMMIT TRANSACTION @tranznev -- osszevont_cikkek set @tranznev='osszevont_cikkek'+@kics BEGIN TRANSACTION @tranznev delete from osszevont_cikkek insert into osszevont_cikkek select * from wf_osszevont_cikkek exec osszevon_cikkek_feldolgoz @kics COMMIT TRANSACTION @tranznev -- vevő árképletek set @tranznev='vevo_arf'+@kics BEGIN TRANSACTION @tranznev if (select left(rovidnev,10) from regisztral)<>'CITYMARKET' begin --már létező update vevo_arf set vevo_arf.ind_tipus =wf_vevo_arf.ind_tipus, vevo_arf.modositva =@dat FROM wf_vevo_arf WHERE vevo_arf.arcsoport = wf_vevo_arf.arcsoport and vevo_arf.arcsoport in (select arcsoport from vevo_arf) --Új insert into vevo_arf select arcsoport, ind_tipus, @kics, @dat from wf_vevo_arf where arcsoport not in (select arcsoport from vevo_arf) --tétel update vevo_art set vevo_art.sorrend =wf_vevo_art.sorrend, vevo_art.gyarto =wf_vevo_art.gyarto, vevo_art.cikk_csop =wf_vevo_art.cikk_csop, vevo_art.felar =wf_vevo_art.felar, vevo_art.szallito =wf_vevo_art.szallito FROM wf_vevo_art WHERE vevo_art.arcsoport = wf_vevo_art.arcsoport and vevo_art.arcsoport in (select arcsoport from vevo_art) --Új insert into vevo_art select arcsoport, sorrend, szallito, gyarto, cikk_csop, felar from wf_vevo_art where arcsoport not in (select arcsoport from vevo_art) end COMMIT TRANSACTION @tranznev -- törli a már törölt tételeket delete from stcikk2 where cikk_szam not in (select cikk_szam from wf_stcikk2) --exec ReindexAllTable end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wtf_vevo_akcio_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kics char(20) declare @dat datum_ora set @dat=dbo.mygetdatetime() set @kics='fejleszto' set @tranznev='vevo_arak'+@kics BEGIN TRANSACTION @tranznev -- vevő akciók delete from vevo_akcio where exists (select * from wf_vevo_akcio where wf_vevo_akcio.akciocsop=vevo_akcio.akciocsop and wf_vevo_akcio.akcio_tip=vevo_akcio.akcio_tip and wf_vevo_akcio.kdatum=vevo_akcio.kdatum and wf_vevo_akcio.cikk_szam=vevo_akcio.cikk_szam) insert into vevo_akcio select AKCIOCSOP,AKCIO_TIP, KDATUM, VDATUM, CIKK_SZAM, EGYSEG_AR, SZOVEG, KE_KESZLET, KE_MARADEK, @kics, @dat, Null, '' from wf_vevo_akcio where cikk_szam in (select cikk_szam from cikkek) -- vevő akciók hh delete from vevo_akcio_hh insert into vevo_akcio_hh select akc_csop,cikk_szam, het,kido,vido, kedvezmeny, megszunt, @kics, @dat from wf_vevo_akcio_hh where cikk_szam in (select cikk_szam from cikkek) -- vevő akciók ve /* delete from vevo_akcio_ve insert into vevo_akcio_ve select akc_csop,het,kido,vido, limit1,kedvezmeny1, limit2,kedvezmeny2, megszunt, @kics, @dat from wf_vevo_akcio_ve */ COMMIT TRANSACTION @tranznev --exec ReindexAllTable end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wtf_vevo_arak_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(32) declare @kics char(20) declare @dat char(10) declare @datx datum_ora declare @acs int declare @ujdat char(10) declare @elozodat char(10) declare @arcs varchar(200) declare @i int declare @j int declare @carcs varchar(50) set @datx=dbo.mygetdatetime() set @dat=left(replace(convert(char,getdate(), 20 ),'-','.'),10) set @kics='fejleszto' set @tranznev='vevo_arak'+@kics -- ha van árcsoport paraméter, akkor kitörli a wf-ből a nem oda tartozó árlistákat if len(dbo.xrfuggveny('ArcsoportKell'))<>0 begin delete from wgyujtes where kicsoda=@kics delete from wgyujtes1 where kicsoda=@kics set @carcs=dbo.xrfuggveny('ArcsoportKell') exec String2Db @carcs, @kics insert into wgyujtes1 (tetel,kicsoda) select wf_vevo_ar_lista.arcsoport, @kics from wf_vevo_ar_lista group by arcsoport delete from wgyujtes1 where kicsoda=@kics and tetel in (select tetel from wgyujtes where kicsoda=@kics) delete from wf_vevo_ar_lista where arcsoport in (select tetel from wgyujtes1 where kicsoda=@kics) end BEGIN TRANSACTION @tranznev -- meg kell nyitni a küldött hónapokat DECLARE kvevo_arak SCROLL CURSOR FOR select wf_vevo_ar_lista.arcsoport, datum from wf_vevo_ar_lista inner join vevo_arcsoport on vevo_arcsoport.kod=wf_vevo_ar_lista.arcsoport group by arcsoport, datum OPEN kvevo_arak FETCH NEXT FROM kvevo_arak INTO @acs, @ujdat WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN --vevo_art beir if (select count(*) from vevo_ar_lista where arcsoport=@acs and datum=@ujdat)=0 begin --még nincs ilyen árcsop+dátum select @elozodat=isnull(max(datum),'') from vevo_ar_lista where arcsoport=@acs and datum<@ujdat insert into vevo_ar_lista select @acs, @ujdat, cikk_szam, netto_ar, brutto_ar, beszerz_ar, arres, kicsoda, modositva from vevo_ar_lista where datum = @elozodat and arcsoport= @acs insert into vevo_ar_lista select @acs, @ujdat, cikk_szam, 0, 0, 0, 0, 'fejleszto', @dat from cikkek where not exists (select * from vevo_ar_lista where vevo_ar_lista.cikk_szam = cikkek.cikk_szam and datum= @ujdat and arcsoport= @acs) end END FETCH NEXT FROM kvevo_arak INTO @acs, @ujdat END CLOSE kvevo_arak DEALLOCATE kvevo_arak -- vevő árak normál - új cikkek insert into vevo_ar_lista select arcsoport,datum,cikk_szam,netto_ar,brutto_ar,beszerz_ar,arres,@kics,modositva from wf_vevo_ar_lista where cikk_szam in (select cikk_szam from cikkek) and not exists (select * from vevo_ar_lista where wf_vevo_ar_lista.arcsoport = vevo_ar_lista.arcsoport and wf_vevo_ar_lista.datum = vevo_ar_lista.datum and wf_vevo_ar_lista.cikk_szam = vevo_ar_lista.cikk_szam ) -- vevő árak normál - létező cikkek update vevo_ar_lista set vevo_ar_lista.netto_ar =wf_vevo_ar_lista.netto_ar, vevo_ar_lista.brutto_ar =wf_vevo_ar_lista.brutto_ar, vevo_ar_lista.beszerz_ar =wf_vevo_ar_lista.beszerz_ar , vevo_ar_lista.arres =wf_vevo_ar_lista.arres , vevo_ar_lista.MODOSITVA =wf_vevo_ar_lista.modositva FROM vevo_ar_lista, wf_vevo_ar_lista WHERE vevo_ar_lista.arcsoport = wf_vevo_ar_lista.arcsoport and vevo_ar_lista.datum = wf_vevo_ar_lista.datum and vevo_ar_lista.cikk_szam = wf_vevo_ar_lista.cikk_szam and /* wf_vevo_ar_lista.netto_ar <> (select netto_ar from vevo_ar_lista where vevo_ar_lista.arcsoport=wf_vevo_ar_lista.arcsoport and vevo_ar_lista.datum=wf_vevo_ar_lista.datum and vevo_ar_lista.cikk_szam=wf_vevo_ar_lista.cikk_szam) and */ exists (select * from vevo_ar_lista where wf_vevo_ar_lista.arcsoport = vevo_ar_lista.arcsoport and wf_vevo_ar_lista.datum = vevo_ar_lista.datum and wf_vevo_ar_lista.cikk_szam = vevo_ar_lista.cikk_szam ) COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wtf_vevok_bedolgoz] WITH RECOMPILE AS begin SET XACT_ABORT ON --SET NOCOUNT ON declare @tranznev char(50) declare @kics char(20) declare @dat char(20) set @kics='fejleszto' set @dat=dbo.mygetdatetime() -- vevő cégjelleg set @tranznev='vcegjelleg'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevo_cegjelleg (nev) select nev from wf_vevo_cegjelleg where kod not in (select kod from vevo_cegjelleg) --már létező update vevo_cegjelleg set nev= (select nev from wf_vevo_cegjelleg where vevo_cegjelleg.kod=wf_vevo_cegjelleg.kod) where kod in (select kod from wf_vevo_cegjelleg) COMMIT TRANSACTION @tranznev -- vevő csoport set @tranznev='vcsoport'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevo_csoport (nev) select nev from wf_vevo_csoport where kod not in (select kod from vevo_csoport) --már létező update vevo_csoport set nev= (select nev from wf_vevo_csoport where vevo_csoport.kod=wf_vevo_csoport.kod) where kod in (select kod from wf_vevo_csoport) COMMIT TRANSACTION @tranznev -- vevő lánc set @tranznev='vlanc'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevo_lanc (nev) select nev from wf_vevo_lanc where kod not in (select kod from vevo_lanc) --már létező update vevo_lanc set nev= (select nev from wf_vevo_lanc where vevo_lanc.kod=wf_vevo_lanc.kod) where kod in (select kod from wf_vevo_lanc) COMMIT TRANSACTION @tranznev -- vevő terület set @tranznev='vterulet'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevo_terulet (nev) select nev from wf_vevo_terulet where kod not in (select kod from vevo_terulet) --már létező update vevo_terulet set nev= (select nev from wf_vevo_terulet where vevo_terulet.kod=wf_vevo_terulet.kod) where kod in (select kod from wf_vevo_terulet) COMMIT TRANSACTION @tranznev -- vevők set @tranznev='vevok'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevok (vevo_nev,iranyito,varos,orszag,cim,telefon,fax,kapcsolat,email, adoszam,eu_adoszam,bank,jovedeki,vevo_arcsoport,vevo_akc_csoport,KEDVEZMENY, FIZMOD,fizhat,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,vevo_cszcsoport, viszontelado,sajat_bolt,KICSODA,modositva,utlevel,lnev,liranyito,lvaros,lcim, nyelv,eszamla,iso,allam,liso,lallam,kerulet,kozterulet_jellege,hazszam,epulet, lepcsohaz,szint,ajto,fordafa) select vevo_nev,iranyito,varos,orszag,cim,telefon,fax,kapcsolat,email, adoszam,eu_adoszam,bank,jovedeki,vevo_arcsoport,vevo_akc_csoport,KEDVEZMENY, FIZMOD,fizhat,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,vevo_cszcsoport, viszontelado,sajat_bolt,@kics,modositva,utlevel,lnev,liranyito,lvaros,lcim, nyelv,eszamla,iso,allam,liso,lallam,kerulet,kozterulet_jellege,hazszam,epulet, lepcsohaz,szint,ajto,fordafa from wf_vevok where vevo_kod not in (select vevo_kod from vevok) --már létező update vevok set vevok.vevo_nev =wf_vevok.vevo_nev, vevok.iranyito =wf_vevok.iranyito, vevok.varos =wf_vevok.varos, vevok.orszag =wf_vevok.orszag, vevok.cim =wf_vevok.cim, vevok.telefon =wf_vevok.telefon, vevok.fax =wf_vevok.fax, vevok.kapcsolat =wf_vevok.kapcsolat, vevok.email =wf_vevok.email, vevok.adoszam =wf_vevok.adoszam, vevok.eu_adoszam =wf_vevok.eu_adoszam, vevok.bank =wf_vevok.bank, vevok.jovedeki =wf_vevok.jovedeki, vevok.vevo_arcsoport=wf_vevok.vevo_arcsoport, vevok.vevo_akc_csoport=wf_vevok.vevo_akc_csoport, vevok.kedvezmeny =wf_vevok.kedvezmeny, vevok.fizmod =wf_vevok.fizmod, vevok.fizhat =wf_vevok.fizhat, vevok.vevo_csoport =wf_vevok.vevo_csoport, vevok.vevo_lanc =wf_vevok.vevo_lanc, vevok.vevo_cegjelleg=wf_vevok.vevo_cegjelleg, vevok.vevo_terulet =wf_vevok.vevo_terulet, vevok.vevo_cszcsoport=wf_vevok.vevo_cszcsoport, vevok.viszontelado =wf_vevok.viszontelado, vevok.sajat_bolt =wf_vevok.sajat_bolt, vevok.kicsoda =@kics, vevok.modositva =wf_vevok.modositva, vevok.utlevel =wf_vevok.utlevel, vevok.lnev =wf_vevok.lnev, vevok.liranyito =wf_vevok.liranyito, vevok.lvaros =wf_vevok.lvaros, vevok.lcim =wf_vevok.lcim, vevok.nyelv =wf_vevok.nyelv, vevok.eszamla =wf_vevok.eszamla, vevok.iso =wf_vevok.iso, vevok.allam =wf_vevok.allam, vevok.liso =wf_vevok.liso, vevok.lallam =wf_vevok.lallam, vevok.kerulet =wf_vevok.kerulet, vevok.kozterulet_jellege =wf_vevok.kozterulet_jellege, vevok.hazszam =wf_vevok.hazszam, vevok.epulet =wf_vevok.epulet, vevok.lepcsohaz =wf_vevok.lepcsohaz, vevok.szint =wf_vevok.szint, vevok.ajto =wf_vevok.ajto, vevok.fordafa =wf_vevok.fordafa from wf_vevok where vevok.vevo_kod=wf_vevok.vevo_kod and vevok.vevo_kod in (select vevo_kod from wf_vevok) COMMIT TRANSACTION @tranznev -- vevő telephely set @tranznev='vtelep'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevo_tel (vevo_kod,telep_kod,telep_nev,varos,iranyito,cim, kerulet,kozterulet_jellege,hazszam,epulet,lepcsohaz,szint,ajto, kapcsolat,telefon,email,kartya,LIMIT,jovedeki, TOROLT,vevo_csoport,vevo_lanc,vevo_cegjelleg,vevo_terulet,idokapu,iso,allam) select * from wf_vevo_tel where vevo_kod not in (select vevo_kod from vevo_tel) -- törli ami már nincs delete from vevo_tel where dbo.strzero(vevo_kod,8)+telep_kod not in (select dbo.strzero(vevo_kod,8)+telep_kod from wf_vevo_tel) --már létező update vevo_tel set vevo_tel.telep_nev =wf_vevo_tel.telep_nev, vevo_tel.varos =wf_vevo_tel.varos, vevo_tel.iranyito =wf_vevo_tel.iranyito, vevo_tel.cim =wf_vevo_tel.cim, vevo_tel.kapcsolat =wf_vevo_tel.kapcsolat, vevo_tel.telefon =wf_vevo_tel.telefon, vevo_tel.email =wf_vevo_tel.email, vevo_tel.kartya =wf_vevo_tel.kartya, vevo_tel.limit =wf_vevo_tel.limit, vevo_tel.jovedeki =wf_vevo_tel.jovedeki, vevo_tel.torolt =wf_vevo_tel.torolt, vevo_tel.vevo_csoport =wf_vevo_tel.vevo_csoport, vevo_tel.vevo_lanc =wf_vevo_tel.vevo_lanc, vevo_tel.vevo_cegjelleg =wf_vevo_tel.vevo_cegjelleg, vevo_tel.vevo_terulet =wf_vevo_tel.vevo_terulet, vevo_tel.idokapu =wf_vevo_tel.idokapu, vevo_tel.iso =wf_vevo_tel.iso, vevo_tel.allam =wf_vevo_tel.allam from wf_vevo_tel where vevo_tel.vevo_kod=wf_vevo_tel.vevo_kod and vevo_tel.telep_kod=wf_vevo_tel.telep_kod and vevo_tel.vevo_kod in (select vevo_kod from wf_vevo_tel) COMMIT TRANSACTION @tranznev -- vevő bank set @tranznev='vbank'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevo_bank (vevo_kod,bank,torolt) select * from wf_vevo_bank where vevo_kod not in (select vevo_kod from vevo_bank) --már létező update vevo_bank set vevo_bank.bank =wf_vevo_bank.bank, vevo_bank.torolt =wf_vevo_bank.torolt from wf_vevo_bank where vevo_bank.vevo_kod=wf_vevo_bank.vevo_kod and vevo_bank.vevo_kod in (select vevo_kod from wf_vevo_bank) COMMIT TRANSACTION @tranznev -- vevő csoport azonosító set @tranznev='vevok_csoportazon'+@kics BEGIN TRANSACTION @tranznev --Új insert into vevok_csoportazon (vevo_kod,csoport_azon) select * from wf_vevok_csoportazon where vevo_kod not in (select vevo_kod from vevok_csoportazon) --már létező update vevok_csoportazon set vevok_csoportazon.csoport_azon =wf_vevok_csoportazon.csoport_azon from wf_vevok_csoportazon where vevok_csoportazon.vevo_kod=wf_vevok_csoportazon.vevo_kod and vevok_csoportazon.vevo_kod in (select vevo_kod from wf_vevok_csoportazon) delete from vevok_csoportazon where vevok_csoportazon.vevo_kod not in (select vevo_kod from wf_vevok_csoportazon) COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_arajanlatt_tolt] @bsz bizonylat_szam, @kics kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE declare @tranznev char(32) set @tranznev='wvevo_arajant_tolt'+@kics BEGIN TRANSACTION @tranznev delete from wvevo_arajanlatt where kicsoda=@kics insert into wvevo_arajanlatt select bizszam, tetel, cikk_szam, cikk_nev, cikk_tipus, tipus_nev, mennyiseg, belfoldi_ar, belfoldi_penznem, belfoldi_szallito, szall_nev, belfoldi_keszlet, belfoldi_szallitas_nap, kozbesz_ar, beszerzesi_bizszam, beszerzesi_tetel, beszerzesi_ar, beszerzesi_penznem, beszerzesi_szallito, beszerzesi_szallito_nev, beszerzesi_keszlet, beszerzesi_kurzus, beszerzesi_szallitas_nap, kiajanlott_ar, kiajanlott_szallitas_nap, afa_kulcs, menny_egys, szorzo, kedvezmeny, megjegyzes, garancia, @kics from vvevo_arajanlatt where bizszam=@bsz COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_oszla_ny_feltolt] ( @ssz bizonylat_szam, @kics kicsoda ) AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @bsz bizonylat_szam declare @szlsz bizonylat_szam declare @szledatum datum declare @telep as char(4) declare @xtet bizonylat_tetel declare @tet bizonylat_tetel declare @tetszam bizonylat_tetel declare @vevo kulcs declare @ido varchar(30) declare @joveng varchar(50) declare @telep_cim varchar(150) declare @tranznev varchar(50) set @tranznev = 'wtolt'+@kics begin transaction @tranznev delete from wvevo_szla_nyomt where kicsoda=@kics set @tet=1 DECLARE cszlev CURSOR for SELECT bizszam FROM vevo_szlef WHERE szlaszam=@ssz order by bizszam open cszlev; fetch next from cszlev into @bsz while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN select @szledatum=telj_datum, @telep=telep_kod,@vevo=vevo from vevo_szlef where bizszam=@bsz select @tetszam=count(*) from vevo_szlet where bizszam=@bsz select @telep_cim=rtrim(iranyito)+' '+rtrim(varos)+', '+dbo.VevoTelCimsor(@vevo,@telep), @joveng=rtrim(jovedeki), @ido=case when len(rtrim(idokapu))=0 then '' else 'Száll.idő: '+rtrim(idokapu) end from vevo_tel where vevo_kod=@vevo and telep_kod=@telep set @xtet=1 set @szlsz=@bsz while (@xtet<=@tetszam) begin insert into wvevo_szla_nyomt select bizszam,telj_datum,szla_datum,fiz_modja,fiz_esed,penznem,kurzus,kedvezmeny, megjegyzes,teljesnev,fizmod_nev,tetel,cikk_szam,afa_kulcs,menny_egys,edarab, egyseg_ar,tet_kedvezmeny,tet_megjegyzes,akcio,afaertek,cikk_nev,vtsz,vevo_nev, iranyito,varos,orszag,cim,adoszam,@joveng,eu_adoszam,netto,tafaert,brutto, peldany,@szlsz,@szledatum,@telep_cim,@ido,jovedeki,dbo.lejarat_datuma1(@szlsz,@xtet),@vevo,@kics from vvevo_szla_nyomt where bizszam=@ssz and tetel=@tet set @xtet=@xtet+1 set @tet=@tet+1 end END fetch next from cszlev into @bsz end close cszlev deallocate cszlev commit transaction @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO create PROCEDURE [wvevo_pszlat_feltolt] @bsz bizonylat_szam, @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_vevo_szle_felt'+@kics BEGIN TRANSACTION @tranznev delete from wvevo_szlet where kicsoda=@kics insert into wvevo_szlet select *,'',0,@kics from vevo_pszlat where bizszam=@bsz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_rent_arajan_feltolt] @bsz dbo.bizonylat_szam, @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int -- declare @bsz dbo.bizonylat_szam declare @tet dbo.bizonylat_tetel declare @csz dbo.cikk_szam declare @cn cikk_nev declare @afak dbo.afakulcs declare @me dbo.menny_egyseg declare @szorz dbo.szorzo declare @db dbo.mennyiseg declare @ear dbo.egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @dat datum declare @akc varchar(1) declare @napok int set @tranznev='t_vevo_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wvevo_rent where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, mennyiseg, kiajanlott_ar, kedvezmeny, '', beszerzesi_szallitas_nap from vvevo_arajanlatt where bizszam=@bsz order by tetel OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc, @napok set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wvevo_rent values( '', @maxtet, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, left(dbo.myDtoC(getdate() + @napok),10), @akc, @kics) set @maxtet=@maxtet+1 END FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc, @napok END CLOSE kvevo_rent DEALLOCATE kvevo_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_rent_feltolt] @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int declare @bsz dbo.bizonylat_szam declare @tet dbo.bizonylat_tetel declare @csz dbo.cikk_szam declare @cn cikk_nev declare @afak dbo.afakulcs declare @me dbo.menny_egyseg declare @szorz dbo.szorzo declare @db dbo.mennyiseg declare @ear dbo.egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) set @tranznev='t_vevo_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wvevo_rent where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, v_darab, v_egyseg_ar, v_kedv, akcio from wvevo_szlet_r where kicsoda=@kics and v_darab>0 order by tetel OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wvevo_rent values( '', @maxtet, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, '', @akc, @kics) set @maxtet=@maxtet+1 END FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc END CLOSE kvevo_rent DEALLOCATE kvevo_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_szlat_feltolt] @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int declare @bsz dbo.bizonylat_szam declare @tet dbo.bizonylat_tetel declare @csz dbo.cikk_szam declare @cn cikk_nev declare @afak dbo.afakulcs declare @me dbo.menny_egyseg declare @szorz dbo.szorzo declare @db dbo.mennyiseg declare @ear dbo.egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) set @tranznev='t_vevo_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wvevo_szlet where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, v_darab, v_egyseg_ar, v_kedv, akcio from wvevo_szlet_r where kicsoda=@kics and v_darab>0 order by tetel OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wvevo_szlet values( '', @maxtet, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, '', @akc, @bsz, @tet, @kics) insert into wvevo_szlet_td select '',@maxtet,e1,e2,@kics from vevo_szlat_td where bizszam = @bsz and tetel = @tet set @maxtet=@maxtet+1 END FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc END CLOSE kvevo_rent DEALLOCATE kvevo_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_szlat_pu_feltolt] @kdat datum, @vdat datum, @pn penznem, @kurz kurzus, @ar_szorz egyseg_ar, @am int, @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int declare @bsz dbo.bizonylat_szam declare @tet dbo.bizonylat_tetel declare @csz dbo.cikk_szam declare @cn cikk_nev declare @afak dbo.afakulcs declare @me dbo.menny_egyseg declare @szorz dbo.szorzo declare @db dbo.mennyiseg declare @ear dbo.egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) set @tranznev='t_vevo_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wvevo_szlet where kicsoda=@kics BEGIN TRANSACTION @tranznev delete from wvevo_szlet where kicsoda=@kics delete from wgyujtes where kicsoda=@kics insert into wgyujtes(cikk_szam,darab1,kicsoda) select cikk_szam,-darab*szorzo,@kics from vevo_szlat where bizszam in (select bizszam from vevo_szlaf where penzugyi='1' and @kdat<=telj_datum and telj_datum<=@vdat) insert into wgyujtes(cikk_szam,darab1,kicsoda) select cikk_szam,darab*szorzo,'miklos' from vevo_szlet where bizszam in (select bizszam from vevo_szlef where len(szlaszam)=0 and @kdat<=telj_datum and telj_datum<=@vdat) DECLARE kvevo_rent SCROLL CURSOR FOR select wgyujtes.cikk_szam, cikkek.cikk_nev, case when @am=1 then 'AM' else cikkek.afa_kulcs end, cikkek.menny_egys, sum(darab1) from wgyujtes,cikkek where wgyujtes.cikk_szam=cikkek.cikk_szam and kicsoda=@kics group by wgyujtes.cikk_szam,cikkek.cikk_nev, cikkek.afa_kulcs, cikkek.menny_egys OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @csz, @cn, @afak, @me, @db set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wvevo_szlat values( '', @maxtet, @csz, @cn, @afak, @me, 1, @db, @db, 0, 0, '', '', @kics, '',0) set @maxtet=@maxtet+1 END FETCH NEXT FROM kvevo_rent INTO @csz, @cn, @afak, @me, @db END CLOSE kvevo_rent DEALLOCATE kvevo_rent update wvevo_szlat set egyseg_ar= (select isnull(netto_ar,0) * @ar_szorz from vcikk_arak(1, 0, dbo.mygetdate(), @pn, @kurz,0) where vcikk_arak.cikk_szam=wvevo_szlat.cikk_szam) where kicsoda=@kics COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_szlet_feltolt] @micsoda int, --1:szall.lev; 2:visszáru @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int declare @bsz dbo.bizonylat_szam declare @tet dbo.bizonylat_tetel declare @csz dbo.cikk_szam declare @cn cikk_nev declare @afak dbo.afakulcs declare @me dbo.menny_egyseg declare @szorz dbo.szorzo declare @db dbo.mennyiseg declare @ear dbo.egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) set @tranznev='t_vevo_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wvevo_szlet where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, v_darab, v_egyseg_ar, v_kedv, akcio from wvevo_szlet_r where kicsoda=@kics and v_darab>0 order by tetel OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN if @micsoda=1 set @tmegj='' else set @tmegj='Eredeti bizonylat: ' + rtrim(@bsz) + '/' + str(@tet,4,0) insert into wvevo_szlet values( '', @maxtet, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, @tmegj, @akc, @bsz, @tet, @kics) insert into wvevo_szlet_td select '',@maxtet,e1,e2,@kics from vevo_szlet_td where bizszam = @bsz and tetel = @tet if @micsoda=1 -- száll. levél update wgyariszamok_ki set xtetel=@maxtet where kicsoda=@kics and xtetel=@tet else update wgyariszamok set xtetel=@maxtet where kicsoda=@kics and xtetel=@tet set @maxtet=@maxtet+1 END FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc END CLOSE kvevo_rent DEALLOCATE kvevo_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_szlet_feltolt_szall] @micsoda int, --1:szall.lev; 2:visszáru @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) declare @maxtet int declare @bsz dbo.bizonylat_szam declare @tet dbo.bizonylat_tetel declare @csz dbo.cikk_szam declare @cn cikk_nev declare @afak dbo.afakulcs declare @me dbo.menny_egyseg declare @szorz dbo.szorzo declare @db dbo.mennyiseg declare @ear dbo.egyseg_ar declare @tkedv kedvezmeny declare @tmegj megjegyzes declare @akc varchar(1) set @tranznev='t_vevo_szle_felt'+@kics select @maxtet=isnull(max(tetel),0) from wvevo_szlet where kicsoda=@kics BEGIN TRANSACTION @tranznev DECLARE kvevo_rent SCROLL CURSOR FOR select bizszam, tetel, cikk_szam, cikk_nev, afa_kulcs, menny_egys, szorzo, v_darab, v_egyseg_ar, v_kedv, akcio from wszall_szlet_r where kicsoda=@kics and v_darab>0 order by tetel OPEN kvevo_rent FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc set @maxtet=@maxtet+1 WHILE (@@FETCH_STATUS <> -1) BEGIN IF (@@FETCH_STATUS <> -2) BEGIN insert into wvevo_szlet values( '', @maxtet, @csz, @cn, @afak, @me, @szorz, @db, @db, @ear, @tkedv, '', @akc, @bsz, @tet, @kics) /* insert into wvevo_szlet_td select '',@maxtet,e1,e2,@kics from vevo_szlet_td where bizszam = @bsz and tetel = @tet */ if @micsoda=1 -- száll. levél update wgyariszamok_ki set xtetel=@maxtet where kicsoda=@kics and xtetel=@tet else update wgyariszamok set xtetel=@maxtet where kicsoda=@kics and xtetel=@tet set @maxtet=@maxtet+1 END FETCH NEXT FROM kvevo_rent INTO @bsz, @tet, @csz, @cn, @afak, @me, @szorz, @db, @ear, @tkedv, @akc END CLOSE kvevo_rent DEALLOCATE kvevo_rent COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wvevo_szletm_tolt] @bsz dbo.bizonylat_szam, @kics dbo.kicsoda WITH RECOMPILE AS begin SET XACT_ABORT ON SET NOCOUNT ON declare @tranznev char(32) set @tranznev='t_vevo_szle_felt'+@kics BEGIN TRANSACTION @tranznev delete from wvevo_szletm where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics and biztip='vevo_szle_mod' delete from wsarzs_ki where kicsoda=@kics and biztip='vevo_szle_mod' delete from wgyariszamok_ki where kicsoda=@kics and biztip='vevo_szle_mod' insert into wvevo_szletm SELECT BIZSZAM, TETEL, vevo_szlet.CIKK_SZAM, vevo_szlet.CIKK_NEV, vevo_szlet.AFA_KULCS, vevo_szlet.MENNY_EGYS, SZORZO, edarab, darab, EGYSEG_AR, kedvezmeny, megjegyzes, akcio, rendel_bsz, rendel_tet, @kics, edarab, darab FROM vevo_szlet,cikkek WHERE cikkek.cikk_szam=vevo_szlet.cikk_szam and bizszam=@bsz COMMIT TRANSACTION @tranznev end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [wwvevo_szlet_masol] ( @kics1 kicsoda, @kics kicsoda) WITH RECOMPILE AS begin declare @tranznev char(32) declare @tet int declare @ssz char(10) declare @szsz1 char(10) declare @mk varchar(20) declare @kdb float declare @szdb float declare @sar varchar(20) declare @csz cikk_szam set @tranznev='masol'+@kics SET XACT_ABORT ON SET NOCOUNT ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE BEGIN TRANSACTION @tranznev delete from wvevo_szlet where kicsoda=@kics delete from wsarzs_ki where kicsoda=@kics delete from wszavatos_ki where kicsoda=@kics delete from wgyariszamok_ki where kicsoda=@kics insert into wvevo_szlet select '',ROW_NUMBER() OVER (ORDER BY cikk_nev),cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo, sum(edarab),sum(darab),egyseg_ar,kedvezmeny,megjegyzes,akcio,rendel_ssz,rendel_tet,@kics from wwvevo_szlet where kicsoda=@kics1 group by cikk_szam,cikk_nev,afa_kulcs,menny_egys,szorzo, egyseg_ar,kedvezmeny,megjegyzes,akcio,rendel_ssz,rendel_tet DECLARE tetelek scroll CURSOR for SELECT wwvevo_szlet.cikk_szam,sorszam,szamla_sz,mozgaskod,keszlet.darab,wwvevo_szlet.darab,sarzs FROM wwvevo_szlet inner join keszlet on keszlet.cikk_szam=wwvevo_szlet.cikk_szam WHERE kicsoda=@kics1 and sarzs_szam=sarzs open tetelek fetch next from tetelek into @csz,@ssz,@szsz1,@mk,@kdb,@szdb,@sar while (@@FETCH_STATUS <> -1) begin IF (@@FETCH_STATUS <> -2) BEGIN select @tet=tetel from wvevo_szlet where kicsoda=@kics and cikk_szam=@csz insert into wsarzs_ki values( @tet, @ssz, 'vevo_szle_uj', @sar, '', @szsz1, @mk, @kdb, @szdb, @kics) END fetch next from tetelek into @csz,@ssz,@szsz1,@mk,@kdb,@szdb,@sar end close tetelek deallocate tetelek COMMIT TRANSACTION @tranznev SET TRANSACTION ISOLATION LEVEL READ COMMITTED end GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [xxafa] AS begin select * from afa_kulcs --where afakulcs='27' end GO insert into verzio values('wvs','20231108',dbo.mygetdatetime()) go