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 |  All
Print Page as PDF
Routine: ORRCACK

Package: Care Management

Routine: ORRCACK


Information

ORRCACK ;SLC/MKB - Result Acknowledgement file utilities ; 25 Jul 2003 9:31 AM

Source Information

Source file <ORRCACK.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Lab Service 3 RR^LR7OR1  EN1^LR7OSBR  EN^LR7OSMZ0  
Order Entry Results Reporting 3 $$NMSP^ORCD  $$VALUE^ORCSAVE2  TEXT^ORQ12  
VA FileMan 3 FILE^DICN  ^DIE  ^DIK  
Consult Request Tracking 2 RT^GMRCGUIA  DT^GMRCSLM2  
Kernel 2 ($$FMTHL7,$$HL7TFM)^XLFDT  $$REPEAT^XLFSTR  
Care Management 1 RSLT^ORRCXQ  
Radiology Nuclear Medicine 1 EN30^RAO7PC3  
Toolkit 1 $$GET^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Order Entry Results Reporting 3 ORMGMRC  ORMLR  ORMRA  
Emergency Department Integration Software 1 EDPUPD  

Entry Points

Name Comments DBIA/ICR reference
RESULT(ORY,ORDER) ; -- Return results of ORDERs
; where ORDER(#) = ID
; in @ORY@(#) = Item=ID^Text^ResultDate in HL7 format, and
; = Data=Test^Value^Units^ReferenceRange^CriticalFlag
; = Cmnt=result comment
; or Text=line of report text
; RPC = ORRC RESULTS BY ID
DATES ; -- Return SDATE and EDATE from ORBEG and OREND
; [Inverted for rev-chron search]
ORSLT ; -- Add ORIFN to ^TMP($J,"ORSLT",PAT,pkgid) for use by Events
IDS(ORY,ORPAT,ORUSR,SDATE,EDATE) ; -- Return new results for ORPAT
; between ORBEG & OREND that ORUSR has not acknowledged
; in @ORY@(ORPAT) = #orders ^ 1 if any are abnormal
; @ORY@(ORPAT,ID) = * if abnormal, else null
; [from ORRCDPT1]
ACKD(ORDER,USER) ; -- Returns 1 or 0, if USER has acknowledged ORDER
GMRC ; -- Consult results
XRPT ; -- body of report for CASE, PROC
ADD(ORDER,PROV,ACK) ; -- Create new entry in file #102.4 when results are posted
; [called from HL7 messages: ORMLR, ORMRA, ORMGMRC]
  • ICR #4170
    • Status: Active
    • Usage: Private
    ACK(ORY,ORUSR,ORDER) ; -- Acknowledge results of ORDERs by ORUSR
    ; where ORDER(#) = ID ^ 1 or 0, if acknowledged
    ; Returns ORY(#) = ID ^ 1 or 0, if successful
    ; RPC = ORRC RESULTS ACKNOWLEDGE
    LR ; -- Lab results
    RA ; -- Radiology results
    DEL(DA) ; -- Delete old acknowledgment stub
    LISTD(ORY,ORPAT,ORUSR,ORBEG,OREND,ORSLT) ; -- Return new results for ORPAT
    ; between ORBEG & OREND that ORUSR has not acknowledged
    ; in @ORY@(#) = Item=ID^Text^ResultDate in HL7 format, and also if ORSLT
    ; = Data=Test^Value^Units^ReferenceRange^CriticalFlag
    ; = Cmnt=result comment
    ; or Text=line of report text
    ; RPC = ORRC RESULTS BY DATE
    DT1
    LIST(ORY,ORUSR,ORPAT,ORSLT) ; -- Return orders by ORUSR for ORPAT with new results
    ; in @ORY@(#) = Item=ID^Text^ResultDate in HL7 format, and also if ORSLT
    ; = Data=Test^Value^Units^ReferenceRange^CriticalFlag
    ; = Cmnt=result comment
    ; or Text=line of report text
    ; RPC = ORRC RESULTS BY PATIENT
    PATS(ORY,ORUSR) ; -- Return list of patients for whom ORUSR has unack'd results
    ; in @ORY@(PAT) = #orders ^ 1 if any are abnormal
    ; @ORY@(PAT,ID) = * if abnormal, else null
    ; [from ORRCDPT]
    PARAM(PROV) ; -- Return ORRC ACTIVATION DATE parameter for PROV
    ORD ; -- Add results for ORIFN to @ORY@(ORN)

    External References

    Name Field # of Occurrence
    FILE^DICN ADD+8
    ^DIE ACK+11
    ^DIK DEL+2
    RT^GMRCGUIA GMRC+3
    DT^GMRCSLM2 GMRC+3
    RR^LR7OR1 LR+5, LR+6
    EN1^LR7OSBR LR+15
    EN^LR7OSMZ0 LR+15
    $$NMSP^ORCD ORSLT+3, ORD+2
    $$VALUE^ORCSAVE2 LR+4
    TEXT^ORQ12 LIST+11, LISTD+13, RESULT+11
    RSLT^ORRCXQ ACK+13
    EN30^RAO7PC3 RA+2
    $$FMTHL7^XLFDT LIST+12, LISTD+14, RESULT+12, LR+9
    $$HL7TFM^XLFDT DATES+2
    $$REPEAT^XLFSTR XRPT+2
    $$GET^XPAR PARAM+2

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^ORA(102.4 - [#102.4] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^GMR(123 - [#123] GMRC+2
    ^LAB(60 - [#60] LR+13
    ^OR(100 - [#100] PATS+8, PATS+9, ORSLT+2, IDS+9, IDS+10, IDS+11, IDS+12, LIST+9, LIST+10, LIST+11
    , LISTD+10, LISTD+11, LISTD+12, RESULT+10, ORD+2, LR+2, RA+2, GMRC+1
    ^ORA(102.4 - [#102.4] ADD+4, ACK+9, ACK+10, DEL+2, PATS+7, PATS+11, LIST+9, ACKD+2, ACKD+3
    ^ORD(101.43 - [#101.43] LR+4
    ^TMP("GMRCR" GMRC+4, GMRC+5!
    ^TMP("LRC" LR+15!, LR+16, LR+17!
    ^TMP("LRRR" LR+1!, LR+5, LR+7, LR+8, LR+9, LR+10!, LR+11, LR+17!
    ^TMP($J PATS+6!, PATS+10, ORSLT+5*, ORSLT+8*, IDS+6, LIST+7, LISTD+8, RESULT+8, RA+3, RA+4
    , RA+5, RA+6, RA+7!, XRPT+3, XRPT+4
    ^VA(200 - [#200] PARAM+1

    Label References

    Name Line Occurrences
    $$ACKD IDS+12, LISTD+13
    $$PARAM ADD+5, PATS+5
    @( ORD+4
    ADD ACK+9
    DATES LISTD+9
    DEL PATS+11
    DT1 IDS+8
    ORD LIST+13, LISTD+15, RESULT+13
    ORSLT PATS+15
    XRPT RA+5, RA+6

    Naked Globals

    Name Field # of Occurrence
    ^( LR+16, RA+6, XRPT+3, XRPT+4, GMRC+4
    ^("ORD" XRPT+3
    ^(4 ORSLT+2, LR+2, RA+2
    ^(7 PATS+9

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ABN PATS+4~, PATS+9*, PATS+13, PATS+14, IDS+5~, IDS+13*, IDS+14
    ACK ADD~, ADD+3, PATS+4~, PATS+11*
    ACTDT ADD+5~*, ADD+6, PATS+4~, PATS+5*, PATS+11
    CASE RA+1~, RA+4*, RA+5, RA+6*, XRPT+3, XRPT+4
    CNT PATS+4~, PATS+12*, PATS+13*, IDS+5~, IDS+7*, IDS+12*, IDS+14
    DA ACK+4~, ACK+10*, DEL~, DEL+2
    DIC ADD+2~, ADD+7*
    DIC("DR" ADD+7*
    DIC(0 ADD+7*
    DIE ACK+4~, ACK+5*
    DIK DEL+1~*
    DO ADD+2~
    DR ACK+4~, ACK+11*
    DT ADD+6
    EDATE IDS~, IDS+8*, IDS+9, LISTD+7~, LISTD+10, DATES+2*, DT1*, DT1+2*, DT1+3*
    FIRST RA+1~, RA+3*, XRPT+2, XRPT+5*
    GMRCID GMRC+1~*, GMRC+2, GMRC+3
    I LR+1~, LR+13*, LR+16*, XRPT+1~, XRPT+4*, GMRC+1~, GMRC+4*
    IDX ORSLT+4~*, ORSLT+5*
    >> IFN ACKD+2*, ACKD+3
    LRDT LR+9*, LR+11~, LR+12*, LR+13, LR+14
    LRI LR+11~, LR+14*
    LRID LR+1~, LR+2*, LR+3, LR+5*, LR+6
    LRN LR+11~, LR+12*, LR+13, LR+14
    LRSUB LR+1~, LR+8*, LR+9, LR+10, LR+15
    LRTST LR+1~, LR+4*, LR+5, LR+6
    NMSP ORSLT+1~, ORSLT+3*, ORSLT+6, ORSLT+7
    OR0 ORSLT+1~, ORSLT+2*, ORSLT+3
    OR4 ORSLT+1~, ORSLT+2*, ORSLT+5, ORSLT+7
    ORACK ACK+4~, ACK+7*, ACK+11
    ORBEG LISTD~, DATES+2
    ORD XRPT+1~, XRPT+3*
    ORDER ADD~, ADD+2, ADD+4, ADD+8, ACK~, ACKD~, ACKD+2, RESULT~
    ORDER( ACK+6, ACK+7, RESULT+9
    ORDT IDS+5~, IDS+9*, IDS+10, LIST+6~, LIST+11*, LIST+12, LISTD+7~, LISTD+10*, LISTD+11, LISTD+14
    , RESULT+7~, RESULT+10*, RESULT+12
    OREND LISTD~, DATES+2
    ORI ACK+4~, ACK+6*, ACK+7, ACK+8, ACK+12, RESULT+7~, RESULT+9*
    ORIFN ACK+4~, ACK+7*, ACK+8*, ACK+9, ACK+10, ACK+12, PATS+4~, PATS+7*, PATS+8, PATS+9
    , PATS+11, PATS+14, ORSLT+2, ORSLT+5, ORSLT+6, ORSLT+8, IDS+5~, IDS+10*, IDS+11, IDS+12
    , IDS+13, LIST+6~, LIST+9*, LIST+10, LIST+11, LIST+12, LISTD+7~, LISTD+11*, LISTD+12, LISTD+13
    , LISTD+14, RESULT+7~, RESULT+9*, RESULT+10*, RESULT+11, RESULT+12, ORD+1, ORD+2, ORD+3, LR+2
    , LR+4, RA+2, GMRC+1~
    ORN LIST+6~, LIST+8*, LIST+12*, LISTD+7~, LISTD+9*, LISTD+14*, RESULT+7~, RESULT+8*, RESULT+12*, LR+3*
    , LR+7*, LR+9, LR+13*, LR+14*, LR+16*, XRPT+2*, XRPT+3*, XRPT+4*, GMRC+4*
    ORPAT IDS~, IDS+7*, IDS+9, IDS+10, IDS+13, IDS+14, LIST~, LIST+8*, LIST+9, LISTD~
    , LISTD+9*, LISTD+10, LISTD+11
    ORSLT LIST~, LIST+13, LISTD~, LISTD+15
    ORTX LIST+6~, LIST+11, LISTD+7~, LISTD+13, RESULT+7~, RESULT+11
    ORTX(1 LIST+12, LISTD+14, RESULT+12
    ORUSR ACK~, ACK+4, ACK+5*, ACK+9, ACK+10, ACK+13, PATS~, PATS+5*, PATS+7, PATS+11
    , IDS~, IDS+7*, IDS+12, LIST~, LIST+8*, LIST+9, LISTD~, LISTD+9*, LISTD+13
    ORVP LR+1~, LR+2*, LR+5, LR+6, LR+7, LR+8, LR+9, LR+11, LR+15, RA+1~
    , RA+2*, RA+3, RA+4, RA+5, RA+6, RA+7, XRPT+3, XRPT+4
    ORXQ ACK+4~, ACK+13
    ORXQ( ACK+12*
    ORY ACK~, PATS~, PATS+6*, PATS+13, PATS+14, IDS~, IDS+6*, IDS+13, IDS+14, LIST~
    , LIST+7*, LIST+12, LISTD~, LISTD+8*, LISTD+14, RESULT~, RESULT+8*, RESULT+12, LR+3, LR+7
    , LR+9*, LR+13, LR+14, LR+16, XRPT+2, XRPT+3, XRPT+4, GMRC+4
    ORY( ACK+8*, ACK+12*, PATS+12
    ORY(1 ORD+3*
    PAT PATS+4~, PATS+9*, PATS+10, PATS+12, PATS+13, PATS+14, ORSLT+5, ORSLT+8
    PKG ORD+1~, ORD+2*, ORD+3, ORD+4
    PROC RA+1~, RA+5*, RA+6*, XRPT+3, XRPT+4
    PROV PARAM~, PARAM+1*, PARAM+2, ADD~, ADD+3, ADD+4, ADD+5, ADD+7
    PSET RA+1~, RA+3*, RA+4, RA+6
    RAID RA+1~, RA+2*
    RDT PATS+4~, PATS+9*, PATS+11
    SDATE IDS~, IDS+8*, IDS+9, LISTD+7~, LISTD+10, DATES+2*, DT1+1*, DT1+2*, DT1+3*
    SERV PARAM+1~*, PARAM+2
    STOP ADD+2~, ADD+3, ADD+4*, ADD+6*
    SUB GMRC+1~*, GMRC+2*, GMRC+3, GMRC+4
    TEST LR+11~*
    TEST( LR+12, LR+13, LR+14
    U ACK+7, ACK+12, DEL+2, PATS+8, PATS+9, PATS+13, ORSLT+3, IDS+11, IDS+12, IDS+14
    , LIST+9, LIST+10, LIST+12, LISTD+12, LISTD+14, ACKD+3, RESULT+12, ORD+2, ORD+3, LR+2
    , LR+4, LR+9, LR+13, RA+2
    USER ACKD~, ACKD+3
    X ADD+2~, ADD+8*, ACK+4~, ACK+7*, PATS+4~, PATS+12*, PATS+13, ORSLT+1~, ORSLT+2*, ORSLT+5*
    , ORSLT+6*, ORSLT+7*, ORSLT+8, IDS+5~, IDS+12*, IDS+13, DT1+3*, ACKD+3*, LR+1~, LR+4*
    , LR+13*, LR+16*, XRPT+1~, XRPT+4*, GMRC+1~, GMRC+4*
    Y PARAM+1~, PARAM+2*, PARAM+3, ADD+2~, ACK+4~, ACKD+1~*, ACKD+2, ACKD+3*, ACKD+4
    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 |  All