SCMC EXTENDED (873)    SORT TEMPLATE (.401)

Name Value
NAME SCMC EXTENDED
SORT FIELD DATA
  • FILE OR SUBFILE NO.:   404.43
    GET CODE:   S Y(1)=$S($D(^SCPT(404.43,D0,0)):^(0),1:"") S X=$P(Y(1),U,13),X=X S X=X>0 I D0>0 S DISX(1)=X
    QUERY CONDITION:   I (DISX(1)]]0)&(DISX(1)']]1)
    DESCRIPTION OF SORT:   INTERNAL(EXTEND AUTOMATIC)>0
    DATA TYPE FOR SORTING:   FREE TEXT
    COMPUTED FIELD CODE:   S Y(1)=$S($D(^SCPT(404.43,D0,0)):^(0),1:"") S X=$P(Y(1),U,13),X=X S X=X>0 I D0>0 S DISX(1)=X
    FIELD NAME:   INTERNAL(EXTEND AUTOMATIC)>0
    SORT QUALIFIERS BEFORE FIELD:   @"B
    SORT QUALIFIERS AFTER FIELD:   ;L1
  • FILE OR SUBFILE NO.:   404.43
    GET CODE:   D INACTDT^SCMCTSK1(D0) S DISX(2)=X
    QUERY CONDITION:   I (DISX(2)]]3030916.999999)&(DISX(2)']]3040315.24)
    DESCRIPTION OF SORT:   SCHEDULED INACTIVATION DATE from Sep 17,2003 to Mar 15,2004@24:00
    DATA TYPE FOR SORTING:   DATE/TIME
    FIELD NO.:   .159
    FIELD NAME:   SCHEDULED INACTIVATION DATE
    SORT QUALIFIERS BEFORE FIELD:   @
    FROM VALUE INTERNAL:   3030916.999999
    FROM VALUE EXTERNAL:   Sep 17,2003
    FROM VALUE PRINTABLE:   Sep 17,2003
    TO VALUE INTERNAL:   3040315.24
    TO VALUE EXTERNAL:   Mar 15,2004@2400
    TO VALUE PRINTABLE:   Mar 15,2004@24:00
  • 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(3)=X
    QUERY CONDITION:   I DISX(3)'=""
    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(3)=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.51
    GET CODE:   S DISX(4)=$P($G(^SCTM(404.51,D0,0)),U)
    QUERY CONDITION:   I DISX(4)'=""
    DESCRIPTION OF SORT:   NAME not null
    DATA TYPE FOR SORTING:   FREE TEXT
    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 NO.:   .01
    FIELD NAME:   NAME
    SORT QUALIFIERS BEFORE FIELD:   ""@
DATE CREATED 2004-03-15 17:11:00
READ ACCESS @
FILE PATIENT TEAM POSITION ASSIGNMENT
WRITE ACCESS @
DATE LAST USED 2004-03-15 00:00:00