RE: Source PF member exists?

To all that responded...  THANKS!

Tim 

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Richard Casey
Sent: Monday, December 19, 2005 1:51 PM
To: Midrange Systems Technical Discussion
Subject: RE: Source PF member exists?

Tim,

The following CL should do it for you.

CHKOBJ OBJ(library/sourcefile) OBJTYPE(*FILE) MBR(membername) MONMSG
MSGID(CPF9815) EXEC(nomember) MONMSG MSGID(CPF9801) EXEC(nofile) MONMSG
MSGID(CPF9810) EXEC(nolib)

The "nomember" in the MONMSG statement for message ID CPF9815 would be
executed if the member did NOT exist. The other MONMSG statements check for
a non-existent source file (CPF9801) or a non-existent library (CPF9810).
There are probably some other errors you could check for, but this should
give you a start.

Hope this helps!
Richard


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Hatzenbeler, Tim
Sent: Monday, December 19, 2005 4:32 PM
To: 'Midrange Systems Technical Discussion'
Subject: Source PF member exists?


What's the easiest way to check, that a source PF member does not exists?  I
have a source code tool, that creates source code on the fly, but I don't
want it to overwrite any existing code, by accident.

Thanks, Tim


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.