Debes crear el fichero en una bliblioteca de trabajo con un solo PFILE
y complilar el programa en esta biblioteca de esta manera no te dar� error

Despues con un CRTDUPOBJ creas el programa en la biblioteca de usuarios





From: augustp <[EMAIL PROTECTED]>
Reply-To: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: Re: Unir dos ficheros con un logico
Date: Wed, 15 Jan 2003 09:08:46 +0100

Muchas gracias Yolanda la verdad es que la segunda opcion despues de
enviar el mensaje ya la habia encontrado lo que ahora no se es como
poder trabajar en un programa RPG400 con este logico ya que me da error
de registro duplicado.

 No puedo tocar los ficheros para cambiar el formato a uno de ellos por
que hay muchos programas que acceden a los dos ficheros.

Saludos y gracias de nuevo
August

----- Mensaje Original -----
De: "Yolanda M" <[EMAIL PROTECTED]>
Fecha: Miercoles, Enero 15, 2003 8:55 am
Asunto: Re: Unir dos ficheros con un logico

> Puedes hacerlo de 2 maneras
>
> 1.-
> Tal como apuntabas teniendo en cuenta que cada formato de registro
> debe
> tener un nombre distinto lo que te obliga a poner todos los campos
> que
> quieras utilizar en cada formato
> >   R FORR1                      PFILE(BIBLI1/FORF)
>      campo1
>      campo2
>      campo3
>      campo4
> >   K FORTIP
> >   K FOREXP
> >   R FORR2                      PFILE(BIBLI2/FORF)
>      campo1
>      campo2
>      campo3
>      campo4
> >   K FORTIP
> >   K FOREXP
>
> 2.-
> Compila el logico en una biblioteca de trabajo con un solo PFILE y
> sobre
> este compila el programa a utilizar.
> En una biblioteca comun crea el logico con la siguiente DDS
> >   R FORR                      PFILE(BIBLI1/FORF)
>                                PFILE(BIBLI2/FORF)
> >   K FORTIP
> >   K FOREXP
>
>
>
>
>
> >From: augustp <[EMAIL PROTECTED]>
> >Reply-To: [EMAIL PROTECTED]
> >To: [EMAIL PROTECTED]
> >Subject: Unir dos ficheros con un logico
> >Date: Wed, 15 Jan 2003 08:37:28 +0100
> >
> >Buenos dias foro
> >
> >Tengo dos bibliotecas con el mismo fichero me intesaria si es posible
> >unir estos dos ficheros con un logico.
> >
> >De tal manera que al trabajar con el en los programas trabajen tanto
> >con registros del fichero de la biblioteca 1 o de la biblioteca 2
> >
> >Seria algo parecido a esto
> >-----------------------------------------------------
> >   R FORR                      PFILE(BIBLI1/FORF)
> >   K FORTIP
> >   K FOREXP
> >   R FORR                      PFILE(BIBLI2/FORF)
> >   K FORTIP
> >   K FOREXP
> >
> >
> >
> >_____________________________________________________
> >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]?body=LEAVE
>
>
> _________________________________________________________________
> MSN Fotos: la forma m�s f�cil de compartir e imprimir fotos.
> http://photos.msn.es/support/worldwide.aspx
>
>
> _____________________________________________________
> 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]?body=LEAVE
>



_____________________________________________________
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]?body=LEAVE

_________________________________________________________________
MSN. M�s �til Cada D�a http://www.msn.es/intmap/


_____________________________________________________
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]?body=LEAVE

Responder a