Re: SQL Files - Source Based or Not?

[rob@xxxxxxxxx]

I too agree that keeping the source is helpful.  I tend to see stuff 
happen that many of you hopefully do not.  Why, I really cannot go into. 
But I have had file corruption of some files that weren't used often.  And 
in a library that only gets saved once every other month when we do a full 
system save.  By the time I noticed it was hosed it was when the SAVLIB 
*NONSYS aborted because it was so corrupted.  At that time attempting to 
retrieve the source via iNav was unable to complete either.  I had to 
recreate it from scratch.

Here's an interesting exercise:
CRTSRCPF FILE(ROB/QTBLSRC) RCDLEN(112)
STRSQL
SELECT SYSTEM_TABLE_SCHEMA, SYSTEM_TABLE_NAME, 
QCMDEXC('RTV...SRC TBL(' concat trim(SYSTEM_TABLE_SCHEMA) concat '/'
         concat trim(SYSTEM_TABLE_NAME) concat ') SRCFILE(' concat 
         trim(SYSTEM_TABLE_SCHEMA) concat '/QTBLSRC)') 
FROM systables 
WHERE SYSTEM_TABLE_SCHEMA='ROB' 
  AND TABLE_TYPE='P' AND FILE_TYPE='D' 
ORDER BY SYSTEM_TABLE_NAME 

You just have to build the RTV command.  :-)  Unless you can find one on 
the internet to do what iNav does.

Rob Berendt