Creación y lectura de ficheros delimitados por comas

10 views
Skip to first unread message

Mikel Gómez

unread,
Jun 14, 2006, 11:21:40 AM6/14/06
to Foros focus
Un ejemplo sencillo de escritura y lectura de un fichero delimitado por comas:

-* pfmikcom.fex - 2006.05.14 - Mikel Gómez
-* Escritura y lectura de fichero delimitado por comas.
-*
-* Guardar master en aplicación
-* APP HOLDMETA ibisamp
-* Guardar datos en aplicación
-* APP HOLDDATA ibisamp
-* APP FILEDEF FICHERO DISK ibisamp/fichero2.csv
-* Guardar master y datos en aplicación.
-* APP HOLD ibisamp

-* Generación de fichero delimitado por comas con extensión csv (fichero.csv)
TABLE FILE CAR
SUM SALES
BY COUNTRY
ON TABLE HOLD AS FICHERO FORMAT COM
END
-RUN

-* Master y datos que se generan.
-*
-* FILENAME=FICHERO, SUFFIX=COM, $
-* SEGMENT=FICHERO, SEGTYPE=S1, $
-* FIELDNAME=COUNTRY, ALIAS=E01, USAGE=A10, ACTUAL=A10, $
-* FIELDNAME=SALES, ALIAS=E02, USAGE=I6, ACTUAL=A06, $
-*
-* "ENGLAND",12000
-* "FRANCE",0
-* "ITALY",30200
-* "JAPAN",78030
-* "W GERMANY",88190

-* Para lectura de datos delimitados con comillas dobles y
-* registro en una línea finalizando con retorno de carro.
SET PCOMMA = ON

-* Lectura de fichero delimitado por comas.
TABLE FILE FICHERO
PRINT *
END

Referencia:
http://documentation.informationbuilders.com/masterindex/html/html_wf_713/wf713ddlang/vsam2.htm#1027004

Reply all
Reply to author
Forward
Message has been deleted
0 new messages