RE: Sometime you need multiple members in a table.

Still, I would try to forget that members existed (outside of source files) and design around them. Like using one of the following
CPYF INCCHAR(MYFLD *N *EQ 'X')
And, as far as your nifty commands, I would look at alternatives, like some Run SQL Script templates to handle some of the more popular options, like resending a subset of rows.

Also, on a system which does not have PDM, but you still have to mess with members, WRKLNK '/QSYS.LIB/MYLIB.LIB/MYFILE.FILE/*.MBR' can be of assistance. Granted, you do not have the options file to customize like you do with PDM but it has been useful for me.

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of a4g atl
Sent: Thursday, January 17, 2019 3:55 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Sometime you need multiple members in a table.

My objection to using SAVF's is, it becomes a management nightmare with 30 or 60 days of files. Part of my process is to clean up older members which I could not do with SAVF's but...

The advantage of the members has been that I use WRKMBRPDM file_name and I see all the members. I can then use the option codes defined in F16 to give me commands to manage the members. Example: RR - RUNQRY *N file_name member_Name RCDSLT(*YES). Other commands I have are to resend the member when its not received or a resend is requested.

Quite frankly, WRKMBRPDM was a great tool that does not have a replacement.

Darryl Freinkel
Assignment 400.


On Thu, Jan 17, 2019 at 12:58 PM Buck Calabro <kc2hiz@xxxxxxxxx> wrote:

On 1/17/2019 8:13 AM, a4g atl wrote:

I have a situation where I have a table defined. In the past I used PFs.
The table has a long and short name. This prevents me from using
CPYF or CRTDUPOBJ. I have used RUNSQL to do a Create Table ... as
(select..)

with

no data. This creates a table not a PF, okay.

I need a PF with Multiple members that is identical to the table. I
use

the

member to store copies of file we send to external systems as an archive.
The member functionality has been great for this and I do not want
to

have

hundreds of files in the library.

No lecture from me; this is a hard transition when the code base
expects multiple members. Do you already have an inquiry program that
knows how to switch members? When possible here, I've really, really
advocated to re-do that architecture to put the year (or whatever each
member is intended to segregate) into the archive table. So instead of (simplified):
ID
NAME
ADDRESS
SALES

I have:
YEAR
ID
NAME
ADDRESS
SALES

Extracting one 'member' of data is as easy as WHERE YEAR = :year;
comparing two arbitrary years is just as easy. Quite to do ugly with
multiple members.

To answer your actual question, search the web for RTVDDSSRC. Michael
Sansoterra posted a utility many years ago that will probably do what
you need: create DDS from DSPFD / DSPFFD.

--
--buck

http://wiki.midrange.com
Your updates make it better!

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com