Hola y gracias a todos,
La situación que tengo es que el último campo para un tipo de registro es de 7
dígitos de los cuales 6 van con valor y el séptimo es blanco, tiene que ser un
fichero continuo puesto que cada registro es de longitud diferente. Parece que
según lo expuesto no tengo forma de salvar esta situación previo a la
generación del fichero, lo tengo que realizar una vez pasado a texto en el IFS.
No es lo que quisiera pero..
Saludos,
En la copia de fichero usando el *CRLF o *LF o *CR o *LFCR ya indica que :
“los registros del archivo de base de datos se transforman en líneas de
texto de archivo continuo de longitud variable a
medida que se copian. Se recortan todos los blancos de cola de cada registro
del archivo de base de datos. A continuación,
los datos se convierten al formato de datos de destino (si se especifica) y se
añade el carácter de fin de línea al final de la
línea de texto. La línea de texto se copia en el archivo continuo. “
La única excepción es que se indique ENDLINFMT(*FIXED)… pero supongo que esto
no te interesa, ya que no te añade los
caracteres de fin de línea. Otra posibilidad es añadir una posición más en la
que siempre se meta un carácter (p.ej. $ ).
De: forum.help400-boun...@listas.combios.es
<mailto:forum.help400-boun...@listas.combios.es>
[mailto:forum.help400-boun...@listas.combios.es] En nombre de Alex Martínez
Enviado el: lunes, 30 de enero de 2017 12:35
Para: forum.help400
Asunto: Re: Tratamiento de un fichero Continuo.
Yo te recomendaría que visualizaras en hexadecimal el final del archivo a ver
si hay "algo extra" además del CR+LF
El 30 de enero de 2017, 11:42, Joxean Muguruza (EKINFORMATIKA, S.L.)
<jmugur...@netekin.com <mailto:jmugur...@netekin.com> > escribió:
Buenos días,
Estoy teniendo un problema a la hora de recuperar un fichero continuo con un
aplicativo para incorporarlo,
La situación que se crea es en un registro cuyo último campo es de 7 caracteres
de longitud es valor que utiliza ocupa 6 por la izquierda y el 7 es un blanco.
La transferencia al IFS la hago con el comando CPYTOSTMF en el valor ENDLINFMT
estamos poniendo *CRLF para que ponga fin de registro y salto de campo.
Pero al editar el fichero, el registro con este campo tiene una posición menos,
no mantiene el blanco del último carácter del campo.
Se puede orientar esta situación.
Geacias,
Joxean Muguruza
E-mail: jmugur...@netekin.com <mailto:jmugur...@netekin.com>
Departamento de análisis y programación.
___________________________
EKINFORMATIKA, S.L.
C/ Jose Arana 15, Entlo. , Oficina 4
20001 San Sebastián
Tlfno: 943.28.22.21 <tel:943%2028%2022%2021> Fax: 943.32.72.00
<tel:943%2032%2072%2000>
E-mail:jmugur...@netekin.com <mailto:e-mail%3ajmugur...@netekin.com>
Web: <http://www.netekin.com/> www.netekin.com
Confidencialidad
Este correo electrónico y, en su caso, cualquier fichero anexo al mismo,
contiene información de carácter confidencial exclusivamente dirigida a su
destinatario o destinatarios y propiedad de Ekin. Queda prohibida su
divulgación, copia o distribución a terceros sin la previa autorización escrita
de Ekin, en virtud de la legislación vigente. En el caso de haber recibido este
correo electrónico por error, se ruega notificar inmediatamente esta
circunstancia mediante reenvío a la dirección electrónica del remitente y la
destrucción del mismo.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
