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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXRMSXRM

Package: Clinical Reminders

Routine: PXRMSXRM


Information

PXRMSXRM ; SLC/PKR - Main driver for building indexes. ;29-Apr-2015 12:46;DU

Source Information

Source file <PXRMSXRM.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Clinical Reminders 3 (INDEXD,OPTIONS,PROTCOLS)^PXRMDIEV  $$ASKYN^PXRMEUT  SEND^PXRMMSG  
Kernel 3 (,$$S)^%ZTLOAD  ($$FMTE,$$HDIFF,$$NOW)^XLFDT  MES^XPDUTL  
VA Fileman 2 $$GET1^DIQ  ^DIR  

Caller Graph

Caller Graph Total: 17

Package Total Caller Graph
Clinical Reminders 3 PXRM INDEX BUILD  PXRMINDC  PXRMINDD  
Lab Service 3 LRPXSXRA  LRPXSXRB  LRPXSXRL  
PCE Patient Care Encounter 3 PXPXRMI1  PXPXRMI2  PXRM INDEX BUILD  
General Medical Record - Vitals 1 GMVPXRM  
IHS Mods To Patient Care Encounter 1 BPXRMDX1  
Order Entry Results Reporting 1 ORPXRM  
Outpatient Pharmacy 1 PSOPXRMI  
Pharmacy Data Management 1 PSSSXRD  
Problem List 1 GMPLPXRM  
Radiology Nuclear Medicine 1 RAPXRM  
Registration 1 DGPTDDCR  

Entry Points

