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 | Found Entries | All

Print Page as PDF

Global: ^BDPRECN

Package: IHS Designated Provider

Global: ^BDPRECN

Information

FileMan FileNo	FileMan Filename	Package
90360.1	BDP DESG SPECIALTY PROVIDER	IHS Designated Provider

Description

This file contains 1 entry for each specialty category for each patient. A multiple contains the history of which providers were assigned to this patient for this category.

Directly Accessed By Routines, Total: 32

Package	Total	Routines
IHS Designated Provider	20	BDP BDPADD BDPAMA BDPAPI BDPCHNG BDPCHNGD BDPCOMA BDPDEL BDPDPEE BDPIQ BDPLDEL BDPLINKI BDPLINKO BDPLMDSP BDPLMUPD BDPMOD BDPPASS BDPPHXD BDPPLBC BDPUPDT
Health Summary Components	2	BHSAST BHSDEM
IHS Personal Health Record	2	BPHRCHK BPHRUPD
Patient Care Component	2	APCHS1 APCHSAST
Clinical Scheduling for Windows	1	BSDX41A
IHS Electronic Health Record	1	BEHOPTPC
Order Entry Results Reporting	1	ORB3
PCC Medical Query	1	AMQQMUL3
Patient Care Component Reports	1	APCLEM2
iCare	1	BQIDCASN

Accessed By FileMan Db Calls, Total: 16

Package	Total	Routines
IHS Designated Provider	10	BDPADD BDPAMA BDPAPI BDPDEL BDPLDEL BDPLINKO BDPLMUPD BDPLPRV BDPLUSR BDPPASS
iCare	5	BQIDCMCM BQIDCMDP BQIDCMSP BQIPTPR BQIULPT
IHS Emergency Dept Dashboard	1	BEDDUTIL

Pointer To FileMan Files, Total: 3

Package	Total	FileMan Files
IHS Designated Provider	1	BDP DESG SPEC PROV CATEGORY(#90360.3)[.01]
Kernel	1	NEW PERSON(#200)[.03, .04, #90360.11(.01), #90360.11(.02)]
Registration	1	VA PATIENT(#2)[.02]

Fields, Total: 6

Field #	Name	Loc	Type	Details
.01	PROVIDER CATEGORY	0;1	POINTER TO BDP DESG SPEC PROV CATEGORY FILE (#90360.3)	**********************REQUIRED FIELD********************** BDP DESG SPEC PROV CATEGORY(#90360.3) LAST EDITED: `OCT 19, 2011` CROSS-REFERENCE: `90360.1^B` 1)= S ^BDPRECN("B",$E(X,1,30),DA)="" 2)= K ^BDPRECN("B",$E(X,1,30),DA) CROSS-REFERENCE: `90360.1^AATOO^MUMPS` 1)= I $P(^BDPRECN(DA,0),U,2)]"" S ^BDPRECN("AA",$P(^BDPRECN(DA,0),U,2),X,DA)="" 2)= I $P(^BDPRECN(DA,0),U,2)]"" K ^BDPRECN("AA",$P(^BDPRECN(DA,0),U,2),X,DA)
.02	PATIENT NAME	0;2	POINTER TO VA PATIENT FILE (#2)	**********************REQUIRED FIELD********************** VA PATIENT(#2) LAST EDITED: `OCT 02, 2003` CROSS-REFERENCE: `90360.1^C` 1)= S ^BDPRECN("C",$E(X,1,30),DA)="" 2)= K ^BDPRECN("C",$E(X,1,30),DA) CROSS-REFERENCE: `90360.1^AA^MUMPS` 1)= S ^BDPRECN("AA",X,$P(^BDPRECN(DA,0),U),DA)="" 2)= K ^BDPRECN("AA",X,$P(^BDPRECN(DA,0),U),DA)
.03	LAST CURRENT PROVIDER	0;3	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `FEB 04, 2004` NOTES: `TRIGGERED by the PROVIDER NAME field of the PROVIDER NAME sub-field of the BDP DESG SPECIALTY PROVIDER File` CROSS-REFERENCE: `90360.1^AC` 1)= S ^BDPRECN("AC",$E(X,1,30),DA)="" 2)= K ^BDPRECN("AC",$E(X,1,30),DA) CROSS-REFERENCE: `90360.1^AD^MUMPS` 1)= I $P(^BDPRECN(DA,0),U,5)]"" S ^BDPRECN("AD",X,$P(^BDPRECN(DA,0),U,5),DA)="" 2)= I $P(^BDPRECN(DA,0),U,5)]"" K ^BDPRECN("AD",X,$P(^BDPRECN(DA,0),U,5),DA) CROSS-REFERENCE: `3^AF^MUMPS` 1)= I $T(UPDATE^BDPLINKI)]"" D UPDATE^BDPLINKI($P($G(^BDPTCAT($P(^BDPRECN(DA,0),U),0)),U,4),$P($G(^BDPTCAT($P(^BDPRECN(DA,0),U),0)),U,5),DA,X,$P(^BDPRECN(DA,0),U,2),$G(BDPLINKI)) 2)= I $T(KILL^BDPLINKI)]"" D KILL^BDPLINKI($P($G(^BDPTCAT($P(^BDPRECN(DA,0),U),0)),U,4),$P($G(^BDPTCAT($P(^BDPRECN(DA,0),U),0)),U,5),DA,X,$P(^BDPRECN(DA,0),U,2),$G(BDPLINKI))
.04	LAST USER UPDATE	0;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `DEC 26, 2003` NOTES: `TRIGGERED by the USER LAST UPDATED field of the PROVIDER NAME sub-field of the BDP DESG SPECIALTY PROVIDER File` CROSS-REFERENCE: `90360.1^AE^MUMPS` 1)= I $P(^BDPRECN(DA,0),U,5)]"" S ^BDPRECN("AE",X,$P(^BDPRECN(DA,0),U,5),DA)="" 2)= I $P(^BDPRECN(DA,0),U,5)]"" K ^BDPRECN("AE",X,$P(^BDPRECN(DA,0),U,5),DA)
.05	LAST DATE UPDATED	0;5	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `DEC 26, 2003` NOTES: `TRIGGERED by the DATE LAST UPDATED field of the PROVIDER NAME sub-field of the BDP DESG SPECIALTY PROVIDER File` CROSS-REFERENCE: `90360.1^ADTOO^MUMPS` 1)= I $P(^BDPRECN(DA,0),U,3)]"" S ^BDPRECN("AD",$P(^BDPRECN(DA,0),U,3),X,DA)="" 2)= I $P(^BDPRECN(DA,0),U,3)]"" K ^BDPRECN("AD",$P(^BDPRECN(DA,0),U,3),X,DA) CROSS-REFERENCE: `90360.1^AETOO^MUMPS` 1)= I $P(^BDPRECN(DA,0),U,4)]"" S ^BDPRECN("AE",$P(^BDPRECN(DA,0),U,4),X,DA)="" 2)= I $P(^BDPRECN(DA,0),U,4)]"" K ^BDPRECN("AE",$P(^BDPRECN(DA,0),U,4),X,DA)
.06	PROVIDER NAME	1;0	POINTER Multiple #90360.11	90360.11

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | Found Entries | All