RE: Indicator name

Barbara,

Again, didn't think of that.
Would the ExtFld be *in33 or just in33 (field in likerec)?

After using INDARA my problems were solved.
The program is pretty easy to follow, so now it can be used as a template
for maintenance in our shop.

Thanks,

Craig



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Barbara Morris
Sent: Thursday, March 19, 2009 7:28 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Indicator name

Craig Jacobsen wrote:

I'm writing a program (green screen) that uses a write and read
with a data structure name to the workstation.
Actually I'm trying to write this program as a skeleton program for
the rest of the programmers on staff.
I am using Eval-Corr to move data back and forth from input, output,
and disk (using likerec).
Is there a way to rename an indicator in the output buffer?
Right now, I have to Out02.in33 = *On; to protect a screen field on
add (33 protect n33 underline in dds).
I would like to use a named indicator like ProtectStatus.

Craig, if you change to use an externally-described DS instead of using
LIKEREC, you can rename the indicator subfields.

D outDs E ds extname(myfile:myrec:*output)
D qualified
D ProtectStatus...
D E extfld(*in33)

--
This is the RPG programming on the IBM i / System i (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.