Textdatei einlesen

[Rob Green]

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)

[Axel]

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

Axel

[eknori]

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

[Rob Green]

prima, und habt Dank  

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