Sub-Field: 405.41

Parent File	Name	Number	Package
ROOM-BED(#405.4)	WARD(S) WHICH CAN ASSIGN	405.41	Registration

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	WARD(S) WHICH CAN ASSIGN	0;1	POINTER TO WARD LOCATION FILE (#42)	WARD LOCATION(#42) INPUT TRANSFORM: `I $D(X) S DINUM=X D CK^DGPMDDRB` LAST EDITED: `SEP 30, 2013` HELP-PROMPT: `Choose, from the available listing, the ward(s) which are permitted to place a patient in this bed.` DESCRIPTION: `Enter the ward (a pointer to the WARD LOCATION file) which can utilize this bed.` AUDIT: `YES, ALWAYS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `405.41^B` `1)= S ^DG(405.4,DA(1),"W","B",$E(X,1,30),DA)=""` `2)= K ^DG(405.4,DA(1),"W","B",$E(X,1,30),DA)` CROSS-REFERENCE: `405.4^W` `1)= S ^DG(405.4,"W",$E(X,1,30),DA(1),DA)=""` `2)= K ^DG(405.4,"W",$E(X,1,30),DA(1),DA)`

WARD(S) WHICH CAN ASSIGN

0;1

POINTER TO WARD LOCATION FILE (#42)

INPUT TRANSFORM: I $D(X) S DINUM=X D CK^DGPMDDRB
LAST EDITED: SEP 30, 2013
HELP-PROMPT: Choose, from the available listing, the ward(s) which are permitted to place a patient in this bed.
DESCRIPTION:
Enter the ward (a pointer to the WARD LOCATION file) which can utilize this bed.
AUDIT: YES, ALWAYS
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 405.41^B
1)= S ^DG(405.4,DA(1),"W","B",$E(X,1,30),DA)=""
2)= K ^DG(405.4,DA(1),"W","B",$E(X,1,30),DA)
CROSS-REFERENCE: 405.4^W
1)= S ^DG(405.4,"W",$E(X,1,30),DA(1),DA)=""
2)= K ^DG(405.4,"W",$E(X,1,30),DA(1),DA)