bbcc12ab-5eed-4510-b210-1b3b99539ad1BAZA_REKLAM29.7cmStringtrueprawa_agencjetrueStringtrueprawa_agenttrueString=Year(Today)rokListaLatrokrokString=Month(Today)miesiac123456789101112StringListaAgencjiSymbolagencjaListaAgencjiSymbolSymboltrueStringListaAgentowSymbolagentListaAgentowSymbolSymboltrueStringListaTytulowSYMBtrueTytułListaTytulowSYMBSYMBtrueString2sortuj wg: 0123true21cm0.25cmtrue1cm1cm1cm9353c331-a24b-4f88-bbef-a42cfe8acfb229.7cmID_FAKTURYSystem.Int32SymbolSystem.StringNumerFakturySystem.Int32SymbolFakturySystem.StringkodKlientaSystem.StringsymbolPotwierdzeniaSystem.StringrodzajPotwierdzeniaSystem.StringNettoSystem.DecimalVatSystem.DecimalBruttoSystem.DoubleDATA_WYSTAWIENIASystem.DateTimeTERMIN_ZAPLATYSystem.DateTimeSPOSOB_ZAPLATYSystem.StringAgencjaSystem.StringdataWplatySystem.DateTimeroznica_nowaSystem.Int32suma_zaplatSystem.Decimalzaplata_dataSystem.DateTimeroznica_staraSystem.Int32procentProwizjiSystem.DoubleTytulSystem.StringWyroznienieSystem.Int32=Fields!agencja.ValueIn=Parameters!agencja.Value=Fields!Symbol.ValueIn=Parameters!agent.ValueBAZA_REKLAMSELECT ID_FAKTURY, LOWER(Symbol) AS Symbol, NumerFaktury, NR_FK AS SymbolFaktury, kodKlienta, symbolPotwierdzenia, rodzajPotwierdzenia, Netto, Vat, Brutto, DATA_WYSTAWIENIA,
TERMIN_ZAPLATY, SPOSOB_ZAPLATY, Agencja, dataWplaty, roznica_nowa, suma_zaplat, zaplata_data, roznica_stara, procentProwizji, Tytul, Wyroznienie
FROM WplywyByTytul
WHERE
YEAR(dataWplaty) = @rok
AND MONTH(dataWplaty) = @miesiac
AND Tytul IN (@tytul)
AND Wyroznienie=1
ORDER BY Symbol, NumerFaktury=Parameters!rok.Value=Parameters!miesiac.Value=Parameters!tytul.ValuetrueId_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 (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.ValuetrueSYMBSystem.StringBAZA_REKLAMSELECT SYMB
FROM [LISTA TYTUŁÓW]
WHERE (st_aktywny = - 1)truerokSystem.Int32BAZA_REKLAMselect distinct year(DATA_W) as rok from dbo.NR where DATA_W is not null order by year(DATA_W)desctruePublic Shared Function Formatuj(ByVal Value As Integer) As String
Formatuj = Format(Value, "### ### ##0.00 zł")
End Function25.57937cm1cm