6a2bec57-03d9-4f28-a49c-65e1805de702BAZA_REKLAM29.7cmString=Year(Today)-2trueokres2002=Year(Today)-4=Year(Today)-3=Year(Today)-2Stringtruetytuł:ListaTytulowvaluelabelStringtrueagencjaListaAgencjiId_agencjiSymbolStringtrueagentListaAgentowID_AGENTASymboltrue21cm0.25cmtrue1cm1cm1cm58bc7198-b2fa-4939-89e9-e74e3118e4d029.7cmROKSystem.Int32ROK_POSystem.Int32KWSystem.Int32MSSystem.Int32nettoSystem.DecimaliloscSystem.Int32tytulSystem.Int16agencjaSystem.StringagentSystem.StringBAZA_REKLAMSELECT ROK, ROK_PO, KW, MS, SUM(NETTO) AS netto, COUNT(distinct reklamaId) AS ilosc, tytul, agencja, agent
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
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) >= @od)
AND faktury.zaplata_data is not null
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)) AS R
GROUP BY ROK, ROK_PO, KW, MS, tytul, agencja, agent
ORDER BY ROK DESC, KW DESC, MS DESC=Parameters!okres.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.StringBAZA_REKLAMSELECT SYMB as label, SYMB as value
FROM [LISTA TYTUŁÓW] where st_aktywny = -1
union
select 'Wszystkie',NULLtruePublic Shared Function Formatuj(ByVal Value As Integer) As String
Formatuj = Format(Value, "### ### ##0.## zł")
End Function27.25cm1cmOutside0truetrue1wgDatyZaplaty_ZatwierdzoneDoDrukutrueOrthographicRealCylinder0PlainInsideInside0truetruetrueColumn=Fields!rok.Value=switch(Parameters!okres.Label="ROK","",Parameters!okres.Label="PÓŁROCZE",Fields!rok_po.Value,Parameters!okres.Label="KWARTAŁ",Fields!rok_po.Value,Parameters!okres.Label="MS",Fields!rok_po.Value)=switch(Parameters!okres.Label="ROK","",Parameters!okres.Label="PÓŁROCZE","",Parameters!okres.Label="KWARTAŁ",Fields!kw.Value,Parameters!okres.Label="MS",Fields!kw.Value)=switch(Parameters!okres.Label="ROK","",Parameters!okres.Label="PÓŁROCZE","",Parameters!okres.Label="KWARTAŁ","",Parameters!okres.Label="MS",Fields!ms.Value)Excel=Sum(Fields!netto.Value)=Code.Formatuj(Sum(Fields!netto.Value))Top-90true6pt
NETTO - zafakturowane (podział wg daty wystawienia faktury) i zapłacone