Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: VBECA1

Package: VBECS

Routine: VBECA1


Information

VBECA1 ;DALOI/PWC - APIS TO RETURN BLOOD BANK DATA FOR LAB ;10/12/00 13:57

Source Information

Source file <VBECA1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VBECS 2 PAT^VBECA1A  ($$ABORH,ABID,TRRX)^VBECA1B  
VA FileMan 1 ^%DT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Order Entry Results Reporting 2 ORWLR1  ORWLR3  

Entry Points

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.
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
    ABO(PATID,PATNAM,PATDOB,PARENT) ;
    ; Return the ABO value for the DFN of the patient provided.
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3182
    • Status: Retired
    • Usage: Controlled Subscription
    RH(PATID,PATNAM,PATDOB,PARENT) ;
    ; Return the Rh value for the DFN of the patient provided.
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3183
    • Status: Retired
    • Usage: Controlled Subscription
    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
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3186
    • Status: Retired
    • Usage: Controlled Subscription
    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
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3184
    • Status: Retired
    • Usage: Controlled Subscription
    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
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3185
    • Status: Retired
    • Usage: Controlled Subscription
    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
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3187
    • Status: Retired
    • Usage: Controlled Subscription
    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
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3188
    • Status: Retired
    • Usage: Controlled Subscription
    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)
  • ICR #3181
    • Status: Active
    • Usage: Controlled Subscription
  • ICR #3189
    • Status: Retired
    • Usage: Controlled Subscription
    EXPIRE(X) ; check if date has expired

    External References

    Name Field # of Occurrence
    ^%DT EXPIRE+1, EXPIRE+2
    PAT^VBECA1A ABORH+6, ABO+5, RH+5, ABID+10, TRRX+16, BBCMT+10
    $$ABORH^VBECA1B ABORH+9, ABO+8, RH+8
    ABID^VBECA1B ABID+12
    TRRX^VBECA1B TRRX+18

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^LR - [#63] BBCMT+12, BBCMT+13

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT EXPIRE+1*, EXPIRE+2*
    A BBCMT+9~, BBCMT+12*, BBCMT+13
    >> ABO ABO+7*
    >> ABORH ABORH+8*
    ARR AGPRES~, ABID~, ABID+8!, ABID+11*, AGAB~, TRRX~, TRRX+14!, TRRX+17*, BBCMT~, BBCMT+8!
    , BBCMT+11*, BBCMT+15, AUTO~
    ARR("BBCMT" BBCMT+14*, BBCMT+15*
    >> EXP EXPIRE+1*, EXPIRE+3*, EXPIRE+4*
    I BBCMT+9~, BBCMT+12*, BBCMT+14
    IFN ABORH+5~, ABORH+7, ABORH+9, ABO+4~, ABO+6, ABO+8, RH+4~, RH+6, RH+8, ABID+9~
    , ABID+11, ABID+12, TRRX+15~, TRRX+17, TRRX+18
    LRDFN BBCMT+9~, BBCMT+11, BBCMT+12, BBCMT+13
    P76 BBCMT+9~, BBCMT+13*, BBCMT+14
    PARENT ABORH~, ABO~, RH~, AGPRES~, ABID~, AGAB~, TRRX~, BBCMT~, AUTO~
    PATDOB ABORH~, ABO~, RH~, AGPRES~, ABID~, AGAB~, TRRX~, BBCMT~, AUTO~
    PATID ABORH~, ABO~, RH~, AGPRES~, ABID~, AGAB~, TRRX~, BBCMT~, AUTO~
    PATNAM ABORH~, ABO~, RH~, AGPRES~, ABID~, AGAB~, TRRX~, BBCMT~, AUTO~
    >> RH RH+7*
    X EXPIRE~, EXPIRE+1*!, EXPIRE+2*, EXPIRE+3
    X(1 EXPIRE+2*
    >> Y EXPIRE+1, EXPIRE+3
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables  | All