GECS READY FOR BATCHING (93)    SORT TEMPLATE (.401)

Name Value
NAME GECS READY FOR BATCHING
SORT FIELD DATA
  • CROSS REFERENCE DATA:   ^GECS(2100,"AC",^GECS(2100,^2
  • COMPUTED FIELD CODE:   S Y(1)=$S($D(^GECS(2100,D0,0)):^(0),1:"") S X=$S('$D(^GECS(2101.1,+$P(Y(1),U,3),0)):"",1:$P(^(0),U,1)) I D0>0 S X(4)=X
DATE CREATED 1990-08-16 18:36:00
READ ACCESS @
FILE GENERIC CODE SHEET
USER # 0
WRITE ACCESS @
DATE LAST USED 1994-09-09 00:00:00