Re: Authority issue with accessing a file

Grizzly,

I take it that the CL program is the one that adopts authority. In that case
the adopted authority is valid as long as the CL program runs. When the CL
program submits the print program, a new job is started. The new job does
not have the CL program in the call stack, so no authority is adopted. When
you call the print program from the CL, adopted authority is still active.

Joep Beckeringh

----- Original Message -----
From: "Malchow, Grizzly" <GMalchow@xxxxxxxxxxxxxxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, December 18, 2003 7:59 PM
Subject: Authority issue with accessing a file


I have a CL program that calls a prompt program and then submits a print
program. I have a file that is used in both programs. I'll call it
FILEA. FILEA is used in the prompt program to check that the user
entered valid selection criteria. The print program uses the file to
print values that match what was entered in the prompt program. The
problem I'm running into is odd to me. When the print program is
submitted to batch I receive the following error:

Error message CPF4104 appeared during OPEN for file FILEA

The job log states the following:

User not authorized to operation on file FILEA in *LIBL, member, device,
or program device *N.



I changed the CL program to run the print program interactively and I
didn't receive any errors. The user profile using the file has *ALL
object authority, but it is adopted when they sign into our ERP package.
I'm guessing that the authority isn't being included when the job is
submitted, but I'm not sure how to verify that.

Has anyone encountered this problem before?









_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.