XTEST (127)    FUNCTION (.5)

Name Value
NAME XTEST
MUMPS CODE S SUM=X,X1=D0 S:$D(^UTILITY($J,9999,X1))=0 ^UTILITY($J,9999,X1)=0 S ^UTILITY($J,9999,X1)=^UTILITY($J,9999,X1)+SUM S X=^UTILITY($J,9999,X1)
EXPLANATION CALCULATES SUM WHEN USED IN SORT FUNCTION; CUMULATIVE TOTAL IN PRINT ROUTINE
DATE-VALUED NO