319a723c-6378-4318-84f4-c63989c58b24BAZA_REKLAM11inString=1Minimalna ilość faktur:Integer=Year(Today)W latach:ListaLatRokRoktruetrue8.5in0.25cmtrue2.5cm2.5cm2.5cm6c3fa1c3-dafd-4db7-b985-fcaeb13d0a8321cmAgencjaSystem.StringNazwaKlientaSystem.StringKodKlientaSystem.StringIdKlientaSystem.Int32FakturyNettoSystem.DecimalIloscFakturSystem.Int32FakturaRokSystem.Int32BAZA_REKLAMSELECT A.Symbol AS Agencja, K.FirstName AS NazwaKlienta, K.KodKlienta, K.CustomerId AS IdKlienta,
CAST(SUM(FD.Netto) AS DECIMAL(9,2)) AS FakturyNetto, COUNT(DISTINCT F.Id_Faktury) AS IloscFaktur, YEAR(F.Data_Sprzedazy) AS FakturaRok FROM Klienci AS K
INNER JOIN Faktury AS F ON F.Id_Nabywcy=K.CustomerId
INNER JOIN Faktura_Details AS FD ON FD.Id_Faktury=F.Id_Faktury
INNER JOIN Agencje AS A ON F.Id_Sprzedawcy = A.Id_Agencji
WHERE
K.CustomerId NOT IN (18845, 678)
AND YEAR(F.Data_Sprzedazy) IN (@years)
GROUP BY A.Symbol, K.FirstName, K.KodKlienta, K.CustomerId, YEAR(F.Data_Sprzedazy)
HAVING COUNT(DISTINCT F.Id_Faktury)>=@minIloscFaktur
ORDER BY IloscFaktur DESC, K.FirstName=Parameters!years.Value=Parameters!minIloscFaktur.ValuetrueRokSystem.Int32BAZA_REKLAMSELECT DISTINCT YEAR(DATA_W) AS Rok
FROM dbo.NR
WHERE DATA_W IS NOT NULL
ORDER BY year(DATA_W) DESCtruePublic Function MultiValuedParamToString(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 Function20.07936cm1cmtextbox119.5cm1true0.53333cm="Zestawienie klientów, którzy maja co najmniej " + CStr(Parameters!minIloscFaktur.Value) + IIf(Parameters!minIloscFaktur.Value>1, IIf(Parameters!minIloscFaktur.Value>4, " faktur", " faktury"), " fakturę") + " w latach: " + Code.MultiValuedParamToString(Parameters!years)
Klienci0.53333cm=Fields!Agencja.Value=Fields!Agencja.ValueAscendingAgencja19true=Fields!Agencja.Valuetextbox918truetextbox1017truetextbox1116true=Sum(Fields!FakturyNetto.Value)textbox1215true=Sum(Fields!IloscFaktur.Value)0.53333cm=Fields!FakturaRok.Value=Fields!FakturaRok.ValueDescending=Fields!IloscFaktur.ValueDescending=Fields!NazwaKlienta.ValueAscendingtrueAgencjatextbox1314trueFakturaRok13true=Fields!FakturaRok.Valuetextbox1412truetextbox1511true=Sum(Fields!FakturyNetto.Value)textbox1610true=Sum(Fields!IloscFaktur.Value)0.53333cm19.53968cmtextbox34truetextbox53trueNazwaKlienta2true=Fields!NazwaKlienta.ValueFakturyNetto1true=Fields!FakturyNetto.ValueIloscFakturtrue=Fields!IloscFaktur.Value0.53333cmtrueFakturaRoktextbox224trueAgencjatextbox423trueRoktextbox622trueKlienttextbox721trueSuma z fakturtextbox820trueIlość faktur0.53333cmtrue4cm2cm7.75cm3.25cm2.53968cm