× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: Restoring source
  • From: MacWheel99@xxxxxxx
  • Date: Thu, 27 Apr 2000 02:35:39 EDT

From Al Macintyre 

Here we are a couple of students of BPCS/400 who perhaps able to help each 
other a little bit.  If you are not on BPCS-L you also need to be there.  
BIL522 is familiar - I remember struggling merging the Y2K bug fixes with our 
modifications.  When you finally get this recovered, you will want to do 
PDM-54 to compare source & get list of what the changes are accross in the 
various versions, since SSA does not use one consistent way of tracking lines 
changed, and via AS/Set manages to erase any IBM flags showing lines updated 
from version to version.

You know where it says TAPW ... that tells me the tape drive is WAITING on 
some resource ... I normally would see that on WRKACTJOB where it gives the 
status of a whole bunch of applications ... by placing cursor on the column 
that has TAPW & pressing F1 you can get into a long list of all the possible 
things that can occur in that column, in alphabetical order, and a paragraph 
or two of explanation on each.

You do not need to have TAPW up there to read the story on it.

You do need to have the job active, just sitting there, to get into a job log 
that is intelligible, to me anyway, regarding what the heck it is waiting on. 
 I suspect that it is either waiting on some dumb error message to be 
responded to on QSYSOPR that you are not seeing, or you are missing some 
parameter of RSTOBJ that is not obvious because we seldom have to do this 
stuff so it is not familiar to us, or you have a security problem that can 
even happen to the master security officer, which I will explain in a little 
bit.

While it is just sitting there, sign on a second time as QSECOFR, then 
WRKACTJOB to get at that job (there are other ways to get at it, then 5-work 
with & 10 look at job log & F10 to explode the detail, then for interesting 
looking lines, put cursor on the line then F1 for the gory details.

Even though you are doing this as the master security officer, it could be a 
security problem.   On our site, for security & performance reaasons, our 
master security officer is not a member of the SSA group that owns all the 
objects of BPCS.  SSA owns an ungodly number of objects & that is a 
performance bottleneck.  On our system it is over 50% of the stuff on our 
hard drive, something like 50 libraries several with thousands of files, some 
source files with thousands of members, some physical files with over a 
million records, some physical files with like 50 logicals, the list is 
endless, and they are all in the main user group.  

Various other IBM objects end up being owned by QSECOFR.   Apparently there 
are some ceilings on what all can be owned by one owner, and we are not 
interested in getting close to that limit.

I want to be able to do security work without carrying the BPCS world on the 
security officer's shoulders.  I want to be able to be signed on as the 
master security officer when BPCS is running tasks that are restricted within 
the BPCS environment, and locking up users who do not understand the word 
"restricted", "dedicated" or "stay off until this gets done" (I do not care 
about them locked up, I do care about the restricted job getting locked up), 
or who have to sign on ( & lock up BPCS) to even get the message ... no other 
user can be connected to certain files when certain jobs are running in those 
files.  

For purposes of IBM security work on BPCS stuff we use another master 
security officer other than QSECOFR, who happens to be in the user group that 
has access to all SSA objects, so that restored objects, such as SSA fixes, 
end up being owned by the SSA user group.

Depending on the security level of your AS/400 you may be barred from 
restoring objects from a tape by a sign-on that is not a member of the group 
of users authorized to access the objects.

>  From:    wawrzaszeka@AUSTEEL.com (Angela Wawrzaszek(EXCH))
>  
>  I tried doing this again, and this time I am getting no error or anything
>  the tape is just sitting there on tapw.  So what does that mean?  It has
>  been running 1 hour to restore 1 source file.  But it is just sitting there
>  on TAPW.
>      
>    CD15S2       QSECOFR     INT      .0  CMD-RSTOBJ       TAPW   
>    
>   
>  
>  > RSTOBJ OBJ(QRPGSRC) SAVLIB(BPCSMODSRC) DEV(TAP05) OBJTYPE(*ALL) 
SEQNBR(69)
>  
>     FILEMBR((QRPGSRC (BIL522))) MBROPT(*ALL) ALWOBJDIF(*ALL) RSTLIB(QTEMP)
>  
>   
>  
>       And I did a dsptap and the file shows, and is on seq 69.
>  
>  HELP!!!
>                                                                          
>  Angie Wawrzaszek
>  M.I.S. Department
>  
>  
>  -----Original Message-----
>  From: owner-midrange-l@midrange.com
>  [mailto:owner-midrange-l@midrange.com]On Behalf Of MacWheel99@aol.com
>  
>  You did not say what the error was ... I get this all the time from my 
users
>  They do not tell me what the error message was & they sign off without 
>  capturing a job log (SIGNOFF *LIST is how they should do it when we need 
>  one)... very often when we go to second level help there is information
>  about what the problem was.
>  
>  I normally do my tape manipulations from the OS/400 command line.
>  CALL QCMD then F10 gives me my job log at the same time as more commands
>  Place the cursor on error message on screen or on job log then F1
>  This takes me to 2nd level help detail explanation of the error message
>  
>  Usually the problem is obvious at that point, once you are able to get 
past 
>  the IBM jargon
>  
>  >  From:    wawrzaszeka@AUSTEEL.com (Angela Wawrzaszek(EXCH))
>  >  
>  >  --------------------
>  >  I have a source file that I need to restore from that last system save.
>  >  Something appears to wrong either with the tape or the source.  
>  >  I was able  to restore 2 other files after several attempts
>  >  but this one keeps ending in
>  >  error, or just plan saying it couldn't find it, none restored. 
>  >  If I dsptap I can see it.  
>  >  Does any one know any way to get this info off or another way
>  >  to restore this source file?  We tried to dup the tape and it won't let 
us.
>  >  We only have the source code from an earlier system save but many 
changes
>  >  occurred since then, and I really hate to  redo all the changes, in case
>  >  I  miss some.
>  >  Thanks!
>  >  
>  >  Angie Wawrzaszek 
>  >  M.I.S. Department 

Al Macintyre  ©¿©
http://www.cen-elec.com MIS Manager Programmer & Computer Janitor

Y2K is not the end of my universe, but a re-boot of that old Chinese curse.
The road to success is always under construction.
Accept that some days you are the pigeon and some days the statue.
Murphy's Mom brought wrong baby home from hospital so it should be Kelly's 
Law.
IWhen in doubt, read the manual, assuming you can find the right one.
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.