EN LOCATION (88)    SORT TEMPLATE (.401)

Name Value
NAME EN LOCATION
SORT FIELD DATA
  • COMPUTED FIELD CODE:   S Y(1)=$S($D(^ENG(6914,D0,3)):^(3),1:"") S X=$P(Y(1),U,5),Y(2)=X S X="-",Y(3)=X S X=3,X=$P(Y(2),Y(3),X) I D0>0 S X(1)=X
    FROM VALUE INTERNAL:   ?z
    FROM VALUE EXTERNAL:   @
    TO VALUE INTERNAL:   z
  • COMPUTED FIELD CODE:   S Y(1)=$S($D(^ENG(6914,D0,3)):^(3),1:"") S X=$P(Y(1),U,5),Y(2)=X S X="-",Y(3)=X S X=2,X=$P(Y(2),Y(3),X) I D0>0 S X(2)=X
    FROM VALUE INTERNAL:   ?z
    FROM VALUE EXTERNAL:   @
    TO VALUE INTERNAL:   z
  • COMPUTED FIELD CODE:   S Y(1)=$S($D(^ENG(6914,D0,3)):^(3),1:"") S X=$P(Y(1),U,5),Y(2)=X S X="-",X=$P(Y(2),X) I D0>0 S X(3)=X
DATE CREATED 1992-04-27 08:53:00
READ ACCESS @
FILE EQUIPMENT INV.
USER # 1
WRITE ACCESS @
DATE LAST USED 1993-03-30 00:00:00