RE: CEETSTA API

["Bartell, Aaron L. (TC)" <ALBartell@xxxxxxxxxxxxxx>]

If %Addr(Parm2) = *Null;
 // *Omit was used
Else
 // Parameter was passed
EndIf;

That is how I have been doing it anyways, is this incorrect?  Why are you
thinking you need to use CEETSTA?

Aaron Bartell

-----Original Message-----
From: cozzi@xxxxxxxxx [mailto:cozzi@xxxxxxxxx]
Sent: Thursday, August 28, 2003 10:48 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: CEETSTA API


Carlos,
If %PARMS = 1, then parmater 2 was not passed in at all.
If %PARMS = 2, then you also need to use CEETSTA to check to see if
the caller passed in *OMIT for the 2nd parameter. So you have to do
both in one situation and just one in the other.
-Bob

> 
> 
> Given this prototype:
> 
> DValidHnd         PR
> D Parm1                          5U 0 CONST
> D Parm2                          5U 0 CONST 
> D                                     OPTIONS(*OMIT:
> D                                             *NOPASS)
> 
> Is it correct to use the CEETSTA API to test whether
> the second parameter
> was passed or not without checking for %PARMS > 1 ?
> 
> Carlos Kozuszko.
> 
> 
> ------------
> Internet GRATIS es Yahoo! Conexión
> 4004-1010 desde Buenos Aires. Usuario: yahoo; contraseña: yahoo
> Más ciudades: http://conexion.yahoo.com.ar
> _______________________________________________
> 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 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.