VBECA1 ;DALOI/PWC - APIS TO RETURN BLOOD BANK DATA FOR LAB ;10/12/00 13:57
Source file <VBECA1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ABORH(PATID,PATNAM,PATDOB,PARENT) | ;
; Return the ABO/Rh value for the DFN of the patient provided. ; A space will be between the values. |
|
ABO(PATID,PATNAM,PATDOB,PARENT) | ;
; Return the ABO value for the DFN of the patient provided. |
|
RH(PATID,PATNAM,PATDOB,PARENT) | ;
; Return the Rh value for the DFN of the patient provided. |
|
AGPRES(PATID,PATNAM,PATDOB,PARENT,ARR) | ; Get Antigens Present
; Return an array of identified antigens and antigen comments for ; the DFN of the patient provided. If no antigens found, an empty ; array is returned ARR("AGPRES")="". ; ; ARR = the name of the array used to store antigens. ; Array will contain the name of the antigen and any antigen comments ; ARR("AGPRES",n) = Antigen ^ Antigen comment |
|
ABID(PATID,PATNAM,PATDOB,PARENT,ARR) | ; Get Antibodies Identified
; Return an array of identified antibodies and antibody comments for ; the DFN of the patient provided. ; ; ARR = the name of the array used to store antibodies. ; Array will contain the name of the antibody and any antibody comments ; ARR("ABID",n) = Antibody ^ Antibody comment |
|
AGAB(PATID,PATNAM,PATDOB,PARENT,ARR) | ; Get RBC Antigens Absent
; Return an array of absent antigens and absent antigen comments for ; the DFN of the patient provided. ; ARR = the name of the array used to store absent antigens. ; Array will contain the name of the antigen and any antigen comments ; ARR("AGAB",n) = Absent Antigen ^ Absent Antigen comment |
|
TRRX(PATID,PATNAM,PATDOB,PARENT,ARR) | ; Get Transfusion Reactions
; Return an array of transfusion reactions for the DFN of the ; patient provided. If no transfusion reactions found, an ; empty array is returned ARR("TRRX")="" ; ; ARR = the name of the array used to store transfusion reactions. ; Array will contain both reactions where a particular unit or ; transfusion was determined to be the cause of the reaction, and ; those where no unit could be identified as being the cause of the ; reaction. ; Transaction Type is a pointer to Blood Bank Utility File #65.4 ; ARR("TRRX",n) = Transfusion Date/Time ^ Transaction Type |
|
BBCMT(PATID,PATNAM,PATDOB,PARENT,ARR) | ; Get Blood Bank Comments
; Return an array of blood bank comments for the DFN of the patient ; provided. ; If no comments found, an empty array is returned ARR("BBCMT")="". ; ARR = the name of the array that will be used to store comments. ; Array will contain all the comment text. ; ARR("BBCMT",n) = Blood Bank Comment Text |
|
AUTO(PATID,PATNAM,PATDOB,PARENT,ARR) | ; Get Available Autologous Units
; Return an array of available autologous units for the DFN of the ; patient provided. If no comments found, an empty array is returned ; ARR("AUTO")="". ; ; ARR = the name of the array that will store autologous units. ; Array will contain the component type and the expiration date. ; ARR("AUTO",n) = Component Type ^ Expiration Date ; Component Type is a pointer to Blood Product File (#66) |
|
EXPIRE(X) | ; check if date has expired
|