Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8944

Re: How to read applicaton PDF file as attached file to send mail

$
0
0

Dear Sir,

   i tested

 

 

OPEN DATASET TO_FILE FOR INPUT IN BINARY MODE.



  IF SY-SUBRC = 0.

    DO .

      READ DATASET to_file INTO GS_OBJBIN. "GS_PDF_TAB.

      IF SY-SUBRC = 0.

        APPEND GS_OBJBIN TO GT_OBJBIN "GS_PDF_TAB TO GT_PDF_TAB.

      ELSE.

        EXIT.

      ENDIF.

    ENDDO.

    CLOSE DATASET to_file.

  else.

    Message 'Error in Opening File' type'E'.

  ENDIF.

  clear gs_objbin.

*  DELETE DATASET TO_FILE. "cancel delete function SZ20150523

  DESCRIBE TABLE GT_OBJBIN LINES end1.

  CLEAR GS_OBJBIN.

  READ TABLE GT_OBJBIN INTO GS_OBJBIN INDEX end1.

  IF SY-SUBRC = 0.



    GS_OBJPACK-DOC_SIZE = ( end1 - 1 ) * 255 + STRLEN( GS_OBJBIN ).



    GS_OBJPACK-TRANSF_BIN = 'X'.



    GS_OBJPACK-HEAD_START = 1.



    GS_OBJPACK-HEAD_NUM = 0.



    GS_OBJPACK-BODY_START = start1.



    GS_OBJPACK-BODY_NUM = end1.



    GS_OBJPACK-DOC_TYPE = 'PDF'.



    GS_OBJPACK-OBJ_NAME it_tab-pernr.



    GS_OBJPACK-OBJ_DESCR it_tab-pernr.



    APPEND GS_OBJPACK TO GT_OBJPACK.



  ENDIF.

it ca not work


Viewing all articles
Browse latest Browse all 8944

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>