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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: GMRAOR

Package: Adverse Reaction Tracking

Routine: GMRAOR


Information

GMRAOR ; HIRMFO/WAA,RM - ORDER CHECK UTILITY ;May 11, 2021@13:18:40

Source Information

Source file <GMRAOR.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Adverse Reaction Tracking 4 $$NKA^GMRANKA  REMOTE^GMRAOR0  $$SETNODE^GMRAOR1  ($$CLP2CODE,$$CODE2CL,$$CODE2CLP,$$DRP2VACL)^GMRAPENC  
National Drug File 3 ZERO^PSN50P41  ($$CLIST,$$DCLCODE)^PSNAPIS  (,DISPDRG)^PSNNGR  
Kernel 2 $$FMTE^XLFDT  $$VERSION^XPDUTL  
VA FileMan 2 $$EXTERNAL^DILFD  $$GET1^DIQ  
Pharmacy Data Management 1 DATA^PSS50  
Registration 1 $$SITE^VASITE  

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: 10

Package Total Caller Graph
Radiology Nuclear Medicine 4 RADEM  RAORD1  RAPTLU  RAUTL8  
Order Entry Results Reporting 3 OCXOZ09  ORDV06D  ORKCHK5  
Adverse Reaction Tracking 2 GMRAOR5  GMRARAD1  
Outpatient Pharmacy 1 PSODGAL1  

Entry Points

