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

Package: Methicillin Resistant Staph Aurerus Initiative Reports

Routine: MMRSCRE


Information

MMRSCRE ;TCK - Print CRE Acute Care IPEC Report ; 3/22/17 3:02pm

Source Information

Source file <MMRSCRE.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 ^%DT  ^DIC  $$GET1^DIQ  ^DIR  
Methicillin Resistant Staph Aurerus Initiative Reports 3 GETMOVE^MMRSCRE2  GETLABS^MMRSCRE3  PRINT^MMRSCRE4  
Kernel 2 ($$DT,$$FMADD)^XLFDT  EN^XUTMDEVQ  
Registration 1 $$UPPER^DGUTL  

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

Package Total Caller Graph
Methicillin Resistant Staph Aurerus Initiative Reports 1 MMRSCRE4  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
CHKPAR(ORG,Y,CHK) ;
CHECK(L) ;Check if parameters are setup
CHECK2 ;Check if lab tests and etiologies are setup
ERROR ;
CHECK3 ;Check if Ward Mappings have been setup for this division
MAIN2 ; Entry for queuing
CLEAN ;
GETDIV() ;Prompt user to select Division
PROMPT ;Prompts user for start date, end date, locations, and if user wants to only print the Summary Report.
LOC ;Prompts user for division
DATE ;Prompts user for date range
SUMRPT ;Prompt user if should only run the summary report.
ASKDVC ;Prompts user for device of output (allows queuing)
GETPARAM ;(MDRO) ; Loads lab search/extract parameters from file 104.1
PATDAYS ;Gets 'PATIENT DAYS OF CARE'.
GETPATDY(WARD,SDT,EDT) ;Helper function for PATDAYS() - Gets Patient Days of care for specific ward
FY(DATE) ;Helper function for GETPATDY - Gets fiscal year for the specified date
END ;

External References

Name Field # of Occurrence
^%DT DATE+3, DATE+6
$$UPPER^DGUTL CHECK2+9
^DIC GETDIV+9, LOC+25, LOC+37
$$GET1^DIQ CHKPAR+5, CHKPAR+7, CHECK2+8, CHECK2+17, CHECK2+24, LOC+12, LOC+13, LOC+30, LOC+40, LOC+41
, GETPARAM+19, PATDAYS+7
^DIR LOC+5, SUMRPT+6
GETMOVE^MMRSCRE2 GETPARAM+33
GETLABS^MMRSCRE3 GETPARAM+34
PRINT^MMRSCRE4 GETPARAM+35
$$DT^XLFDT GETPATDY+7
$$FMADD^XLFDT GETPATDY+5, GETPATDY+7
EN^XUTMDEVQ ASKDVC+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+7
Function Call: WRITE
  • Prompt: !!," >>> Make sure the Ward Mappings for each Geographical Unit has been setup.",!!
  • Line Location: CHECK3+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LOC+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: !!,"The ending date of the range must be later than the starting date."
  • Line Location: DATE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMRPT+2
Routine Call
  • DIC
  • Line Location:
    • GETDIV+9
    • LOC+25
    • LOC+37
