Re: Declaring a *dec data area

On Jun 28, 2018, at 3:53 PM, Roger Harman <roger.harman@xxxxxxxxxxx> wrote:

When I've used a numeric data area, it needed to be defined as zoned. And, need a colon separator, not comma.

dcl-s NextSeqNbr zoned(3:0) dtaara('EBS053SEQ');

Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power







From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxx> on behalf of Alan Shore <ashore@xxxxxxxx>
Sent: Thursday, June 28, 2018 1:41 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Declaring a *dec data area


Hi everyone
We are on V7r1

I am trying to declare a data area that is created as *DEC (3,2)
I tried the following
dcl-s Ovrhdr packed(3,2) dtaara('OVRHDTAARA');
But that received a compile error of

*RNF3402 20 a 012200 Length entry is not valid; defaults to blanks.
Pointing to the 3,2 in the compile listing

Anyone know what I am doing wrong?

As always - all answers gratefully accepted


Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l


RPG400-L Info Page - lists.midrange.com
lists.midrange.com
To unsubscribe from RPG400-L, get a password reminder, or change your subscription options enter your subscription email address:

or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD