XU-ZISPL-USER (11)    SORT TEMPLATE (.401)

Name Value
NAME XU-ZISPL-USER
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   3.51
    GET CODE:   S Y(1)=$S($D(^XMB(3.51,D0,0)):^(0),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,5),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(1)=X
    QUERY CONDITION:   I DISX(1)'=""
    DESCRIPTION OF SORT:   USER not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(1)=$S($D(^XMB(3.51,D0,0)):^(0),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,5),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(1)=X
    FIELD NAME:   USER
    SORT QUALIFIERS BEFORE FIELD:   +"4
    CROSS REFERENCE DATA:   ^XMB(3.51,"ADUZ",^XMB(3.51,^2
    POINT TO CROSS REFERENCE:   ^VA(200,"B",
DATE CREATED 1996-12-13 15:43:00
FILE SPOOL DOCUMENT
WRITE ACCESS @
DATE LAST USED 1996-12-13 00:00:00