ARCHIVOS EN SERVIDOR: OPEN Y READ.
Las principales sentencias son:
OPEN DATASET, READ DATASET, TRNSFER, DELETE, CLOSE.
Para la apretura de un archivo en el servidor usamos OPEN DATASET <archivo> FOR<access> IN <mode>
Sy-subrc=0 si es correcto, 8 de lo contrario.
Para abrir un archivo para la lectura utilizamos FOR IMPUT OPEN DATASET <archivo> FOR INPUT IN TEXT <mode>
el archivo que se intenta abrir debe existir, caso contrario sy-subrc es 8. si el archivo existe y esta abierto, el sistema se posicionara al comienzo del archivo.
Para abrir un archivo para la escritura utilizamos FOR OUTPUT, OPEN DATASET <archivo> FOR OUTPUT IN TEXT <mode>
Si el archivo no existe se creara automaticamente, Si existe pero esta cerrado el archivo se sobreescribe. Si existe y esta abierto, el sistema se posicionara al comienzo del archivo. Si la apertura fue correcta SY-SUBRC =0 de lo contrario 8.
Para abrir un archivo para agregar información utilizamos FOR APPENDING..OPEN DATASET <archivo> FOR APPENDING IN TEXT <mode>
Si el archivo no existe se creara automaticamente, Si existe pero esta cerradO, EL SISTEMA LO ABRIRA y se posicionara al final del mismo. Si existe y esta abierto, el sistema se posicionara al final del archivo. Siempre SY-SUBRC =0
LECTURA DE ARCHIVOS DEL SERVIDOR
Utilizaremos la sentencia READ DATASET
READ DATASET <archivos> INTO <ESTRUCTURA> Si la apertura fue correcta SY-SUBRC =0 de lo contrario 8.