*entry Plist

[Anderer, Ludwig]

Hallo Karl-Heinz,

das war genau der richtige Tip.
Ich habe das Original in DIW211RT kopiert und auch so immer umgewandelt.
Übrigens verstehe ich jetzt auch was B. Hauser in ihren Dokumenten mit MYPGM meint.

Danke für die schnelle Antwort

Jetzt habe ich nachdem die Umwandlung OK (00) ist ein neues Problem.
Bei der Ausführung bekomme ich die Meldung > Zeiger nicht auf die Position gesetzt auf die Bezug genommen wird.
Ich mache einen interaktiven Aufruf wie folgt:
CALL PGM(DIW211R) PARM('01017400025777917000185100000')

Frage: wo klemmt es jetzt !? Im Debug zeigt er im ersten Feld
Invers weiss, Ziffer, Invers weiss. Das sieht mir nach einem Hex-Wert aus.
P1FA = 0 .

[Fuerchau]

Du erwartest im PI 3 Parameter von bestimmter Ausprägung.
Du übergibst aber nur 1 Parameter.

[Anderer, Ludwig]

Wenn ich das richtig verstehe, läßt PR PI in der dargestellten Ausprägung keinen Komplettsting zu

Ich habe unter *entry Plist immer den dargestellten Parm
in seiner gesamten Länge wie abgebildet übergeben und in den D-Bestimmungen entsprechend aufgelöst.
Wie wird diese Übergabe dann abgebildet !?

[Fuerchau]

Definere eine DS und gib diese als einzigen Parameter an.

[Anderer, Ludwig]

Hallo Herr Fuerchau,

habe heute Morgen genau diesen Vorschlag nach einiem herumprobieren abgebildet.
Anbei das Programm

DDIW211E PRExtPgm('DIW211R')
d EPArm0 29
d*
dDIW211E PI
d EParm0 29
d*
d/Copy$DIW211E
***************** Datenanfang ************************************************** *****************
D* Parm-Übergabe zw. DIW210R + DIW211R Aufruf von DIW210R
D* erstellt am 19.03.2009 von: L. Anderer
D*
DEParm1 DS Inz
D P1FA 1 3 0 Firma
D P1KDNR 4 10 KundenNr.
D P1ANR 11 17 0 AuftragsNr
D P1ARTN 18 24 ArtikelNr.
D P1PANZ 25 29 0 Anz.Paletten
D*
// R e c h e n b e s t i m m u n g e n
//*************************************
Eval Eparm1 = Eparm0;
// Lesen NVEBPP
Exsr Sub100;

// ZYKLUS-ENDE
Eval Eparm0 = Eparm1;
Eval *InLr = *On;
//*************************************

Danke noch einmal für die Hilfe !!

L. Anderer