Sub-Field: 119.64

Parent File	Name	Number	Package
NUTRITION LOCATION(#119.6)	ASSOCIATED HOSPITAL LOCATION	119.64	Dietetics

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ASSOCIATED HOSPITAL LOCATION	0;1	POINTER TO HOSPITAL LOCATION FILE (#44)	**********************REQUIRED FIELD********************** HOSPITAL LOCATION(#44) INPUT TRANSFORM: `I $D(X) S Y=$O(^FH(119.6,"AL",X,0)) I Y>0,Y-DA(1) W " Hospital location already assigned to ",$P($G(^FH(119.6,+Y,0)),"^",1) K X` LAST EDITED: `AUG 14, 2006` DESCRIPTION: `This is a pointer to the Hospital Location file to store the hospital location(s) associated with this Nutrition Location. Outpatient Locations MUST have an Associated Hospital Location set up.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `119.64^B` `1)= S ^FH(119.6,DA(1),"L","B",$E(X,1,30),DA)=""` `2)= K ^FH(119.6,DA(1),"L","B",$E(X,1,30),DA)` CROSS-REFERENCE: `119.6^AL` `1)= S ^FH(119.6,"AL",$E(X,1,30),DA(1),DA)=""` `2)= K ^FH(119.6,"AL",$E(X,1,30),DA(1),DA)` `Cross reference the whole file by field #2.6.`

ASSOCIATED HOSPITAL LOCATION

0;1

POINTER TO HOSPITAL LOCATION FILE (#44)

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

INPUT TRANSFORM: I $D(X) S Y=$O(^FH(119.6,"AL",X,0)) I Y>0,Y-DA(1) W " Hospital location already assigned to ",$P($G(^FH(119.6,+Y,0)),"^",1) K X
LAST EDITED: AUG 14, 2006
DESCRIPTION:
This is a pointer to the Hospital Location file to store the hospital location(s) associated with this Nutrition Location. Outpatient Locations MUST have an Associated Hospital Location set up.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 119.64^B
1)= S ^FH(119.6,DA(1),"L","B",$E(X,1,30),DA)=""
2)= K ^FH(119.6,DA(1),"L","B",$E(X,1,30),DA)
CROSS-REFERENCE: 119.6^AL
1)= S ^FH(119.6,"AL",$E(X,1,30),DA(1),DA)=""
2)= K ^FH(119.6,"AL",$E(X,1,30),DA(1),DA)
Cross reference the whole file by field #2.6.