× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



CRPence wrote:
As I noted in another reply [though sometimes I wonder if anyone ever
sees or reads any of my replies; or, I suppose, people are just too
time-constrained to read stream-of-consciousness replies over some
simplistic bullet-point memos that must only *solve* their dilemma
instead of including any edification per various related details
offered, or worse, dismissing any reply that inquires more about their
particular scenario to clarify some details], if the Unique AccPth of
the LFM is required to be valid, then just like the CPF5090 suggests in
the "Recovery" section, first *OPEN* that LFM with keyed access *before*
opening the PFM with an UPDate capability; e.g. OPNDBF &7/&6 MBR(&8)
OPTION(*INP) ACCPTH(*FILE)

So, if I currently have (names changed to protect the innocent, with the specified target library in &LIBNAME):

> RSTOBJ OBJ(*ALL) SAVLIB(APPLIB) DEV(*SAVF) +
> OBJTYPE(*PGM *FILE) SAVF(UPDSAVF) +
> RSTLIB(&LIBNAME)
> CALL POPULATE

and the only unique keys are on PHYSICAL and LOGICAL01, then inserting

> OPNDBF FILE(&LIBNAME/PHYSICAL) OPTION(*INP)
> CLOF OPNID(PHYSICAL)
> OPNDBF FILE(&LIBNAME/LOGICAL01) OPTION(*INP)
> CLOF OPNID(LOGICAL01)

between the RSTOBJ and the CALL POPULATE will solve my problem?

--
JHHL

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.