Re: Load a record into a data structure for DEBUGGING purposes.

That should not work.  And the reason is because basing the data structure 
on the address of the first field then assumes that the rest of the fields 
are contiguous in memory. 
You're better off to read into the DS directly.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Chris_Bougher@xxxxxxxxxxxxx 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
01/30/2004 07:45 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Fax to

Subject
Re: Load a record into a data structure for DEBUGGING purposes.







This might work.

Create a pointer that points to the first field in the file. then create a
data structure that is like your files record format and base it on the
pointer.

D recPtr                          *   Inz(%addr(firstField))

D recDs           ds                  likerec(RecordFormat)
D                                     based(recPtr)

I haven't tried it but I use a method like this to convert a series of
fields into an array. It should work for the whole record.

btw. Defining recDs with likerec() with automagically make it qualified.

Chris Bougher



  
                      "Peter Vidal"   
                      <Peter_Vidal@pall.        To:       RPG programming 
on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> 
                      com>                      cc:    
                      Sent by:                  Subject:  Re: Load a 
record into a data structure for DEBUGGING purposes. 
                      rpg400-l-bounces@m   
                      idrange.com   
  
  
                      01/30/2004 07:25   
                      AM   
                      Please respond to   
                      RPG programming on   
                      the AS400 /   
                      iSeries   
  
  





"Or, do you mean that the fields are being used in other data structures?"

Yes.  I am using fields in other data structures to handle months
quantities,
quarters quantities, etc. This is an update file; when I do my calcs using
these
fields, which facilitate my life a lot, I just have to UPDATE.

This program is working fine.  The problem I am trying to present is, when
I
DEBUG, I want to be able to display the whole record layout with the 
fields
and
values of them at that precise time.  I saw this accomplished on the data
definitions specifications when defining a data structure but I can't
recall...

We are in V5R2...

Peter Vidal
Pall Aeropower Corp.
SR Programmer Analyst
WWW.Pall.com
"My religion consists of a humble admiration of the illimitable superior
spirit who reveals himself in the slight details we are able to perceive
with our frail and feeble mind."
Albert Einstein



_______________________________________________
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.