Re: CWX9001 and MCH4227 when compiling FOR-EACH ... IN %SPLIT(...)

[Peter Dow <petercdow@xxxxxxxxx>]

Hi Daniel,

I notice that in addition to shortening the items variable, you also 
changed it from varchar to char.

Also, in the code where you %split into an array, you did not increase 
the items variable back to 32000.

Maybe %split has a problem with varchar?

--
*Peter Dow* /
909 793-9050
petercdow@xxxxxxxxx
/


On 12/10/2024 7:52 AM, daniel@xxxxxxxx wrote:
> Hi,
>
> I have a strange problem. I have several programs in production, which use FOR-EACH with %SPLIT. These programs are working since several months.
>
> Now when I try to compile these programs the compiler terminates with CWX9001 and in the job log a MCH4227 message can be found.
>
> This is the construct that worked at least until October this year, and is failing now:
>
> **free
> ctl-opt actgrp(*new);
> dcl-s items varchar(32000) inz('1,2,3,4,5');
> dcl-s item varchar(25) inz;
> for-each item in %split(items:',');
>    dsply item;
> endfor;
> *inlr = *on;
> return;
>   
> Now the strange things start.
>
> If I shorten the „list“ variable to VARCHAR(16382) the program compiles:
>
> dcl-s items char(16382) inz('1,2,3,4,5');
> dcl-s item char(25) inz;
> for-each item in %split(items:',');
>   
> If I declare an array and do the %SPLIT into that, the program compiles:
>
> dcl-s items char(16382) inz('1,2,3,4,5');
> dcl-s item char(25) inz;
> dcl-s array char(25) dim(*auto:32000) inz;
> array = %split(items:',');
> for-each item in array;
>   
> What’s wrong? Any ideas?
>
> Thanks in advance.
>
> Kind regards,
> Daniel