Segue exemplo bem simples de como transformar um SPOOL “SP01” para um arquivo TXT.
SELECTION-SCREEN BEGIN OF BLOCK b20 WITH FRAME TITLE TEXT-002.
PARAMETERS p_spool LIKE TSP01-RQIDENT OBLIGATORY.
PARAMETERS p_path1 LIKE RLGRAP-FILENAME LOWER CASE OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b20.
START-OF-SELECTION.
PERFORM gerar.
FORM GERAR.
CALL FUNCTION ‘RSPO_DOWNLOAD_SPOOLJOB’
EXPORTING
ID = p_spool
FNAME = p_path1.
ENDFORM.
Filed under: Artigos ABAP/4 - Basicos | Leave a comment »