Re: Locking Interactive Users Out of File

Karen Bellecci wrote:
> 
> I need to lock my interactive users out of the data files in a certain library
> during the nightly batch run, until I can check the nightly batch run the next
> morning to see if there were any problems with the run, because I may need
> to restore files and rerun, etc.
> 
> When I run a job that ALCOBJs on these certain files, they are deallocated
> as soon as my job ends (which is about 7 seconds).
> 
> How is it that I can automate keeping certain users out of certain files or a
> certain library?  I don't need all the users kept out, and I don't need all 
>the
> libraries offlimits.
> 
> Thanks for any suggestions.
> 
> Karen
> kbellecci@osfa.state.la.us
Karen,

    This is very simple, and may not be the best, but if your
application has a CL that everyone calls before entering the
application, then it will work.  You create a data area on your system,
which you set a flag in position 1 that is either a Y or N (you can get
more elaborate if you want).  When you leave at night, or at the start
of your nightly jobs (don't do it as the last job, because if the jobs
don't run your flag won't be set), you set the flag to "N".  Then in the
morning, after you check everything out, you set the flag to "Y". 
Inside your CL to start the application, have it retrieve the data
area.  If the dataarea is set to "Y" then allow access, if it is set to
"N", display a message "System not yet available, please try again in 10
minutes."

HTH 

-- 
Pete Massiello
OS Solutions International 
Phone: (203)-744-7854  Ext 11.
http://www.os-solutions.com
mailto:pmassiello@os-solutions.com
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *