3f5f953a-7bf9-4bc0-82e4-053699a1917fBAZA_REKLAM11inStringtrueprawa_agencjetrueStringtrueprawa_agenttrueInteger=Year(Today)truerokListaLatrokrokInteger=Month(Today)truems123456789101112trueStringListaAgencjiSymboltrueagencjaListaAgencjiSymbolSymbolStringListaAgentowSymbolagentListaAgentowSymbolSymboltruetrue8.5in0.25cmtrue2.5cm2.5cm2.5cmb53c8872-8ac1-476c-846e-6d4d059c465821cmrokSystem.Int32BAZA_REKLAMselect distinct year(DATA_W) as rok from dbo.NR where DATA_W is not null order by year(DATA_W) desctrueId_agencjiSystem.Int32SymbolSystem.StringBAZA_REKLAMSELECT Id_agencji, Symbol
FROM AGENCJE where aktywna=1 and (@prawa_agencje is null or @prawa_agencje= Id_agencji)=Parameters!prawa_agencje.ValuetrueID_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 aktywny=1 AND (A2.Symbol in (@agencja) OR A2.Symbol is null) AND (@prawa_agent is null OR A.Symbol=@prawa_agent)
order by A.Symbol=Parameters!agencja.Value=Parameters!prawa_agent.ValuetrueSymbolSystem.StringRokSystem.Int32DataSystem.DateTimeNettoSystem.DoubleBAZA_REKLAMselect
K.kodKlienta + '/' + convert(varchar, Z.nrZamowienia) + '/' + Z.kodAgenta + '/' + convert(varchar, Z.rokZamowienia) as Symbol,
Z.rokZamowienia as Rok,
[data zamówienia] as Data,
Netto
from Zamowienia as Z
inner join Reklama R on R.idZamowienia = Z.idZamowienia
inner join Klienci K on K.CustomerID = Z.idKlienta
where zafakturowano=0
order by [data zamówienia] desctruePublic Function GetMonths(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 Function27.57937cm1cm