INPUT TRANSFORM: S DIC("W")="W "" "",$P(^(0),U,2),"" "",$P(^(0),U)",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 antigens present on WBC's are entered here.
SCREEN: S DIC("S")="I $P(^(0),U,5)=""HL"""
EXPLANATION: Limits input to only entries that are HLA Antigens
WRITE AUTHORITY: ^
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER