SCMC FLAGGED BULLETIN (885)    SORT TEMPLATE (.401)

Name Value
NAME SCMC FLAGGED BULLETIN
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   404.43
    GET CODE:   S DISX(1)=$P($G(^SCPT(404.43,D0,0)),U,15)
    QUERY CONDITION:   I DISX(1)'=""
    DESCRIPTION OF SORT:   DATE FLAGGED FOR INACTIVATION not null
    SEARCH EFFICIENCY RATING:   100.0000
    PROBABILITY RATING:   1.0000
    DATA TYPE FOR SORTING:   DATE/TIME
    FIELD NO.:   .15
    FIELD NAME:   DATE FLAGGED FOR INACTIVATION
    SORT QUALIFIERS BEFORE FIELD:   @'
    CROSS REFERENCE DATA:   ^SCPT(404.43,"AFLG",^SCPT(404.43,^2
  • FILE OR SUBFILE NO.:   404.51
    GET CODE:   S Y(201)=$S($D(^SCTM(404.51,D0,0)):^(0),1:"") S X=$P($G(^DIC(4,+$P(Y(201),U,7),0)),U) I D0>0 S DISX(2)=X
    QUERY CONDITION:   I DISX(2)'=""
    DESCRIPTION OF SORT:   INSTITUTION not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(201)=$S($D(^SCTM(404.51,D0,0)):^(0),1:"") S X=$P($G(^DIC(4,+$P(Y(201),U,7),0)),U) I D0>0 S DISX(2)=X
    RELATIONAL JUMP FIELD DATA:
    • RELATIONAL START FILE NO.:   404.43
      NEXT SUBSCRIPT:   100
      TO FILE OR SUBFILE:   404.57
      GLOBAL REFERENCE:   SCTM(404.57,
      MULTIVALUED FLAG:   NOT MULTI-VALUED
      RELATIONAL CODE:   S I(0,0)=D0 S Y(1)=$S($D(^SCPT(404.43,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S D(0)=+X
    • RELATIONAL START FILE NO.:   404.57
      NEXT SUBSCRIPT:   200
      TO FILE OR SUBFILE:   404.51
      GLOBAL REFERENCE:   SCTM(404.51,
      MULTIVALUED FLAG:   NOT MULTI-VALUED
      RELATIONAL CODE:   S I(100,0)=D0 S Y(101)=$S($D(^SCTM(404.57,D0,0)):^(0),1:"") S X=$P(Y(101),U,2),X=X S D(0)=+X
    FIELD NAME:   INSTITUTION
    SORT QUALIFIERS BEFORE FIELD:   ""@".07
  • FILE OR SUBFILE NO.:   404.42
    GET CODE:   S Y(101)=$S($D(^SCPT(404.42,D0,0)):^(0),1:"") S X=$P($G(^SCTM(404.51,+$P(Y(101),U,3),0)),U) I D0>0 S DISX(3)=X
    QUERY CONDITION:   I DISX(3)'=""
    DESCRIPTION OF SORT:   TEAM ASSIGNMENT not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(101)=$S($D(^SCPT(404.42,D0,0)):^(0),1:"") S X=$P($G(^SCTM(404.51,+$P(Y(101),U,3),0)),U) I D0>0 S DISX(3)=X
    RELATIONAL JUMP FIELD DATA:
    • RELATIONAL START FILE NO.:   404.43
      NEXT SUBSCRIPT:   100
      TO FILE OR SUBFILE:   404.42
      GLOBAL REFERENCE:   SCPT(404.42,
      MULTIVALUED FLAG:   NOT MULTI-VALUED
      RELATIONAL CODE:   S I(0,0)=D0 S Y(1)=$S($D(^SCPT(404.43,D0,0)):^(0),1:"") S X=$P(Y(1),U,1),X=X S D(0)=+X
    FIELD NAME:   TEAM ASSIGNMENT
    SORT QUALIFIERS BEFORE FIELD:   "@".03
  • FILE OR SUBFILE NO.:   404.42
    GET CODE:   S Y(101)=$S($D(^SCPT(404.42,D0,0)):^(0),1:"") S X=$P($G(^DPT(+$P(Y(101),U,1),0)),U) I D0>0 S DISX(4)=X
    QUERY CONDITION:   I DISX(4)'=""
    DESCRIPTION OF SORT:   PATIENT not null
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(101)=$S($D(^SCPT(404.42,D0,0)):^(0),1:"") S X=$P($G(^DPT(+$P(Y(101),U,1),0)),U) I D0>0 S DISX(4)=X
    RELATIONAL JUMP FIELD DATA:
    • RELATIONAL START FILE NO.:   404.43
      NEXT SUBSCRIPT:   100
      TO FILE OR SUBFILE:   404.42
      GLOBAL REFERENCE:   SCPT(404.42,
      MULTIVALUED FLAG:   NOT MULTI-VALUED
      RELATIONAL CODE:   S I(0,0)=D0 S Y(1)=$S($D(^SCPT(404.43,D0,0)):^(0),1:"") S X=$P(Y(1),U,1),X=X S D(0)=+X
    FIELD NAME:   PATIENT
    SORT QUALIFIERS BEFORE FIELD:   "@".01
DATE CREATED 2004-03-30 09:31:00
READ ACCESS @
FILE PATIENT TEAM POSITION ASSIGNMENT
WRITE ACCESS @
DATE LAST USED 2006-05-02 00:00:00