Variable Feldname

[svit]

Hallo *all ,

Problem:
ich habe eine Datei (PF) mit 40 Feldern.
in einer anderen Datei habe ich die Reihenfolge der Felder der ersten Datei festgelegt.
Beispiel:
Datei 1
Feld1|Feld2|Feld3|Feld4|
abc | 123 | efgd |9876|

Datei2
1|Feld4
2|Feld2
3|Feld1
4|Feld3

Jetzt müssen die Felder der Datei 1 als ein String in der hinterlegten Reihenfolge ausgegeben werden.

Wie kann ich das ohne 40 WHEN oder ELSIF Anweisungen lösen
Ev. mit mehrdimensionalen Array? Aber der muss auch erst gefüllt werden.

Gibt es ev. eval String =%Feldname('Feld4')

Fehlt euch AllOBJ-USER'n andere Möglichkeit?

[svit]

Guten Morgen *all

Erste Lösung:
1) mittels DSPFFD die Beschreibung der DATEI1 in eine Qtemp-Datei erstellen.
2) Über das Feldname kann Startposition und die Lenge ermittelt werden (über die Qtemp-Datei)
3) DATEI1 als ein String betrachten.

Ist das zu Kompliziert? kann das noch einfacher und weniger Quell-Code gelöst werden ?

[ExAzubi]

Sind die Felder alle gleich lang? Wenn ja, kannst du ein Array über die Datei legen und diesesn dann sortieren.

[svit]

Hallo,
alle Felder haben unterschiedliche Namen und Größen.

[B.Hauser]

Guten Morgen *all

Erste Lösung:
1) mittels DSPFFD die Beschreibung der DATEI1 in eine Qtemp-Datei erstellen.
2) Über das Feldname kann Startposition und die Lenge ermittelt werden (über die Qtemp-Datei)
3) DATEI1 als ein String betrachten.

Ist das zu Kompliziert? kann das noch einfacher und weniger Quell-Code gelöst werden ?

Anstatt eine temporäre Datei zu erstellen solltest Du die benötigten Informationen (mit SQL) direkt aus der Catalog View SYSCOLUMNS in der Bibliothek QSYS2 auslesen.

Basierend auf den ausgelesenen Informationen könntest Du ein Dynamisches SQL SELECT Statement aufbereiten, das die Feld-Inhalte konvertiert und als String aufbereitet. Über einen Cursor kann dann dieses SELECT-Statement verarbeitet werden.

Birgitta

[Fuerchau]

SQL ist hier wirklich die einzige Lösung für dieses Variabilität.
Woher kommt denn so eine blöde Aufgabenstellung?

[BenderD]

SQL ist hier wirklich die einzige Lösung für dieses Variabilität.
Woher kommt denn so eine blöde Aufgabenstellung?

... lass mich raten: vom Ausbilder!!!

[svit]

ne,

ich muss eine PF in XML mappen.
Die PF hat 120 Felder.
Über die PF müssen 5 verschiedene XML Dateien erstellt werden.
Das ganze soll in der Nacht laufen.

na, was sagt ihr jetzt zu dem bösen Ausbilder.

[andreaspr@aon.at]

Nur so nebenbei:
Ab 7.1 kann man das Ergebnis eines ganzes Selects mit allen Joins usw. als XML ausgeben lassen.
lg Andreas

[camouflage]

Kleine simple Frage:

Wieso erstellst Du dir nicht die gewünschte Datei als physische Datei mit der gewünschten Feldreihenfolge und kopierst die erste Datei mittels CPYF und *map/*drop rüber?

Manchmal kann die Lösung so einfach sein.

[Fuerchau]

@Andreas
Diese Standards passen dann selten zu den gewünschten Schnittstellen.

@SVIT
Dann denkst du viel zu kompliziert!
Die Reihenfolge der Datenfelder spielt bei XML nur eine untergeordnete Rolle, darum brauchst du dich eigentlich nicht zu kümmern.
Felder in XML werden nämlich über ihre
a) Attributbnamen
oder
b) Knotennamen
referiert.

Sollt du die Inhalte z.B. als Attribut übergeben so ist es Egal ob du

< Satz Att1="A" Att2="B" >

oder

< Satz Att2="B" Att1="A" >

ausgibts.
Das Selbe gilt auch für Strukturen:

< Satz >

< F1 > Wert1 < /F1 >
< F2 > Wert2 < /F2 >

oder

< Satz >

< F2 > Wert2 < /F2 >
< F1 > Wert1 < /F1 >

ausgibst.
Kümmere dich also gar nicht um die Reihenfolge sondern nur um das korrekte XML-Format.

[Fuerchau]

Wer sagt denn, dass man mit SQL kein XML ausgeben kann bzw. erst V7R1 benötigt?

select
 
'< satz > att1="' concat char(F1) 
concat '" att2="' concat char(F2) 
concat '" < /satz >'
 
from 
....

Dabei ist es nun unerheblich ob per Knoten oder Attribute ausgegeben werden soll.

Das Ganze in einen QM-Query stellen.
Mit STRQMQRY in eine Ausgabedatei und per CPYTOSTMF ins IFS und fertig ist die XML.

Benötigt man nochden XML-Header so lässt sich dieser
a) in einer Datei konstant ablegen und ebenso per CPYTOSTMF ausgeben
b) per "Select ... union all ..." auch hier einbinden.