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 |  Used in RPC |  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 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

Caller Graph Total: 7

Package Total Caller Graph
Care Management 4 ORRCDPT  ORRCDPT1  ORRCEVT  ORRCXQ  
Order Entry Results Reporting 3 ORMGMRC  ORMLR  ORMRA  

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

    Used in RPC

    RPC Name Call Tags
    ORRC RESULTS BY PATIENT LIST
    ORRC RESULTS BY ID RESULT
    ORRC RESULTS ACKNOWLEDGE ACK
    ORRC RESULTS BY DATE LISTD

    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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All