Re: Trying to find a post

[Vern Hamberg <vhamberg@xxxxxxxxxxxxxxxxxxxxxxxxx>]

Pete

Sounds like something I do. Does this look familiar? It's the command for a 
user-defined option in PDM. It applies to a library in WRKLIBPDM.

sbmjob cmd(qsh cmd('system "crtsavf qgpl/&n";
system "savlib &n *savf savf(qgpl/&n) clear(*all) dtacpr(*yes)";
cp /qsys.lib/qgpl.lib/&n.file /savfs/QGPL-&n.SAVF;
jar cvMf /savfs/QGPL-&n.SAVF.zip /savfs/QGPL-&n.SAVF;
rm /savfs/QGPL-&n.SAVF'))

This
- creates a SAVF in QGPL
- saves the library (substitution variable &n) to the SAVF
- copies the SAVF to IFS, giving it the name of the library where it came 
from plus the name of the library
- compresses the copy to a ZIP file
- deletes the copy in IFS

The library and the SAVF are left. They could also be deleted.

The reason it works is you can put multiple commands in the CMD parameter, 
separated by semi-colons. There are other separators, as well, but I don't 
know all that they do. The QShell docs should cover this.

This one

SBMJOB CMD(QSH CMD('cp /qsys.lib/&l.lib/&n.&s /savfs/&l-&n.&a;
jar cvMf /savfs/&l-&n.&a.zip /savfs/&l-&n.&a;
rm /savfs/&l-&n.&a'))

- copies an existing SAVF to the IFS
- makes a ZIP of it
- deletes the IFS copy

It should be run against a SAVF in WRKOBJPDM.

HTH
Vern

At 05:10 PM 5/11/2004, you wrote:
> Either I am having my first "senior moment" or it is the lingering effects
> of the 70's coming back to haunt me but I could have sworn there was a post
> to this list in that last week or so that had something to do with using the
> jar command to zip or compress some files.  Further, someone posted some
> pseudo code that (as I recall) had something to do with a command that could
> do the savf to IFS to jar steps combined. It used parameter markers such as
> &file &lib &folder ?
>
> Can I find it?  Not in two hours of searching through my e-mail folders,
> Googling, stepping through each email.  Nothing! Was I just imagining such a
> thing? Or does someone have a better memory or search tools than I?
>
> Pete Helgren
> Timpanogos Technologies, Inc
> 801.892.9106 x 202