×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




midrange-l-request@xxxxxxxxxxxx wrote:

>   3. Re: Source PF member exists? (Vernon Hamberg)
>
>The resulting outfile has no key, unless you create one especially
>for this. CHAIN is not the best way - a SELECT and checking the SQL
>code is going to tell you whether you have a hit.
>
>But the CHKOBJ is even better.
>
>At 04:56 PM 12/19/2005, you wrote:
>
>>You could try something like this:
>>DSPFD FILE(srclib/srcfile) TYPE(*MBRLIST) +
>>              OUTPUT(*OUTFILE) OUTFILE(mylib/myoutfile).
>>Then chain to the outfile with the member you are trying to create. If
>>you get a hit then you know that the source already exists.

Vern:

True, the outfile doesn't have a key, but...

I've never needed to use this for an RPG CHAIN:

  ==>  dspobjd  ...outfile(mylib/mymbr)
  ==>  chgpf    mylib/mymbr maxmbrs(1)
  ==>  addpfcst mylib/mymbr type(*UNQCST or *PRIKEY) key(MLNAME)

Ought to work, no? It's a handy way to get keys on files that never had keys 
before.

Tom Liotta


This thread ...


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

This mailing list archive is Copyright 1997-2026 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.