RE: Moving display file record into a data structure

["Phil" <sublime78ska@xxxxxxxxx>]

I think you need to define another data structure:

 

Fscreen    cf   e             workstn                          

D screends      e ds                  extname(screen) prefix(@)

D screends2     e ds                  extname(screen)          

C                   eval      @fld001  = 'ONE'                 

C                   eval      @fld002  = 'TWO'                  

C                   eval      @fld003  = 'THREE'               

C                                                              

C                   move      screends      screends2          

C                   exfmt     record                            

C                                                              

C                   eval      *inlr = *on       

 

              

-----Original Message-----
From: owner-midrange-l@midrange.com [mailto:owner-midrange-l@midrange.com]On Behalf Of Bob Luebbe
Sent: Wednesday, April 25, 2001 9:05 AM
To: MIDRANGE-L@midrange.com
Subject: Moving display file record into a data structure

 

I cannot seem to move a display file record into a similar data structure without having to move the fields individually.  I've tried both a MOVE and an EVAL, such as EVAL   D1DS = D1, where D1DS is the data structure and D1 is the display file record format.  It will not allow a compile.

 

Any ideas?

 

Thanks,

 

Bob Luebbe