RE: LDA Question

[Mark Walter <mwalter@xxxxxxxxxx>]

I stand corrected. I researched the procedure that I wrote, and it was getting 
a data area call LDA not the *LDA. sorry.

-----Original Message-----
From:   Shaw, David [SMTP:dshaw@spartan.com]
Sent:   Monday, April 03, 2000 2:54 PM
To:     'RPG400-L@midrange.com'
Subject:        RE: LDA Question

You're not running S/36 MAPICS II on the machine, are you?  Or is it a modified
installation - I've heard of installations which had migrated from S/34 or S/36
who had modifications that copied the "Program Communications Area" (official
name) to the *LDA so that they could deal with it that way, but I've never seen
one?  Where I used to work, we had a lot of add-on reports written in Sequel
which would pop a version of the MAPICS LDA into *LDA so the Sequel reports
could get things like the user name and workstation ID, since Sequel doesn't
support passed parameters but does support *LDA.  That usually only happened in
batch jobs, though, not interactively.

One of the first mistakes I made as a beginning RPG and MAPICS programmer was to
try to get the MAPICS LDA info out of the *LDA data area on the /38.  The *LDA
was blank, of course - this was MAPICS I, back in 1986.

> -----Original Message-----
> From: Mark Walter [mailto:mwalter@netrax.net]
 
> 
> I wrote a program to display the 'LDA' while in the middle of 
> a Mapics job and saw a bunch of stuff relating to MAPICS.
> 
> -----Original Message-----
> From: Shaw, David [SMTP:dshaw@spartan.com]
> Sent: Monday, April 03, 2000 12:07 PM
> To:   'RPG400-L@midrange.com'
> Subject:      RE: LDA Question
> 
> Mark,
> 
> S/38 and AS/400 native versions of MAPICS do not and never 
> have used the system
> LDA (*LDA) for anything.  MAPICS programs have data 
> structures named "LDA", but
> if you look at where the data in them comes from, you'll find 
> that the program
> is getting it from one of the following:
> 1) A passed-in program parameter named "LDA".
> 2) Fields in the Jobs Active (JOBACT) file which are 
> concatenated together into
> "LDA".
> 3) A data area created in QTEMP for the job by MAPICS job 
> initialization named
> "ZZLDA".
> 
> Dave Shaw
> Spartan International, Inc.
> Spartanburg, SC
> 
> > -----Original Message-----
> > From: Mark Walter [mailto:mwalter@netrax.net]
> > 
> > One word of caution. If you are using Mapics, be very careful 
> > manipulating
> > the LDA. Mapics uses it extensively.
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---