Re: ON-ERROR catches CPF2103 but not CPF2110

You're doing something wrong.

/copy routines/qapisrc,qcmdexc
d dsplyVar s 52a
/free
*inlr=*on;

monitor;
cmd='addlible myxlib';
callp qcmdexc(cmd:%len(cmd));
on-error;
dsplyVar=cmd;
dsply dsplyVar;
endmon;

monitor;
cmd='dltlib myxlib';
callp qcmdexc(cmd:%len(cmd));
on-error;
dsplyVar=cmd;
dsply dsplyVar;
endmon;

/end-free

call aa

Library MYXLIB not found. (CPF2110)
DSPLY addlible myxlib
Library MYXLIB not found. (CPF2110)
DSPLY dltlib myxlib
Rob Berendt