XQSMD BY USER (16)    SORT TEMPLATE (.401)

Name Value
NAME XQSMD BY USER
SORT FIELD DATA
  • FROM VALUE INTERNAL:   @z
    TO VALUE INTERNAL:   z
    CROSS REFERENCE DATA:   ^VA(200,"B",^VA(200,^2
  • 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(2)=X
DATE CREATED 1988-01-28 00:00:00
FILE NEW PERSON
DATE LAST USED 1994-07-22 00:00:00