Re: Sometime you need multiple members in a table.

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.