home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / Anwendun / BUDGT13C / DOKU / SPARDA.MAC < prev   
Encoding:
Text File  |  1999-01-10  |  2.8 KB  |  66 lines
  1. [beispielmakro zur überweisung bei der SPARDA-bank münster eg]
  2. [zunächst zur kontoleitseite der SPARDA-bank münster eg]
  3. ^V(1)                    [anwahl]
  4. ^E(1)                    [echokontrolle an]
  5. \*SPARDA\#^D(100)        [sparda banken anwählen]
  6. 2^D(100)                [verbindung herstellen]
  7. 21^D(20)                [auswahl spardabank münster]
  8. 13^D(20)                [bankrechner anwählen]
  9. 19^D(100)                [rechnerverbindung auch wirklich herstellen]
  10. 1234567^D(100)            [benutzernummer]
  11. @QKN\CR^D(100)            [kontonummer des eigenen kontos (achtung 
  12. feldlänge)]
  13. @PIN^D(100)                [pin des kontos]
  14. 19^D(100)                [abschicken]
  15. 1^D(100)
  16. [kontoleitseite anwählen]
  17. 3^D(100)                [auswahl überweisung per heute]
  18.  
  19. [@BEG                     start überweisungsblock]
  20.  
  21. 90^D(100)                [auswahl neue überweisung]
  22. @EMP(27)^D(100)            [empfänger]
  23. @ZKN(10)^D(100)            [kontonummer des empfängerkontos]
  24. @ZBL(8)^D(100)            [bankleitzahl]
  25. @BTR(12)^D(100)            [betrag dm,pf]
  26. @WAE(3)^D(100)            [waehrungsbezeichnung]
  27. @TX1(27)^D(100)            [text 1]
  28. @TX2(27)^D(100)            [text 2]
  29. n^D(100)                [empfängerdaten speichern hier nein]
  30. 19^D(100)                [daten abschicken hier ja (19) sonst 2]
  31. @TAN(6)^D(100)            [tan]
  32. [hier nochmal eine notbremse zum kontrollieren alertbox !!]
  33. ^A(1,"[2][ABSCHICKEN][  JA  | NEIN ]",m_ja,m_nein)
  34. ^m_nein:
  35. 2^D(100)                [daten nicht abschicken]
  36. ^G(m_weiter)            [weiter geht es]
  37. ^m_ja:
  38. 19^D(100)                [daten abschicken ]
  39. ^m_weiter:
  40. \#^D(100)                [zurück auf leitseite]
  41. [@END                     ende des überweisungsblocks]
  42. ^V(0)                    [abwahl btx und ende]
  43. [die folgenden daten sind als kommentar und beschreiben]
  44. [den aufbau einer btx-datei des kontoauszuges]
  45. [@IMP                                    start des importblockes]
  46. [@BTF(MMM.MMM,PP)                        format des DM-betrages "." trennt]
  47. [                                        1000er "," trennt ganze DM von PF]
  48. [                                        gilt auch für den Export !!!]
  49. [@DAF(TT.MM.JJJJ)                        datumsformat für import ]]
  50. [@DZM(2)                                minimal 2 zeilen pro datensatz]
  51. [@SBE(Buchungstext)                        text vor 1. datenzeile]
  52. [@SEN(Zu diesem Konto sind weitere Um)    text nach einem datenbereich]
  53. [@IEN(Zu diesem Konto sind keine weiteren)    letzter text bei import]
  54. [                                        danach gibt es keine daten mehr]
  55. [@DST(@DAW(10,1);@DAB(10,13)) aufbau der 1. datenzeile wie]
  56. [folgt : 1.) DAW(8,1)   : werstellungsdatum ab position 1; 8 zeichen lang]
  57. [         2.) DAB(8,10)  : buchungsdatum ab position 10; 8 zeichen lang]
  58. [         wird dieses zeilenformat gefunden, beginnt ein neuer datensatz]
  59. [@DSE(@FTX(1,        );@BTR(14,21);@WAE(3,36)) datensatzende wie folgt :]
  60. [    1.) FTX(1,        )    : fester text start ab position 1 mit 8 leerzeichen]
  61. [   2.) BTR(14,21)        : betrag mit 14 zeichen ab position 21]
  62. [    3.) WAE(3,36)        : währungsbezeichnung mit 3 zeichen ab position36]
  63. [@DZE(@EMP(27,1))    2. zeile : empfänger ab position 1; 27 zeichen lang]
  64. [@DZE(@TX1(27,1))    3. zeile : text1 ab position 1; 27 zeichen lang]
  65. [@DZE(@TX2(27,1))    4. zeile : text2 ab position 1; 27 zeichen lang]
  66.