Importfefinition Volksbank
Hallo,
kann mir bitte jemand eine Importdefinition für die Volksbank zur Verfügung stellen? Ich bekomme das einfach nicht hin.
Dankeschön
-
Hallo Mague78
Kannst Du bitte schreiben, aus welchem Programm du die Kontoauszüge bekommst (VR-Networld, Onlinebanking der VB oder Profi-Cash??) und in welchem Format.
Hier mal ein Beispiel für VRNetWorld ...
' ---------------------------------------------------------------------------------
' Importdefinition für VrNetWorld CSV Export
' Auslieferung: Version 14.2.0
' Importeinstellungen:
' Quelle : Textdatei (*)
' Trennzeichen für Felder : Semikolon
' Trennzeichen für Datensätze: LF
' Zeichensatz für : IsoLatin1 (Windows)
' Text in Anführungszeichen : Doppelt"
' ---------------------------------------------------------------------------------
' Aktionen nur im ersten Durchlauf ausführen: Variablen deklarieren
if ( NOT HasVariable("zeile") )
dim zeile as number
endif
' Die Umsatzdaten beginnen erst ab Zeile 2, die Zeile davor verwerfen
set zeile to zeile + 1
if ( zeile < 2 )
set Vorlage_Zeile_OK to FALSE
exit
endif
' Abbrechen, wenn nicht mindestens 11 Felder in Importdatei vorhanden sind
if ( NOT HasVariable("Spalte_011") )
beep
msgBox("Fehler beim Lesen der Volksbank-Exportatei (Ungültiges Datensatzformat)!")
set Vorlage_Import_OK to FALSE
exit
endif
' Nur Zeilen mit echten Buchungsbeträgen importieren
if ( Spalte_006 = "" OR Spalte_003 = "0,00")
set Vorlage_Zeile_OK to FALSE
exit
endif
' ---------------------------------------------------------------------------------
' Importfelder den Datenfeldern zuordnen
' ---------------------------------------------------------------------------------
' Fortlaufende Buchhungsnummer
set Vorlage_Datum to TextToDate(Spalte_002)
' Referenz
if(Spalte_006 <> "")
set Vorlage_Referenz to Spalte_005
endif
' Text
if ( Spalte_006 <> "" )
set Vorlage_Text to ReplaceAll(Spalte_006, " ", "")
endif
' Betrag
set Vorlage_Betrag to FTextToNumber(Spalte_003)
' Notizen
if (Spalte_006 <> "")
set Vorlage_Notizen to "Auftragsart: " + Spalte_007
endif
' ---------------------------------------------------------------------------------
' Optional: Belegvervollständigung
' ---------------------------------------------------------------------------------
' Debitoren-/Kreditorenkonto bei gefundenem OP zuweisen
set Vorlage_Konto to GetKontoDebitor(Vorlage_Text, Vorlage_Betrag)
set Vorlage_Konto to IfThen(Vorlage_Konto = "", GetKontoKreditor(Vorlage_Text, Vorlage_Betrag), Vorlage_Konto)
' Set Referenz
set Vorlage_Konto to IfThen(PatternCount(Vorlage_Referenz, "Mercedes") > 0, "70781", Vorlage_Konto)
set Vorlage_Konto to IfThen(PatternCount(Vorlage_Referenz, "Vermieter") > 0, "4210", Vorlage_Konto)
set Vorlage_Konto to IfThen(PatternCount(Vorlage_Referenz, "ABSCHLUSS") > 0, "4970", Vorlage_Konto)
'Set Text
set Vorlage_Konto to IfThen(PatternCount(Vorlage_Text, "Gehalt") > 0, "1740", Vorlage_Konto)
Set Vorlage_Nummernkreis to "Giro"Dazu benötigst Du dann aber auch den passenden Export aus dem Bank-Programm.
Zb. mit folgenden Aufbau:
Format CSV, Spaltenüberschriften exportieren.
Exportierte Spalten
Datum, Valuta, Bertrag, Währung, Zahler/Empfänger, Verwendungszweck, Buchhungstext, Kundenreferenz, Ursprung, KontoauszugsnummerDamit klappt es zumindest aus der VRNetWorld Vers. 8.0
Bitte bleiben Sie gesund!
Rainer Helling
-
Ich kenne keine Möglichkeit aus dem Online-Banking eine Datei zur Weiterverarbeitung mit einem Programm zu erstellen. Evtl. kann man die Daten vom Kontoauszug in Excel einbringen und dann daraus eine CSV erstellen und so weiter, aber ich glaube kaum, dass es eine Arbeitsrsparnis bringt. Sorry.
Gruß
Rainer Helling
-
Mague78 Ich versteht das Problem noch nicht. Du lädst Dir das CSV aus dem Onlinebanking der Volksbank, kopierst Dir von oben die Importdefinition in Dein Monkey Office und importierst dann das CSV. Da ist kein weiterer Zwischenschritt notwendig.
Rainer Helling Darf ich Deine Importdefinition hier in die Sammlung aufnehmen? -
Mague78 Nein, für PayPal gibt es noch keine. Die für N26 nehme ich gern mit auf. Kannst Du einfach hier posten.
Da Du offensichtlich mehrer Banken nutzt, empfiehlt sich vielleicht ein Onlinebanking Programm, wie MoneyMoney (nur für den Mac). MoneyMoney verwaltet Deine Konten und exportiert in ein einheitliches Format für das Monkey Office eine Importdefinition mitliefert. -
Hallo Herr Stefano Kowalke,
anbei die Datei für N26
' ---------------------------------------------------------------------------------
' Importdefinition für Direktbank N26-Umsatzdateien
' Cleverbridge Referenz: 247285813
' Importeinstellungen:
' Quelle : Textdatei (*)
' Trennzeichen für Felder : Komma
' Trennzeichen für Datensätze: LF
' Zeichensatz für : UTF8
' Text in Anführungszeichen : Doppelt "
' ---------------------------------------------------------------------------------' Aktionen nur im ersten Durchlauf ausführen: Variablen deklarieren
if ( NOT HasVariable("zeile") )
dim zeile as number
endifif ( NOT HasVariable("betrag") )
dim betrag as text
endif' Die Umsatzdaten beginnen erst ab Zeile 2, die Zeile davor verwerfen
set zeile to zeile + 1
if ( zeile < 2 )
set Vorlage_Zeile_OK to FALSE
exit
endif' Abbrechen, wenn nicht mindestens 10 Felder in Importdatei vorhanden sind
if ( NOT HasVariable("Spalte_010") )
beep
msgBox("Fehler beim Lesen der Direktbank N26-Exportatei (Ungültiges Datensatzformat)!")
set Vorlage_Import_OK to FALSE
exit
endif' ---------------------------------------------------------------------------------
' Importfelder den Datenfeldern zuordnen
' ---------------------------------------------------------------------------------' Datum
set Vorlage_Datum to TextToDate(Spalte_001)' Text
if ( Spalte_002 <> "" )
set Vorlage_Text to Spalte_002
endifif ( Spalte_005 <> "" )
set Vorlage_Text to IfThen(Vorlage_Text = "", Spalte_005, Vorlage_Text + ": " + Spalte_005)
endif' Betrag (erst Dezimaltrennzeichen Punkt durch Komma ersetzen)
if ( Left(Right(Spalte_007, 3), 1) = "." )
set betrag to Replace(Spalte_007, ",", "")
set betrag to Replace(Spalte_007, ".", ",")
else
set betrag to Spalte_007
endifset Vorlage_Betrag to FTextToNumber(betrag)
' Nummernkreis
set Vorlage_Nummernkreis to "Standard"' ---------------------------------------------------------------------------------
' Optional: Belegvervollständigung
' ---------------------------------------------------------------------------------' Debitoren-/Kreditorenkonto bei gefundenem OP zuweisen
set Vorlage_Konto to GetKontoDebitor(Vorlage_Text, Vorlage_Betrag)
set Vorlage_Konto to IfThen(Vorlage_Konto = "", GetKontoKreditor(Vorlage_Text, Vorlage_Betrag), Vorlage_Konto) -
Hallo Friedrich Riemer,
falls diese Importdefinition https://github.com/Konafets/mo-bank-import-definitions/blob/main/VRNetWorld.txt nicht funktioniert, können Sie mich gern via info@arroba-it.de kontaktieren.
Beste Grüße
Bitte melden Sie sich an, um einen Kommentar zu hinterlassen.
Kommentare
18 Kommentare