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 |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MAGDTR01

Package: Imaging

Routine: MAGDTR01


Information

MAGDTR01 ;WOIFO/PMK/NST - Unread List for Consult/Procedure Request ; 12 Apr 2012 1:24 AM

Source Information

Source file <MAGDTR01.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Imaging 5 $$PARSE^MAG7UP  ($$GETDATA,$$GETSEG)^MAGDHRC0  ($$FINDLIST,GETHL7A)^MAGDTR01  ($$TIMESTMP,$$UNREAD,FORWARD)^MAGDTR02  (ADD,CANCEL,COMPLETE)^MAGDTR03  
Kernel 2 ^%ZTER  $$IEN^XUAF4  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Imaging 6 MAGDHOWC  MAGDHOWP  MAGDTR01  MAGDTR02  MAGDTR03  MAGNGMR  
Consult Request Tracking 1 GMRCIMSG  

Entry Points

Name Comments DBIA/ICR reference
ENTRY ; entry point from ^MAGDHWC for a consult request
ORRIN ; entry point for processing IFC responses
  • ICR #4838
    • Status: Active
    • Usage: Controlled Subscription
    ORRINER1 ; Log the error
    ORRINER2 ; Unwind
    ORRINPRC ;
    ; this is "piggy-backed" onto the GMRC IFC ORM EVENT protocol
    ; see the RESPONSE PROCESSING ROUTINE for this protocol
    ; the HL7 event handler first invokes ORRIN^GMRCIMSG and then this
    GETHL7A(STATUS,GMRCIEN) ; get data from HL7 message - called from above
    ; input: none
    ; output: PERSON name of person ordering the consult
    ; LOCATION IEN of the location from which the consult is ordered
    GETHL7B(PERSON,LOCATION) ; get data from HL7 message - call from ^MAGDTR03
    ; input: none
    ; output: PERSON name of person ordering the consult
    ; LOCATION IEN of the location from which the consult is ordered
    GETHL7 ; get data from HL7 message
    ; called from above and also called from ^MAGDTR03
    FINDLIST(GMRCIEN,ISPECIDX,IPROCIDX,ACQSITE,TRIGGER,TIUNOTE,ALTSERV) ;
    ; find the read/unread list for this consult

    External References

    Name Field # of Occurrence
    ^%ZTER ORRINER1+1
    $$GET1^DIQ ENTRY+20, FINDLIST+6, FINDLIST+7, FINDLIST+8
    $$PARSE^MAG7UP GETHL7+15
    $$GETDATA^MAGDHRC0 GETHL7A+13, GETHL7A+14, GETHL7B+14, GETHL7B+15, GETHL7B+16, GETHL7B+17, GETHL7B+18, GETHL7B+25
    $$GETSEG^MAGDHRC0 GETHL7A+11, GETHL7B+12, GETHL7B+24
    $$FINDLIST^MAGDTR01 ORRINPRC+15
    GETHL7A^MAGDTR01 ORRINPRC+14
    $$TIMESTMP^MAGDTR02 ORRINPRC+17
    $$UNREAD^MAGDTR02 ORRINPRC+16
    FORWARD^MAGDTR02 ENTRY+16
    ADD^MAGDTR03 ENTRY+6, ENTRY+22
    CANCEL^MAGDTR03 ENTRY+11, ENTRY+28
    COMPLETE^MAGDTR03 ENTRY+25
    $$IEN^XUAF4 GETHL7B+25

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^GMR(123 - [#123] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^MAG(2006.5841 - [#2006.5841] FINDLIST+9, FINDLIST+11
    ^MAG(2006.5849 - [#2006.5849] ORRINPRC+18, ORRINPRC+20*, ORRINPRC+23*, ORRINPRC+26!, ORRINPRC+27*
    ^TMP("MAG" GETHL7+10

    Label References

    Name Line Occurrences
    GETHL7 GETHL7A+9, GETHL7B+10
    ORRINPRC ORRIN+3

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ACQSITE ORRINPRC+10~, ORRINPRC+24*, ORRINPRC+26, ORRINPRC+27, FINDLIST~, FINDLIST+3*, FINDLIST+13*
    ALTSERV FINDLIST~, FINDLIST+5
    CONSPROC FINDLIST+2~, FINDLIST+7*, FINDLIST+8
    >> DEL ENTRY+5, ENTRY+10, ENTRY+15
    >> DEL2 ENTRY+15
    GMRCIEN ENTRY+6, ENTRY+20, ENTRY+22, ORRINPRC+5~, ORRINPRC+14, ORRINPRC+15, ORRINPRC+16, GETHL7A~, GETHL7A+10*, GETHL7A+14*
    , FINDLIST~, FINDLIST+4, FINDLIST+6, FINDLIST+7, FINDLIST+8
    GMRCSTS ENTRY+1~, ENTRY+20*, ENTRY+21, ENTRY+24, ENTRY+27
    >> HL7ORC ENTRY+5, ENTRY+10, ENTRY+15
    HL7PARSE GETHL7A+5~, GETHL7A+16, GETHL7B+5~, GETHL7B+26, GETHL7+10*, GETHL7+12, GETHL7+15
    HL7RAW GETHL7A+6~, GETHL7B+6~, GETHL7+11*, GETHL7+14, GETHL7+15
    HL7SEGNO GETHL7A+7~, GETHL7A+11*, GETHL7A+12, GETHL7B+7~, GETHL7B+12*, GETHL7B+24*, GETHL7B+25
    >> HLNEXT GETHL7+14
    HLNODE GETHL7+6~, GETHL7+14
    >> HLQUIT GETHL7+14
    I GETHL7+7~, GETHL7+14*
    IPERSON GETHL7B+8~, GETHL7B+14*, GETHL7B+15, GETHL7B+16, GETHL7B+17, GETHL7B+18
    IPROCIDX ORRINPRC+11~, ORRINPRC+25*, ORRINPRC+26, ORRINPRC+27, FINDLIST~, FINDLIST+3*, FINDLIST+13*
    ISPECIDX ORRINPRC+12~, ORRINPRC+24*, ORRINPRC+26, ORRINPRC+27, FINDLIST~, FINDLIST+3*, FINDLIST+13*
    LISTDATA ORRINPRC+9~, ORRINPRC+18*, ORRINPRC+20, ORRINPRC+22, ORRINPRC+24, ORRINPRC+25
    LOCATION GETHL7B~, GETHL7B+11*, GETHL7B+25*
    MAGETLVL ORRIN+1~, ORRIN+2*, ORRINER1+3, ORRINER2+1
    ORDCTRL ORRINPRC+6~, ORRINPRC+14
    PERSON GETHL7B~, GETHL7B+11!, GETHL7B+19*, GETHL7B+20*, GETHL7B+21*, GETHL7B+22*
    PERSON("FAMILY" GETHL7B+15*, GETHL7B+19
    PERSON("GIVEN" GETHL7B+16*, GETHL7B+20
    PERSON("MIDDLE" GETHL7B+17*, GETHL7B+21
    PERSON("SUFFIX" GETHL7B+18*, GETHL7B+22
    PROC FINDLIST+2~, FINDLIST+8*, FINDLIST+9
    RESULT ENTRY+2~, ENTRY+6, ENTRY+22
    STATUS GETHL7A~, GETHL7A+10*, GETHL7A+13*
    TIMESTMP ORRINPRC+8~, ORRINPRC+17*, ORRINPRC+20
    TIUNOTE FINDLIST~, FINDLIST+3*, FINDLIST+14*
    TOSERV FINDLIST+2~, FINDLIST+5*, FINDLIST+6*, FINDLIST+9
    TRIGGER FINDLIST~, FINDLIST+3*, FINDLIST+14*
    UNREAD ORRINPRC+7~, ORRINPRC+16*, ORRINPRC+17, ORRINPRC+18, ORRINPRC+20, ORRINPRC+23, ORRINPRC+26, ORRINPRC+27
    X GETHL7+8~, GETHL7+15*, FINDLIST+2~, FINDLIST+11*, FINDLIST+12, FINDLIST+13, FINDLIST+14
    XREF FINDLIST+2~, FINDLIST+9*, FINDLIST+10, FINDLIST+11, FINDLIST+15

    Marked Items

    Name Field # of Occurrence
    $T( ORRIN+2, ORRINER1+2
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All