× 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.


  1.  Home
  2. RPG400-L
  3. July 2021

Re: Eval-Corr puzzle

On 2021-07-20 3:06 p.m., Alan Cassidy wrote:
I've done plenty of SQL multi-row fetch programs but this is stumping me:

Relevant definitions are:
DCL-DS  KCS ;
  //
  // -- 40 subfield definitions
  //
END-DS ;

DCL-DS  KQCS LikeDS( KCS ) DIM(1000) ;

In the SQL precompiler listing EVAL-CORR summary section, I get:

(1) Every subfield in KCS has "*RNF7341 XXYYZZ ... In target only."

(2) *RNF7341 CSDLTDTE          In target only.
     EVAL-CORR summary 2                          212900
         Both data structures defined with same LIKEDS or LIKEREC

(3) Every subfield for KQCS is tagged with "In source only".
 EVAL-CORR summary 3                          356400
*RNF7342 CS15OT            In source only.

Do I have to make KCS a qualified data structure?
(IBM references aren't helping)

You should't have to make KCS a qualified data structure.

Could you show the EVAL-CORR operations, and also a bit more of your KCS definition, but maybe just a couple of subfields?


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.