RE: Data Area Name as a Variable

You need to give your DS a name....

D mydtaara ds 1024 dtaara(*var : dara_name)
D dara_name s 10a

C in mydtaara


Note as you don't have any DS subfields, you could simply define a standalone
1024 char field for your
data area.
D mydtaara s 1024a dtaara(*var : dara_name)
D dara_name s 10a


HTH,

Charles

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Arthur.Marino@xxxxxxxxxxxxxxxx
Sent: Tuesday, July 10, 2007 7:40 AM
To: RPG programming on the AS400 / iSeries
Subject: Data Area Name as a Variable

Forgive my ignorance, but I'm stumped. In upgrading a very
old legacy RPG program, I'd like to use a variable to hold
one of a dozen data area names (that are now hard-coded). We
are at V5R3. (Last Compiler PTF is SI17429.)

my 'D' specs:

D ds 1024 dtaara(*var : dara_name)
D dara_name s 10

The compiler likes the 'D' specs well enough, but when it
sees the 'IN'
statement, it fails saying that 'dara_name' in the IN
statement is not the name of a data area.

C in dara_name

Adding subfields under the 'ds', and every other variation
I've tried, makes no difference. I'm missing something really
basic, aren't I?
Thanks for any help.

Arthur J. Marino
Southern Container Corporation
--
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 e-mail transmission contains information that is intended to be
confidential and privileged. If you receive this e-mail and you are not a
named addressee you are hereby notified that you are not authorized to read,
print, retain, copy or disseminate this communication without the consent of
the sender and that doing so is prohibited and may be unlawful. Please reply
to the message immediately by informing the sender that the message was
misdirected. After replying, please delete and otherwise erase it and any
attachments from your computer system. Your assistance in correcting this
error is appreciated.