RE: ON-ERROR catches CPF2103 but not CPF2110

Interesting.

Seems that my problem is relative to the WDSC debugger as it works correctly
when I use STRDBG from green screen.

After upgrading to WDSC 7.0 I am needing PTF SI27072 for the debugger (per
Verify Connection). I though I could get by without it :-( I will load the
PTF and see what happens (I actually tried loading this PTF last week, but
it didn't seem to load).

Thanks,
Aaron Bartell
http://mowyourlawn.com

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of rob@xxxxxxxxx
Sent: Tuesday, May 08, 2007 9:18 AM
To: RPG programming on the AS400 / iSeries
Subject: 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
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"albartell" <albartell@xxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
05/08/2007 09:49 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
cc

Fax to

Subject
ON-ERROR catches CPF2103 but not CPF2110






I am doing some RPG unit testing which entails creating/deleting libraries
on the fly from RPG. If I execute DLTLIB LIB(MYLIB) and MYLIB doesn't
exists then CPF2110 is thrown, but the ON-ERROR clause I have wrapping the
DLTLIB call doesn't catch the error and instead immediately ends the
program. On the other hand if I do an ADDLIBLE LIB(MYLIB) when MYLIB
_doesn't_ exist a CPF2103 is thrown and the ON-ERROR clause _does_ catch
the
error.

Any thoughts?
Aaron Bartell
http://mowyourlawn.com