Creación y lectura de ficheros delimitados por tabuladores

[Mikel Gómez]

Un ejemplo sencillo de escritura y lectura de un fichero delimitado
por tabuladores:

-* pfmiktab.fex - 2006.05.15 - Mikel Gómez
-* Escritura y lectura de fichero delimitado por tabuladores.
-*
-* 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.tab)
TABLE FILE CAR
SUM SALES
BY COUNTRY
ON TABLE HOLD AS FICHERO FORMAT TAB
END
-RUN

-* Master que se genera (SUFFIX=TAB).
-*
-* FILENAME=FICHERO, SUFFIX=TAB, $
-* SEGMENT=FICHERO, SEGTYPE=S1, $
-* FIELDNAME=COUNTRY, ALIAS=E01, USAGE=A10, ACTUAL=A10, $
-* FIELDNAME=SALES, ALIAS=E02, USAGE=I6, ACTUAL=A06, $
-*
-* Datos donde el espacio en blanco sería un tabulador.
-*
-* ENGLAND 12000
-* FRANCE 0
-* ITALY 30200
-* JAPAN 78030
-* W GERMANY 88190
-*

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

Referencias:
http://documentation.informationbuilders.com/masterindex/html/html_wf_713/wf713ddlang/vsam2.htm#1027004
http://documentation.informationbuilders.com/masterindex/html/html_iway523/i_ts/sonf52ts.html#1400273