6a2bec57-03d9-4f28-a49c-65e1805de702BAZA_REKLAM21cmInteger=Year(Today)-1Od roku:ListaLatrokrokInteger=2trueGrupuj wg:012StringListaAgencjiSymbolAgencja:ListaAgencjiSymbolSymboltrueStringListaAgentowSymbolAgent:ListaAgentowSymbolSymboltrueStringListaTytulowSYMBTytuł:ListaTytulowSYMBSYMBtruetrue29.7cm0.25cmtrue1cm1cm1cm58bc7198-b2fa-4939-89e9-e74e3118e4d029.7cmAgencjaSystem.StringAgentSystem.StringTytulSystem.StringIloscKlientowSystem.Int32SumaNettoSystem.DecimalRokSystem.Int32KwartalSystem.Int32MiesiacSystem.Int32BAZA_REKLAMSELECT
Agencja,
Agent,
Tytul,
COUNT(KlientNazwa) AS IloscKlientow,
ROUND(SUM(Netto), 2) AS SumaNetto,
Rok,
Kwartal,
Miesiac
FROM FakturyNettoByTytul
WHERE (YEAR(Data) >= @od)
AND Tytul IN (@tytul)
AND Agent IN (@agent)
--AND Agencja IN (@agencja)
GROUP BY Agencja, Agent, Tytul, Rok, Kwartal, Miesiac
ORDER BY Agent, Rok DESC, Kwartal DESC, Miesiac DESC, Tytul=Parameters!od.Value=Parameters!tytul.Value=Parameters!agent.ValuetrueId_agencjiSystem.Int32SymbolSystem.StringBAZA_REKLAMSELECT Id_agencji, Symbol
FROM AGENCJE
WHERE aktywna=1trueID_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) )
order by A.Symbol=Parameters!agencja.ValuetrueSYMBSystem.StringBAZA_REKLAMSELECT SYMB
FROM [LISTA TYTUŁÓW]
WHERE (st_aktywny = - 1)rokSystem.Int32BAZA_REKLAMSELECT DISTINCT YEAR(DATA_W) AS rok
FROM dbo.NR
WHERE DATA_W IS NOT NULL
AND YEAR(DATA_W)>2007
ORDER BY YEAR(DATA_W) DESCtruePublic Shared Function Formatuj(ByVal Value As Integer) As String
Formatuj = Format(Value, "### ### ##0.## zł")
End Function36.33333cm1cm