Hola.
Yo tengo un caso así y tambien separado con '|'
Lo copio en una carpeta del IFS y lo paso con CPYFRMSTMF a un fichero que he creado con
CRTPF FILE(ARCFIL/ftrstmf) RCDLEN(200)
Luego un programa que lee el fichero y con una subrutina como esta:
C Eval Longitut=%Len(%trim(Campo))
C Clear Posinicial
C Clear Index
C Dou Posfinal =0
C Add 1 Posinicial
C Eval Posfinal=%Scan('|':campo:Posinicial)
C If Posfinal<>0
C Eval Longitut=(Posfinal)-(posinicial)
C Eval valor=%Subst(Campo:Posinicial:Longitut)
C Add 1 Index
C Exsr Srmoucamps
C Z-add Posfinal Posinicial
C Endif
C Enddo
voy separando los campos.
Si tienes alguna duda ya sabes.
| "Andoni (Infonegocio)"
<[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED] 22/03/2006 11:54
|
|
Hola foro:
Tengo un fichero que recupero de un sitio FTP y en el que los campos me vienen
separados por el caracter "|". Son un montón de campos y el programa de pasar a
un fichero de 400 se me está complicando bastante.
¿Tiene alguien alguna rutina o algún truco para poder hacer algo de esto?.
Gracias
__________________________________________________
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 visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
