Si echas un vistazo a la ayuda, te dice que el valor RTNVAL(*YES) s�lo puede
utilizarse en mandatos que est�n restringidos a utilizaci�n desde programa,
as� que o quitas ese valor o en el mandato CRTCMD le especificas el
par�metro ALLOW para indicarle que s�lo se puede utilizar desde
programaci�n.
Espero que te ayude.
Juan Carlos
> -----Mensaje original-----
> De: gerardo.santillana [SMTP:[EMAIL PROTECTED]
> Enviado el: jueves, 26 de junio de 2003 17:35
> Para: [EMAIL PROTECTED]
> Asunto: Compilar comando
>
> Hola foro
>
> estoy tratando de compilar este comando pero me esta marcando un error:
>
> CMD PROMPT('Retrieve String Length')
>
> PARM KWD(STRING) TYPE(*CHAR) LEN(5000) MIN(1) +
> EXPR(*YES) VARY(*YES) PROMPT('String with +
> unknown length')
>
> PARM KWD(LENGTH) TYPE(*DEC) LEN(4 0) RTNVAL(*YES) +
> PROMPT('String length . . . . . (4 0)')
>
>
>
> el error es:
>
> * CPD0281 700 30 RTNVAL(*YES) valid only
> in CL programs or REXX procedures.
> * CPD0283 700 10 Default value of null
> pointer assumed.
>
>
> Cualquier ayuda es bienvenida, gracias
>
> Gerardo Santillana
> IT Department
> Delphi Mechatronic Systems
> US Ph: (956) 554.5832
> MX Ph: (88) 12.81.63/64/65 Ext. 5832
> e-mail [EMAIL PROTECTED]
>
>
>
>
> _____________________________________________________
> Forum.HELP400 es un servicio m�s de NEWS/400.
> � Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja, env�a el mensaje resultante de pulsar
> mailto:[EMAIL PROTECTED]
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]
