RE: Checking for existence of a global temporary table...

Check out the QUSROBJD API & good luck!!

Thanks,
Tommy Holden
HCA phone:  1-800-828-2561
direct line:  615-344-2151
fax: 1-866-593-0404



-----Original Message-----
From: Dane Cox [mailto:DCox@xxxxxxxxxxxxx]
Sent: Wednesday, September 22, 2004 3:53 PM
To: RPG programming on the AS400 / iSeries
Subject: Checking for existence of a global temporary table...


I have an SQLRPGLE program that does the following...
 
C/exec sql                                                   
C+ declare global temporary table mstable                     
C+ (mspgnm char(10),                                         
C+  mscode dec(7,0),                                         
C+  mssevr char(10),                                         
C+  mstype char(10),                                         
C+  msdesc char(80),                                         
C+  msovrd char(1))                                          
C/end-exec                                                   
 
I would like to be able to check to see if this table already exists in
QTEMP before attempting to create it again...using RPG or embedded SQL
in RPG.
 
Any thoughts?
 
Thanks,
Dane
 



NOTICE: This electronic mail message and any files transmitted with it are
intended exclusively for the individual or entity to which it is addressed.
The message, together with any attachment, may contain confidential and/or
privileged information. Any unauthorized review, use, printing, saving,
copying, disclosure or distribution is strictly prohibited. If you have
received this message in error, please immediately advise the sender by
reply email and delete all copies.



--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.