6a2bec57-03d9-4f28-a49c-65e1805de702BAZA_REKLAM29.7cmString=Year(Today)rokListaLatrokrokString=Month(Today)ms123456789101112Stringtruetytuł:ListaTytulowvaluelabelStringtrueagencjaListaAgencjiId_agencjiSymbolStringtrueagentListaAgentowID_AGENTASymboltrue21cm0.25cmtrue1cm1cm1cm58bc7198-b2fa-4939-89e9-e74e3118e4d029.7cmwojewodztwoSystem.StringnettoSystem.DecimaliloscSystem.Int32BAZA_REKLAMSELECT wojewodztwo , SUM(NETTO) AS netto,COUNT(distinct reklamaId) AS ilosc
FROM
(
select ROUND(FD.NETTO, 0) AS NETTO,
fd.reklamaId,
year(faktury.data_wystawienia) AS ROK,
DATEPART(QUARTER, faktury.data_wystawienia) AS KW,
CONVERT(INTEGER,(1.0+DATEPART(QUARTER, faktury.data_wystawienia))/2) AS ROK_PO,
month(faktury.data_wystawienia) AS MS,
DATEPART(Week, faktury.data_wystawienia) AS WW,
faktury.data_wystawienia, FD.tytul, Agencje.Symbol as agencja, Agenci.Symbol as agent,
dbo.KLIENCI.state as wojewodztwo
FROM
dbo.AGENCJE INNER JOIN dbo.AGENCI ON dbo.AGENCJE.Id_agencji = dbo.AGENCI.ID_AGENCJI
INNER JOIN dbo.FAKTURY ON dbo.AGENCI.F_ROZ = dbo.FAKTURY.[NUMER_ROZ]
left join dbo.FAktura_details FD on FAKTURY.id_faktury= FD.id_faktury
INNER JOIN dbo.Klienci on dbo.Klienci.CustomerId = dbo.Faktury.id_nabywcy
WHERE
(DATEPART(YEAR, faktury.data_wystawienia) = @rok)
AND (DATEPART(month, faktury.data_wystawienia) = @ms)
AND (@tytul is null OR FD.TYTUL = @tytul)
AND (@agencja is null OR Agencje.id_agencji = @agencja)
AND (@agent is null OR Agenci.ID_AGENTA = @agent) AND ( dbo.KLIENCI.country='POLSKA')
)
AS R
GROUP BY wojewodztwo
ORDER BY wojewodztwo=Parameters!rok.Value=Parameters!ms.Value=Parameters!tytul.Value=Parameters!agencja.Value=Parameters!agent.ValuetrueId_agencjiSystem.Int32SymbolSystem.StringBAZA_REKLAMSELECT Id_agencji, Symbol
FROM AGENCJE where aktywna=1
union
select NULL ,'Wszystkie'
order by SymboltrueID_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.ID_Agencji in (@agencja)) and a.aktywny=1
union
select NULL,'Wszyscy','costam'
order by A.Symbol=Parameters!agencja.ValuetruelabelSystem.StringvalueSystem.Int32BAZA_REKLAMSELECT SYMB as label, id as value
FROM [LISTA TYTUŁÓW] where st_aktywny = -1
union
select 'Wszystkie',NULLtruerokSystem.Int32BAZA_REKLAMselect distinct year(DATA_W) as rok from dbo.NR where DATA_W is not null and year(data_w)>2008 order by year(DATA_W)desctruePublic Shared Function Formatuj(ByVal Value As Integer) As String
Formatuj = Format(Value, "### ### ##0.## zł")
End Function21cm1cmtextbox80.25cm5cm2true15cm0.63492cm(wg daty wystawienia faktury)textbox90.25cm14cm1true1cm0.63492cm="ZESTAWIENIE MIESIĘCZNE SPRZEDAŻY WG WOJEWÓDZTW " & Parameters!rok.Value & "-" & Parameters!ms.Value