Routine Call
  • DIR
  • Line Location:
    • LOC+5
    • SUMRPT+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MMRS(104 - [#104] Classic Fileman Calls,  GET1^DIQ
104.109 GET1^DIQ
104.15 GET1^DIQ
^MMRS(104.2 - [#104.2] GET1^DIQ
^DG(40.8 - [#40.8] Classic Fileman Calls,  GET1^DIQ
^DIC(42 - [#42] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(41.9 - [#41.9] GETPATDY+4, GETPATDY+6, GETPATDY+8
^MMRS(104 - [#104] CHECK+3, CHECK+4, CHECK+6, CHECK+7, CHECK+9, CHECK+10, GETDIV+3, GETDIV+4, GETDIV+12, LOC+9
^MMRS(104.1 - [#104.1] CHKPAR+2, CHKPAR+3, CHECK2+3, CHECK2+4, CHECK2+5, CHECK2+6, CHECK2+12, CHECK2+14, CHECK2+19, CHECK2+20
, GETPARAM+10, GETPARAM+17, GETPARAM+22, GETPARAM+24, GETPARAM+25, GETPARAM+27, GETPARAM+28, GETPARAM+29, GETPARAM+30
^MMRS(104.2 - [#104.2] GETPARAM+5
^MMRS(104.3 - [#104.3] CHECK3+3
^TMP($J CLEAN+2!, CLEAN+3!, GETPARAM+7!, GETPARAM+8!, GETPARAM+22*, GETPARAM+26*, GETPARAM+32*, PATDAYS+17*, PATDAYS+18*

Label References

Name Line Occurrences
$$FY GETPATDY+3
$$GETPATDY PATDAYS+9, GETPATDY+3
ASKDVC MAIN+10
CHECK LOC+15, LOC+33, LOC+42
CHECK2 MAIN+3
CHECK3 MAIN+6
CHKPAR LOC+10, LOC+27, LOC+38
CLEAN MAIN+2, MAIN+9, MAIN+11, MAIN2+2
DATE DATE+10
END MAIN+12
ERROR LOC+11, LOC+28, LOC+39
GETPARAM MAIN2+1
PROMPT MAIN+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATE+1~, DATE+3*
%DT("A" DATE+3*, DATE+6*
ADMTDT CLEAN+1!
ALL LOC+2*, LOC+7*, END+1!
ANTI GETPARAM+2~
ANTIM GETPARAM+2~
BACT GETPARAM+1~, GETPARAM+25*, GETPARAM+26, GETPARAM+28*
BYADM MAIN+1~, PROMPT+1*
CENSUS GETPATDY+1~, GETPATDY+4*, GETPATDY+6, GETPATDY+8
CHK CHKPAR~, CHKPAR+2*, CHKPAR+9*, LOC+7, LOC+8*, LOC+9, LOC+10, LOC+11, LOC+20, LOC+21*
, LOC+27, LOC+28, LOC+36*, LOC+37, LOC+38, LOC+39
COLDT CLEAN+1!
COUNT GETDIV+1~, GETDIV+3*, GETDIV+4
DATA CLEAN+2!
DATA1 CLEAN+2!
DATE FY~, FY+1, FY+2
DFN CLEAN+1!
DIC GETDIV+1~, GETDIV+5*, GETDIV+9!, LOC+22~, LOC+25*, LOC+46!
DIC("A" GETDIV+7*, LOC+24*, LOC+37*
DIC("S" GETDIV+8*
DIC(0 GETDIV+6*, LOC+25*
DIR LOC+5!, SUMRPT+6!
DIR("A" LOC+4*, SUMRPT+4*
DIR("B" LOC+4*, SUMRPT+5*
DIR(0 LOC+4*, SUMRPT+3*
DIRUT LOC+6, SUMRPT+7, END+1!
DIV GETDIV+1~, GETDIV+3*, LOC+9*, LOC+10, LOC+12, LOC+14
DIVARY MAIN+9!, CLEAN+2!, END+3!
DIVARY( LOC+14*, LOC+31*, LOC+41*, GETPARAM+6, GETPARAM+9
DIVSN GETPARAM+4*, END+1!
DLAYGO GETDIV+1~, LOC+22~
DPT LOC+29*, LOC+30, END+1!
DTOUT GETDIV+1~, GETDIV+10, LOC+22~, LOC+26, LOC+45, LOC+50
DUOUT GETDIV+1~, GETDIV+10, LOC+22~, LOC+26, LOC+45, LOC+50
DVSN MAIN+9!, CHECK+1~, CHECK+7*, CHECK+8, CHECK+9, CHECK+10, CLEAN+2!, END+3!
EBACT GETPARAM+1~, GETPARAM+27*, GETPARAM+28
ECUMPD GETPATDY+1~, GETPATDY+8*, GETPATDY+10, GETPATDY+11
EDT PATDAYS+1~, PATDAYS+4*, PATDAYS+9, GETPATDY~, GETPATDY+2, GETPATDY+3, GETPATDY+7*, GETPATDY+8
ENDDT MAIN+1~, DATE+8*, DATE+9*, DATE+10, PATDAYS+4
ETI CHKPAR+1~, CHKPAR+7*, CHKPAR+8
ETIO CHECK2+8*, CHECK2+9*, CHECK2+10, END+1!
ETIOL GETPARAM+2~, GETPARAM+29*, GETPARAM+30
ETIOLOGY GETPARAM+2~, GETPARAM+30*, GETPARAM+31, GETPARAM+32
ETIONAME CHECK2+26*, GETPARAM+2~
ETOP GETPARAM+1~
EXTFLG MAIN+1~, MAIN+4, MAIN+7, MAIN+9, MAIN+10, CHECK+15*, ERROR+2*, CHECK3+5*, GETDIV+10*, LOC+6*
, LOC+26*, LOC+45*, LOC+49, LOC+50*, DATE+4*, DATE+7*, SUMRPT+7*
FID LOC+13*, LOC+14, LOC+30*, LOC+31, LOC+41*, END+1!
FND GETPARAM+14*, PATDAYS+2*, END+1!
I CHKPAR+1~, CHKPAR+3*, CHKPAR+4
IBACT GETPARAM+1~, GETPARAM+24*, GETPARAM+25, GETPARAM+26
IEN GETPARAM+1~, GETPARAM+10*, GETPARAM+11, GETPARAM+17
II CHECK2+4*, CHECK2+5, CHECK2+6, CHECK2+12, CHECK2+14, CHECK2+15, CHECK2+19, CHECK2+20, CHECK2+23, CHECK2+26
, END+1!
III CHECK2+15*, CHECK2+16, CHECK2+17, CHECK2+23*, CHECK2+24, END+1!
IN CLEAN+1!
INC GETPARAM+2~, GETPARAM+14*, GETPARAM+21*, GETPARAM+22
INDT CLEAN+1!
ITOP GETPARAM+1~
>> IX CHECK2+11*, CHECK2+12*, CHECK2+13, CHECK2+14, CHECK2+15
IXI CHECK2+20*, CHECK2+21, CHECK2+22, CHECK2+23, END+1!
L CHECK~, CHECK+6, CHECK+7
LIEN CHKPAR+4*, CHKPAR+5, CHKPAR+7, CLEAN+1!
LIENS CLEAN+1!
LOC GETPARAM+4*, GETPARAM+6*, GETPARAM+9, PATDAYS+1~, PATDAYS+7*, PATDAYS+8
>> LOCNAME PATDAYS+8, PATDAYS+17
LOCNME END+1!
LRIDT CLEAN+1!
LRIEN GETPARAM+18*, GETPARAM+19, END+2!
MDIV MAIN+9!, CLEAN+2!, END+3!
MDRO GETPARAM+1~, GETPARAM+3~, GETPARAM+13*, GETPARAM+18, GETPARAM+22
MDROETIO CHECK2+2*, CHECK2+4, CHECK2+20, CHECK2+26*, ERROR+1, LOC+11*, LOC+28*, LOC+39*, GETPARAM+23, GETPARAM+24
, GETPARAM+25, GETPARAM+26, GETPARAM+27, GETPARAM+28, GETPARAM+29, GETPARAM+30, GETPARAM+32, END+2!
MMRSDIV MAIN+1~, CHECK+3*, CHECK+4, CHECK3+1~, CHECK3+3*, CHECK3+4, GETDIV+1~, GETDIV+2*, GETDIV+4*, GETDIV+11*
, GETDIV+12*, GETDIV+13, GETPARAM+4*
MMRSET CHECK2+1~, GETPARAM+2~
MMRSI CHECK2+1~, GETPARAM+2~
MMRSLOC MAIN+1~, CHECK3+1~
MMRSLOC( LOC+14*, LOC+31*, LOC+41*
>> MMRSMDRO GETPARAM+5*, GETPARAM+10, GETPARAM+13
MMRSSUM MAIN+9!, SUMRPT+1, END+3!
MMRSVAR ASKDVC+1~, ASKDVC+7
MMRSVAR("BYADM" ASKDVC+4*
MMRSVAR("DFLTDT" ASKDVC+5*
MMRSVAR("DIVARY" ASKDVC+6*
MMRSVAR("DIVARY(" ASKDVC+6*
MMRSVAR("ENDDT" ASKDVC+3*
MMRSVAR("MDROETIO" ASKDVC+5*
MMRSVAR("MMRSDIV" ASKDVC+4*
MMRSVAR("MMRSLOC(" ASKDVC+3*
MMRSVAR("ORG" ASKDVC+6*
MMRSVAR("PRTSUM" ASKDVC+4*
MMRSVAR("STRTDT" ASKDVC+3*
MMRSVAR("TSTSTP" ASKDVC+5*
MRSASTAP CHECK2+1~, GETPARAM+2~
NUMDIV MAIN+1~, CHECK+2*, CHECK+3, CHECK+4*, CHECK+5, CHECK+12, LOC+16, LOC+34, LOC+43, LOC+47
NUMLOC CHECK3+1~, CHECK3+2*, CHECK3+4*, CHECK3+5
OBOBS END+2!
>> ODOBS( PATDAYS+15
ORG CHKPAR~, CHKPAR+2, CHKPAR+3, CHECK2+26*
ORGP CHECK2+6*, CHECK2+7, CHECK2+8, LOC+10, LOC+27, LOC+38, END+2!
PATDAYS PATDAYS+1~, PATDAYS+9*, PATDAYS+15*, PATDAYS+16
PRMPTTXT PROMPT+1*, DATE+3, DATE+6, END+2!
PRTSUM MAIN+1~, SUMRPT+1*, SUMRPT+8*, ASKDVC+2
RSLT PATDAYS+1~, PATDAYS+2*, PATDAYS+16*, PATDAYS+17
RTOT PATDAYS+1~, PATDAYS+2*
SCUMPD GETPATDY+1~, GETPATDY+6*, GETPATDY+9*, GETPATDY+10, GETPATDY+11
SDT PATDAYS+1~, PATDAYS+3*, PATDAYS+9, GETPATDY~, GETPATDY+2, GETPATDY+3, GETPATDY+5*, GETPATDY+6, GETPATDY+9
SIEN LOC+1~
SPCM CHECK+2*, CHECK+11*, CHECK+12, LOC+17, LOC+35, LOC+44, LOC+48, END+2!
STID LOC+1~, LOC+13*, LOC+14, LOC+30*, LOC+31, LOC+40*, LOC+41
STNM LOC+1~
STP LOC+2*, LOC+9, LOC+16*, LOC+17*, LOC+18, LOC+43*, LOC+44*, END+2!
STRTDT MAIN+1~, DATE+5*, DATE+10, PATDAYS+3
SUB GETPARAM+14*, END+2!
TEST GETPARAM+1~, GETPARAM+19*, GETPARAM+20, GETPARAM+22
TIEN GETPARAM+1~, GETPARAM+17*, GETPARAM+18, GETPARAM+22
TMPDATA CLEAN+3!
TOP GETPARAM+1~
TOTAL CLEAN+2!
TOTAL("PAT" PATDAYS+2*, PATDAYS+19*
TST CHKPAR+1~, CHKPAR+5*, CHKPAR+6, CHECK2+1~, CHECK2+17*, GETPARAM+1~
TSTNM GETPARAM+1~
TSTSTP CHECK2+2*, CHECK2+4, CHECK2+12, CHECK2+18*, ERROR+1, LOC+11*, LOC+28*, LOC+39*, GETPARAM+15*, GETPARAM+16
, END+2!
TTLRSLT PATDAYS+1~, PATDAYS+2*, PATDAYS+16*, PATDAYS+18, PATDAYS+19
U GETPARAM+22, PATDAYS+17, PATDAYS+18, GETPATDY+6, GETPATDY+8
WARD PATDAYS+1~, PATDAYS+6*, PATDAYS+7, PATDAYS+9, PATDAYS+10, PATDAYS+15, GETPATDY~, GETPATDY+3, GETPATDY+4
WLOC PATDAYS+1~
WR LOC+12*, LOC+13, LOC+15, LOC+32*, LOC+33, LOC+40*, LOC+41, LOC+42, END+3!
WRDLOC PATDAYS+5, END+3!
WRDLOC( PATDAYS+6, PATDAYS+10!
X GETDIV+1~, DATE+1~
XX CHECK2+24*, CHECK2+25, CHECK2+26, END+3!
Y CHKPAR~, CHKPAR+2, CHKPAR+3, GETDIV+1~, GETDIV+10, GETDIV+11, LOC+7, LOC+20, LOC+26, LOC+27
, LOC+29, LOC+31, LOC+32, LOC+33, LOC+37, LOC+38, LOC+40, LOC+41, LOC+42, DATE+2!
, DATE+4, DATE+5, DATE+7, DATE+8, DATE+9, SUMRPT+8, GETPARAM+9*, GETPARAM+10
ZTSK ASKDVC+1~, ASKDVC+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