I have this SQLRPGLE program (linear MAIN, ACTGRP(*NEW)), all PTFs up to date, with the following code:
SNNUM is packed(7).
S1S is char(7) and is a subfield of a DS (it OVERLAYs a char screen field).
If S1S is blanks, the assignment fails with an MCH3601.
I have expropts(*alwblanknum) defined, I thought this was supposed to allow %int to return zero when S1S is blank, not error out.
What am I missing?
(I tried using %dec - same problem. I tried compiling program as RPGLE instead of SQLRPGLE, same problem).
Code:
SNNUM = %int(S1S);
S1S is char(7) and is a subfield of a DS (it OVERLAYs a char screen field).
If S1S is blanks, the assignment fails with an MCH3601.
I have expropts(*alwblanknum) defined, I thought this was supposed to allow %int to return zero when S1S is blank, not error out.
What am I missing?
(I tried using %dec - same problem. I tried compiling program as RPGLE instead of SQLRPGLE, same problem).
Comment