PDA

View Full Version : ganzes Satzformat in Variable ?



hpw
15-10-01, 08:51
Hallo Gemeinde,

ich möchte ein ganzes Satzformat (Display und Disk) in 1 Variable kopieren, um später feststellen zu können, ob sich etwas geändert hat.
Hat jemand eine Idee?

Carsten
15-10-01, 09:27
Hallo,

ich habe das so gemacht:

1.zwei Variablen die man nachher vergleichen kann erstellen, die min. so lang sind wie das Satzformat:

D #ARCH1ALT DS INZ
D #FELD1 1 243
D #ARCH1NEU DS INZ
D #FELD2 1 243

2. Eine Datenstruktur erstellt die alle Felder des Satzformates enthält:

D #ARCH1DS DS INZ
D AZSTAT 1
D AZARNR 7 00
.
.
.

3. Die Datenstruktur im alten Zustand in die erste Variable einfüllen

C MOVEL(P) #ARCH1DS #ARCH1ALT


4. Nach einer eventuellen Veränderung die Datenstruktur in das zweite Feld einfüllen:

C MOVEL(P) #ARCH1DS #ARCH1NEU


5. Die beiden Felder können nun verglichen werden.

C IF #ARCH1ALT <> #ARCH1NEU

Viele Grüße

Carsten

hpw
15-10-01, 10:40
Hallo Carsten,

da ich sehr faul bin, wollte ich gerade vermeiden, eine Datenstruktur mit allen Feldern zu definieren.

Ich vermute aber, du hast jedes Feld einzeln definiert, weil das Satzformat als Ganzes zu definieren nicht möglich ist.

schreibr
15-10-01, 11:20
Hallo hpw, da ich ebenfalls sehr faul bin lass ich die Datenstruktur durch den Compiler selbst zusammenstellen. Die Anweisung im RPGLE lautet hierzu wie folgt:
* Datenstrukturen
DDSNAME E DS EXTNAME(Datei)

Gruss Reinhold

Carsten
15-10-01, 12:45
Man lernt nie aus.

Carsten

hpw
15-10-01, 13:23
Vielen Dank!!

genau das, was ich gesucht habe.
Kleiner Tip:

Prefix(xy) in der Fortsetzungszeile um doppelte Variablendefinition zu vermeiden.

Gruss HPW