Ansicht
Dokumentation

03609 - Stream file ownership

03609 - Stream file ownership

General Data in Customer Master   PERFORM Short Reference  
This documentation is copyright by SAP AG.
SAP E-Book

Stream file ownership

Hi Rick,

when you want to change this on a file basis, you could have a look to the
following ABAP:

REPORT ZCALL_SYSTEM .

" ABAP
" This program was developed in system B45 on as0034.
" It shows, how CALL SYSTEM COMMAND works on AS/400.
" => It works really simple and fine!
" All jobs become spawned (AS4RDIREXE) and then called via
" QCMDEXEC => You can only call CMDs or Pgms, that allow being
" used from QCMDEXC.

DATA: COMMAND1(200) TYPE C,
COMMAND2(200) TYPE C.

COMMAND1 := 'SNDMSG MSG(''abap-test-msg'') TOUSR(D030451)'.

" Normally the command contains "variables", that have to replaced
" with the real text.
" replace '$' with filename into command.
CALL 'SYSTEM' ID 'COMMAND' FIELD COMMAND1.

COMMAND2 := 'CHGAUT OBJ(''/tmp/sapresp'') USER(r3install) DTAAUT(*RWX)'.
" or you can grant to public as follows:
" ** COMMAND2 := 'CHGAUT OBJ(''/tmp/sapresp'') USER(*public) DTAAUT(*RWX)'.

CALL 'SYSTEM' ID 'COMMAND' FIELD COMMAND2.

CALL 'SYSTEM' ID 'COMMAND' FIELD COMMAND1.

(The program is not very useful, but should show the possibility to call
commands.)

Regards

Volker

Durban Tours - Südafrika Safari

Vendor Master (General Section)   rdisp/max_wprun_time - Maximum work process run time  
This documentation is copyright by SAP AG.

Length: 1595 Date: 20240427 Time: 043543     sap01-206 ( 4 ms )