Problema BAPI_DOCUMENT_CREATE2

[josefon]

Hola!!

Veran tengo un problema con esta bapi BAPI_DOCUMENT_CREATE2. La bapi ya la tengo implementada y me funciona bien si la ejecuto desde mi maquina osea tomando un archivo local pero cuando le mando la ruta de un servidor externo no me funciona no me toma la ruta y me manda un mensaje de error

Error while checking in and storing: \portaldesa\archivos\PM\imagenes\TIE2301-08-A\prueba.JPG

Message ID 26
Message Number 253

Asi mando a llamar mi BAPI

CALL FUNCTION 'BAPI_DOCUMENT_CREATE2'
EXPORTING
documentdata = it_documentdata
hostname = w_hostname " SAMBA
pf_ftp_dest = 'SAPFTPA'
IMPORTING
return = it_return
documentnumber = w_docnumber
TABLES
documentfiles = it_documentfiles.


El hostname es un servidor que R3 puede ver

Alguien ha trabajado con esta bapi ??


Ojala me puedan ayudar

[ballan]

Toquetea un poco este codigo porque yo he conseguido crear documentos DIR y anexarle los ficheros y hacer el checkin contra el content server

Un apunte, si lo ejecutas en fondo tienes que utilizar las conexiones SAPFTP y SAPHTTP y si lo lanzas en online tienes que usar las mismas acabadas en A

*&---------------------------------------------------------------------*
*& Report ZPRUEBAINTERFASEPS
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT zpruebainterfaseps.

SELECTION-SCREEN: BEGIN OF BLOCK a1 WITH FRAME.

PARAMETERS: p_docu LIKE draw-doknr.

SELECTION-SCREEN: END OF BLOCK a1.

DATA: BEGIN OF kernel_version OCCURS 0,
key(21) TYPE c,
data(69) TYPE c,
END OF kernel_version.

DATA: gv_documento LIKE draw-doknr,
gv_clase LIKE draw-dokar VALUE 'ZET',
gv_version LIKE draw-dokvr VALUE '00',
gv_part LIKE draw-doktl VALUE '000',
gv_descripcion LIKE drat-dktxt VALUE 'Descripcion de prueba',
gv_return LIKE bapiret2,
gv_ruta LIKE bapi_doc_files2-docfile VALUE 'C:\PRUEBA.XLS'.

DATA: gs_documentdata LIKE bapi_doc_draw2,
gv_hostname LIKE bapi_doc_aux-hostname,
gt_characteristicvalues LIKE bapi_characteristic_values OCCURS 0 WITH HEADER LINE,
gt_classallocations LIKE bapi_class_allocation OCCURS 0 WITH HEADER LINE,
gt_descripcionesl LIKE bapi_doc_text OCCURS 0 WITH HEADER LINE,
gt_descripcionesc LIKE bapi_doc_drat OCCURS 0 WITH HEADER LINE,
gt_documentfiles LIKE bapi_doc_files2 OCCURS 0 WITH HEADER LINE.

AT LINE-SELECTION.

SET PARAMETER ID 'CV1' FIELD p_docu.
SET PARAMETER ID 'CV2' FIELD gv_clase.
CALL TRANSACTION 'CV02N' AND SKIP FIRST SCREEN.

START-OF-SELECTION.

gv_documento = p_docu.

gs_documentdata-documenttype = gv_clase.
gs_documentdata-documentnumber = gv_documento.
gs_documentdata-documentversion = gv_version.
gs_documentdata-documentpart = gv_part.
* gs_documentdata-description = '0123456789012345678901234567890123456789'.

gt_descripcionesl-language = 'S'.
gt_descripcionesl-language_iso = 'ES'.
gt_descripcionesl-textline = 'Descripción de prueba para DIR 22222222222222222222222222222222222222222222222222222222222222222222222'.
APPEND gt_descripcionesl.

CLEAR gt_descripcionesl.

gt_descripcionesl-language = 'E'.
gt_descripcionesl-language_iso = 'EN'.
gt_descripcionesl-textline = 'Descripción de prueba para DIR 33333333333333333333333333333333333333333333333333333333333333333333333'.
APPEND gt_descripcionesl.

