Sub-Field: 9001023.01101

Parent File	Name	Number	Package
HEALTH SUMMARY SITE PARAMETERS(#9001023)	SUPPLEMENT DIAGNOSIS LIMITS	9001023.01101	Patient Care Component

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SUPPLEMENT	0;1	POINTER TO HEALTH SUMMARY SUPPLEMENT FILE (#9001022)	HEALTH SUMMARY SUPPLEMENT(#9001022) INPUT TRANSFORM: `S DIC("S")="I $O(^APCHSUP(+Y,13,0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X` LAST EDITED: `SEP 28, 2006` SCREEN: `S DIC("S")="I $O(^APCHSUP(+Y,13,0))"` EXPLANATION: `Must have icd diagnoses associated with it.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9001023.01101^B` 1)= S ^APCHSITE(DA(1),11,"B",$E(X,1,30),DA)="" 2)= K ^APCHSITE(DA(1),11,"B",$E(X,1,30),DA)
.02	# OF DIAGNOSES	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 28, 2006` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits`
.03	# OF YRS	0;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 28, 2006` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits`

SUPPLEMENT

0;1

POINTER TO HEALTH SUMMARY SUPPLEMENT FILE (#9001022)

INPUT TRANSFORM: S DIC("S")="I $O(^APCHSUP(+Y,13,0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
LAST EDITED: SEP 28, 2006
SCREEN: S DIC("S")="I $O(^APCHSUP(+Y,13,0))"
EXPLANATION: Must have icd diagnoses associated with it.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9001023.01101^B

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

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

# OF DIAGNOSES

0;2

NUMBER

# OF YRS

0;3

NUMBER