Gerardo:
Compilalo con parametro ALLOW(*IPGM *BPGM)
Saludos
Marti Riera
----- Mensaje Original -----
De: "gerardo.santillana" <[EMAIL PROTECTED]>
Fecha: Jueves, Junio 26, 2003 5:35 pm
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]
