Global: ^BWMGR

FileMan FileNo	FileMan Filename	Package
9002086.01	BW CASE MANAGER	Women's Health

FileMan FileNo

FileMan Filename

Package

9002086.01

BW CASE MANAGER

Package	Total	Routines
Women's Health	1	BWLETDQ

Package	Total	FileMan Files
Women's Health	2	BW PATIENT(#9002086)[.1] BW SITE PARAMETER(#9002086.02)[.02]

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[.01]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CASE MANAGER	0;1	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) INPUT TRANSFORM: `S:$D(X) DINUM=X` LAST EDITED: `MAR 08, 1996` HELP-PROMPT: `Enter the name of the person who will be a Women's Health Case Manager.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002086.01^B` 1)= S ^BWMGR("B",$E(X,1,30),DA)="" 2)= K ^BWMGR("B",$E(X,1,30),DA) CROSS-REFERENCE: `9002086.01^U^MUMPS` 1)= D UPXREF^BWUTL5(X,"^BWMGR(") 2)= D KUPXREF^BWUTL5(X,"^BWMGR(") Sets uppercase xref.
.02	DATE INACTIVATED	0;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `SEP 23, 1994` HELP-PROMPT: `Enter the date on which this Case Manager will be no longer active as a Women's Health Case Manager.`

CASE MANAGER

0;1

POINTER TO NEW PERSON FILE (#200)

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

INPUT TRANSFORM: S:$D(X) DINUM=X
LAST EDITED: MAR 08, 1996
HELP-PROMPT: Enter the name of the person who will be a Women's Health Case Manager.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9002086.01^B

1)= S ^BWMGR("B",$E(X,1,30),DA)=""

2)= K ^BWMGR("B",$E(X,1,30),DA)

CROSS-REFERENCE: 9002086.01^U^MUMPS

1)= D UPXREF^BWUTL5(X,"^BWMGR(")

2)= D KUPXREF^BWUTL5(X,"^BWMGR(")

Sets uppercase xref.

DATE INACTIVATED

0;2

DATE

INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: SEP 23, 1994
HELP-PROMPT: Enter the date on which this Case Manager will be no longer active as a Women's Health Case Manager.

Name	Line Occurrences (* Changed, ! Killed)
^BWMGR("B"	.01(XREF 1S), .01(XREF 1K)

Information