RE: Emulate IBM's PDM list selections?

["Bale, Dan" <D.Bale@xxxxxxxxxxxxx>]

This is a multi-part message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
Thanks for the replies, Pete & Peter.

Pete, I was referring to actually doing this in a PDM list.
Specifically, I have a utility to move members from one source file to
another, with the ability to change the name of members being moved.
Also, keeps the same source's last changed date & time.

Anyway, I created a PDM user option 'MM' and it calls the MOVESRCMBR
program with parameters FromLib, FromFile, FromMbr, ToLib, ToFile,
ToMember, and Replace, the first six of which are using PDM substitution
"variables" &L, &F, &N, &L, &F, &N.  The utility actually saves the
members to a save file and, in the simplest scenario, restores them to
the target file.

When moving several members, it becomes quickly apparent that
performance is a major bugaboo when using this technique one member at a
time vs. doing them all together.

Therefore, Peter, I like your technique.  While not as "glamorous" as
the IBM "group" screens, it certainly would be the better option to what
I have now.

You've brought up another idea that I'd like to pursue in my *spare*
(three kids, two in boy scouts, one in girl scouts, one kid in soccer,
bowling once per week, and a homeowner, yeah right! <g>) time.  Building
a PDM clone.  At least a WRKOBJPDM clone.  Our five branch AS/400s have
no PDM for obvious reasons (no development on these boxes).  But, what a
pain to have to suffer through WRKOBJ and not have PDM-like options to
use.  Oh well.

Dan Bale
IT - AS/400
Handleman Company
248-362-4400  Ext. 4952
D.Bale@Handleman.com

> -----Original Message-----
> From: Peter Dow [SMTP:pcdow@yahoo.com]
> Sent: Monday, September 10, 2001 10:13 PM
> To:   midrange-l@midrange.com
> Subject:      Re: Emulate IBM's PDM list selections?
>
> Hi Dan,
>
> I remember asking a similar question a long time ago, and I believe
> the
> answer was no. You'd need to write your own PDM look-alike and then
> you
> could do anything.  There was an article in Midrange Computing about
> writing
> your own WRKPF and Google found it:
> http://www.midrangecomputing.com/ftp/prog/94/B940701.txt
>
> On the other hand, perhaps you could come close by having your PDM
> options
> call a program that accepts the parameters and simply stores them
> until a
> final option told it to show them all, e.g.
>
>     PDM option    Command
>         T1        call xyz (&l &f &n &t *more) or whatever
>         T2        call xyz (&l &f &n &t *last)
>
> Program xyz would return without setting on LR as long as the 5th
> parameter
> was *MORE.  When it's *LAST, it would display the screen full of
> whatever,
> process it, then return with LR on.
>
> hth,
> Peter Dow
> Dow Software Services, Inc.
> 909 425-0194 voice
> 909 425-0196 fax
>
>
>
> ----- Original Message -----
> From: "Bale, Dan" <D.Bale@handleman.com>
> To: <MIDRANGE-L@midrange.com>
> Sent: Monday, September 10, 2001 3:49 PM
> Subject: Emulate IBM's PDM list selections?
>
>
> > Anybody know how to emulate IBM's technique in PDM where making
> multiple
> > entries of the same user-defined list options brings up another
> screen
> > with all the selected entries?  I.e., WRKMBRPDM LIBRARY/QRPGSRC;
> take
> > option 7 (Rename) on, say, four members, press Enter and you get a
> > "Rename Members" screen with all four members listed and an
> opportunity
> > to rename them all from the same screen.
> >
> > I've got some PDM user-defined options that I've written that I'd
> like
> > to use the same way IBM handles multiple selections on the same
> list.
> > Anybody done this?  Is it documented somewhere?
> >
> > TIA.
> >
> > Dan Bale
> > IT - AS/400
> > Handleman Company
> > 248-362-4400  Ext. 4952
> > D.Bale@Handleman.com