×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Mike -
I would put an continuation line on the file's F-spec to rename the record
format.
http://www.code400.com/forum/showthread.php/1668-Record-File-Renaming-in-RPG-III
As you discovered, the only other alternative is to rename the file so that
the record format name is different from the file name.
- sjl
"Dunk, Michael - Bognor" wrote in message
news:mailman.11666.1334933302.14575.rpg400-l@xxxxxxxxxxxx...
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.
------------------------------------------------------------------------------------------------------------
midrange.com