CLEAR gt_descripcionesl.

* gt_descripcionesl-language = 'S'.
* gt_descripcionesl-textline = '012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901'.
* APPEND gt_descripcionesl.

gt_descripcionesc-language = 'S'.
gt_descripcionesc-language_iso = 'ES'.
gt_descripcionesc-description = 'Descripción 1 aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa'.
gt_descripcionesc-textindicator = ''.
APPEND gt_descripcionesc.


gt_descripcionesc-language = 'E'.
gt_descripcionesc-language_iso = 'EN'.
gt_descripcionesc-description = 'Descripción 2 bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb'.
gt_descripcionesc-textindicator = ''.
APPEND gt_descripcionesc.


CALL 'SAPCORE' ID 'ID' FIELD 'VERSION'
ID 'TABLE' FIELD kernel_version-*sys*.

READ TABLE kernel_version INDEX 11.
gv_hostname = kernel_version-data.

* gv_hostname = '10.100.101.155'.

gt_characteristicvalues-classtype = '017'.
gt_characteristicvalues-classname = 'ZDMS_DT'.
gt_characteristicvalues-charname = 'ZFEFIPRE'.
gt_characteristicvalues-charvalue = '15092007'.
APPEND gt_characteristicvalues.
*
* gt_classallocations-classtype = '017'.
* gt_classallocations-classname = 'ZDMS_DT'.
* APPEND gt_classallocations.
*
* gt_documentfiles-wsapplication = 'ZXT'.
** gt_documentfiles-docfile = 'C:\CV01n.txt'.
** gt_documentfiles-docfile = '/tmp/cv01n.txt'.
** gt_documentfiles-docpath = ''.
* gt_documentfiles-storagecategory = 'DMS_C1_ST'.
* gt_documentfiles-checkedin = 'X'.
* APPEND gt_documentfiles.

CALL FUNCTION 'BAPI_DOCUMENT_CREATE2'
EXPORTING
documentdata = gs_documentdata
hostname = gv_hostname
* DOCBOMCHANGENUMBER =
* DOCBOMVALIDFROM =
* DOCBOMREVISIONLEVEL =
* CAD_MODE = ' '
pf_ftp_dest = 'SAPFTP'
pf_http_dest = 'SAPHTTP'
IMPORTING
* DOCUMENTTYPE =
* DOCUMENTNUMBER =
* DOCUMENTPART =
* DOCUMENTVERSION =
return = gv_return
TABLES
characteristicvalues = gt_characteristicvalues
classallocations = gt_classallocations
documentdescriptions = gt_descripcionesc
* OBJECTLINKS =
* DOCUMENTSTRUCTURE =
documentfiles = gt_documentfiles
longtexts = gt_descripcionesl
* COMPONENTS =
.

IF gv_return-type CA 'AE'.

WRITE gv_return-message.

ELSE.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.


* LOOP AT gt_documentfiles.
*
* gt_documentfiles-checkedin = 'X'.
* MODIFY gt_documentfiles.
*
* ENDLOOP.
*
* CALL FUNCTION 'BAPI_DOCUMENT_CHECKIN2'
* EXPORTING
* documenttype = gv_clase
* documentnumber = gv_documento
* documentpart = gv_part
* documentversion = gv_version
** HOSTNAME = ' '
** STATUSINTERN = ' '
** STATUSEXTERN = ' '
** STATUSLOG = ' '
** REVLEVEL = ' '
** AENNR = ' '
** PF_HTTP_DEST = ' '
** PF_FTP_DEST = ' '
** IMPORTING
** RETURN =
* TABLES
* documentfiles = gt_documentfiles
** COMPONENTS =
** DOCUMENTSTRUCTURE =
* .
*
* CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
* EXPORTING
* wait = 'X'.

FORMAT HOTSPOT ON.
WRITE: 'SE HA INTENTADO CREAR EL DOCUMENTO:' , p_docu.
FORMAT HOTSPOT OFF.

ENDIF.

[josefon]

Muchas gracias, me funciono perfecto.

Saludos