Name Comments DBIA/ICR reference
INDEX ;Driver for building the various indexes.
SEL(LIST,GBL) ;Select global list
ETIME(START,END) ;Calculate and format the elapsed time.
ERRMSG(NERROR,GLOBAL) ;If there were errors send an error message.
  • ICR #4113
    • Status: Active
    • Usage: Controlled Subscription
    TASKIT(LIST,GBL,ROUTINE) ;Build the indexes as a tasked job.
    COMMSG(GLOBAL,START,END,NE,NERROR) ;Send a MailMan message providing
  • ICR #4113
    • Status: Active
    • Usage: Controlled Subscription
    TASKJOB ;Execute as tasked job. LIST, GBL, and ROUTINE come through
    ADDERROR(GLOBAL,IDEN,NERROR) ;Add to the error list.
  • ICR #4113
    • Status: Active
    • Usage: Controlled Subscription
    RUNNOW(LIST,GBL,ROUTINE) ;Run the routines now.
    ASKTASK() ;See if this should be tasked.
    DETIME(START,END) ;Write out the elapsed time.
  • ICR #4113
    • Status: Active
    • Usage: Controlled Subscription

    External References

    Name Field # of Occurrence
    ^%ZTLOAD TASKIT+20
    $$S^%ZTLOAD TASKJOB+8
    $$GET1^DIQ COMMSG+11, COMMSG+15, ERRMSG+13, ERRMSG+17
    ^DIR ASKTASK+5, SEL+25, TASKIT+7
    INDEXD^PXRMDIEV RUNNOW+7, TASKJOB+12
    OPTIONS^PXRMDIEV INDEX+36, RUNNOW+9
    PROTCOLS^PXRMDIEV INDEX+37, RUNNOW+10
    $$ASKYN^PXRMEUT INDEX+26
    SEND^PXRMMSG COMMSG+17, ERRMSG+19
    $$FMTE^XLFDT COMMSG+6, TASKIT+4
    $$HDIFF^XLFDT ETIME+3, ETIME+5
    $$NOW^XLFDT COMMSG+6, TASKIT+2
    MES^XPDUTL DETIME+4

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Rebuilding an index will stop all evaluation, dialogs,"
    • Line Location: INDEX+23
    Function Call: WRITE
    • Prompt: !,"reminder order checks, and anything using reminder evaluation!"
    • Line Location: INDEX+24
    Function Call: WRITE
    • Prompt: !,"Are you sure you want to proceed?"
    • Line Location: INDEX+25
    Function Call: WRITE
    • Prompt: !,"Which indexes do you want to (re)build?"
    • Line Location: INDEX+29
    Function Call: WRITE
    • Prompt: !,"Queue the Clinical Reminders index job."
    • Line Location: INDEX+39
    Function Call: WRITE
    • Prompt: !,"Task number ",ZTSK," queued."
    • Line Location: TASKIT+21
    Routine Call
    • DIR
    • Line Location:
      • ASKTASK+5
      • SEL+25
      • TASKIT+7

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^VA(200 - [#200] GET1^DIQ
    ^XMB(3.8 - [#3.8] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PXRM(800 - [#800] COMMSG+13, ERRMSG+4, ERRMSG+15
    ^TMP("PXRMERROR" ADDERROR+2*, ERRMSG+9, ERRMSG+11!
    ^TMP("PXRMXMZ" COMMSG+3!, COMMSG+5*, COMMSG+6*, COMMSG+7*, COMMSG+8*, COMMSG+9*, COMMSG+10*, ERRMSG+6!, ERRMSG+9*, ERRMSG+10*

    Label References

    Name Line Occurrences
    $$ASKTASK INDEX+33
    $$ETIME COMMSG+8, DETIME+3
    @( RUNNOW+6, TASKJOB+11
    RUNNOW INDEX+41
    SEL INDEX+30
    TASKIT INDEX+40

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ALIST SEL+2~, SEL+22
    ALIST( SEL+3*, SEL+6*, SEL+8*, SEL+9*, SEL+10*, SEL+11*, SEL+12*, SEL+13*, SEL+14*, SEL+15*
    , SEL+16*, SEL+17*, SEL+18*, SEL+20*, SEL+21*
    ANS INDEX+1~, INDEX+26*, INDEX+27
    DIR ASKTASK+1~, SEL+2~, TASKIT+1~
    DIR("A" ASKTASK+3*, SEL+22*, SEL+23*, TASKIT+3*, TASKIT+4*, TASKIT+5*
    DIR("B" ASKTASK+4*
    DIR(0 ASKTASK+2*, SEL+24*, TASKIT+6*
    DIROUT ASKTASK+1~, ASKTASK+6, SEL+2~, SEL+26, TASKIT+1~, TASKIT+8
    DIRUT ASKTASK+1~, ASKTASK+6, SEL+2~, SEL+26, TASKIT+1~, TASKIT+8
    DTOUT ASKTASK+1~, ASKTASK+7, SEL+2~, SEL+27, TASKIT+1~, TASKIT+9
    DUOUT ASKTASK+1~, ASKTASK+7, SEL+2~, SEL+27, TASKIT+1~, TASKIT+9
    DUZ COMMSG+11, COMMSG+12, ERRMSG+13, ERRMSG+14
    END COMMSG~, COMMSG+8, DETIME~, DETIME+3, ERRMSG+1~, ERRMSG+7*, ERRMSG+9, ERRMSG+10, ETIME~, ETIME+3
    , ETIME+5
    ETIME ETIME+2~, ETIME+3*, ETIME+4, ETIME+5*, ETIME+6, ETIME+7
    FROM COMMSG+2~, COMMSG+11*, COMMSG+17, ERRMSG+1~, ERRMSG+13*, ERRMSG+19
    GBL INDEX+1~, INDEX+30, INDEX+40, INDEX+41, RUNNOW~, SEL~, TASKIT~
    GBL( RUNNOW+5, RUNNOW+7, SEL+3*, SEL+6*, SEL+8*, SEL+9*, SEL+10*, SEL+11*, SEL+12*, SEL+13*
    , SEL+14*, SEL+15*, SEL+16*, SEL+17*, SEL+18*, SEL+20*, SEL+21*, TASKJOB+10, TASKJOB+12
    GLOBAL ADDERROR~, ADDERROR+2, COMMSG~, COMMSG+4, COMMSG+5, ERRMSG~, ERRMSG+10, ERRMSG+12
    IDEN ADDERROR~, ADDERROR+2
    IND ERRMSG+1~, ERRMSG+9*, RUNNOW+1~, RUNNOW+3*, RUNNOW+4, TASKJOB+2~, TASKJOB+6*, TASKJOB+8*, TASKJOB+9
    INUM SEL+2~, SEL+3*, SEL+6*, SEL+8*, SEL+9*, SEL+10*, SEL+11*, SEL+12*, SEL+13*, SEL+14*
    , SEL+15*, SEL+16*, SEL+17*, SEL+18*, SEL+20*, SEL+21*, SEL+24
    LI RUNNOW+1~, RUNNOW+4*, RUNNOW+5, RUNNOW+7, TASKJOB+2~, TASKJOB+9*, TASKJOB+10, TASKJOB+12
    LIST INDEX+1~, INDEX+30, INDEX+31, INDEX+40, INDEX+41, RUNNOW~, RUNNOW+2, RUNNOW+4, SEL~, SEL+26*
    , SEL+27*, SEL+28*, TASKIT~, TASKJOB+5, TASKJOB+9
    MAXERR ERRMSG+1~, ERRMSG+4*, ERRMSG+5*, ERRMSG+7, ERRMSG+10
    MGIEN COMMSG+2~, COMMSG+13*, COMMSG+14, COMMSG+15, ERRMSG+1~, ERRMSG+15*, ERRMSG+16, ERRMSG+17
    MGROUP COMMSG+2~, COMMSG+15*, COMMSG+16, ERRMSG+1~, ERRMSG+17*, ERRMSG+18
    MINDT TASKIT+1~, TASKIT+2*, TASKIT+4, TASKIT+6
    NE COMMSG~, COMMSG+7, ERRMSG+1~, ERRMSG+8*, ERRMSG+9*
    NERROR ADDERROR~, ADDERROR+1*, ADDERROR+2, COMMSG~, COMMSG+9, COMMSG+10, ERRMSG~, ERRMSG+2, ERRMSG+7, ERRMSG+8
    NUM RUNNOW+1~, RUNNOW+2*, RUNNOW+3, TASKJOB+2~, TASKJOB+5*, TASKJOB+6, TASKJOB+8
    ROUTINE INDEX+1~, INDEX+40, INDEX+41, RUNNOW~, TASKIT~
    ROUTINE( INDEX+11*, INDEX+13*, INDEX+14*, INDEX+15*, INDEX+16*, INDEX+17*, INDEX+18*, INDEX+19*, INDEX+21*, INDEX+22*
    , RUNNOW+5, TASKJOB+10
    ROUTINE(100 INDEX+7*
    ROUTINE(45 INDEX+2*
    ROUTINE(52 INDEX+3*
    ROUTINE(55 INDEX+4*
    ROUTINE(63 INDEX+5*
    ROUTINE(70 INDEX+6*
    ROUTINE(9000011 INDEX+12*
    RTN RUNNOW+1~, RUNNOW+5*, RUNNOW+6, TASKJOB+2~, TASKJOB+10*, TASKJOB+11
    SDTIME TASKIT+1~, TASKIT+10*, TASKIT+18
    START COMMSG~, COMMSG+8, DETIME~, DETIME+3, ETIME~, ETIME+3, ETIME+5
    TASKIT INDEX+1~, INDEX+33*, INDEX+34, INDEX+38
    TEXT DETIME+2~, DETIME+3*, DETIME+4, ETIME+2~, ETIME+6*, ETIME+7*, ETIME+8
    TO COMMSG+2~, COMMSG+17, ERRMSG+1~, ERRMSG+19
    TO( COMMSG+12*, COMMSG+16*, ERRMSG+14*, ERRMSG+18*
    U TASKIT+6
    X ASKTASK+1~, SEL+2~, TASKIT+1~
    XMSUB COMMSG+2~, COMMSG+4*, COMMSG+17, ERRMSG+1~, ERRMSG+12*, ERRMSG+19
    Y ASKTASK+1~, ASKTASK+8, SEL+2~, SEL+28, TASKIT+1~, TASKIT+10
    >> ZTDESC TASKIT+17*
    >> ZTDTH TASKIT+18*
    >> ZTIO TASKIT+19*
    >> ZTREQ TASKJOB+3*
    >> ZTRTN TASKIT+16*
    ZTSAVE TASKIT+12!
    ZTSAVE("GBL(" TASKIT+14*
    ZTSAVE("LIST" TASKIT+13*
    ZTSAVE("ROUTINE(" TASKIT+15*
    >> ZTSK TASKIT+21
    >> ZTSTOP TASKJOB+4*, TASKJOB+8*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All