================= ******** UNIDAD 6 ******** =================
******** Lección 4: "Archivos en Servidor: Sentencias OPEN Y READ" *********
Sentencias para el manejo de archivos en el servidor:
OPEN DATASET: Para la apertura de archivos del servidor
READ DATASET: Para la lectura de archivos
TRANSFER: Para transferir archivos
DELETE: Para borrar archivos
CLOSE: Para cerrar archivos
AUDIO: Con la TX AL11 vemos los directorios de SAP y incluso ver los archivos.
1. Usamos la sentencia OPEN_DATASET para apertura de archivos.
OPEN DATASET <archivo> FOR <ACCESS> IN <MODE>
------- Ejemplo ------
OPEN DATASET p_path FOR INPUT IN TEXT MODE ENCODING DEFAULT.
p_path es un parámetro de la pantalla de selección en donde el usuario ingresa al directorio y nombre del archivo.
2. Si queremos abrir el archivo para lectura adicionamos la sentencia FOR INPUT
OPEN DATASET <archivo> FOR INPUT IN TEXT <MODE>
------- Ejemplo ------
OPEN DATASET p_path FOR INPUT IN TEXT MODE ENCODING DEFAULT.
p_path es un parámetro de la pantalla de selección en donde el usuario ingresa al directorio y nombre del archivo.
3. Si queremos que el archivo se abra para escritura colocamos:
OPEN DATASET <archivo> FOR OUTPUT IN TEXT <MODE>
------- Ejemplo ------
OPEN DATASET p_path FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
p_path es un parámetro de la pantalla de selección en donde el usuario ingresa al directorio y nombre del archivo.
4. Si queremos abrir un archivo para agregar información usamos la cláusula FOR APPENDING.
OPEN DATASET <archivo> FOR APPENDING IN TEXT <MODE>
------- Ejemplo ------
OPEN DATASET p_path FOR APPENDING IN TEXT MODE ENCODING DEFAULT.
p_path es un parámetro de la pantalla de selección en donde el usuario ingresa al directorio y nombre del archivo.
5. Para abrir un archivo en modo texto colocamos IN TEXT MODE
OPEN DATASET <archivo> FOR <access> IN TEXT MODE ENCODING DEFAULT
------- Ejemplo ------
OPEN DATASET p_path FOR INPUT IN TEXT MODE ENCODING DEFAULT.
p_path es un parámetro de la pantalla de selección en donde el usuario ingresa al directorio y nombre del archivo.
6. Para abrir un archivo en modo binario colocamos IN BINARY MODE
OPEN DATASET <archivo> FOR <access> IN BINARY MODE ENCODING DEFAULT
------- Ejemplo ------
OPEN DATASET p_path FOR INPUT IN BINARY MODE.
p_path es un parámetro de la pantalla de selección en donde el usuario ingresa al directorio y nombre del archivo.
7. Usamos la sentencia READ_DATASET para lectura de los archivos del servidor.
READ DATASET <archivo> INTO <escritura>
------- Ejemplo ------
READ DATASET p_path INTO st_archivo.
IF sy_subrc = 0.
MOVE CORRESPONDING st_archivo TO ti_archivo.
APPEND ti_archivo.
CLEAR: ti_archivo, st_archivo.
ELSE
EXIT.
ENDIF.