Robi
10-08-01, 09:56
Hallo, *All
In einer Prozedur habe ich die Schnittstelle
folgendermassen def. :
D GETVORGS PI 3
D empf_ZYKL 3 const
D chg_STAT 2 Option(*varsize)
D empf_JN 1 const option(*nopass)
Wenn ich nun chg_stat 1-stellig übergebe
kommt MÜLL an (immer mal was anderes)
Bsp
d AuftZykl s 3 inz('ABC')
d AuftStat s 1 inz('0')
(AuftZykl und AuftStat sind in echt Dateifelder)
c eval vorgang=getVorgs(AuftZykl:AuftStat)
empfangen wird in getVorgs ABC 00
wenn ich testweise chg_stat auf 7 stellen
ändere, kommt ABC 00Ns3.. an
%len und %size geben falsche Werte zurück
Was kann ich tun, um in der Prozedur die empfangene Feldlänge zu bestimmen
(chg_Stat kann nicht CONST werden da ich es ggf. in der Procedur verändern muß und diesen Wert im rufenden Program auch brauche.
Danke
Robi
In einer Prozedur habe ich die Schnittstelle
folgendermassen def. :
D GETVORGS PI 3
D empf_ZYKL 3 const
D chg_STAT 2 Option(*varsize)
D empf_JN 1 const option(*nopass)
Wenn ich nun chg_stat 1-stellig übergebe
kommt MÜLL an (immer mal was anderes)
Bsp
d AuftZykl s 3 inz('ABC')
d AuftStat s 1 inz('0')
(AuftZykl und AuftStat sind in echt Dateifelder)
c eval vorgang=getVorgs(AuftZykl:AuftStat)
empfangen wird in getVorgs ABC 00
wenn ich testweise chg_stat auf 7 stellen
ändere, kommt ABC 00Ns3.. an
%len und %size geben falsche Werte zurück
Was kann ich tun, um in der Prozedur die empfangene Feldlänge zu bestimmen
(chg_Stat kann nicht CONST werden da ich es ggf. in der Procedur verändern muß und diesen Wert im rufenden Program auch brauche.
Danke
Robi