IBXS117 ; ;12/08/20
S X=DE(33),DIC=DIE
X "S DGXRF=.1211 D ^DGDDC Q"
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBXS117 73 printed Dec 13, 2024@02:29:51 Page 2
+1 SET X=DE(33)
SET DIC=DIE
+2 XECUTE "S DGXRF=.1211 D ^DGDDC Q"