IBXS114 ; ;10/13/26
S X=DE(30),DIC=DIE
;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBXS114 46 printed Oct 28, 2026@01:25:16 Page 2
+1 SET X=DE(30)
SET DIC=DIE
+2 ;