DIFFANS (26) DELTA CHECKS (62.1)
Name
Value
NAME
DIFFANS
XECUTABLE CODE
Q:'$D(%X) S %X=%X+X,LREXEC="ABS VALUE" D DELTA^LREXEC W:%X'=100&(%X'=0) !,*7," DIFFS DO NOT ADD TO 100",! K %X
