XQSMD BY OPTION (17)    SORT TEMPLATE (.401)

Name Value
NAME XQSMD BY OPTION
SORT FIELD DATA
  • COMPUTED FIELD CODE:   S Y(1)=$S($D(^VA(200,D0,19.5,D1,0)):^(0),1:"") S X=$S('$D(^DIC(19,+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1)) I D1>0 S X(1)=X
  • CROSS REFERENCE DATA:   ^VA(200,"B",^VA(200,^2
DATE CREATED 1988-02-01 00:00:00
FILE NEW PERSON
DATE LAST USED 1994-07-22 00:00:00