Hubert
26-04-07, 08:07
Hallo zusammen,
ich poste die Anfrage hier noch einmal; beim ersten Mal habe ich das falsche Forum erwischt.
Beim Aufruf einer Prozedur (steht in einem Service Programm) erhalte ich die Fehlermeldungen
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QDBGETKY at statement *N,
instruction X'0CD1'.
The call to ADDORD2SHP ended in error (C G D F).
die Prozedur sieht so aus:
P AddOrd2ShpmOrd B export
d PI 2
d pcusno 6 0 value
d pShipment 7 0 value
d pOrdno 6 0 value
c Key klist
c kfld pcusno
c kfld pordno
c key setll ssshlc30
c if %found(ssshlc30)
c return '1'
c else
c eval CUSNO = pcusno
c eval SSSHPMID = pShipment
c eval ORDNO = pOrdno
c write SSHC30
c
c return '0'
c endif
p e
Im Debugger habe ich lokalisiert, dass der Fehler beim SETLL auftritt. Hat jemand eine Idee, was da falsch läuft?
Danke
Hubert
ich poste die Anfrage hier noch einmal; beim ersten Mal habe ich das falsche Forum erwischt.
Beim Aufruf einer Prozedur (steht in einem Service Programm) erhalte ich die Fehlermeldungen
Pointer not set for location referenced.
Function check. MCH3601 unmonitored by QDBGETKY at statement *N,
instruction X'0CD1'.
The call to ADDORD2SHP ended in error (C G D F).
die Prozedur sieht so aus:
P AddOrd2ShpmOrd B export
d PI 2
d pcusno 6 0 value
d pShipment 7 0 value
d pOrdno 6 0 value
c Key klist
c kfld pcusno
c kfld pordno
c key setll ssshlc30
c if %found(ssshlc30)
c return '1'
c else
c eval CUSNO = pcusno
c eval SSSHPMID = pShipment
c eval ORDNO = pOrdno
c write SSHC30
c
c return '0'
c endif
p e
Im Debugger habe ich lokalisiert, dass der Fehler beim SETLL auftritt. Hat jemand eine Idee, was da falsch läuft?
Danke
Hubert