>>> Can somebody please tell me how to give a program QSECOFR authority. I
>>> need to allow a user to run end of month processing as QSECOFR. I used
>>> be able to do it under the previous release, but ever since changing
>>> v3.1 it stopped working.
>>After compiling the program, do the following:
>> 1) CHGOBJOWN OBJ(yourprogramname) OBJTYPE(*PGM) NEWOWN(QSECOFR)
>> 2) CHGPGM PGM(yourprogramname) USRPRF(*OWNER)
>>This should do it for you.
>Having a program adopt QSECOFR authority can be very dangerous if you're
>not careful. As long as this program is in your program stack, any
>called subsequently will also run with QSECOFR authority.
Just a note -- only those called programs that have the USEADPAUT(*YES)
attribute will use the adopted authority of previous programs in the call
stack. By default, programs are assigned this attribute when they're
created. To change programs to not use adopted authority, run the
CHGPGM PGM(library-name/program-name) USEADPAUT(*NO)
The program being changed must have its observable information.
Software authoring & consulting for the AS/400
Los Angeles, CA USA