Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: VBECRPT

Package: VBECS

Routine: VBECRPT


Information

VBECRPT ;HOIFO/RLM - APIS TO RETURN BLOOD BANK DATA FOR LAB ;Jan 31, 2020@13:10:43

Source Information

Source file <VBECRPT.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Add sections as they are finished.
  • ICR #7203
    • Status: Pending
    • Usage: Controlled Subscription
    EXIT ;Set up to print and clean up.
    HEADER ;Header for report
    TEST ;Calls
    OEAPI ;Call to OEAPI^VBECA3
    ABORH ;Call to ABORH^VBECA1 for ABO/Rh - DBIA 3181
    ABID ;Call to ABID^VBECA1 for Antibodies Identified - DBIA 3181, 3184
    TREQ ;W !!,"Transfusion Requirements"
    DFN ;Call to DFN^VBECA3A - DBIA 3879
    VBDAT ;CONVERT DATE 3200114.16132
    VBDAT1
    AVUNIT ;Available Units
    INSTLK ;Lookup Institution
    CPRS ;Call to CPRS^VBECA3B - DBIA 3880
    COMPREQ ;Component Requests
    TRAN ;Call to TRAN^VBECA4 for Tranfused Units - DBIA 3176
    TRRX ;Call to TRRX^VBECA1 for Transfusion Reactions - DBIA 3181, 3187
    TRRXHDR ;Transfusion Reaction Header
    PARSE ;Parse Record
    WRT ; Writes the Transfusion Record for each day
    INCRL(I) ;Increment line

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!!,"CROSSMATCHED UNITS: "
    • Line Location: TEST+3
    Function Call: WRITE
    • Prompt: !?2,^(ID)
    • Line Location: TEST+5
    Function Call: WRITE
    • Prompt: !!!,"Array returned from OEAPI^VBECA3 API in ORVB():",!
    • Line Location: OEAPI+5
    Function Call: WRITE
    • Prompt: !!!,"Specimen: "
    • Line Location: CPRS+4
    Function Call: WRITE
    • Prompt: !?2,^(ID)
    • Line Location: CPRS+6
    Function Call: WRITE
    • Prompt: TD
    • Line Location: WRT+3
    Function Call: WRITE
    • Prompt: ?(((GMI2-1)*15)+13),GMA(GMJ)
    • Line Location: WRT+7
    Function Call: WRITE
    • Prompt: !
    • Line Location: WRT+8

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^VA(200 - [#200] GET1^DIQ
    ^DIC(4 - [#4] FIND^DIC
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call