Hi Everyone,
I'm writing an OAR handler for a DSPF. There are a large number of messages defined in the DSPF by keyword ERRMSGID and they are controlled by indicators. And I need to get the message ID that is active from the OAR handler so that it could be passed back to the caller program. Is there any way I could get it except checking the indicators?
DSPF:
RPGLE:
I'm writing an OAR handler for a DSPF. There are a large number of messages defined in the DSPF by keyword ERRMSGID and they are controlled by indicators. And I need to get the message ID that is active from the OAR handler so that it could be passed back to the caller program. Is there any way I could get it except checking the indicators?
DSPF:
HTML Code:
A R RCDFMT1 A TEXT('Detail Screen') A CA01 A 05 CA03 A 02 CA23 A HELP(10) A BLINK A LOCK A FLD001 R O 1 14REFFLD(FLD1) A 98 96N91 AAN92 93 94 AA 95N07 ERRMSGID(MSG0001 *LIBL/MSGF) A 98 96N91 AA 92N93N94 AAN95N07 ERRMSGID(MSG0002 *LIBL/MSGF) A 98 96N91 AA 92N93N94 ......
RPGLE:
HTML Code:
...... FFILE1 CF E WORKSTN INFSR(*PSSR) HANDLER(HLDPGM) ...... C IF FLD001 = 'ABC' C MOVE *ON *IN98 C MOVE *ON *IN96 C MOVE *OFF *IN91 C MOVE *OFF *IN92 C MOVE *ON *IN93 C MOVE *ON *IN94 C MOVE *ON *IN95
Comment