Error visualizar sost

[nachoregi]

Buenas estoy en una migracion de la 4.7 a la 6.0 y tengo un problema con la transaccion sost . En la anterior version todo va ok pero en la actual me muestra la tabla( CONTENTS_BIN)que le paso que se le pasa en la funcion

CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
EXPORTING
document_data = w_documentdata
commit_work = 'X'
TABLES
packing_list = i_objpack
contents_bin = i_objatt
contents_txt = i_objcont
receivers = i_receivers.

Si luego le haces click al documento adjunto se ve ok pero al visualidar el mail en la sost te muestra la tabla de contents_bin en el cuerpo cosa que no es correcta .
Yo creo que es un problema de configuración de la sost per ahi estoy , agradezco la ayuda .
Un Saludo

[kiboqac]

Podrias pegar como completas las variables i_objpack y w_documentdata?

Realmente no se ha cambiado de una versiona a la otra. Probaste enviando el mail finalmente a ver como se ve en la casilla de correo? (tal vez la sost muestre algo que no es lo que se termina enviando realmente)

[nachoregi]

El codigo esta abajo . Bueno no lo probe pero el usuario no quiere ver ese pegote en la sost . Yo creo que es un problema de configuracion estoy cambiando parametros en la Scot pero de momento nada .
Gracias y un saludo




CLEAR: w_documentdata, i_objpack, i_objatt.
REFRESH: i_objpack, i_objatt.

d_spool = i_spool-spool.

* Recuperamos los datos que se van a adjuntar en el mail
CALL FUNCTION 'RSPO_RETURN_SPOOLJOB'
EXPORTING
rqident = d_spool
* FIRST_LINE = 1
* LAST_LINE =
* DESIRED_TYPE =
* IMPORTING
* REAL_TYPE = G_DOC_TYPE
TABLES
buffer = i_objatt
* BUFFER_PDF =
EXCEPTIONS
no_such_job = 1
job_contains_no_data = 2
selection_empty = 3
no_permission = 4
can_not_access = 5
read_error = 6
type_no_match = 7
OTHERS = 8.

w_documentdata-obj_name = 'MENSAJE'.
IF i_spool-fuera = 'X'.
w_documentdata-obj_descr = text-c06.
ELSE.
w_documentdata-obj_descr = text-c05.
ENDIF.
CONCATENATE w_documentdata-obj_descr ':' i_spool-arbpl
i_spool-descr
INTO w_documentdata-obj_descr SEPARATED BY space.
w_documentdata-sensitivty = 'F'.
w_documentdata-obj_expdat = sy-datum + 30.
w_documentdata-no_change = 'X'.

CLEAR i_objpack-transf_bin.
i_objpack-head_start = 1.
i_objpack-head_num = 10.
i_objpack-body_start = 1.
i_objpack-body_num = 10.
i_objpack-doc_type = 'RAW'.
APPEND i_objpack.

* Datos del attachment / contenido
DESCRIBE TABLE i_objatt LINES d_lines.
READ TABLE i_objatt INDEX d_lines.
w_documentdata-doc_size =
( d_lines - 1 ) * 255 + STRLEN( i_objatt ).

i_objpack-transf_bin = 'X'.
i_objpack-head_start = 1.
i_objpack-head_num = 1.
i_objpack-body_start = 1.
i_objpack-body_num = d_lines.
i_objpack-doc_type = 'ALI'.
i_objpack-obj_name = 'CALIBRACION'.
i_objpack-obj_descr = text-c05.
i_objpack-doc_size = d_lines * 255.
APPEND i_objpack.

REFRESH: i_receivers, i_mail.
CLEAR: i_receivers, i_mail.


SELECT low
FROM zsreceivers
INTO TABLE i_mail
WHERE repid = sy-repid
AND criterio = c_ptrab
AND valor = i_spool-arbpl.


CLEAR wrk_receivers.

wrk_receivers-com_type = 'INT'.
wrk_receivers-rec_type = 'U'.
LOOP AT i_mail.
IF sy-tabix <> 1.
wrk_receivers-copy = 'X'.
ENDIF.
wrk_receivers-receiver = i_mail-zzmail.
TRANSLATE wrk_receivers-receiver TO LOWER CASE. "#EC TRANSLANG
APPEND wrk_receivers TO i_receivers.
ENDLOOP.

REFRESH i_objcont.
CLEAR i_objcont.
d_linea = text-c04.
APPEND d_linea TO i_objcont.

CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
EXPORTING
document_data = w_documentdata
* PUT_IN_OUTBOX = 'X'
commit_work = 'X'
* IMPORTING
* SENT_TO_ALL =
* NEW_OBJECT_ID =
TABLES
packing_list = i_objpack
* OBJECT_HEADER =
contents_bin = i_objatt
contents_txt = i_objcont
* CONTENTS_HEX =
* OBJECT_PARA =
* OBJECT_PARB =
receivers = i_receivers
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.

ENDLOOP.
ENDIF.