STANDARD DATA DICTIONARY #404.56 -- TEAM AUTOLINK FILE 3/24/25 PAGE 1
STORED IN ^SCTM(404.56, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
DD ACCESS: @
RD ACCESS: d
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: AUTOLINK (#.02)[R]
CROSS
REFERENCED BY: TEAM(AC), AUTOLINK(AC1), TEAM(APRIMARY), AUTOLINK(APRIMARY1), TEAM(B)
404.56,.01 TEAM 0;1 POINTER TO TEAM FILE (#404.51) (Required)
LAST EDITED: APR 03, 1995
CROSS-REFERENCE: 404.56^B
1)= S ^SCTM(404.56,"B",$E(X,1,30),DA)=""
2)= K ^SCTM(404.56,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 404.56^APRIMARY^MUMPS
1)= N SC2 S SC2=$P($G(^SCTM(404.56,DA,0)),U,2) I SC2]"" S ^SCTM(404.56,"APRIMARY",X,SC2,DA)=""
2)= N SC2 S SC2=$P($G(^SCTM(404.56,DA,0)),U,2) I SC2]"" K ^SCTM(404.56,"APRIMARY",X,SC2,DA)
This sorts by TEAM(#.01), then by AUTOLINK(#.02). There are associated cross references for each
of these fields.
CROSS-REFERENCE: 404.56^AC^MUMPS
1)= N SC1 S SC1=$P($G(^SCTM(404.56,DA,0)),U,2) I SC1]"" S ^SCTM(404.56,"AC",SC1,X,DA)=""
2)= N SC1 S SC1=$P($G(^SCTM(404.56,DA,0)),U,2) I SC1]"" K ^SCTM(404.56,"AC",SC1,X,DA)
This sorts by AUTOLINK(#.02), then by TEAM(#.01). There is an associated cross reference for the
AUTOLINK Field (#.02).
404.56,.02 AUTOLINK 0;2 VARIABLE POINTER (Required)
FILE ORDER PREFIX LAYGO MESSAGE
42 1 W n WARD
405.4 2 R n ROOM-BED
200 3 P n PRACTITIONER
45.7 4 S n SPECIALTY
44 5 C n CLINIC
SCREEN ON FILE 200: S DIC("S")="I $D(X),$D(^XUSEC(""PROVIDER"",+Y))"
SCREEN EXPLANATION: Allows only personnel with 'provider' key.
SCREEN ON FILE 44: S DIC("S")="I $P(^(0),U,3)=""C"""
SCREEN EXPLANATION: Allows only clinic locations
LAST EDITED: APR 03, 1995
HELP-PROMPT: Enter the file and entry the team will be linked to for automatic patient updates during ADT
movements.
DESCRIPTION:
Links for automatic patient addition/removal based on ADT movements.
CROSS-REFERENCE: 404.56^APRIMARY1^MUMPS
1)= N SC1 S SC1=$P($G(^SCTM(404.56,DA,0)),U,1) I SC1 S ^SCTM(404.56,"APRIMARY",SC1,X,DA)=""
2)= N SC1 S SC1=$P($G(^SCTM(404.56,DA,0)),U,1) I SC1 K ^SCTM(404.56,"APRIMARY",SC1,X,DA)
This sorts by TEAM(#.01), then by AUTOLINK(#.02). There are associated cross references for each
of these fields.
CROSS-REFERENCE: 404.56^AC1^MUMPS
1)= N SC2 S SC2=$P($G(^SCTM(404.56,DA,0)),U,1) I SC2 S ^SCTM(404.56,"AC",X,SC2,DA)=""
2)= N SC2 S SC2=$P($G(^SCTM(404.56,DA,0)),U,1) I SC2 K ^SCTM(404.56,"AC",X,SC2,DA)
This sorts by AUTOLINK(#.02), then by TEAM(#.01). There is an associated cross reference for the
TEAM Field (#.01).
FILES POINTED TO FIELDS
FACILITY TREATING SPECIALTY
(#45.7) AUTOLINK (#.02)
HOSPITAL LOCATION (#44) AUTOLINK (#.02)
NEW PERSON (#200) AUTOLINK (#.02)
ROOM-BED (#405.4) AUTOLINK (#.02)
TEAM (#404.51) TEAM (#.01)
WARD LOCATION (#42) AUTOLINK (#.02)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):