Re: CPYF (From KEYED to NON-KEYED)

[CRPence <crp@xxxxxxxxxxxxxxxxxxxx>]

.
  FWiW:

  You could replace a request to
    CPYF TheLib/TheFile ToLib/ToFile FROMMBR(TheMbr) TOMBR(ToMbr) 
CRTFILE(*YES) FROMRCD(1) TORCD(*END) COMPRESS(*YES) MBROPT(*REPLACE)
  with the following requests to:
    RUNQRY *NONE ((TheLib/TheFile TheMbr)) *OUTFILE 
OUTFILE(ToLib/ToFile ToMbr *NEWFILE) OUTFORM(*DETAIL) RCDSLT(*NO) 
PRTDFN(*NO) AUT(*EXCLUDE)
    GRTOBJAUT ToLib/ToFile *FILE REFOBJ(TheLib/TheFile) REFOBJTYPE(*FILE)

  Note: There are differences between CPYF using CRTFILE(*YES) and 
RUNQRY using output to a *NEWFILE; thus be sure to deal with the issues 
as appropriate for the application -- perhaps *RPLMBR or *RPLFILE are 
more appropriate, so investigate the options.

  Note: As a relational DB interface, even if not an SQL interface, the 
RUNQRY operates with a _set_ of data.  Thus for a lack of any ordering 
specifications on the command for a QRY(*NONE) [aka 'default query'] 
invocation, there is no ability to ensure any specific ordering.

Regards, Chuck
-- All comments provided "as is" with no warranties of any kind whatsoever.

Peter Vidal wrote:
> Hi list:
>
> Is there a CL command to create a new PF with no keys, from a file which 
> has keys in it?
>
> TIA,
>
>
> Peter Vidal 
> PALL Corporation / SR Programmer Analyst, IT Development Group
> 10540 Ridge Rd., Ste 203, New Port Richey, FL 34654-5111
> http://www.pall.com
>
> "If I take care of my character, my reputation will take care of itself."
> Dwight L. Moody