40242fa0-fe63-4503-9b91-7d44853fe5d6BAZA_REKLAM29.7cmString=Year(Today)Rok:ListaLatrokrokString=Month(Today)Miesiąc:123456789101112trueString1Wydawca:12truetrue21cm0.15cmtrue1cm1cm1cm2661b0cd-3740-45bd-b535-f053889b340621cmID_FAKTURYSystem.Int32CustomerIdSystem.Int32Id_AgencjiSystem.Int32kodKlientaSystem.StringNUMERSystem.Int32NUMER_ROZSystem.StringNUMER_ROKSystem.Int32nettoSystem.DecimalS_VATSystem.DoublevatSystem.DecimalbruttoSystem.DecimalliczbaReklamSystem.Int32suma_zaplatSystem.DecimalDATA_WYSTAWIENIASystem.DateTimeDATA_SPRZEDAZYSystem.DateTimeTERMIN_ZAPLATYSystem.DateTimezaplata_dataSystem.DateTimezaplata_opisSystem.StringidZamowieniaSystem.Int32KOREKTASystem.ByteidFakturyKorektaSystem.Int32agentSystem.Stringwaluta_bruttoSystem.Doublewaluta_mianoSystem.StringidFakturyVATSystem.Int32ID_FK_KORSystem.Int32NR_FAKTURY_KOREKTYSystem.StringNUMER_FSystem.Int32NUMER_ROZ_FSystem.StringNUMER_ROK_FSystem.Int32netto_FSystem.Decimalbrutto_FSystem.Decimalvat_FSystem.Decimalsuma_zapłat_FSystem.Decimaldata_wystawienia_FSystem.DateTimeNR_FAKTURYSystem.Stringroznica_nettoSystem.Decimalroznica_vatSystem.Decimalroznica_bruttoSystem.DecimalagencjaSystem.Stringwaluta_roznica_bruttoSystem.Doublenr_korygowanejSystem.Int32NR_FAKTURY_KORYGOWANEJ_1System.StringSystemKsiegowyIdSystem.ByteBAZA_REKLAMSELECT * FROM View_Korekty
WHERE YEAR(data_wystawienia)=@rok
AND MONTH(data_wystawienia) IN (@miesiac)
AND SystemKsiegowyId IN (@systemKsiegowy)=Parameters!rok.Value=Parameters!miesiac.Value=Parameters!systemKsiegowy.ValuetruerokSystem.Int32BAZA_REKLAMselect distinct year(DATA_W) as rok from dbo.NR where DATA_W is not null and year(data_w)>2008 order by year(DATA_W)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 Function18.9562cm1cm