Re: Restoring an individual member into a source PF

[CRPence <CRPbottle@xxxxxxxxx>]

James H. H. Lampert wrote:
> Is there a way to restore individual members into an
> existing source PF?
>
> When I tried it with
>
> RSTOBJ OBJ(FOO) SAVLIB(FROBOZZ)DEV(*SAVF)
>        SAVF(BASESOURCE) FILEMBR((FOO (BAR)))
>        MBROPT(*ALL) ALWOBJDIF(*ALL) RSTLIB(FLATHEAD)
>
> it threw a CPI320A exception, and I ended up with the
> existing FLATHEAD/FOO renamed to FLATHEAD/FOO0001,
> and a new FLATHEAD/FOO created, containing only BAR.

  To be clear, CPI320A is informational only.  It indicates the 
original data is being protected, because the existing\old file on 
disk, is not the /identical/ copy of that named file on the media.

  Given the formats are the same, ALWOBJDIF(*FILELVL) will suffice. 
 Also to match the expectation that FROBOZZ in FLATHEAD already 
exists, the OPTION(*OLD) should really be added to the RSTOBJ 
request.  The ALWOBJDIF(*ALL) is best _always avoided_ when 
restoring any database files; i.e. list every available [non 
single-value] special value separately on the ALWOBJDIF() parameter 
if desired, but avoid almost always the use of the single value *ALL.

Regards, Chuck