Global: ^SCTM(404.56

FileMan FileNo	FileMan Filename	Package
404.56	TEAM AUTOLINK	Scheduling

Directly Accessed By Routines, Total: 4

Package	Total	Routines
Scheduling	4	SCAPMC5 SCAPMCU3 ^SCTM(404.56 TEAM POSITIONS

Accessed By FileMan Db Calls, Total: 1

Package	Total	Routines
Scheduling	1	SCAPMCU3

Pointer To FileMan Files, Total: 6

Package	Total	FileMan Files
Registration	3	ROOM-BED(#405.4)[.02] WARD LOCATION(#42)[.02] FACILITY TREATING SPECIALTY(#45.7)[.02]
Scheduling	2	HOSPITAL LOCATION(#44)[.02] TEAM(#404.51)[.01]
Kernel	1	NEW PERSON(#200)[.02]

Fields, Total: 2

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	TEAM	0;1	POINTER TO TEAM FILE (#404.51)	**********************REQUIRED FIELD********************** TEAM(#404.51) 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).`
.02	AUTOLINK	0;2	VARIABLE POINTER	**********************REQUIRED FIELD********************** WARD LOCATION(#42) ROOM-BED(#405.4) NEW PERSON(#200) FACILITY TREATING SPECIALTY(#45.7) HOSPITAL LOCATION(#44) EXPLANATION: `Allows only personnel with 'provider' key.` `SCREEN ON FILE 44: S DIC("S")="I $P(^(0),U,3)=""C"""` 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).`

.01

TEAM

0;1

POINTER TO TEAM FILE (#404.51)

************************REQUIRED FIELD************************

TEAM(#404.51)

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).

.02

AUTOLINK

0;2

VARIABLE POINTER

************************REQUIRED FIELD************************

WARD LOCATION(#42) ROOM-BED(#405.4) NEW PERSON(#200) FACILITY TREATING SPECIALTY(#45.7) HOSPITAL LOCATION(#44)

EXPLANATION: Allows only personnel with 'provider' key.
SCREEN ON FILE 44: S DIC("S")="I $P(^(0),U,3)=""C"""
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).

External References

Name	Field # of Occurrence
NAME^DICM2	ID.02+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SCTM(404.56 - [#404.56]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)

Naked Globals

Name	Field # of Occurrence
^("0"	ID.02+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)
>> DIC	ID.02+1
>> DIC("S"	.02VPSCR3+1, .02VPSCR5+1
>> DINAME	ID.02+1
>> DIY	ID.02+1*
SC1	.01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K)
SC2	.01(XREF 2S), .01(XREF 2K), .02(XREF 2S), .02(XREF 2K)
U	ID.02+1, .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)
>> X	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K)
>> Y	ID.02+1

Customize PDF page

Package: Scheduling