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]

Responder a