DBIA3879-A    ICR (3879)

This function will return the data for the patient
provided in the call as required for the CPRS Blood Bank report.

^TMP("VBDATA",$J,"COMPONENT REQUEST",n)=COMP CLASS NAME^UNITS REQUESTED^DATE
REQUESTED^DATE WANTED^REQUESTOR ID^ENTERED BY ID^ORDER #

COMP CLASS NAME = Component class name requested
UNITS REQUESTED = Number of units requested
DATE REQUESTED = Date of request
DATE WANTED = Date units should be available for transfusion
REQUESTOR ID = IEN from the NEW PERSON file (#200) of person requesting
components
ENTERED BY ID = IEN from the NEW PERSON file (#200) of person entering
request in CPRS
ORDER # = CPRS order number associated with request


^TMP("VBDATA",$J,"SPECIMEN",n)=ORDER #^DIVISION^TECH ID^TEST NAME^PRINT
NAME^REQUESTOR ID^RESULT^TEST DATE

ORDER # = CPRS order number associated with request
DIVISION = Blood Bank Division where testing was performed
TECH ID = IEN from the NEW PERSON file (#200) of Blood Bank tech entering
test results
TEST NAME = Full test name
PRINT NAME = Short name of test for display
REQUESTOR ID = IEN from the NEW PERSON file (#200) of person requesting test
RESULT = Blood Bank test result
TEST DATE = Date testing was performed


^TMP("VBDATA",$J,"UNIT",n)=EXP DATE^PRODUCT^ABO^RH^DIVISION^LOCATION^STATUS^ID

EXP DATE = Unit expiration date/time
PRODUCT = Blood Product type associated with unit
ABO = ABO Group of unit
RH = Rh Type of unit
DIVISION = VAMC division where unit is currently located
LOCATION = Hospital location of division where unit is currently located
STATUS = Coded element representing unit availability
C = Crossmatched units
S = Assigned units
A = Autologous units reserved
D = Directed units reserved