Re: Encore: Host variable not defined or not a valid structure.. (was Re: Eval-Corr puzzle)

By the way we are on 7.3.
RPG reference says one of the two data structures can be unqualified if the other is qualified.
Eval-Corr KCS = KQCS(bx).
KCS is not qualified, but DS array KQCS is defined as LIKEDS(KCS).
I moved two of the fields individually and got no error for that:
KCSfield1 = KQCS.field2 ;
KCSfield2 = KQCS.field2 ;

Any ideas?

--alan

On 2021-07-20 15:49, Alan Cassidy wrote:

This came up again after some source changes.
It resolved when I added DATFMT(*iso-) to the CTL-OPT specs atop the RPG source.
But I made some changes again and it popped back up again.
Okay, the real problem came out when I compiled the precompiler output.

It says, for_Eval-Corr KCS = KQCS(BX)_:
*EVAL-CORR summary 2 213200 ****Both data structures defined with same LIKEDS or LIKEREC *
..
..except KCS is not qualified with either of those two keywords,
       *_DCL-DS KCS ; _**_<field list> _**_*_END-DS;_* _*and KQCS is defined from KCS:
       *_DCL-DS KQCX LikeDS(KCS) DIM(1000) ;_*

If I remember correctly, this used to work for me. Maybe I don't remember correctly.

Thanks





On 2021-07-20 15:08, Alan Cassidy wrote:

Cross-posted

1080          exec sql SET OPTION DATFMT = *ISO ;
 1081          exec sql SET OPTION CLOSQLCSR = *ENDMOD ;
 1082          exec sql SET OPTION COMMIT = *NONE ;
 3692   c024    exec sql Fetch next from CK for :Rows_to_fetch rows into :MT ;
 3709   c024       exec sql Fetch next from CK for :Rows_to_fetch rows into :MT(rx) ;

DIAGNOSTIC MESSAGES
SG ID  SEV  RECORD TEXT
QL5066   0    1080  Precompile option DATFMT changed by SET OPTION statement.
QL5066   0    1081  Precompile option CLOSQLCSR changed by SET OPTION
statement.
QL5066   0    1082  Precompile option COMMIT changed by SET OPTION statement.
QL5011  30    3692  Position 67 Host structure array MT not defined or not
                    usable. Reason: The host variable is not defined or is
                    not a valid structure. A valid host structure must have
                    at least one valid member.
QL5011  30    3709  Position 70 Host structure array MT not defined or not
                    usable. Reason: The host variable is not defined or is
                    not a valid structure. A valid host structure must have
                    at least one valid member.
QL0104  30    3709  Position 72 Token ( was not valid. Valid tokens:
<END-OF-STATEMENT>.
                   Message Summary