Das ist relativ einfach, wenn man weiß wie;-)
Ich mache das täglich. Ich ziehe die Kundendaten aus dem Shopsystem (xt:Commerce) nach Filemaker rüber. Dort habe ich einen Button bei jedem Datensatz worüber ich das Skript "Lastschrifteinzug" ausführe.
Dieses Skript überträgt dann die Buchung an Bank X, ändert den Status auf "bezahlt" und geht dann zum nächsten Datensatz:
Wenn [BANKTRANSFER::SStatus /= "bezahlt"]
AppleScript ausführen [ macht die Übertragung an Bank X (s.u.)]
Wenn [Hole ( Letzte FeherNr ) = 0]
Feldwert setzen [BANKTRANSFER::Status; "bezahlt"]
Gehe zu Datens./Abfrage/Seite [Nächste(r); Nach letztem beenden]
Ende (wenn)
Ende (wenn)
Und jetzt hier das AppleScript zur Übertragung an Bank X
"tell application "Bank X"¶
set sourceAcc to first account of document 1 whose name is "MeinKonto"¶
tell document 1¶
create order cent " & HoleNtenDatensatz ( ORDERS_TOTAL::value ; Anzahl ( ORDERS_TOTAL::value ) ) * 100 & " source account sourceAcc client blz "" & BANKTRANSFER::banktransfer_blz & "" client name "" &BANKTRANSFER::banktransfer_owner& "" client number "" & BANKTRANSFER::banktransfer_number & "" name "Testlastschrift" type "debit" debit typ "einzug" bundle "yes" subject one "BSTNR " & ORDERS::orders_id & " vom " & KalendertagZahl ( ORDERS::date_purchased ) & "." & MonatZahl ( ORDERS::date_purchased ) & "." & Jahreszahl ( ORDERS::date_purchased ) & "" subject two "Vielen Dank"¶
end tell¶
end tell"
Hier bitte die Tabellen und "MeinKonto" entsprechend anpassen. Ich mache immer alle Lastschriften in einer Sammel Lastschrift. Wenn du das anders haben möchtest, dann musst du den Parameter entsprechend anpassen.
Ansonsten gibt es bei der BankX Software ja auch ein Beispiel.
Das Problem bei Filemaker, wo ich lange probiert hatte, liegt in den Zeilenumbrüchen. Da dürfen die ¶ Zeichen nicht fehlen und es müssen entsprechend die Zeilenumbrüche vorhanden sein. Frag mich aber nicht, wie da die Regel ist.
