PARAM (48) FUNCTION (.5)
Name
Value
NAME
PARAM
MUMPS CODE
S X=$S(X=""!(X'?.ANP):"",$D(DIPA($E(X,1,30))):DIPA($E(X,1,30)),1:"")
EXPLANATION
RETURNS VALUE OF PARAMETER NAMED BY ARGUMENT
