Index: /trunk/SQL/Views/FakturyZaplacone.txt
===================================================================
--- /trunk/SQL/Views/FakturyZaplacone.txt (revision 319)
+++ /trunk/SQL/Views/FakturyZaplacone.txt (revision 319)
@@ -0,0 +1,51 @@
+
+SET ANSI_NULLS ON
+GO
+SET QUOTED_IDENTIFIER ON
+GO
+
+ALTER VIEW [dbo].[FakturyZaplacone]
+AS
+SELECT A.id_Agencji AS AgencjaId, A.Symbol AS Agencja, T.Symb AS Tytul, F.id_faktury AS FakturaId,
+-- jesli korekta to odejmij roznice od sumy szczegolow faktury
+CASE
+WHEN K.Roznica_Netto IS NULL THEN SUM(FD.NETTO)
+ELSE SUM(FD.NETTO) + K.Roznica_Netto
+END AS FakturaNetto,
+CASE
+WHEN K.Roznica_Netto IS NULL THEN SUM((FD.S_VAT + 1) * FD.NETTO)
+ELSE SUM((FD.S_VAT + 1) * FD.NETTO) + K.Roznica_Brutto
+END AS FakturaBrutto,
+FakturaWaluta =
+CASE
+WHEN (F.waluta_miano IS NULL OR F.waluta_miano = '') THEN 'PLN'
+ELSE F.waluta_miano
+END,
+F.waluta_brutto AS FakturaWalutaBrutto,
+W.brutto AS WplataBrutto,
+W.waluta_brutto AS WplataWalutaBrutto,
+YEAR(W.dataWplaty) AS Rok,
+MONTH(W.dataWplaty) AS Miesiac
+FROM Faktura_Details FD
+INNER JOIN dbo.[LISTA TYTU£ÓW] T on T.ID=FD.TYTUL
+INNER JOIN faktury F on F.id_faktury=FD.id_faktury
+INNER JOIN Wplaty W ON W.idFaktury=F.id_faktury
+LEFT OUTER JOIN Agencje A on A.id_agencji = F.id_sprzedawcy
+LEFT OUTER JOIN dbo.VIEW_KOREKTY AS K ON K.idZamowienia = F.idZamowienia
+WHERE
+F.KOREKTA <> 1
+AND W.dataWplaty IS NOT NULL
+--AND (YEAR(W.dataWplaty) = @rok)
+--AND (MONTH(W.dataWplaty) = @ms)
+--ignoruj faktury wystawione dla Poznania i Katowic
+AND F.Numer_Roz <> 'POZ' AND F.Numer_Roz <> 'KAT'
+GROUP BY F.id_faktury, F.numer_rok, F.suma_zaplat, F.waluta_miano, F.waluta_brutto,
+A.id_Agencji, A.Symbol, T.Symb, W.brutto, W.waluta_brutto, K.Roznica_Netto, K.Roznica_Brutto,
+W.dataWplaty
+GO
+
+SET ANSI_NULLS OFF
+GO
+SET QUOTED_IDENTIFIER OFF
+GO
+
Index: /trunk/RaportySQL/WplywyWgWplaty.rdl
===================================================================
--- /trunk/RaportySQL/WplywyWgWplaty.rdl (revision 319)
+++ /trunk/RaportySQL/WplywyWgWplaty.rdl (revision 319)
@@ -0,0 +1,796 @@
+
+
+
+
+ 6d589086-5dce-4781-8884-a0dd6b3db78a
+ BAZA_REKLAM
+
+
+ 11in
+
+
+ String
+
+
+ =Year(Today)
+
+
+ Rok:
+
+
+ ListaLat
+ rok
+ rok
+
+
+
+
+ String
+
+
+ =Month(Today)
+
+
+ Miesiac:
+
+
+
+ 1
+
+
+ 2
+
+
+ 3
+
+
+ 4
+
+
+ 5
+
+
+ 6
+
+
+ 7
+
+
+ 8
+
+
+ 9
+
+
+ 10
+
+
+ 11
+
+
+ 12
+
+
+
+ true
+
+
+ String
+
+
+ ListaAgencji
+ Id_agencji
+
+
+ true
+ Agencja:
+
+
+ ListaAgencji
+ Id_agencji
+ Symbol
+
+
+ true
+
+
+ true
+ 8.5in
+ 0.25cm
+ true
+ 2.5cm
+ 2.5cm
+
+ true
+ 0.75cm
+ true
+
+ 2.5cm
+ 340d8633-3f30-4356-b810-b10969079b1c
+ 21cm
+
+
+
+
+ AgencjaId
+ System.Int32
+
+
+ Agencja
+ System.String
+
+
+ Tytul
+ System.String
+
+
+ FakturaNetto
+ System.Decimal
+
+
+ FakturaBrutto
+ System.Double
+
+
+ WplataBrutto
+ System.Decimal
+
+
+
+ BAZA_REKLAM
+ SELECT AgencjaId, Agencja, Tytul,
+SUM(FakturaNetto) AS FakturaNetto,
+SUM(FakturaBrutto) AS FakturaBrutto,
+SUM(WplataBrutto) AS WplataBrutto
+FROM FakturyZaplacone
+WHERE
+Rok = @rok
+AND Miesiac IN (@ms)
+AND (AgencjaId IN (@agencja))
+GROUP BY AgencjaId, Agencja, Tytul
+ORDER BY Agencja, Tytul
+
+
+ =Parameters!rok.Value
+
+
+ =Parameters!ms.Value
+
+
+ =Parameters!agencja.Value
+
+
+ true
+
+
+
+
+
+ rok
+ System.Int32
+
+
+
+ BAZA_REKLAM
+ SELECT DISTINCT YEAR(DATA_W) AS rok
+FROM dbo.NR
+WHERE DATA_W IS NOT NULL
+AND YEAR(DATA_W)>2007
+ORDER BY YEAR(DATA_W) DESC
+ true
+
+
+
+
+
+ Id_agencji
+ System.Int32
+
+
+ Symbol
+ System.String
+
+
+
+ BAZA_REKLAM
+ SELECT Id_agencji, Symbol
+FROM AGENCJE
+WHERE aktywna=1
+ true
+
+
+
+ Public Function GetMonths(P as Parameter) as String
+ Dim i As Integer
+ Dim s As String
+ s = p.value(0)
+ For i = 1 to Ubound(P.Value)
+ s = s & "," & p.Value(i)
+ Next i
+ Return s
+End Function
+ 15.15872cm
+
+ 1cm
+
+
+ textbox1
+ 12.69841cm
+
+ 1
+ true
+ 0.75cm
+ ="Wpływy według wpłaty: " & Parameters!rok.Value & ", " & Code.GetMonths(Parameters!ms)
+
+
+ Wplywy
+ 0.75cm
+
+
+
+
+ =Fields!Agencja.Value
+
+
+
+
+ =Fields!Agencja.Value
+ Ascending
+
+
+
+
+
+
+
+
+
+ Agencja
+
+ 14
+ true
+ =Fields!Agencja.Value
+
+
+
+
+
+
+ textbox8
+
+ 13
+ true
+
+
+
+
+
+
+
+
+ textbox9
+
+ 12
+ true
+ =Sum(Fields!FakturaNetto.Value)
+
+
+
+
+
+
+ textbox10
+
+ 11
+ true
+ =Sum(Fields!FakturaBrutto.Value)
+
+
+
+
+
+
+ textbox11
+
+ 10
+ true
+ =Sum(Fields!WplataBrutto.Value)
+
+
+
+
+ 0.53333cm
+
+
+
+
+
+
+
+
+
+
+
+
+ textbox3
+
+ 4
+ true
+
+
+
+
+
+
+
+
+ Tytul
+
+ 3
+ true
+ =Fields!Tytul.Value
+
+
+
+
+
+
+ FakturaNetto
+
+ 2
+ true
+ =Fields!FakturaNetto.Value
+
+
+
+
+
+
+ FakturaBrutto
+
+ 1
+ true
+ =Fields!FakturaBrutto.Value
+
+
+
+
+
+
+ WplataBrutto
+
+ true
+ =Fields!WplataBrutto.Value
+
+
+
+
+ 0.53333cm
+
+
+
+ true
+ Agencja
+
+
+
+
+
+
+
+
+
+ textbox2
+
+ 19
+ true
+ Agencja
+
+
+
+
+
+
+ textbox4
+
+ 18
+ true
+ Tytuł
+
+
+
+
+
+
+ textbox5
+
+ 17
+ true
+ Faktura Netto
+
+
+
+
+
+
+ textbox6
+
+ 16
+ true
+ Faktura Brutto
+
+
+
+
+
+
+ textbox7
+
+ 15
+ true
+ Wpłata Brutto
+
+
+
+
+ 1cm
+
+
+ true
+
+
+
+ 5cm
+
+
+ 2.53968cm
+
+
+ 2.53968cm
+
+
+ 2.53968cm
+
+
+ 2.53968cm
+
+
+
+
+
+ 3.45158cm
+
+ pl-PL
+
+ true
+ 0.75cm
+ true
+
+ 2.5cm
+ 29.7cm
+
Index: /trunk/RaportySQL/RaportySQL.rptproj
===================================================================
--- /trunk/RaportySQL/RaportySQL.rptproj (revision 286)
+++ /trunk/RaportySQL/RaportySQL.rptproj (revision 319)
@@ -182,4 +182,8 @@
+ RozliczenieWplywowWgDatyWplatyWYR2009.rdl
+ RozliczenieWplywowWgDatyWplatyWYR2009.rdl
+
+
SprzedazNaWydanie.rdl
SprzedazNaWydanie.rdl
@@ -362,6 +366,6 @@
- RozliczenieWplywowWgDatyWplatyWYR2009.rdl
- RozliczenieWplywowWgDatyWplatyWYR2009.rdl
+ WplywyWgWplaty.rdl
+ WplywyWgWplaty.rdl