RE: move record format to a data structure

["Carel Teijgeler" <coteijgeler@xxxxxxxxx>]

Lim,

The DS of the DSPF and the DS of the PF must have an identical lay out to do an 
 error free copy. The best advise has already been given: use the PREFIX on one 
DS (QUALIFIED may not work properly here).

And is there not a possibility to READ a record into a DS with V5R2? 

Regards,
Carel Teijgeler.

*********** REPLY SEPARATOR  ***********

On 4-6-03 at 9:16 Lim Hock-Chai wrote:

>What I need is to save the current screen data to a data structure. 
>
>I'm not able to remove the qualified keyword because the field names of
>the input file, in the program, have the same field names on the screen. 
>There is already a DS declared with the file name.
>
>-----Original Message-----
>From: Booth Martin [mailto:Booth@xxxxxxxxxxxx]
>Sent: Wednesday, June 04, 2003 6:32 AM
>To: rpg400-l@xxxxxxxxxxxx
>Subject: Re: move record format to a data structure
>
>
>If I understand what you are trying to do, you can make another Data
>structure (Or even a field) with the name:
> 
>D CurrentValues  E DS   extname(DSPFILE :DSPFILE01) qualified
>D DSPFILE01Bef     S    Like(CurrentValues)
>...
>C Move CurrentValues  DSPFILE01Bef
> 
> 
>---------------------------------------------------------
>Booth Martin   http://www.MartinVT.com
>Booth@xxxxxxxxxxxx
>---------------------------------------------------------
> 
>-------Original Message-------
> 
>From: RPG programming on the AS400 / iSeries
>Date: Tuesday, June 03, 2003 2:36:56 PM
>To: RPG programming on the AS400 / iSeries
>Subject: move record format to a data structure
> 
>correction:
> 
>is there anyway to move a record format to a data structure without declare
>a DS with the record format name? For example: display file name DSPFILE
>has
>a record format of DSPFILE01. I want to be able to do the following:
> 
>FDSPFILE CF E WORKSTN 
> 
>D DSPFILE01Bef E DS extname(DSPFILE :DSPFILE01) qualified
> 
> 
>C move DSPFILE01 DSPFILE01Bef
>C . . . 
> 
> 
>I get the following compile error:
>*RNF7260 30 12159 951623 The Factor 2 operand DSPFILE01 is not valid for
>the
>specified operation. 
>. 
>
>_______________________________________________
>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.
>
>
>_______________________________________________
>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.