Sub-Field: 9002079.161

Parent File	Name	Number	Package
9002079.016	SUB-FACILITY	9002079.161	Contract Health Management Information System

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SUB-FACILITY	0;1	POINTER TO LOCATION FILE (#9999999.06)	LOCATION(#9999999.06) INPUT TRANSFORM: `I $D(X),X S DINUM=X` LAST EDITED: `JAN 22, 1993` HELP-PROMPT: `Enter the name of a 'sub-facility' whose CHS functions are handled by the parent facility.` DESCRIPTION: ENTER THE NAME OF A SUB-FACILITY WHOSE CHS FUNCTIONS ARE HANDLED BY THE PARENT FACILITY. TECHNICAL DESCR: ACHS3.15 An "M" had been placed in the ^DD( node 2nd piece for this field, causing the edit and print options to display only the IEN for LOCATION. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002079.161^B` 1)= S ^ACHSAOP(DA(2),16,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^ACHSAOP(DA(2),16,DA(1),1,"B",$E(X,1,30),DA) CROSS-REFERENCE: `9002079.016^C` 1)= S ^ACHSAOP(DA(2),16,"C",DA(1),DA)="" 2)= K ^ACHSAOP(DA(2),16,"C",DA(1),DA) CROSS-REFERENCE: `9002079.016^D` 1)= S ^ACHSAOP(DA(2),16,"D",$E(X,1,30),DA(1))="" 2)= K ^ACHSAOP(DA(2),16,"D",$E(X,1,30),DA(1))

SUB-FACILITY

0;1

POINTER TO LOCATION FILE (#9999999.06)

INPUT TRANSFORM: I $D(X),X S DINUM=X
LAST EDITED: JAN 22, 1993
HELP-PROMPT: Enter the name of a 'sub-facility' whose CHS functions are handled by the parent facility.

DESCRIPTION:

ENTER THE NAME OF A  SUB-FACILITY WHOSE CHS FUNCTIONS ARE HANDLED BY THE PARENT FACILITY.

TECHNICAL DESCR:

ACHS*3.1*5 An "M" had been placed in the ^DD( node 2nd piece for this field, causing the edit and print options to display only the IEN for LOCATION.

CROSS-REFERENCE: 9002079.161^B

1)= S ^ACHSAOP(DA(2),16,DA(1),1,"B",$E(X,1,30),DA)=""

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

CROSS-REFERENCE: 9002079.016^C

1)= S ^ACHSAOP(DA(2),16,"C",DA(1),DA)=""

2)= K ^ACHSAOP(DA(2),16,"C",DA(1),DA)

CROSS-REFERENCE: 9002079.016^D

1)= S ^ACHSAOP(DA(2),16,"D",$E(X,1,30),DA(1))=""

2)= K ^ACHSAOP(DA(2),16,"D",$E(X,1,30),DA(1))