Re: Help - Simple Coding Problem

Joe Teff wrote:

>Rename your file FCITY to something else. Run your query with the option
>to create the file. Use DSPFFD to see how the record format was created.
>Change the DDS for FCITY to match this. Now you can compile your RPG. Also
>change your query to replace the member vs replacing your file and you
>won't have the level check problem.
>
>Joe Teff
>QDS
>Bloomington, MN


Once the Query has re-created the file FCITY, you should be able to
re-compile the RPG program without fussing with the DDS you created by
hand:  the DDS is implied by the Query, and the file FCITY can be used as
an externally defined file in RPG.

--Paul E Musselman
PaulMmn@ix.netcom.com

>----------
>> From: Cathy Wilbur <cwilbur@alpha.uwindsor.ca>
>> To: MIDRANGE-L@midrange.com
>> Subject: Help - Simple Coding Problem
>> Date: Tuesday, August 12, 1997 5:08 PM
>>
>> Have the following coded:
>> a) a query called VALIDCITY which updates a file FCITY
>> b)  a Physical File definition through file design aid called FCITY
>> c)  an RPG program that uses FCITY file as input.
>>
>> Want to use the FCITY file in the RPG program so I defined
>> a Physical File definition so I would have identifiable fields to
>> reference in my RPG program.
>>
>> Am encountering the following errors:
>> ==================================
>> 1. When I rerun my WRKQRY command I cannot recompile my RPG
>>     program that uses FCITY because the field names for the file have
>>     changed so I have undefined fields.
>>
>> 2. If I compile my Physical file definition, then compile my RPG
>>     program, then run my WRKQRY command to create the data
>>     in the file then I get a level check on file FCITY when I go to
>>     execute the RPG program.
>>
>> ERROR: The file actually opened, the record format level
>> identifiers supplied by the program does not match the file actually
>> opened.  Recovery -- Compile program again, specify the *NO
>> value for LVLCHK parameter as an override using the appropriate
>> OVRDBF, OVRDSPF, OVRCFF, or OVRPRTF command.
>>
>> How do I correct this problem.  Is probably something really simple
>> but I cannot seem to fix it.   Thanks in advance.
>>
>> ____________________________________________________
>> Cathy Wilbur           Phone: (519) 253-3000 ext 2745
>> Computing Services       Fax: (519) 973-7083
>> University of Windsor  Email: cwilbur@uwindsor.ca
>> Windsor, Ontario
>> CANADA


* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *