LEE1:             RCVF RCDFMT(TPLANF)
MONMSG     MSGID(CPF0864) EXEC(GOTO CMDLBL(FIN))      -> TE INDICA FIN DE
FICHERO

IF COND(               ) THEN DO()

---
---
---
ENDDO

GOTO       CMDLBL(LEE1)

FIN:        ENDPGM
_____________________________________________
Jose Luis Aguilera
Analista
Ediciones Rueda JM, S.A.
Los Mesejo, 15
28007 Madrid
Tfno:914 343 883 / 914 343 860  Ext: 166
Fax: 915 518 161


                                                                       
             "Juan Gutierrez                                           
             Ruiz"                                                     
             <juan_gutierrez_r                                        Para
             [EMAIL PROTECTED]>          "AS400EZ" <[EMAIL PROTECTED]>,
             Enviado por:              "AS400_ES"                      
             forum.help400-req         <[EMAIL PROTECTED]>, "AS400"
             [EMAIL PROTECTED]           <[EMAIL PROTECTED]>         
                                                                        cc
                                                                       
             30/11/04 16:22                                         Asunto
                                       como leer una base de datos dentro
                                       de un cl                        
                Por favor,                                             
                responda a                                             
             [EMAIL PROTECTED]                                         
                  bios.es                                              
                                                                       
                                                                       





Foro  , buenos dias, nesecito leer una base de datos que tienes clave   y
nombre  pero dentro de un cl  se que se puede definir con,
INICIO:
DCLF       FILE(ADAMFA/TPLAN) RCDFMT(TPLANF)



Y LUEGOP LO PONGO EN UN DO




COMO LEO EL CAMPO CLAVE PARA PASARLO COMO PARAMETRO
Y COMO DETECTO EL FIN DE ARCHIVO , AUTOMATICO, SOLO SON 15 CLAVES
SI ALGUIEN TIENE UN EJEMPLO SE LOS AGRADECERE

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

_____________________________________________________________________
 Mensaje analizado y protegido, tecnologia antivirus www.trendmicro.es


_____________________________________________________
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