|
One thing I do to get a dedicated (I use that term loosely) system is disable all user profiles except for three people in IS. Its a simple program that copies the user profiles to an outfile, then an RPG program reads that file & writes a record to a source CL file called STOPCL & another record is written to source CL file called STARTCL. The data written to these two files consists of CHGUSRPRF UserID STATUS(*ENABLED) for the STARTCL file & STATUS(*DISABLED) for the STOPCL file. These files are then copied to my library from QTEMP and compiled. This CL program then calls the STOPCL program which keeps people from signing on to the 400. I don't change any of the "Q" user profiles & we also have changed all the default passwords for the IBM supplied user profiles. I then have a WRKJOBSCDE entry for STARTCL that I change to run at 23:55 of the night that month end is run which I must manually (ADDJOBSCDE would automate it when I have time) change once a month. It's all part of the Month End work instructions & is not forgotten because of that. I still have to manually make sure all jobs & users have signed off/ended before we start the month end process. Most people are pretty good about getting off for the month end process. I don't consider it a big deal. For the INV900 Month End process, an SSA Help Line person faxed me a list of the files that need to be checked for "locks" before this job is run. I wrote a CL program that does a WRKOBJLCK for each of these files to a spool file & then look through 14 spool files for locked members. This whole process must take all of a minute or less to do & is mandatory because we got caught once with a member lock on one of the files. It meant aborting the month end process, reloading the BPCSF library from tape, & starting month end over once the locked file was fixed by killing the locking job. The files to be checked are IIM, IWI, ILI, IWM, ITH, ILN, RCM, RTX, RTP, SIH, SIL, SSH, SSM, & YCL. There are a multiple ways to what is being asked. This is just my approach to trying to automate what I can. Is it the best? I don't know but it works & why should I try to fix something that runs once a month for a small amount of time & works? Any one that has improvements upon what I'm doing, I'm open for suggestions. If anyone wants the source (1 CL & 1 RPG) program, I will e-mail them off line. Dennis "One never notices what has been done; one can only see what remains to be done." -- Marie Curie "I love deadlines. I especially like the whooshing sound they make as they go flying by." Dilbert's Words Of Wisdom: Dennis Munro Badger Mining Corporation dmunro@badgerminingcorp.com <mailto:dmunro@badgerminingcorp.com> (920) 361-2388 -----Original Message----- From: Ben Colletti [SMTP:bcollett@tokheim.com] Sent: Tuesday, February 01, 2000 4:16 PM To: BPCS-L@midrange.com Subject: Inventory Month End Close Here's my problem. We are using version 6.1, client server, on an AS400. Every month when I try to run the inventory month end close program (INV903) it does not successfully complete. When I ask out MIS manager why, he tells me that there probably is someone on the system. I have asked him to shut down the system to all users except myself while this program is run but for some reason he can't figure out how to do that. I'm not a techie but there must be a way that I can run this program on a regular monthly basis and be assured that it will successfully complete. Does anyone else out there have this problem and how can it be solved? Please answer in language that an idiot like me can understand so I can relay it to MIS. Thanks, Ben Colletti bcollett@tokheim.com Materials Manager Gasboy International Inc. +--- | This is the BPCS Users Mailing List! | To submit a new message, send your mail to BPCS-L@midrange.com. | To subscribe to this list send email to BPCS-L-SUB@midrange.com. | To unsubscribe from this list send email to BPCS-L-UNSUB@midrange.com. | Questions should be directed to the list owner: dasmussen@aol.com +--- +--- | This is the BPCS Users Mailing List! | To submit a new message, send your mail to BPCS-L@midrange.com. | To subscribe to this list send email to BPCS-L-SUB@midrange.com. | To unsubscribe from this list send email to BPCS-L-UNSUB@midrange.com. | Questions should be directed to the list owner: dasmussen@aol.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.