Ver Mensaje Individual
  #1
Antiguo 23 de agosto de 2018, 15:56
Gatomalo
Forero
Última Actividad 01.07.2020 18:41
Posts Posts: 58
Likes enviados Enviados: 6
Likes recibidos Recibidos: 2
Tableta Lectura archivo secuencial
0 Inactivo Inactivo

Hola Amigos estoy migrando un archivo excel a un archivo plano de ahi a powercobol tengo dificultad al leer un archivo secuencial con mas de 50 caracteres la linea de lectura es la siguiente:
Código:
000002&09/06/15&TBI&"AYER VOMITO 4 VECES HOY DECAIDOHA TENIDO ERLICHIA"&ENRO+DEXA HEPAT&&&&&5.6&38.6&&
El "&" es el separador de campo.

Pero al leer lo toma de esta manera
Código:
000002&09/06/15&TBI&"AYER VOMITO 4 VECES HOY DECAIDO
HA TENIDO ERLICHIA"&ENRO+DEXA HEPAT&&&&&5.6&38.6&&
Código COBOL:
  1.   Perform varying I  from I by 1 until D(I) = "&" OR I > 700                                                      
  2.     CONTINUE  
  3.        move D(I) to NOM(II)
  4.        ADD 1 TO II
  5.        end-perform.

lectura en cobol.

"ojo al crear un tema no aparece el marcador de cobol en el foro."
Gatomalo is offline   Responder Con Cita