|
#1
|
|||
|
|||
Enviar mails desde SAP con un excel anexado
Hola!! Soy nuevo, así que muchas gracias de antemano por vuestra ayuda.
Mi problema es el siguiente: estoy intentando enviar un e-mail desde SAP con un excel anexado pero no consigo que me salga. Lo he intentado de dos maneras: 1) Utilizando la función de SAP: SO_NEW_DOCUMENT_ATT_SEND_API1. 2) He intentado grabar el juego de datos, pero hay un problema: cuando le das al botón de anexar documento, aparece una pantalla del tipo que te muestra el word cuando le das a la opción "Guardar como..." y eso no se graba en el juego de datos. ¿Alguien lo ha hecho? ¿Tenéis alguna idea? Gracias!! Saludos, Jordi. |
#2
|
|||
|
|||
hola yo envio un excel anexado con la funcion
'SO_NEW_DOCUMENT_ATT_SEND_API1' DATA : _fcha(10) TYPE c. objtxt = 'Envío de correos por vencimiento de cartas fianza'. append objtxt. DESCRIBE TABLE objtxt LINES w_lines. * aqui colocas a q email deseas enviar. clear RECLIST. RECLIST-RECEIVER = ADR6-SMTP_ADDR. RECLIST-EXPRESS = 'X'. RECLIST-REC_TYPE = 'U'. RECLIST-COPY = 'X'. APPEND RECLIST. * este es el cuerpo CONCATENATE '0D' 'DATO1' 'DATO2' 'DATO3' INTO i_contents_bin. APPEND i_contents_bin. concatenate 'Sociedad' 'Usuario' 'Fecha Venc' 'Ejercicio' 'Solicitud' 'Secuencia' 'Cliente' 'Razón Social' 'Importe ' 'Banco' into i_contents_bin separated by con_tab. CONCATENATE con_cret i_contents_bin INTO i_contents_bin. APPEND i_contents_bin. **DOC_CHG WRITE sy-datum TO _fcha. READ TABLE objtxt INDEX w_lines. doc_chng-doc_size = ( w_lines - 1 ) * 255 + STRLEN( objtxt ). CONCATENATE 'Carta Fianza por vencer y vencidas a ' p_dvend INTO doc_chng-obj_descr SEPARATED BY space. doc_chng-priority = '1'. doc_chng-obj_prio = '1'. DESCRIBE TABLE objtxt LINES w_lines. objpack-transf_bin = ' '. objpack-head_start = 1. objpack-head_num = 0. objpack-body_start = 1. objpack-body_num = w_lines * 255. objpack-doc_type = 'RAW'. objpack-obj_name = 'File.Xls'. objpack-obj_descr = 'Envío de correos por vencimiento de cartas fianza'. APPEND objpack. DESCRIBE TABLE i_contents_bin LINES objpack-body_num. objpack-transf_bin = 'X'. objpack-head_start = 1. objpack-head_num = 1. objpack-body_start = 1. objpack-doc_size = objpack-body_num * 255. objpack-doc_type = 'XLS'. APPEND objpack. CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1' EXPORTING document_data = doc_chng put_in_outbox = 'X' COMMIT_WORK = 'X' TABLES packing_list = objpack object_header = objhead contents_bin = i_contents_bin contents_txt = objtxt receivers = reclist EXCEPTIONS too_many_receivers = 1 document_not_sent = 2 document_type_not_exist = 3 operation_no_authorization = 4 parameter_error = 5 x_error = 6 enqueue_error = 7 OTHERS = 8. |
#3
|
|||
|
|||
Gracias ibecerra!! Una cosa solo: la variable con_tab qué contiene? Gràcias!!
|
#4
|
|||
|
|||
hola..
contiene esto CONSTANTS: con_cret TYPE x VALUE '0D', "OK for non Unicode con_tab TYPE x VALUE '09'. "OK for non Unicode |
#5
|
|||
|
|||
Muchas gracias ibecerra, ha funcionado! Eres un crack!
|
#6
|
||||
|
||||
Enviar mails desde SAP con un excel anexado
Hola yo ya tengo el excel en mi PC como hago para levantarlo y anexarlo
Gracias |
Herramientas | Buscar en Tema |
Desplegado | |
|
|