#1
|
|||
|
|||
![]() Hola mi consulta es como puedo enviar un pdf por mail, ósea yo trasformo el smanfromts en pdf pero ahora debo enviarlo por mail y no se como e visto por la red unas opciones pero no logro entenderlas bien si alguien me podria ayudar se lo agradecería hai les pongo el código donde trasformo a pdf
DATA: lv_solicitud TYPE zthr_0004-num_solicitud, i_pdf LIKE tline OCCURS 100 WITH HEADER LINE, W_CTRLOP TYPE SSFCTRLOP, V_LEN_IN LIKE SOOD-OBJLEN, I_OTF TYPE ITCOO OCCURS 0 WITH HEADER LINE, W_COMPOP TYPE SSFCOMPOP, I_TLINE TYPE TABLE OF TLINE," WITH HEADER LINE, W_RETURN TYPE SSFCRESCL, SPOOLNO type TSP01-RQIDENT. " Orden Spool W_CTRLOP-GETOTF = 'X'. W_CTRLOP-NO_DIALOG = 'X'. W_COMPOP-TDNOPREV = 'X'. W_COMPOP-TDDEST = 'LOCL'. W_COMPOP-TDARMOD = '1'. W_COMPOP-TDCOPIES = '1'. W_COMPOP-TDPRINTER = 'SAPWIN'. W_COMPOP-TDLIFETIME = '8'. CALL FUNCTION '/1BCDWB/SF00000006' EXPORTING CONTROL_PARAMETERS = W_CTRLOP OUTPUT_OPTIONS = W_COMPOP USER_SETTINGS = 'X' "Aca los parametros que necesita el smartform gp_logo = p_logo gp_n_solicitud = p_n_solicitud gp_nom_tra = p_nom_tra gp_rut_tra = p_rut_tra gp_empresa = p_empresa gp_fech_ing_emp = p_fech_ing_emp gp_sindicato = p_sindicato gp_tip_boni = p_tip_boni gp_fech_soli = p_fech_soli gp_rut_bene = p_rut_ben gp_nom_famil = p_nom_hc gp_ap_paterno = p_ap_paterno gp_ap_materno = p_ap_materno IMPORTING JOB_OUTPUT_INFO = W_RETURN "aca me devuelve el smartform TABLES tp_for001 = tp_001 EXCEPTIONS FORMATTING_ERROR = 1 INTERNAL_ERROR = 2 SEND_ERROR = 3 USER_CANCELED = 4 OTHERS = 5. IF SY-SUBRC NE 0. * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO * * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4. ENDIF. I_OTF[] = W_RETURN-OTFDATA[]. CALL FUNCTION 'CONVERT_OTF' EXPORTING FORMAT = 'PDF' MAX_LINEWIDTH = 132 IMPORTING BIN_FILESIZE = V_LEN_IN TABLES OTF = I_OTF LINES = I_TLINE EXCEPTIONS ERR_MAX_LINEWIDTH = 1 ERR_FORMAT = 2 ERR_CONV_NOT_POSSIBLE = 3 OTHERS = 4. IF SY-SUBRC EQ 0. ENDIF. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|