ESP CASE ASSIGNMENT OPEN/FAC (711)    SORT TEMPLATE (.401)

Name Value
NAME ESP CASE ASSIGNMENT OPEN/FAC
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   912
    GET CODE:   S Y(1)=$S($D(^ESP(912,D0,0)):^(0),1:"") S X=$S('$D(^DG(40.8,+$P(Y(1),U,7),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(1)=X
    QUERY CONDITION:   I DISX(1)'=""
    DESCRIPTION OF SORT:   FACILITY not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(1)=$S($D(^ESP(912,D0,0)):^(0),1:"") S X=$S('$D(^DG(40.8,+$P(Y(1),U,7),0)):"",1:$P(^(0),U,1)) I D0>0 S DISX(1)=X
    FIELD NAME:   FACILITY
    SORT QUALIFIERS BEFORE FIELD:   ".07
  • FILE OR SUBFILE NO.:   912
    GET CODE:   S DISX(2)=$P($G(^ESP(912,D0,0)),U,10) S:DISX(2)]"" DISX(2)=+DISX(2)
    QUERY CONDITION:   I DISX(2)'=""
    DESCRIPTION OF SORT:   UOR NUMBER not null
    SEARCH EFFICIENCY RATING:   0.0909
    PROBABILITY RATING:   0.0909
    DATA TYPE FOR SORTING:   NUMERIC
    FIELD NO.:   .1
    FIELD NAME:   UOR NUMBER
  • FILE OR SUBFILE NO.:   912
    GET CODE:   S Y(2)=$C(59)_$S($D(^DD(912,.08,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^ESP(912,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,8)_":",2),$C(59),1)="OPEN" I D0>0 S DISX(3)=X
    QUERY CONDITION:   I DISX(3)
    DESCRIPTION OF SORT:   CASE STATUS=""OPEN""
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(2)=$C(59)_$S($D(^DD(912,.08,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^ESP(912,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,8)_":",2),$C(59),1)="OPEN" I D0>0 S DISX(3)=X
    FIELD NAME:   CASE STATUS="OPEN"
    SORT QUALIFIERS BEFORE FIELD:   "@B
    SORT QUALIFIERS AFTER FIELD:   ;L1
  • FILE OR SUBFILE NO.:   912
    GET CODE:   S Y(2)=$C(59)_$S($D(^DD(912,5.05,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^ESP(912,D0,5)):^(5),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,5)_":",2),$C(59),1)="NONE OF THE ABOVE" I D0>0 S DISX(4)=X
    QUERY CONDITION:   I DISX(4)
    DESCRIPTION OF SORT:   DELETED/REOPENED FLAG=""NONE OF THE ABOVE""
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(2)=$C(59)_$S($D(^DD(912,5.05,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^ESP(912,D0,5)):^(5),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,5)_":",2),$C(59),1)="NONE OF THE ABOVE" I D0>0 S DISX(4)=X
    FIELD NAME:   DELETED/REOPENED FLAG="NONE OF THE ABOVE"
    SORT QUALIFIERS BEFORE FIELD:   "@B
    SORT QUALIFIERS AFTER FIELD:   ;L1
DATE CREATED 1999-07-22 10:19:00
READ ACCESS @
FILE ESP OFFENSE REPORT
WRITE ACCESS @
DATE LAST USED 2000-03-07 00:00:00