IBXSC76 ; ;08/13/09
S X=DE(20),DIC=DIE
;
S DGRVRCAL=2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBXSC76 82 printed Feb 18, 2025@23:58:49 Page 2
+1 SET X=DE(20)
SET DIC=DIE
+2 ;
+3 SET X=DE(20)
+4 SET DGRVRCAL=2