Michael,

If the element that is causing the problem is your RPG program, then I'd recommend fixing the problem in RPG, and leave the file object alone...

Your error relates to having a "previously defined" symbol name. The file and record formats are the same name, and this causes the conflict as noted in your compile listing. SQL defined files originally had no real notion of record format, so DB2 just used the file name as the record format name.

In RPG, on the F-spec, you have the option to rename the record format. I'm not sure if you are using RPG/400, or RPG ILE, but both languages offer the format rename option.

Hth,
-Eric DeLong

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Dunk, Michael - Bognor
Sent: Friday, April 20, 2012 9:48 AM
To: RPG400-L@xxxxxxxxxxxx
Subject: Is there a single CL command to change record format name?

Creating a file named DIBDWF3 with an AS/400 query, to be read in RPG was causing QRG2122.

Looking at a similar program written some time ago by someone else, the query file read by RPG had a different record format name.

Using Google I found two links:

http://search400.techtarget.com/tip/Changing-existing-physical-files-record-format wasn't something I could do in a CL program

The following article leads me to wonder if there isn't a command to change a record format name.

http://www.mcpressonline.com/tips-techniques/sql/techtip-sql-and-i5os-record-format-names.html

The only way I could find to solve this, was to use RNMOBJ to rename the file. Then the record and file name have different names, a similar to the above article. Do you know if there is a simple way to change a record format name?

The compilation error in the RPG program attempting to read the file was:
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....0....+....1....+..
H *****
300 FDIBDWF3 IF E DISK 20/04/12
400 * Query file 19/04/12 S
* 2122 300 RECORD NAME DIBDWF3 PREVIOUSLY DEFINED AS FILE NAME.
RECORD FORMAT(S): LIBRARY MY_LIB FILE DIBDWF3.
EXTERNAL FORMAT DIBDWF3 DROPPED DUE TO ERROR OR IGNORE.


Best regards,

Mike


------------------------------------------------------------------------------------------------------------
John Wiley & Sons Limited is a private limited company registered in England with registered number 641132.
Registered office address: The Atrium, Southern Gate, Chichester, West Sussex, United Kingdom. PO19 8SQ.
------------------------------------------------------------------------------------------------------------

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].