encryptPDF

  DATA: BEGIN OF command_list OCCURS 0.
          INCLUDE STRUCTURE sxpgcolist.
  DATA: END OF command_list .
  DATA: BEGIN OF exec_protocol OCCURS 0.
          INCLUDE STRUCTURE btcxpm.
  DATA: END OF exec_protocol.
  DATA: status      LIKE btcxp3-exitstat,
        commandname LIKE sxpgcolist-name,
        sel_no      LIKE sy-tabix.
  DATA: v_dir_input      TYPE sxpgcolist-parameters.
  DATA:l_orln     LIKE drao-orln,
       l_data_tab LIKE rcgrepfile OCCURS 10 WITH HEADER LINE,
       l_lines    TYPE i.
  DATA: ownp(100) TYPE c, usrp(100) TYPE c, outp(100) TYPE c.
  DATA: xwatermark(100) TYPE c.

  CLEAR: v_dir_input,l_orln,l_lines.
  REFRESH:l_data_tab[].

  CONSTANTS: c_extcom TYPE sxpgcolist-name VALUE 'ZPY_ENCRYPTPDF',
             c_oper   TYPE syopsys VALUE 'HP-UX'.

*  vtab-otp = 'coba12'.   "<-------------------------------test only

  CONCATENATE '-sOwnerPassword=' vtab-otp INTO ownp.
  CONCATENATE '-sUserPassword=' vtab-otp INTO usrp.
  CONCATENATE '-sOutputFile=' l_file_enc INTO outp.
  CONCATENATE folderserver xps INTO xwatermark.
  CONCATENATE
   '-sDEVICE=pdfwrite -dCompatibilityLevel=1.4 -dBATCH -dNOPROMPT'
   '-dNOPAUSE -dQUIET '
   ownp usrp outp xwatermark l_file
*   '-dNOPAUSE -dQUIET' ownp usrp outp xwatermark l_file
*   '-sOwnerPassword=coba123'
*   '-sUserPassword=coba123'
*   '-sOutputFile=/tmp/sap/GS19430114.pdf'
*   '/tmp/sap/19430114.pdf'
  INTO v_dir_input SEPARATED BY space.
*  WRITE: v_dir_input.

  DATA: t_result TYPE STANDARD TABLE OF btcxpm.
  REFRESH:t_result[].

  DATA: xstatus LIKE  extcmdexex-status.
  DATA: xexitcode LIKE  extcmdexex-exitcode.
  CALL FUNCTION 'SXPG_COMMAND_EXECUTE'
       EXPORTING
            commandname           = c_extcom
            additional_parameters = v_dir_input
            operatingsystem       = c_oper
       IMPORTING
            status                = xstatus
            exitcode              = xexitcode
       TABLES
            exec_protocol         = t_result.

*  DATA: wa_result LIKE LINE OF t_result.
*  LOOP AT t_result INTO wa_result.
*    WRITE: / wa_result-message.
*  ENDLOOP.