Sub-Field: 65.08

Parent File	Name	Number	Package
BLOOD INVENTORY(#65)	HLA ANTIGEN PRESENT	65.08	Lab Service

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	HLA ANTIGEN PRESENT	0;1	POINTER TO FUNCTION FIELD FILE (#61.3)	FUNCTION FIELD(#61.3) INPUT TRANSFORM: `S DIC("W")="W "" "",$P(^(0),U,2),"" "",$P(^(0),U,1)",DIC("S")="I $P(^(0),U,5)=""HL""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X` LAST EDITED: `MAY 21, 1999` DESCRIPTION: HLA antigen(s) present on the appropriate cells SCREEN: `S DIC("S")="I $P(^(0),U,5)=""HL"""` EXPLANATION: `Limits entry to only HLA Antigens` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.02	HLA ANTIGEN PRESENT COMMENT	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<2) X` LAST EDITED: `JUN 02, 1986` HELP-PROMPT: `ANSWER MUST BE 2-80 CHARACTERS IN LENGTH` DESCRIPTION: Comment to HLA antigen presence

HLA ANTIGEN PRESENT

0;1

POINTER TO FUNCTION FIELD FILE (#61.3)

INPUT TRANSFORM: S DIC("W")="W "" "",$P(^(0),U,2),"" "",$P(^(0),U,1)",DIC("S")="I $P(^(0),U,5)=""HL""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
LAST EDITED: MAY 21, 1999

DESCRIPTION:

HLA antigen(s) present on the appropriate cells

HLA ANTIGEN PRESENT COMMENT

0;2

FREE TEXT