4.15476cm58bc7198-b2fa-4939-89e9-e74e3118e4d01cmtrueSELECT kraj , SUM(NETTO) AS netto,COUNT(ILOSC) AS ilosc
FROM
(
SELECT ROUND(NETTO, 0) AS NETTO,
1 AS ILOSC,
DATEPART(YEAR, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]) AS ROK,
DATEPART(QUARTER, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]) AS KW,
CONVERT(INTEGER,(1.0+DATEPART(QUARTER, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]))/2) AS ROK_PO,
DATEPART(MONTH, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]) AS MS,
DATEPART(Week, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]) AS WW,
dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA], REKLAMA.TYTUŁ AS tytul, Agencje.Symbol as agencja, Agenci.Symbol as agent,
dbo.REKLAMA.ZAPŁACONO,
dbo.KLIENCI.Country as kraj
FROM
dbo.AGENCJE INNER JOIN dbo.AGENCI ON dbo.AGENCJE.Id_agencji = dbo.AGENCI.ID_AGENCJI
INNER JOIN dbo.REKLAMA ON dbo.AGENCI.Symbol = dbo.REKLAMA.[SYMBOL AKWIZYTORA]
INNER JOIN dbo.Klienci on dbo.Klienci.CustomerId = dbo.Reklama.CustomerId
WHERE
(dbo.REKLAMA.TYP = 'PŁATNA' OR dbo.REKLAMA.TYP = 'BARTER')
AND (dbo.REKLAMA.[ZATWIERDZONO DO DRUKU] = -1) AND (dbo.REKLAMA.[FAKTURA WYSTAWIONO] = 1)
AND (DATEPART(YEAR, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]) = @rok)
AND (DATEPART(month, dbo.REKLAMA.[FAKTURA DATA WYSTAWIENIA]) = @ms)
AND (@tytul is null OR REKLAMA.TYTUŁ = @tytul)
AND (@agencja is null OR Agencje.id_agencji = @agencja)
AND (@agent is null OR Agenci.ID_AGENTA = @agent)
)
AS R
GROUP BY kraj
ORDER BY kraj=Parameters!rok.Value=Parameters!ms.Value=Parameters!tytul.Value=Parameters!agencja.Value=Parameters!agent.ValueBAZA_REKLAMSystem.StringkrajSystem.DoublenettoSystem.Int32ilosctrueSELECT Id_agencji, Symbol
FROM AGENCJE where aktywna=1
union
select NULL ,'Wszystkie'
order by SymbolBAZA_REKLAMSystem.Int32Id_agencjiSystem.StringSymboltrueSELECT 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.ValueBAZA_REKLAMSystem.Int32ID_AGENTASystem.StringSymbolSystem.StringagencjatrueSELECT SYMB as label, SYMB as value
FROM [LISTA TYTUŁÓW] where st_aktywny = -1
union
select 'Wszystkie',NULLBAZA_REKLAMSystem.StringlabelSystem.Stringvaluetrueselect distinct year(DATA_W) as rok from dbo.NR where DATA_W is not null order by year(DATA_W)descBAZA_REKLAMSystem.Int32rokPublic Shared Function Formatuj(ByVal Value As Integer) As String
Formatuj = Format(Value, "### ### ##0.## zł")
End Function21cm29.7cmen-US1cm21cm