Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Rob Green am 20.12.02 - 09:21:52

Titel: Textdatei einlesen
Beitrag von: Rob Green am 20.12.02 - 09:21:52
ich möchte gerne eine CSV Datei in Notes einlesen, nur hat die folgenden Aufbau:

KUNDE_A_BESTAND;B;C;D;E;F;G;H;I
KUNDE_A_ZAHLUNG;X;Y;Z
KUNDE_A_ZAHLUNG;X;Y;Z
..
KUNDE_B_BESTAND;B;C;D;E;F;G;H;I
KUNDE_B_ZAHLUNG;X;Y;Z
KUNDE_B_ZAHLUNG;X;Y;Z
KUNDE_B_ZAHLUNG;X;Y;Z
...
KUNDE_C_BESTAND;B;C;D;E;F;G;H;I
...

Das Dumme also: die Zeilen haben einen unterschiedlichen Satzaufbau, nämlich einmal den Typ "Bestandszeile" und einmal den Typ "Umsatzzeile", wobei sich beide auch durch die Anzahl der Datenspalten voneinander unterscheiden.

Frage: wie lese ich das in Notes am geschicktesten ein?
Mein Ansatz wäre, die Zeilen zeilenweise komplett einzulesen und erst im Notes dann separat zu trennen und zu bearbeiten (sprich: auf die richtigen Felder je nach Typ der Zeile aufbröseln)
Titel: Re:Textdatei einlesen
Beitrag von: Axel am 20.12.02 - 09:36:28
Hi,

würde ich genauso angehen.

Komplette Zeile einlesen und dann auswerten. Zum Beispiel so:

...
Input #fileNum%, zeile
 
If InStr$(Word(zeile, ";", 1), "BESTAND") Then
  doc.Feld1 = Word(zeile, ";", 2)
  ...
  doc.Feldx = Word(zeile, ";", 9)
Else
  doc.Feld1 = Word(zeile, ";", 2)
  ...
  doc.Feldx = Word(zeile, ";", 3)
End If
...

Die Word - Funktion ist die Scriptversion von @Word. Die findest du z.B. hier http://www.free.dominoserver.de/computer/noteslibrary.nsf (http://www.free.dominoserver.de/computer/noteslibrary.nsf)

Axel
Titel: Re:Textdatei einlesen
Beitrag von: eknori am 20.12.02 - 09:37:31
Hmm, ist doch eigentlich der ach so beliebte "Gruppenwechsel".

Datei zeile für zeile lesen:

1. Zeile ist immer der Bestandsdatensatz.

alle Folgezeilen sind Umsätze.

Andert sich der Name von A auf B ist das wieder eine Bestandszeile


eknori
Titel: Re:Textdatei einlesen
Beitrag von: Rob Green am 20.12.02 - 09:48:03
prima, und habt Dank  :)

(eknori, hab Dir was in Dein Forum gepostet...)