Global: ^SCTM(404.56

FileMan FileNo	FileMan Filename	Package
404.56	TEAM AUTOLINK	Scheduling

Directly Accessed By Routines, Total: 2

Package	Total	Routines
Scheduling	2	SCAPMC5 SCAPMCU3

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

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

Customize PDF page

Package: Scheduling

Global: ^SCTM(404.56

Information

Description

Directly Accessed By Routines, Total: 2

Accessed By FileMan Db Calls, Total: 1

Pointer To FileMan Files, Total: 6

Fields, Total: 2