mercoledì 23 novembre 2016

Cambiare i permessi di un file sull'Application Server

SM69

*----------------------------------------------------------------------*
* LAYOUT                                                               *
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
PARAMETERS pa_file TYPE string.
SELECTION-SCREEN END OF BLOCK b1.

*----------------------------------------------------------------------*
* FORM OUTPUT                                                          *
*----------------------------------------------------------------------*
FORM output.

  DATA: lt_exec_protocol TYPE TABLE OF btcxpm,
        lv_file          TYPE btcxpgpar.

  lv_file = pa_file.
  CALL FUNCTION 'SXPG_CALL_SYSTEM'
    EXPORTING
      commandname           = 'ZCHMOD777'
      additional_parameters = lv_file
    TABLES
      exec_protocol         = lt_exec_protocol.

ENDFORM.

*----------------------------------------------------------------------*

Nessun commento: