On Mon, 1 Dec 2025 15:01:58 -0800, Brian Westerman
<[email protected]> wrote:
> In this case it's a matter of replacing over 100 instructions with 3.
If you can make unsigned-packed-decimal your minimum hardware level, then you
can simply use XC to zero your counters.
It's unclear about the method you are choosing but it seems you are choosing an
overlapping MVC. I believe Peter was recommending against this because it
causes a byte by byte move. Moving the entire table from a constant is probably
more efficient.
Chances are that an entire control block is being initialized and you could
include everything into 1 move.
LA R2,CB
LM R3,R5,=A(L'CB,CBMODEL,L'CBMODEL)
MVCLE R2,R3,0