AW: Qcmdexc

Hi Murali,

sorry I sent the last message to early!

the QCMDEXC-API has 2 required parameters and a third optional parameter.
The first parameter is a character field with an length between 1 and 32702
Bytes
containing the CL-Command to be executed.
The second parameter is a 15,5 decimal packed field containing the length of
the CL-Command passed in parameter 1.
As long as you use a parameter list, it is not possible to pass a parameter
with a different definition.

If you work with prototyping, you can add the key word CONST to the second
parameter.
This allows you to use a different definition for the second parameter.
The key word CONST causes that a copy of the parameter with the expected
definition
is created and the address of this copy is passed to QCMDEXC.

For more information about the API QCMDEXC check the following link:
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/ic2924/info/apis/qcmde
xc.htm

Birgitta


-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von murali dhar
Gesendet: Montag, 3. Oktober 2005 16:52
An: RPG programming on the AS400 / iSeries
Betreff: Qcmdexc


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..
Can some one let me know whats wrong?



---------------------------------
Yahoo! for Good
 Click here to donate to the Hurricane Katrina relief effort.
--
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.