bbcc12ab-5eed-4510-b210-1b3b99539ad1BAZA_REKLAM29.7cmStringtrueprawa_agencjetrueStringtrueprawa_agenttrueString=Year(Today)rokListaLatrokrokString=Month(Today)miesiac123456789101112StringListaAgencjiSymbolagencjaListaAgencjiSymbolSymboltrueStringListaAgentowSymbolagentListaAgentowSymbolSymboltrueString2sortuj wg: 0123true21cm0.25cmtrue1cm1cm1cm9353c331-a24b-4f88-bbef-a42cfe8acfb229.7cmID_FAKTURYSystem.Int32SymbolSystem.StringNR_FKSystem.StringkodKlientaSystem.StringsymbolPotwierdzeniaSystem.StringrodzajPotwierdzeniaSystem.StringNETTOSystem.DecimalVATSystem.DecimalBRUTTOSystem.DecimalDATA_WYSTAWIENIASystem.DateTimeTERMIN_ZAPLATYSystem.DateTimeSPOSOB_ZAPLATYSystem.StringAgencjaSystem.StringdataWplatySystem.DateTimeroznica_nowaSystem.Int32suma_zaplatSystem.Decimalzaplata_dataSystem.DateTimeroznica_staraSystem.Int32procentProwizjiSystem.DoublekwotaProwizjiSystem.Double=Fields!agencja.ValueIn=Parameters!agencja.Value=Fields!Symbol.ValueIn=Parameters!agent.ValueBAZA_REKLAMSELECT FAKTURY.ID_FAKTURY, AGENCI.Symbol, CONVERT(VARCHAR, FAKTURY.NUMER) + '/' + CONVERT(VARCHAR, FAKTURY.NUMER_ROZ)
+ '/' + CONVERT(VARCHAR, FAKTURY.NUMER_ROK) AS NR_FK, KLIENCI.kodKlienta, Wplaty.symbolPotwierdzenia, Wplaty.rodzajPotwierdzenia,
CASE WHEN Korekta.Netto IS NULL THEN SUM(FAKTURA_DETAILS.NETTO) ELSE Korekta.Netto END AS NETTO, CASE WHEN Korekta.Netto IS NULL
THEN SUM(FAKTURA_DETAILS.VAT) ELSE Korekta.Vat END AS VAT, CASE WHEN Korekta.Brutto IS NULL THEN SUM(FAKTURA_DETAILS.BRUTTO)
ELSE Korekta.Brutto END AS BRUTTO, FAKTURY.DATA_WYSTAWIENIA, FAKTURY.TERMIN_ZAPLATY, FAKTURY.SPOSOB_ZAPLATY,
AGENCJE.Symbol AS Agencja, Wplaty.dataWplaty, DATEDIFF(day, FAKTURY.TERMIN_ZAPLATY, Wplaty.dataWplaty) AS roznica_nowa,
FAKTURY.suma_zaplat, FAKTURY.zaplata_data, DATEDIFF(day, FAKTURY.TERMIN_ZAPLATY, FAKTURY.zaplata_data) AS roznica_stara,
CASE WHEN FAKTURY.idZamowienia IS NULL THEN R.[Procent Prowizji] ELSE P.procentProwizji END AS procentProwizji,
CASE WHEN FAKTURY.idZamowienia IS NULL THEN R.[Prowizja] ELSE P.kwotaProwizji END AS kwotaProwizji
FROM FAKTURY LEFT OUTER JOIN
FAKTURA_DETAILS ON FAKTURY.ID_FAKTURY = FAKTURA_DETAILS.ID_FAKTURY LEFT OUTER JOIN
AGENCI ON FAKTURY.NUMER_ROZ = AGENCI.F_ROZ LEFT OUTER JOIN
AGENCJE ON AGENCI.ID_AGENCJI = AGENCJE.Id_agencji LEFT OUTER JOIN
Wplaty ON FAKTURY.ID_FAKTURY = Wplaty.idFaktury 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
REKLAMA AS R ON R.ID_FAKTURY = FAKTURY.ID_FAKTURY
WHERE (FAKTURY.KOREKTA <> 1) AND (YEAR(Wplaty.dataWplaty) = @rok) AND (MONTH(Wplaty.dataWplaty) = @miesiac)
GROUP BY FAKTURY.DATA_WYSTAWIENIA, FAKTURY.ID_FAKTURY, 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
ORDER BY AGENCI.Symbol, FAKTURY.NUMER=Parameters!rok.Value=Parameters!miesiac.ValueId_agencjiSystem.Int32SymbolSystem.StringBAZA_REKLAMSELECT Id_agencji, Symbol
FROM AGENCJE where aktywna=1 and (@prawa_agencje is null or @prawa_agencje= Id_agencji)=Parameters!prawa_agencje.ValuetrueID_AGENTASystem.Int32SymbolSystem.StringagencjaSystem.StringBAZA_REKLAMSELECT A.ID_AGENTA, A.Symbol, A2.Symbol agencja
FROM AGENCI A left join Agencje A2
on A.ID_AGENCJI = A2.ID_Agencji
where (A2.Symbol in (@agencja) OR A2.Symbol is null) AND (@prawa_agent is null OR A.Symbol=@prawa_agent)
order by A.Symbol=Parameters!agencja.Value=Parameters!prawa_agent.ValuetruerokSystem.Int32BAZA_REKLAMselect distinct year(DATA_W) as rok from dbo.NR where DATA_W is not null and year(DATA_W) >=2009 order by year(DATA_W)desctruePublic Shared Function Formatuj(ByVal Value As Integer) As String
Formatuj = Format(Value, "### ### ##0.00 zł")
End Function25.57937cm1cmtextbox1018.75cm1true0.75cmROZLICZENIE WPŁYWÓW WG DATY WPŁATY