While performing any of the below query getting RLCP abend in CICS screen.
select count(*) into l-nbr-cnt from cust_data where cust_nbr between 100000000 and 999999999 and substr(char(cust_nbr),6,4='4907' and cust_type in (' ','0');
select count(*) into l-nbr-cnt from cust_data where cust_nbr between 100000000 and 999999999 and mod(cust_nbr,10000)=4907 and cust_type in (' ','0');
cust_nbr declared as decimal(9,0) in table and cobol equivalent used in code that PIC s9(9) comp-3.
05 l-nbr-count pic s9(4) comp-4.
Expected output is to retrieve all the cust_nbr ending with 4907.
Joined: 20 Oct 2006 Posts: 6970 Location: porcelain throne
as far as RLCP abend,
I found this while google'n
RLCP is an ABEND code issued by the CANDLE Omegamon CICS Product indicating that
a transaction has exeeded a limit of CPU seconds
set in the OMEGANON Global parameters
for the CICS addresspace being monitored. It can be overridden. Consult OMRGAMON documentation.