Name Comments DBIA/ICR reference
ORCHK(DFN,TYP,PTR,LOC) ;DETERMINE IF PATIENT HAS ADVERSE REACTION TO AGENT
  • ICR #2378
    • Status: Active
    • Usage: Supported
    ORCHK2(DFN,TYP,PTR,LOC,RETURN) ;DETERMINE IF PATIENT HAS ADVERSE REACTION TO AGENT
  • ICR #2378
    • Status: Active
    • Usage: Supported
    RAD(DFN,LOC) ;CONTRAST MEDIA CHECK
    DRUG(DFN,PTR) ;DRUG CHECK
    FAC(NODE) ;
    DRCL(CODE) ;POPULATE GMRADRCL()
    PCCHK(VACLASS) ;PARTIAL DRUG CLASS CHECK
    ING(DFN,PTR) ;DRUG INGREDIENT CHECK
    CLASS(DFN,PTR) ;DRUG CLASS CHECK
    NDFREF() ;VERSION-DEPENDENT GLOBAL LOCATION OF VA GENERIC FILE (#50.6)
    GETDATA(DFN) ;OBTAIN ADVERSE REACTION DATA
  • ICR #4847
    • Status: Active
    • Usage: Controlled Subscription
    LOCAL(DFN) ;OBTAIN DATA STORED LOCALLY
    LDATA(NODE,DFN,J) ;OBTAIN EACH REACTION'S LOCALLY STORED DATA ELEMENTS
    ADDLDATA(GLOBAL,PAIEN) ;OBTAIN LOCALLY STORED DATA ELEMENTS FOR ONE REACTION
    ADDCOMMA(GMRASYMP) ; p70

    External References

    Name Field # of Occurrence
    $$EXTERNAL^DILFD DRUG+89, DRUG+100, DRUG+111
    $$GET1^DIQ RAD+24, DRUG+83
    $$NKA^GMRANKA ORCHK2+37
    REMOTE^GMRAOR0 GETDATA+3
    $$SETNODE^GMRAOR1 LDATA+9
    $$CLP2CODE^GMRAPENC CLASS+6
    $$CODE2CL^GMRAPENC DRCL+10, CLASS+6
    $$CODE2CLP^GMRAPENC DRCL+11
    $$DRP2VACL^GMRAPENC DRUG+60
    ZERO^PSN50P41 ING+12
    $$CLIST^PSNAPIS DRUG+40
    $$DCLCODE^PSNAPIS DRUG+37
    ^PSNNGR DRUG+21
    DISPDRG^PSNNGR DRUG+14, DRUG+17, DRUG+18
    DATA^PSS50 DRUG+52
    $$SITE^VASITE ADDLDATA+4
    $$FMTE^XLFDT RAD+25
    $$VERSION^XPDUTL NDFREF+2

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DIC(4 - [#4] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^GMR(120.8 - [#120.8] DRUG+50, DRUG+51, ING+9, CLASS+10, LOCAL+3, LOCAL+5, LDATA+6, LDATA+7, ADDLDATA+5, ADDLDATA+7
    , ADDLDATA+8, ADDLDATA+10, ADDLDATA+15, ADDLDATA+16, ADDLDATA+17, ADDLDATA+19, ADDLDATA+20, ADDLDATA+21
    ^GMR(120.85 - [#120.85] ADDLDATA+22, ADDLDATA+23, ADDLDATA+24
    ^GMRD(120.83 - [#120.83] ORCHK+4, ORCHK2+33, ADDLDATA+12
    ^TMP( DRUG+16!, DRUG+20!, DRUG+22, DRUG+25, DRUG+30, DRUG+31!
    ^TMP("GMRAOC" ORCHK+13!, ORCHK2+43, ORCHK2+49!, RAD+13, RAD+18, RAD+19, RAD+22, RAD+24, RAD+25, DRUG+22
    , DRUG+25, DRUG+28, DRUG+29, DRCL+6, DRCL+16, DRCL+19, DRCL+20, PCCHK+4, ING+13, ING+14
    , CLASS+13, CLASS+15, GETDATA+2!, LDATA+9*, LDATA+12
    ^TMP($J DRUG+53, DRUG+54!, ING+12!, ING+14, ING+15!
    ^XTMP("ORRDI" ORCHK2+38, ORCHK2+39, ORCHK2+40, ORCHK2+41

    Label References

    Name Line Occurrences
    $$ADDCOMMA DRUG+95
    $$CLASS ORCHK+12, ORCHK2+48
    $$DRCL PCCHK+5
    $$DRUG ORCHK+10, ORCHK2+46
    $$FAC DRUG+25, DRCL+16
    $$ING ORCHK+11, ORCHK2+47
    $$NDFREF DRUG+11
    $$ORCHK2 ORCHK+16
    $$PCCHK DRUG+38, DRUG+42, DRUG+60
    $$RAD ORCHK+9, ORCHK2+45
    ADDLDATA DRUG+55, LDATA+12
    GETDATA ORCHK+8, ORCHK2+35
    LDATA LOCAL+4, LOCAL+6
    LOCAL GETDATA+3

    Naked Globals

    Name Field # of Occurrence
    ^(0 ADDLDATA+21, ADDLDATA+24

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % DRUG+8~, DRUG+22*, DRUG+25*
    CL PCCHK+2~, PCCHK+3*, PCCHK+5
    CLASS DRUG+8~, DRUG+37*, DRUG+38
    CLSFN DRCL+5~, DRCL+10*, DRCL+16, DRCL+21, CLASS+5~, CLASS+6*, CLASS+15
    CODE DRCL~, DRCL+4, DRCL+6, DRCL+8, DRCL+9, DRCL+10, DRCL+11, DRCL+16, DRCL+19, DRCL+20
    , DRCL+21
    COUNT RAD+9~, RAD+32*, RAD+34, RAD+35*, DRUG+93~, DRUG+94*, DRUG+96*, DRUG+101*, DRUG+103
    COUNT(1 DRUG+94*, DRUG+103, DRUG+104*
    DA ORCHK+3~
    DC RAD+9~, RAD+13*, RAD+18, RAD+19, RAD+22, RAD+24, RAD+25
    DELIMIT RAD+9~, RAD+32*, RAD+34*, RAD+35, DRUG+93~, DRUG+94*, DRUG+103*, DRUG+104
    DFN ORCHK~, ORCHK+5, ORCHK+8, ORCHK+9, ORCHK+10, ORCHK+11, ORCHK+12, ORCHK+16, ORCHK2~, ORCHK2+26
    , ORCHK2+35, ORCHK2+37, ORCHK2+38, ORCHK2+39, ORCHK2+40, ORCHK2+41, ORCHK2+45, ORCHK2+46, ORCHK2+47, ORCHK2+48
    , RAD~, DRUG~, DRUG+50, ING~, ING+9, CLASS~, CLASS+10, GETDATA~, GETDATA+3, LOCAL~
    , LOCAL+3, LOCAL+4, LOCAL+5, LOCAL+6, LDATA~, LDATA+6
    FAC FAC+1~, FAC+2*, FAC+3
    FIELD DRUG+64~, DRUG+85*, DRUG+89, DRUG+90, DRUG+92, DRUG+100, DRUG+107, DRUG+109, DRUG+111
    FIELDS DRUG+64~
    FIELDS( DRUG+66*, DRUG+73*, DRUG+84, DRUG+85, DRUG+90, DRUG+91, DRUG+113*
    FIELDS(1 DRUG+66*, DRUG+69*
    FIELDS(2 DRUG+66*, DRUG+67*, DRUG+68*
    FIELDS1 DRUG+64~
    FIELDS1( DRUG+70*, DRUG+73*, DRUG+113*
    FILE DRUG+64~, DRUG+85*, DRUG+89, DRUG+100, DRUG+111
    FLG RAD+9~, RAD+13*, RAD+14*, RAD+36, DRUG+8~, DRUG+10*, DRUG+23*, DRUG+33, DRUG+39*, DRUG+43*
    , DRUG+45, DRUG+50, DRUG+56*, DRUG+61*, DRUG+62*, DRUG+116, ING+5~, ING+6*, ING+9*, ING+14*
    , ING+16, CLASS+5~, CLASS+6*, CLASS+10*, CLASS+14*, CLASS+16
    FNUM DRUG+108~, DRUG+109*, DRUG+111
    GLOBAL ADDLDATA~, ADDLDATA+5, ADDLDATA+14*, ADDLDATA+15*, ADDLDATA+16*, ADDLDATA+17*, ADDLDATA+18*, ADDLDATA+19*, ADDLDATA+20, ADDLDATA+21*
    , ADDLDATA+24*
    GMRAC DRUG+8~, CLASS+5~, CLASS+6*, CLASS+7, CLASS+10, CLASS+13, CLASS+15
    GMRACM ORCHK+3~, RAD+9~, RAD+29*, RAD+35*, RAD+36
    GMRACTR ADDCOMMA+2~, ADDCOMMA+3*, ADDCOMMA+9*
    GMRADIV ADDCOMMA+2~, ADDCOMMA+4*
    GMRADR DRUG+8~
    GMRADRCL ORCHK+7!, ORCHK2+31!, DRCL+6, DRCL+15
    GMRADRCL( DRCL+8, DRCL+16*, CLASS+15*
    GMRADRCL(999 DRCL+15
    GMRAFLG ORCHK+3~, ORCHK+4*, ORCHK+5*, ORCHK+9*, ORCHK+10*, ORCHK+11*, ORCHK+12*, ORCHK+14, ORCHK2+32~, ORCHK2+33*
    , ORCHK2+45*, ORCHK2+46*, ORCHK2+47*, ORCHK2+48*, ORCHK2+50
    GMRAFOUT ADDCOMMA+2~, ADDCOMMA+3*, ADDCOMMA+13*, ADDCOMMA+14
    GMRAI DRUG+8~, DRUG+22*, DRUG+25, DRUG+28, DRUG+29, DRUG+30
    GMRAID ADDCOMMA+2~, ADDCOMMA+5*, ADDCOMMA+6, ADDCOMMA+7, ADDCOMMA+8
    GMRAIDX ADDCOMMA+2~, ADDCOMMA+4*, ADDCOMMA+5, ADDCOMMA+8*, ADDCOMMA+9, ADDCOMMA+10, ADDCOMMA+11, ADDCOMMA+12, ADDCOMMA+13
    GMRAIEN ORCHK+7!
    GMRAIEN( ING+9*, CLASS+10*
    GMRAING ORCHK+7!, ORCHK2+31!
    GMRAING( DRUG+25*, ING+14*
    GMRAITM ADDCOMMA+2~, ADDCOMMA+9*, ADDCOMMA+10
    GMRALIST DRUG+8~, DRUG+40*, DRUG+41*, DRUG+42
    GMRALIST( DRUG+41, DRUG+42
    GMRAMAX ADDCOMMA+2~, ADDCOMMA+3*, ADDCOMMA+4, ADDCOMMA+6, ADDCOMMA+7
    GMRANDA DRUG+8~, DRUG+10*, DRUG+11, DRUG+13, DRUG+37, DRUG+40, DRUG+59
    GMRANVPN DRUG+8~, DRUG+10*, DRUG+14, DRUG+15, DRUG+18, DRUG+36, DRUG+37
    GMRAOTH ORCHK+3~, ORCHK+4*, ORCHK2+32~, ORCHK2+33*, ADDLDATA+9, ADDLDATA+12
    GMRAOUT ADDCOMMA+2~
    GMRAOUT( ADDCOMMA+5*, ADDCOMMA+6*, ADDCOMMA+7*, ADDCOMMA+9, ADDCOMMA+10, ADDCOMMA+11*, ADDCOMMA+12*, ADDCOMMA+13
    GMRAREAC ORCHK2+31!
    GMRASESS ORCHK2+32~, ORCHK2+33*, ORCHK2+37*, ORCHK2+38, ORCHK2+40*, ORCHK2+41*, ORCHK2+43*, ORCHK2+44
    GMRASPC ADDCOMMA+2~, ADDCOMMA+3*, ADDCOMMA+10*, ADDCOMMA+11, ADDCOMMA+12
    GMRASYMP ADDCOMMA~, ADDCOMMA+1, ADDCOMMA+4, ADDCOMMA+6, ADDCOMMA+7
    GMRAV1 ORCHK+3~, ORCHK+4*, RAD+17, RAD+20, RAD+28, RAD+30, DRUG+25, DRUG+26, DRUG+33, DRUG+45
    , DRCL+13, DRCL+17, ING+8, ING+10, CLASS+9, CLASS+11, LDATA+10
    GMRAX ING+5~, ING+6*, ING+9*, ING+13*, ING+14, CLASS+5~, CLASS+6*, CLASS+10*, CLASS+13*, CLASS+15
    I PCCHK+2~, PCCHK+4*, PCCHK+5
    IDX ORCHK2+32~, ORCHK2+39*, ORCHK2+40, ORCHK2+41
    IEN DRUG+49~, DRUG+50*, DRUG+51, DRUG+55, DRUG+57, DRCL+5~, DRCL+11*, DRCL+21, ADDLDATA+6~, ADDLDATA+23*
    , ADDLDATA+24
    IPIECE DRUG+64~, DRUG+85*, DRUG+89, DRUG+90, DRUG+91, DRUG+97, DRUG+98, DRUG+106, DRUG+109, DRUG+111
    ITEM DRUG+64~, DRUG+80*, DRUG+81, DRUG+82, DRUG+96*, DRUG+97*, DRUG+98, DRUG+102*, DRUG+104, DRUG+109*
    , DRUG+111
    ITEMS DRUG+93~, DRUG+108~, DRUG+112
    ITEMS( DRUG+96*, DRUG+101*, DRUG+102, DRUG+109*
    J DRCL+14~, DRCL+15*, DRCL+16, LOCAL+2~, LOCAL+3*, LOCAL+4, LOCAL+5*, LOCAL+6, LDATA~, LDATA+6
    , LDATA+9, LDATA+12
    LOC ORCHK~, ORCHK+9, ORCHK+16, ORCHK2~, ORCHK2+29, ORCHK2+45, RAD~, RAD+15, RAD+26
    LOCAL RAD+11~, RAD+18*, RAD+29
    LPTR DRUG+8~, DRUG+10*, DRUG+47, DRUG+51, DRUG+52, DRUG+53, DRUG+57, DRUG+60
    MSGNUM DRUG+64~, DRUG+77*, DRUG+78*, DRUG+79, DRUG+81, DRUG+82, DRUG+83, DRUG+86, DRUG+87, DRUG+88
    , DRUG+106
    MSGNUM(0 DRUG+78*, DRUG+115
    NAME DRUG+49~, DRUG+53*, DRUG+57
    NEWIVAL DRUG+93~, DRUG+98*, DRUG+106
    NODE DRUG+9~, DRUG+15*, DRUG+16, DRUG+19*, DRUG+20, DRUG+22, DRUG+25, DRUG+30, DRUG+31, DRUG+64~
    , DRUG+80*, DRUG+81, DRUG+82, DRUG+84*, DRUG+85, DRUG+86, DRUG+87, DRUG+88, DRUG+90, DRUG+91
    , FAC~, FAC+2, LDATA~, LDATA+6, LDATA+9, LDATA+12
    OPIECE DRUG+64~, DRUG+84*, DRUG+85, DRUG+89, DRUG+90, DRUG+91, DRUG+96, DRUG+105
    PAIEN LDATA+5~, LDATA+6*, LDATA+7, LDATA+12, ADDLDATA~, ADDLDATA+5, ADDLDATA+7, ADDLDATA+8, ADDLDATA+10, ADDLDATA+15
    , ADDLDATA+16, ADDLDATA+17, ADDLDATA+19, ADDLDATA+20, ADDLDATA+21, ADDLDATA+22, ADDLDATA+23
    PSNDA DRUG+8~, DRUG+13*
    PSNVPN DRUG+8~, DRUG+15*
    PTR ORCHK~, ORCHK+5, ORCHK+10, ORCHK+11, ORCHK+12, ORCHK+16, ORCHK2~, ORCHK2+27, ORCHK2+28, ORCHK2+46
    , ORCHK2+47, ORCHK2+48, DRUG~, DRUG+10, ING~, ING+9, ING+12, ING+13, ING+14, CLASS~
    , CLASS+6, CLASS+15
    REACS DRUG+9~, DRUG+71
    REACS( DRUG+29*, DRUG+30*, DRUG+55, DRUG+57*, DRUG+72, DRUG+73, DRUG+74, DRUG+75, DRUG+76, DRUG+79
    , DRUG+80, DRUG+81, DRUG+82, DRUG+83, DRUG+89, DRUG+90, DRUG+91, DRUG+97, DRUG+98, DRUG+109
    , DRUG+111, DRCL+20*, DRCL+21*
    REACT RAD+9~, RAD+22*, RAD+23, RAD+24, RAD+25, DRUG+8~, DRUG+28*, DRUG+29, DRUG+30, DRUG+72*
    , DRUG+73, DRUG+74, DRUG+75, DRUG+76, DRUG+79, DRUG+80, DRUG+81, DRUG+82, DRUG+83, DRUG+89
    , DRUG+90, DRUG+91, DRUG+97, DRUG+98, DRUG+106, DRUG+109, DRUG+111, DRCL+5~, DRCL+19*, DRCL+20
    , DRCL+21, ADDLDATA+6~, ADDLDATA+7*, ADDLDATA+8, ADDLDATA+10
    REACT("VALUE" ADDLDATA+8*, ADDLDATA+9, ADDLDATA+10*, ADDLDATA+11, ADDLDATA+12*, ADDLDATA+13!, ADDLDATA+14
    REACT(1 DRUG+74*, DRUG+77, DRUG+78
    REACT(2 DRUG+75*, DRUG+77, DRUG+78
    REACT(3 DRUG+76*, DRUG+77, DRUG+78
    REMOTE RAD+11~, RAD+19*, RAD+29
    RETURN ORCHK2~, ORCHK2+30, DRUG+63, DRUG+79, DRUG+81*, DRUG+82*, DRUG+83, DRUG+86*, DRUG+87*, DRUG+88*
    , DRUG+89*, DRUG+90*, DRUG+91*, DRUG+95, DRUG+96, DRUG+105*, DRUG+106*, DRUG+112, DRUG+114*, DRUG+115
    , DRCL+5~, DRCL+6*, DRCL+7, PCCHK+2~, PCCHK+3*, PCCHK+5*, PCCHK+6
    RINDEX DRUG+64~
    RINDEX( DRUG+77, DRUG+78*
    SEV DRUG+64~
    SITE RAD+9~, RAD+32*, RAD+33*, RAD+35, DRUG+64~, DRUG+79*, DRUG+83, DRUG+86, DRUG+87, ADDLDATA+3~
    , ADDLDATA+4*, ADDLDATA+5
    SITES RAD+9~, RAD+24*, RAD+34
    SITES( RAD+23, RAD+24*, RAD+25*, RAD+33, RAD+35
    STR DRUG+93~, DRUG+96*, DRUG+98*, DRUG+99*, DRUG+100*, DRUG+101, DRUG+109~, DRUG+111*
    STYPE DRUG+64~
    STYPE( DRUG+83
    STYPE("L" DRUG+65*
    STYPE("R" DRUG+65*
    TEXT DRUG+93~, DRUG+104*, DRUG+105
    TMPFLG DRUG+9~, DRUG+10*, DRUG+38*, DRUG+39, DRUG+42*, DRUG+43, DRUG+60*, DRUG+61
    TYP ORCHK~, ORCHK+5, ORCHK+9, ORCHK+10, ORCHK+11, ORCHK+12, ORCHK+16, ORCHK2~, ORCHK2+26, ORCHK2+27
    , ORCHK2+28, ORCHK2+29, ORCHK2+30, ORCHK2+45, ORCHK2+46, ORCHK2+47, ORCHK2+48
    U ORCHK2+26, ORCHK2+40, ORCHK2+41, RAD+24, RAD+25, RAD+36, DRUG+30, DRUG+42, DRUG+51, DRUG+57
    , DRUG+73, DRUG+74, DRUG+75, DRUG+76, DRUG+79, DRUG+81, DRUG+82, DRUG+83, DRUG+85, DRUG+89
    , DRUG+90, DRUG+91, DRUG+96, DRUG+97, DRUG+98, DRUG+105, DRUG+106, DRUG+109, DRUG+111, DRCL+16
    , DRCL+21, ING+14, CLASS+15, LDATA+7, ADDLDATA+4, ADDLDATA+5, ADDLDATA+8, ADDLDATA+10, ADDLDATA+12, ADDLDATA+14
    , ADDLDATA+15, ADDLDATA+16, ADDLDATA+17, ADDLDATA+18, ADDLDATA+19, ADDLDATA+20, ADDLDATA+21, ADDLDATA+24
    VACLASS PCCHK~, PCCHK+1, PCCHK+3, PCCHK+5
    Y DRUG+91~*

    Marked Items

    Name Field # of Occurrence
    $T(DISPDRG^PSNNGR DRUG+14, DRUG+18
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All