Document not attached in DMS

Question

Dear Team,
i am trying to upload a document in DMS through webdynpro...
document number is created but document is does not attached ... could any one resolve this problem.
thanks in advance.
Code & error screen shot is attached here .
method ONACTIONSUBMIT .
***file upload
DATA lo_el_context TYPE REF TO if_wd_context_element.
DATA ls_context TYPE wd_this->Element_context.
DATA lv_file TYPE wd_this->Element_context-file.
data lv_file1 TYPE xstring .
*   get element via lead selection
lo_el_context = wd_context->get_element( ).
*   get single attribute
lo_el_context->get_attribute( EXPORTING name =  `FILE` IMPORTING value = lv_file1 ).
**data declaratioins
DATA: ls_draw TYPE draw,
ls_api_ctrl TYPE cvapi_api_control,
ls_message TYPE messages,
lv_documentnumber TYPE doknr,
lv_storage_cat TYPE cv_storage_cat,
lv_size TYPE i,
*          ls_bindata TYPE zst_ts_Raw_line,
*          lt_bindata TYPE ztt_Hr_raw_line,
ls_drao TYPE drao,
lt_Drao TYPE TABLE OF drao,
lt_files TYPE cvapi_tbl_doc_files,
ls_files TYPE cvapi_doc_file ,
LS_DRAT TYPE DMS_DB_DRAT ,
LT_DRAT TYPE TABLE OF DMS_DB_DRAT .
ls_draw-DOKAR = 'TST'.
ls_draw-dokvr = '00'.
ls_draw-doktl = '000'.
ls_draw-dwnam = sy-uname.
ls_draw-dokst = 'T1'.
LS_DRAT-dktxt = 'TEST' .
insert drat FROM ls_drat .
APPEND LS_DRAT TO LT_DRAT .
lv_storage_cat = 'DMS_C1_ST'.
ls_api_ctrl-tcode = 'CV01N'.
CALL FUNCTION 'CVAPI_DOC_CREATE'
EXPORTING
PS_DRAW                    =  ls_Draw
*                     PF_STATUSLOG               = ' '
*                     PF_REVLEVEL                =
PS_API_CONTROL             =  ls_Api_ctrl
*                     PF_FTP_DEST                = ' '
*                     PF_HTTP_DEST               = ' '
*                     PF_HOSTNAME                = ' '
*                     PF_CONTENT_PROVIDE         = ' '
IMPORTING
PSX_MESSAGE                = ls_message
*                     PFX_DOKAR                  =
PFX_DOKNR                  = lv_documentnumber
*                     PFX_DOKVR                  =
*                     PFX_DOKTL                  =
TABLES
*                     PT_DRAD_X                  =
PT_DRAT_X                  =  LT_DRAT
*                     PT_FILES_X                 =
*                     PT_COMP_X                  =
*                     PT_CONTENT                 =
*                     DOCUMENTDESCRIPTIONS       =
*data lv_file_b TYPE binary.
if ls_message-msg_type ca 'EA' .
ELSE.
LS_DRAW-doknr = lv_documentnumber.
insert draw FROM ls_draw.
ENDIF.
Data : thead type thead ,
lt_lines TYPE TABLE OF tline,
it_lines  TYPE  soli_tab ,
text1     TYPE  string ,
lines2 TYPE xstring .
CALL FUNCTION 'READ_TEXT'
EXPORTING
id       = 'ST'
language = sy-langu
NAME     = 'ZGOI'
OBJECT   = 'TEXT'
IMPORTING
HEADER   = thead
TABLES
lines    = lt_lines.
CALL FUNCTION 'SX_TABLE_LINE_WIDTH_CHANGE'
EXPORTING
line_width_dst              = 255
TABLES
content_in                  = lt_lines
content_out                 = it_lines
EXCEPTIONS
err_line_width_src_too_long = 1
err_line_width_dst_too_long = 2
err_conv_failed             = 3
OTHERS                      = 4.
REPLACE ALL OCCURRENCES OF '*' IN TABLE it_lines WITH ' '.
CALL FUNCTION 'CONVERT_TABLE_TO_STRING'
EXPORTING
i_tabline_length = 132
IMPORTING
e_string         = text1
TABLES
it_table         = it_lines.
CALL FUNCTION 'SCMS_STRING_TO_XSTRING'
EXPORTING
text   = text1
IMPORTING
buffer = lines2
EXCEPTIONS
FAILED = 1
OTHERS = 2.
data : lt_bindata  type table of x255 ,
ls_bindata type x255 .
CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'
EXPORTING
BUFFER                = lines2
*                APPEND_TO_TABLE       = ' '
IMPORTING
OUTPUT_LENGTH         = lv_size
TABLES
BINARY_TAB            = lt_bindata
loop at lt_bindata INTO ls_Bindata.
ls_drao-orblk = ls_bindata.
ls_drao-orln =  lv_size.
ls_drao-dokar = ls_Draw-dokar.
ls_drao-doknr = lv_documentnumber.
ls_drao-dokvr = ls_draw-dokvr.
ls_drao-doktl = ls_drao-doktl.
ls_drao-appnr = '1'.
*      INSERT drao FROM ls_drao .
APPEND ls_drao to lt_drao.
*      CLEAR ls_drao .
ENDLOOP .
CALL FUNCTION 'CV120_DOC_GET_APPL'
EXPORTING
PF_FILE          = 'test.doc'
IMPORTING
PFX_DAPPL        = ls_files-dappl .
*         TABLES
*           PTX_TDWP         =
ls_files-appnr = '1' .
ls_files-filename = 'test' .
ls_files-updateflag = 'I' .
LS_files-langu = sy-langu.
ls_Files-storage_cat = 'DMS_C1_ST' .
ls_files-description = 'test'.
APPEND ls_files to lt_files.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.
CALL FUNCTION 'CVAPI_DOC_CHECKIN'
EXPORTING
PF_DOKAR                 = ls_Draw-dokar
PF_DOKNR                 = lv_documentnumber
PF_DOKVR                 = ls_draw-dokvr
PF_DOKTL                 = ls_draw-doktl
*           PS_DOC_STATUS            =
*           PF_FTP_DEST              = 'D:\a'
PF_HTTP_DEST             = 'SAPHTTPA'
*           PF_HOSTNAME              = ' '
PS_API_CONTROL           =  ls_api_ctrL
*           PF_REPLACE               = ' '
PF_CONTENT_PROVIDE       = 'TBL'
IMPORTING
PSX_MESSAGE              = ls_message
TABLES
PT_FILES_X               = lt_files
*           PT_COMP_X               =
PT_CONTENT               =  lt_drao .
Commit WORK.
endmethod.

Answer 1

Have you checked to see that the SAP user has rights to the folder that you are trying to write to?
Neal