Programmaufruf mit fremder Berechtigung

[lossin]

Hallo,

danke für deine Antwort.
Da das entsprechende Programm von mir im Batch laufen soll, sollte es ja keine Probleme wegen der kurzfristigen Berechtigung geben. Ich muß mir die APIs jetzt mal in Ruhe zu Gemüte führen

[BenderD]

... im Batch brauchts das nicht, SBMJOB hat eine Parameter USER (da braucht man Berechtigung an dem USRPRF, die darf aber adaptiert sein - wobei das nicht QSECOFR, aber jedes andere Profil sein darf)

D*B

Hallo,

danke für deine Antwort.
Da das entsprechende Programm von mir im Batch laufen soll, sollte es ja keine Probleme wegen der kurzfristigen Berechtigung geben. Ich muß mir die APIs jetzt mal in Ruhe zu Gemüte führen

[Pikachu]

PGM                                                      
DCL        VAR(&OLDHANDLE) TYPE(*CHAR) LEN(12)           
DCL        VAR(&NEWHANDLE) TYPE(*CHAR) LEN(12)           
DCL        VAR(&NEWUSER)   TYPE(*CHAR) LEN(10)           
MONMSG     MSGID(CPF0000)                                
                                                         
CHGVAR     VAR(&NEWUSER) VALUE(Neuer Benutzer)                    
                                                         
CALL       PGM(QSYGETPH) PARM(*CURRENT *NOPWD &OLDHANDLE)
CALL       PGM(QSYGETPH) PARM(&NEWUSER *NOPWD &NEWHANDLE)
CALL       PGM(QWTSETP)  PARM(&NEWHANDLE)                
                                                         
...
                                                         
CALL       PGM(QWTSETP)  PARM(&OLDHANDLE)                
CALL       PGM(QSYRLSPH) PARM(&NEWHANDLE)                
CALL       PGM(QSYRLSPH) PARM(&OLDHANDLE)                
ENDPGM