Hi,
I'm modifying a program that we use in our development area that deletes
account record in the development area then copies accounts from our
production area into the development area.
The delete part is an SQLRPGLE program and in that program I want to
verify that the file the delete statement is going over is not in the
production library. There are overrides going on in the job stream prior
to the delete program and I am pretty sure that they are getting removed,
but I want to put a fail-safe into the delete program. This program can be
run over the development and QA areas so I don't want to qualify the
library on the delete statement.
Is there a way to get the library name where a file is found in an sql
statement?
Say I am going to run the following:
C/EXEC SQL
C+ DELETE FROM ITSEAR02
C+ WHERE DIGITS(SRCTRY) || DIGITS(SRPGM#) || DIGITS(SRPAC#) IN
C+ (SELECT DIGITS(EFCTRY) || DIGITS(EFPGM#) || DIGITS(EFPAC#) FROM
C+ ITCPYACT)
C/END-EXEC
Is there a way, before I run the statement, to get the library where the
program finds this file?
Thanks,
Matt Hopkins
Sr. Programmer/Analyst
Web: www.pdpgroupinc.com
Email: MWHopkins@xxxxxxxxxxxxxxx
Office: 410-584-0330
Fax: 410-584-0336
Cell: 410-258-8845
The information contained in this communication may be confidential, is intended only for the use of the recipient named above, and may be legally privileged. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution, or copying of this communication, or any of its contents, is strictly prohibited. If you have received this communication in error, please re-send this communication to the sender and delete the original message and any copy of it from your computer system. Thank you.
For more information please visit:
http://www.pdpgroupinc.com
midrange.com
