CSV gemischt mit Satzformaten oder wie werde ich verrückt

[camouflage]

Franz-Georg,

noch kurz einige Erklärungen, damit Du nicht zuviel Grüblen musst.

Der erste Teil dient dem Verfizieren der Endposition. Sollte ein Wert mit " beginnen, ist zu prüfen ob es eine Konstante oder ein Feld mit entsprechendem Separator ("; ist.

Wurde die Feldendposition bestimmt, erfolgt ein Substring in den Array mit einem ersten Cleanup vom " (nur einstellig). Damit wären Felder wie "3;4" von diesen Zeichen befreit.

Der Shift entfernt den bearbeiteten Wert aus dem String. Heisst, der String wird solange abgearbeitet , bis nix mehr da ist.

Am Schluss reduziert der %scanrpl das "" Zeichen auf ein Einzelnes (Erstes und letztes Feld). Dies funktioniert nur in V7R1, ansonsten eine Schleife mit %%scan/%replace.

Hoffe, dies hilft.

[FNeurieser]

Hallo,

so mit dem ersten Ergebnis zurück, aber leider gleich einen kleinen Dämpfer für Camouflage: Was passiert, wenn, wie natürlich auch möglich, hinter einem ; erneut ein ; kommt, da das entsprechende Feld keinen Wert enthält?

Durch die Abfrage pos > 1 wird genau dies nicht erfasst und es kommt zu einem Dauerloop.

LG
Franz-Georg

[camouflage]

Hi,

Ist schon klar, aber auf die Schnelle hab ich nicht alle Fälle eingebaut...

Wollte Dir ja auch noch was überlassen

[camouflage]

Sonst kannst Du den Code so ergänzen:

 if pos >= 1;                                  
   ix += 1;                                    
   if pos = 1;                                 
     ara(ix) = *blanks;                        
   else;                                       
     ara(ix) = %trimr(%subst(src:1:pos-1));    
   endif;

ok?

[FNeurieser]

na ja wenn schon jemand so eine Lösung auf die
Schnelle anbietet wird man natürlich denkfaul

danke nochmal für die superlösung.