[Octaviano]

Hola amam2605,
Intenta agregar lo siguiente al final del código que mostraste:

**//.. Variable obtenida CALL FUNCTION 'RSTS_GET_ATTRIBUTES'
IF vg_tipo_obejto(3) = 'OTF'. " Si es OTF
lt_pdf_aux[] = t_pdf[].

**//.. convierte a XSTRING el PDF Obtenido
CLEAR vl_pdf.
CLEAR lw_pdf_aux.
LOOP AT lt_pdf_aux INTO lw_pdf_aux.
ASSIGN lw_pdf_aux-char TO <f_src> TYPE 'X'.
CONCATENATE vl_pdf <f_src> INTO vl_pdf IN BYTE MODE.
ENDLOOP.
ELSE. " Si no es OTF
lt_pdf_aux[] = t_pdf[].

**//.. convierte a XSTRING
CALL FUNCTION 'SCMS_TEXT_TO_XSTRING'
IMPORTING
buffer = vl_pdf
TABLES
text_tab = lt_pdf_aux
EXCEPTIONS
failed = 1
OTHERS = 2.
IF sy-subrc NE 0.
CLEAR pdf.
ENDIF.
ENDIF.

Lo que esta en la variable vl_pdf es lo que debes enviar por correo.

**//.. Donde
TYPES: BEGIN OF ty_linea,
char TYPE char134,
END OF ty_linea.

DATA: vl_pdf TYPE XSTRING,
lt_pdf_aux TYPE TABLE OF ty_linea.

FIELD-SYMBOLS: <f_src>.

Espero sea de ayuda.