Index: trunk/SQL/StoredProcedures/sp_adMotoRaportProwizja.txt =================================================================== --- trunk/SQL/StoredProcedures/sp_adMotoRaportProwizja.txt (revision 352) +++ trunk/SQL/StoredProcedures/sp_adMotoRaportProwizja.txt (revision 352) @@ -0,0 +1,96 @@ +-- ============================================= +-- Create basic stored procedure template +-- ============================================= + +-- Drop stored procedure if it already exists +IF EXISTS ( + SELECT * + FROM INFORMATION_SCHEMA.ROUTINES + WHERE SPECIFIC_SCHEMA = N'dbo' + AND SPECIFIC_NAME = N'sp_adMotoRaportProwizja' +) + DROP PROCEDURE dbo.sp_adMotoRaportProwizja +GO + +CREATE PROCEDURE dbo.sp_adMotoRaportProwizja + @rok int, + @miesiac int, + @tytul nvarchar(100) +AS + +DECLARE @Wplywy TABLE +( + IdFaktury INT, + NumerFaktury INT, + Agent nvarchar(100), + SymbolFaktury nvarchar(100), + DataWplaty DATETIME, + Netto MONEY, + DataFaktury DATETIME, + Prowizja MONEY, + Agencja nvarchar(100) +) +DECLARE @Sprzedaz TABLE +( + IdFaktury INT, + NumerFaktury INT, + Agent nvarchar(100), + SymbolFaktury nvarchar(100), + DataWplaty DATETIME, + Netto MONEY, + DataFaktury DATETIME, + Prowizja MONEY, + Agencja nvarchar(100) +) + +INSERT INTO @Wplywy +SELECT +ID_FAKTURY AS IdFaktury, +NumerFaktury, +LOWER(Symbol) AS Agent, +NR_FK AS SymbolFaktury, +dataWplaty AS DataWplaty, +NETTO AS Netto, +DATA_WYSTAWIENIA AS DataFaktury, +ROUND(NETTO * procentProwizji, 2) AS Prowizja, +Agencja +FROM WplywyByTytul +WHERE (YEAR(dataWplaty) = @rok) +AND (MONTH(dataWplaty) = @miesiac) +AND (Tytul IN (@tytul)) + +UPDATE @Wplywy +SET Netto = NULL +WHERE MONTH(DataFaktury)<@miesiac + +INSERT INTO @Sprzedaz +SELECT +Id AS IdFaktury, +Numer AS NumerFaktury, +Agent, +NumerFaktury AS SymbolFaktury, +NULL AS DataWplaty, +Netto, +Data AS DataFaktury, +NULL AS Prowizja, +Agencja +FROM FakturyNettoByTytul +WHERE +(YEAR(Data) = @rok) +AND (MONTH(Data) in (@miesiac)) +AND (Tytul in (@tytul)) + +SELECT * FROM @Wplywy +UNION +SELECT * FROM @Sprzedaz +WHERE IdFaktury NOT IN (SELECT IdFaktury FROM @Wplywy) +ORDER BY DataWplaty, Agent, NumerFaktury + + +GO + +-- ============================================= +-- Example to execute the stored procedure +-- ============================================= +EXECUTE dbo.sp_adMotoRaportProwizja 2009, 1, 'adMot' +GO Index: trunk/SQL/Views/WplywyByTytul.txt =================================================================== --- trunk/SQL/Views/WplywyByTytul.txt (revision 345) +++ trunk/SQL/Views/WplywyByTytul.txt (revision 352) @@ -21,7 +21,7 @@ Wplaty.symbolPotwierdzenia, Wplaty.rodzajPotwierdzenia, -NETTO = CASE WHEN Korekta.Netto IS NULL THEN SUM(FAKTURA_DETAILS.NETTO) ELSE Korekta.Netto END, -VAT = CASE WHEN Korekta.Netto IS NULL THEN SUM(FAKTURA_DETAILS.VAT) ELSE Korekta.Vat END, -BRUTTO = CASE WHEN Korekta.Brutto IS NULL THEN SUM(FAKTURA_DETAILS.BRUTTO) ELSE Korekta.Brutto END, +FWW.Netto, +FWW.Vat, +FWW.Brutto, FAKTURY.DATA_WYSTAWIENIA, FAKTURY.TERMIN_ZAPLATY, @@ -55,15 +55,23 @@ LEFT OUTER JOIN KLIENCI ON FAKTURY.ID_NABYWCY = KLIENCI.CustomerID LEFT OUTER JOIN PROWIZJE AS P ON P.idFaktury = FAKTURY.ID_FAKTURY -LEFT OUTER JOIN VIEW_KOREKTY AS Korekta ON Korekta.idFakturyKorekta = FAKTURY.ID_FAKTURY +LEFT OUTER JOIN FakturyWartoscWplaty AS FWW ON FWW.IdFaktury = FAKTURY.ID_FAKTURY AND FWW.IdTytulu=FAKTURA_DETAILS.Tytul LEFT OUTER JOIN REKLAMA AS R ON R.ID_FAKTURY = FAKTURY.ID_FAKTURY LEFT OUTER JOIN Zamowienia AS Z ON FAKTURY.idZamowienia = Z.idZamowienia LEFT OUTER JOIN dbo.[LISTA TYTU£ÓW] T on T.ID=FAKTURA_DETAILS.TYTUL WHERE (FAKTURY.KOREKTA <> 1) +AND +( (FWW.WalutaMiano='PLN' AND ROUND((FWW.Brutto - FWW.WplataBrutto), 0) <= 1) + OR + (FWW.WalutaMiano<>'PLN' AND ROUND((FWW.WalutaBrutto - FWW.WplataWaluta), 0) <= 1) +) GROUP BY FAKTURY.DATA_WYSTAWIENIA, FAKTURY.ID_FAKTURY, FAKTURY.ID_SPRZEDAWCY, AGENCI.Symbol, CONVERT(VARCHAR, FAKTURY.NUMER) + '/' + CONVERT(VARCHAR, FAKTURY.NUMER_ROZ) + '/' + CONVERT(VARCHAR, FAKTURY.NUMER_ROK), KLIENCI.kodKlienta, Wplaty.symbolPotwierdzenia, Wplaty.rodzajPotwierdzenia, FAKTURY.DATA_WYSTAWIENIA, FAKTURY.TERMIN_ZAPLATY, FAKTURY.SPOSOB_ZAPLATY, AGENCJE.Symbol, Wplaty.dataWplaty, DATEDIFF(day, FAKTURY.TERMIN_ZAPLATY, Wplaty.dataWplaty), FAKTURY.suma_zaplat, FAKTURY.zaplata_data, DATEDIFF(day, - FAKTURY.TERMIN_ZAPLATY, FAKTURY.zaplata_data), P.procentProwizji, P.kwotaProwizji, Korekta.netto, Korekta.brutto, Korekta.vat, - FAKTURY.idZamowienia, R.[PROCENT PROWIZJI], R.PROWIZJA, FAKTURY.NUMER, R.zablokuj_prowizje, Z.ZP, Z.procentProwizji, T.Symb + FAKTURY.TERMIN_ZAPLATY, FAKTURY.zaplata_data), P.procentProwizji, P.kwotaProwizji, + FAKTURY.idZamowienia, R.[PROCENT PROWIZJI], R.PROWIZJA, FAKTURY.NUMER, R.zablokuj_prowizje, Z.ZP, Z.procentProwizji, T.Symb, +FWW.Netto, +FWW.Brutto, +FWW.Vat GO Index: trunk/SQL/Views/FakturyWartoscWplaty.txt =================================================================== --- trunk/SQL/Views/FakturyWartoscWplaty.txt (revision 352) +++ trunk/SQL/Views/FakturyWartoscWplaty.txt (revision 352) @@ -0,0 +1,63 @@ + +SET ANSI_NULLS ON +GO +SET QUOTED_IDENTIFIER ON +GO + +ALTER VIEW [dbo].[FakturyWartoscWplaty] AS +SELECT +F.id_faktury AS IdFaktury, +FD.S_VAT AS ProcentVat, +Netto = +CASE + WHEN K.Netto IS NULL THEN ROUND(SUM(FD.NETTO), 2) + ELSE K.Netto +END, +Vat = +CASE + WHEN K.Netto IS NULL THEN ROUND(SUM(FD.VAT), 2) + ELSE K.Vat +END, +Brutto = +CASE + WHEN K.Netto IS NULL THEN ROUND(SUM(FD.NETTO * (1 + FD.S_VAT)), 2) + ELSE K.Brutto +END, +--F.waluta_brutto AS WalutaBrutto, +WalutaBrutto = +CASE + WHEN K.Netto IS NULL THEN F.waluta_brutto + ELSE K.waluta_brutto +END, +WalutaMiano = +CASE + WHEN F.waluta_miano IS NULL OR F.waluta_miano='' THEN 'PLN' + ELSE F.waluta_miano +END, +F.waluta_kurs AS KursWaluty, +W.brutto AS WplataBrutto, +W.waluta_brutto AS WplataWaluta, +Korekta = +CASE + WHEN K.Netto IS NULL THEN 0 + ELSE 1 +END, +FD.TYTUL AS IdTytulu +FROM FAKTURA_DETAILS FD +INNER JOIN FAKTURY F ON FD.ID_FAKTURY=F.ID_FAKTURY +INNER JOIN Wplaty W ON W.idFaktury=F.ID_FAKTURY +LEFT OUTER JOIN VIEW_KOREKTY AS K ON K.idFakturyKorekta = F.ID_FAKTURY +GROUP BY +F.id_faktury, F.waluta_brutto, F.waluta_miano, F.waluta_kurs, +FD.s_vat, +FD.TYTUL, +W.brutto, +W.waluta_brutto, +K.Netto, K.Brutto, K.Vat, K.waluta_brutto +GO + +SET ANSI_NULLS OFF +GO +SET QUOTED_IDENTIFIER OFF +GO + Index: trunk/SQL/Reports/RozliczenieWplywowWgDatyWplaty2009.txt =================================================================== --- trunk/SQL/Reports/RozliczenieWplywowWgDatyWplaty2009.txt (revision 345) +++ trunk/SQL/Reports/RozliczenieWplywowWgDatyWplaty2009.txt (revision 352) @@ -1,7 +1,9 @@ declare @rok int declare @miesiac int +declare @tytul nvarchar(100) set @rok=2009 -set @miesiac=2 +set @miesiac=1 +set @tytul='adMot' @@ -11,2 +13,3 @@ WHERE (YEAR(dataWplaty) = @rok) AND (MONTH(dataWplaty) = @miesiac) AND (Tytul IN (@tytul)) ORDER BY Symbol, NumerFaktury +