Fijate un parametro que dice donde esta permitido ejecutarse, 

tenes queexcluir *INTERACT

-----Mensaje original-----
De: gerardo.santillana [mailto:[EMAIL PROTECTED]
Enviado el: Jueves, 26 de Junio de 2003 12:54 p.m.
Para: [EMAIL PROTECTED]
Asunto: RE: Compilar comando


Perdon mi ignorancia pero donde le especifico este parametro, le intente con un 
parametro que dice:
Allow limited users  . . . . . .   *yes           

pero no funciono

se supone que este comando va a ejecutar un cl el cual le debe regresar un valor que 
es el que especifico con el parametro RTNVAL(*YES)

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]  



-----Original Message-----
From: Juan Carlos Paredes [mailto:[EMAIL PROTECTED]
Sent: Thursday, June 26, 2003 10:43 AM
To: '[EMAIL PROTECTED]'
Subject: RE: Compilar comando


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]

_____________________________________________________
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]

La informacion contenida en este correo es para uso exclusivo de los destinatarios del 
mismo.
Esta prohibido a las personas o entidades que no sean los destinatarios de este correo
realizar cualquier tipo de modificacion, copia o distribucion del mismo.
Si Usted recibe este correo por error tenga bien notificar al emisor y eliminarlo.

_____________________________________________________
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]

Responder a