#6
|
|||
|
|||
OPEN DATASET FILE FOR OUTPUT IN TEXT MODE ENCODING DEFAULT. * IF sy-subrc NE 0. * FORMAT COLOR 6 INTENSIFIED OFF. * ULINE AT (255). * WRITE: / sy-vline, * ' No se pudo crear al archivo : ', * 255 sy-vline. * FORMAT COLOR 2 INTENSIFIED OFF. * WRITE: / sy-vline, * ' ', FILE, * 255 sy-vline. * ULINE AT (255). * EXIT. * ENDIF. * LOOP AT T_CORREO. * LINEA+1 = T_CORREO-ROW2. * TRANSFER LINEA TO FILE. * TRANSFER file TO 'U:\txt'. * ENDLOOP. * * *CLOSE DATASET FILE. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|