RE: Qcmdexc

Undefined numerics are assumed packed by the compiler... 


Thanks,
Tommy Holden


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Joe Pluta
Sent: Monday, October 03, 2005 10:07 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Qcmdexc

Length should be packed, I think.  You have it zoned.

Joe

> From: murali dhar
> 
> D CMD     S   9A INZ('WRKOBJPDM')
> D CMD1    S  7A INZ('DSPLIBL')
> D LENGTH  S  15 5 INZ(9)
> D LENGTH1 S  15 5 INZ(7)
> C       CALL   'QCMDEXC'
> C       PARM              CMD1
> C       PARM              LENGTH1
> C       CALL   'QCMDEXC'
> C       PARM             CMD
> C       PARM               LENGTH
> C       SETON                     LR
> 
> When I tried to change decimal positions from 5  to other number (
tried
> diff combinations,like 16 6 etc..)for the fields LENGTH&LENGTH1, the 
> program is not working  and throwing exception which says command
length
> not valid..

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