Lo tengo definido de la siguiente forma:
FILE-CONTROL.
SELECT Fichero ASSIGN TO FORMATFILE-Fichero-SI.
FD Fichero LABEL RECORD IS OMITTED.
01 RIMP.
COPY DDS-ALL-FORMATS OF Librer�a-Fichero.
Estoy de acuerdo en que todos est�n agrupados dentro del nivel 01 RIMP.
Pero lo que me despista es que si yo inicializo DETA-O que esta en un nivel 05, me
inicialice tambi�n el CABE-O. Eso significa que cada vez que yo inicialice cualquier
registro asociado al RIMP tendr� que volver a informar el resto de formatos
?�?�?�?�?�?�?�
Por otra parte observo que tanto CAB-O como DET-O parece ser que tienen la misma
estructura y eso no es as�.
Cuando yo hago un INITIALIZE me tendr�a que inicializar solamente el registro de
formato que yo estoy especificando en el INITIALIZE y no todos los formatos que est�n
asociados a un mismo nivel 01. Otra cosa muy diferente seria que yo inicializara el
nivel 01, entonces si que entiendo que me inicialice todos los formatos de registro
asociados a dicho nivel.
-----Mensaje original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Enviado el: jueves, 03 de junio de 2004 12:24
Para: [EMAIL PROTECTED]
Asunto: RE: cobol, inicializacion registros fichero impresora
Me imagino que habr�s definido en el Cobol el fichero as�:
FD IMPR.
01 RIMPR.
COPY DDS-ALL-FORMATS-O OF IXXX.
Ya es lo normal, todos los formatos est�n debajo del nivel 01. O sea, todos
comparten el mismo registro RIMPR.
De todas formas no veo ning�n problema, es una forma de trabajar.
-----Mensaje original-----
De: Miquel Lerin [mailto:[EMAIL PROTECTED]
Enviado el: jueves, 03 de junio de 2004 12:14
Para: [EMAIL PROTECTED]
Asunto: RV: cobol, inicializacion registros fichero impresora
Hola forum, tengo la siguiente situaci�n, a ver si me pod�is ayudar.
Tengo un pgm cobol, que realiza un listado. El fichero de impresora esta
compuesto por los siguientes registros:
Registro de cabecera: CABE
Registro de detalle: DETA
Registro de totales: TOTA
La situaci�n es que cuando realizo una inicializaci�n del registro DETA-O,
me reinicializa el registro CABE-O y viceversa ocurre lo mismo.
�Alguien se le ocurre por que?
Gracias.
Un saludo.
[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]