Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | External References | Global Variables Directly Accessed | Local Variables | All

Print Page as PDF

Global: ^SCPT(404.41

Package: Scheduling

Global: ^SCPT(404.41

Information

FileMan FileNo	FileMan Filename	Package
404.41	OUTPATIENT PROFILE	Scheduling

Description

This table contains outpatient related information for a patient. For example, it contains computed fields that indicate the current primary care team, positions and practitioner assigned to the patient.

Directly Accessed By Routines, Total: 4

Package	Total	Routines
Scheduling	4	^SCPT(404.41 SCAPMC20 SCAPMCU2 TEAM POSITIONS

Accessed By FileMan Db Calls, Total: 2

Package	Total	Routines
Scheduling	2	SCMCWS1 SCMCWSUT

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Registration	1	PATIENT(#2)[.01]

Fields, Total: 13

Field #	Name	Loc	Type	Details
.01	PATIENT	0;1	POINTER TO PATIENT FILE (#2)	**********************REQUIRED FIELD********************** PATIENT(#2) INPUT TRANSFORM: `S DINUM=X` LAST EDITED: `FEB 14, 1996` HELP-PROMPT: `Select Outpatient` DESCRIPTION: `This is a surrogate for the patient file. It contains only outpatient information.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `404.41^B` `1)= S ^SCPT(404.41,"B",$E(X,1,30),DA)=""` `2)= K ^SCPT(404.41,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `404.41^APC1^MUMPS` `1)= N SC2 S SC2=$P($G(^SCPT(404.41,DA,0)),U,4) I SC2]"" S ^SCPT(404.41,"APC",X,SC2,DA)=""` `2)= N SC2 S SC2=$P($G(^SCPT(404.41,DA,0)),U,4) I SC2]"" K ^SCPT(404.41,"APC",X,SC2,DA)` `This sorts by PATIENT(#.01), then by PRIMARY CARE?(#.04). There is an associated cross reference for the PRIMARY CARE? Field (#.04).`
.02	SEND APPOINTMENT LETTERS?	0;2	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `MAY 26, 1996`
.03	CONTRACT NURSING HOME PATIENT	0;3	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `MAR 06, 1995` HELP-PROMPT: `This indicates if this is a contract nursing home patient.` DESCRIPTION: `This indicates if the patient is a contract nursing home patient. This can then be used in helping to schedule the patient to assure proper personnel are available before and after the appointment.`
.04	PRIMARY CARE?	0;4	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 08, 1996` HELP-PROMPT: `Patient has been or will be assigned to a Primary Care Team.` DESCRIPTION: `This indicates if patient has been or will be assigned to a Primary Care Team.` CROSS-REFERENCE: `404.41^APC2^MUMPS` `1)= N SC1 S SC1=$P($G(^SCPT(404.41,DA,0)),U,1) I SC1 S ^SCPT(404.41,"APC",SC1,X,DA)=""` `2)= N SC1 S SC1=$P($G(^SCPT(404.41,DA,0)),U,1) I SC1 K ^SCPT(404.41,"APC",SC1,X,DA)` `his sorts by PATIENT(#.01), then by PRIMARY CARE?(#.04). There is an associated cross reference for the PATIENT Field (#.01).`
.06	CPRS HEADER TEXT	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>250!($L(X)<1) X` LAST EDITED: `FEB 18, 2015` HELP-PROMPT: `Answer must be 1-250 characters in length.` DESCRIPTION: `This field contains PACT assignment data to be used in the PCMM/R Header in CPRS for this patient.` TECHNICAL DESCR: `This field will be updated by PCMM/R when the patient's PACT team is assigned or unassigned.`
.07	CPRS PC WINDOW CACHE	2;0	WORD-PROCESSING #404.411	TECHNICAL DESCR: `This field will be updated each time a patient's PACT and other team details are requested by CPRS from PCMMR. The cached data will be displayed in the CPRS PCMMR Details Window if the connection to PCMMR is not` `available.` LAST EDITED: `MAY 09, 2014` DESCRIPTION: `This field will contain a cached version of a patient's PACT and other team assignment details that is displayed in the CPRS PCMMR Details Window.` TECHNICAL DESCR: `This field will be updated each time a patient's PACT and other team details are requested by CPRS from PCMMR. The cached data will be displayed in the CPRS PCMMR Details Window if the connection to PCMMR is not` `available.`
25	COMMENT	C;0	WORD-PROCESSING #404.4125	LAST EDITED: `NOV 10, 1994`
201	CURRENT PC PRACTITIONER		COMPUTED	MUMPS CODE: `S X=$P($$NMPCPR^SCAPMCU2(D0,DT,1),U,2)` ALGORITHM: `S X=$P($$NMPCPR^SCAPMCU2(D0,DT,1),U,2)` LAST EDITED: `JAN 04, 2008` DESCRIPTION: `This calculates the current Primary Care Practitioner, from the Primary Care Profile History File.`
202	CURRENT PC ATTENDING		COMPUTED	MUMPS CODE: `S X=$P($$NMPCPR^SCAPMCU2(D0,DT,2),U,2)` ALGORITHM: `S X=$P($$NMPCPR^SCAPMCU2(D0,DT,2),U,2)` LAST EDITED: `APR 25, 2007` DESCRIPTION: `This calculates the current primary care attending practitioner from the Patient Team/Position Assignment file.`
203	CURRENT PC TEAM		COMPUTED	MUMPS CODE: `S X=$P($$NMPCTM^SCAPMCU2(D0,DT,1),U,2)` ALGORITHM: `S X=$P($$NMPCTM^SCAPMCU2(D0,DT,1),U,2)` LAST EDITED: `MAR 18, 2008` DESCRIPTION: `This calculates the current primary care team.`
204	CURRENT PC PRACTITIONER POS		COMPUTED	MUMPS CODE: `S X=$P($$NMPCTP^SCAPMCU2(D0,DT,1),U,2)` ALGORITHM: `S X=$P($$NMPCTP^SCAPMCU2(D0,DT,1),U,2)` LAST EDITED: `MAR 18, 2008` DESCRIPTION: `This calculates the current primary care practitioner position.`
205	*CURRENT PC ATTENDING POSITION		COMPUTED	MUMPS CODE: `S X=$P($$NMPCTP^SCAPMCU2(D0,DT,2),U,2)` ALGORITHM: `S X=$P($$NMPCTP^SCAPMCU2(D0,DT,2),U,2)` LAST EDITED: `JUN 01, 1999` DESCRIPTION: `This calculates the current primary care attending practitioner position for the patient.`
206	CURRENT ASSOCIATE PC PROVIDER		COMPUTED	MUMPS CODE: `S X=$P($$NMPCPR^SCAPMCU2(D0,DT,3),U,2)` ALGORITHM: `S X=$P($$NMPCPR^SCAPMCU2(D0,DT,3),U,2)` DESCRIPTION: `This calculates the current Associate Primary Care provider.`

External References

Name	Field # of Occurrence
$$NMPCPR^SCAPMCU2	201+1, 202+1, 206+1
$$NMPCTM^SCAPMCU2	203+1
$$NMPCTP^SCAPMCU2	204+1, 205+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SCPT(404.41 - [#404.41]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .04(XREF 1S), .04(XREF 1K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D0	201+1, 202+1, 203+1, 204+1, 205+1, 206+1
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .04(XREF 1S), .04(XREF 1K)
>> DINUM	.01+1*
DT	201+1, 202+1, 203+1, 204+1, 205+1, 206+1
SC1	.04(XREF 1S), .04(XREF 1K)
SC2	.01(XREF 2S), .01(XREF 2K)
U	.01(XREF 2S), .01(XREF 2K), .04(XREF 1S), .04(XREF 1K), 201+1, 202+1, 203+1, 204+1, 205+1, 206+1
X	.01+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .04(XREF 1S), .04(XREF 1K), .06+1!, 201+1, 202+1 , 203+1, 204+1, 205+1, 206+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | External References | Global Variables Directly Accessed | Local Variables | All