Re: S/ 36 stuff on the AS/400

We migrated from S36 to AS400 11 years ago.  Here's some of what I've
learned along the way.  By the way it took 7 years to fully convert 1 of
our libraries to native.  We are hoping to have our last home grown library
completed this year.

------------------------------------------------
1) History File on 36 was so simple and straightforward for OCL logging..
     Is there a comparable way to log OCL statements in the AS/400 ?

History file on the AS400 is different from S36. If you want to log
commands, it goes to the job log. We have QDFTJOBD changed to produce job
logs. If you don't then the job log disappears when the job does, unless
there are errors. If your OCL36 are set to log, then you will see them in
the job log.  I assume that you are using the QDFTJOBD for your users.  See
user profile.  Here's a copy/paste of our settings for the jobd

 Job description:   QDFTJOBD       Library:   QGPL

 Message logging:
   Level  . . . . . . . . . . . . . . . . . . . . :   4
   Severity . . . . . . . . . . . . . . . . . . . :   0
   Text . . . . . . . . . . . . . . . . . . . . . :   *SECLVL
 Log CL program commands  . . . . . . . . . . . . :   *YES

*SECLVL will give you secondary message text.  *LIST will give you first
level if I remember correctly.  We also have the QPJOBLOG print file
changed to a special form and outq, so we can save them with our regular
save and delete them every night.  There is a default outq QEZDEBUG for job
logs I think, if you have cleanup turned on. This came along later, so I
don't remember everything about it. Try GO ASSIST.

  2) Any way to simplify the spool facility to have some of the neato
simplicity
      of ye olde VASP ....

VASP came along after we moved off the S36.  I don't see how anything could
be simplier then WRKSPLF.  You don't know how much I missed the S38 version
when I had to go back to a S36.  With cmd 4 prompting, I just don't see how
much simplier it could be.


  3) PDM enhancements .. "I like POP" ...

   eg. I don't see how you can do an object string search on "part" of a
library
   ...eg..  all members with "*cash*" in the 25 search mode..
   (yes, I acknowledge that the actual search is neat)

      ... and the POP File command .. 1 entry usage "FILE CASHQ", can that
be emulated...?
      instead of entering PDM/Objects/Write in QS36F and File Name/etc

There used to be a product called "PAPA" for the AS400 which simulated POP
as well as it could.  Haven't seen it advertised in years.  Don't even
remember who sold it.  As our people became more familiar with AS400 native
stuff, we quit using it.  Finally removed it.  For string search, I prefer
Hawkeye/Pathfinder's scan source.  It is much more powerful than PDM find
string.  For the FILE command, have you used WRKF?  We also use DBU and
there is a free utility WRKDBF available from a member of this list.  You
could look at the archives to find where to look.

  4) Simplest explanation of how to restore a 36 File if the Save was done
      in AS/400 command mode... <embarrassed to ask>

RSTLIB or RSTOBJ OR RSTS36F
Did you know you could go to any menu of IBM commands by using GO CMD???.
For example GO CMDS36 will show you commands relating to S36.  GO CMDRST
will give you all restore commands.  If you know the verb part of the
command you want, you can key something like RST* and it will give you the
restore commands also.

  5) Favorite relatively simple program generator for AS/400
      I used to use the Monahan (or was it Kisco for awhile) DFU to RPG
      converter on the S/36 and found it was a pretty good starting point
...
      ... probably still exists on AS/400, as one of a few alternatives ?
      Other fav suggestions without a hefty price tag and cleanish
generated code...

Sorry can't help you there.


Valene M. Williamson
IBM Certified Specialist
vwilliamson@glazers.com
972-448-8018



+---
| 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
+---