Routine: MMRSIPCP

Information

MMRSIPCP ;MIA/LMT/TCK,LAB - SETUP MDRO TOOLS SOFTWARE PARAMETERS ;May 22, 2019@09:15:23

Package	Total	Call Graph
VA FileMan	7	^DDS ^DIC FILE^DICN (,UPDATE)^DIE ^DIK ($$GET1,EN)^DIQ ^DIR
Methicillin Resistant Staph Aurerus Initiative Reports	1	($$GETDIV,CHECK)^MMRSIPC

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 5

Package	Total	Caller Graph
Methicillin Resistant Staph Aurerus Initiative Reports	5	MMRS ISLT ORD EDIT MMRS MDRO HIST DAYS EDIT MMRS MDRO LAB PARAMETER SETUP MMRS MRSA SITE PARAMETER SETUP MMRS MRSA WARD MAPPING SETUP

Entry Points

Name	Comments	DBIA/ICR reference
DIV	;Add a division and setup business rules
FLESPC	;
DEL	;
ADD	;
LAB	;Entry to setup the Lab Search/Extract Parameters
GETMDRO()	;
WARDMAP	;Entry to setup the Ward Mappings
HISTDAY	;Historical Days Edit
ISLTORD	;Entry to setup the Isolation Orders Parameters

External References

Name	Field # of Occurrence
^DDS	LAB+33, WARDMAP+28, ISLTORD+10
^DIC	DIV+6, FLESPC+7, GETMDRO+6, WARDMAP+12
FILE^DICN	LAB+28, HISTDAY+14
^DIE	DIV+21, DIV+32, DIV+43, DIV+54, WARDMAP+22, HISTDAY+28
UPDATE^DIE	ADD+11
^DIK	DEL+12
$$GET1^DIQ	LAB+9
EN^DIQ	LAB+18
^DIR	DIV+15, DIV+26, DIV+37, DIV+48, FLESPC+17, DEL+7, ADD+4, LAB+10, LAB+19, HISTDAY+21
$$GETDIV^MMRSIPC	LAB+5, WARDMAP+5, HISTDAY+4, ISLTORD+5
CHECK^MMRSIPC	LAB+2, WARDMAP+2, HISTDAY+2, ISLTORD+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: DIV+10
Function Call: WRITE	Prompt: !! Line Location: FLESPC+11
Function Call: WRITE	Prompt: ! Line Location: DEL+2
Function Call: WRITE	Prompt: ! Line Location: LAB+3
Function Call: WRITE	Prompt: ! Line Location: LAB+4
Function Call: WRITE	Prompt: ! Line Location: LAB+6
Function Call: WRITE	Prompt: ! Line Location: LAB+8
Function Call: WRITE	Prompt: ! Line Location: LAB+20
Function Call: WRITE	Prompt: ! Line Location: WARDMAP+3
Function Call: WRITE	Prompt: ! Line Location: WARDMAP+4
Function Call: WRITE	Prompt: ! Line Location: HISTDAY+3
Function Call: WRITE	Prompt: ! Line Location: HISTDAY+4
Function Call: WRITE	Prompt: ! Line Location: HISTDAY+5
Function Call: WRITE	Prompt: ! Line Location: HISTDAY+30
Function Call: WRITE	Prompt: ! Line Location: ISLTORD+3
Function Call: WRITE	Prompt: ! Line Location: ISLTORD+4
Function Call: WRITE	Prompt: ! Line Location: ISLTORD+6
Routine Call	DDS Line Location: LAB+33 WARDMAP+28 ISLTORD+10
Routine Call	DIC Line Location: DIV+6 FLESPC+7 GETMDRO+6 WARDMAP+12
Routine Call	DIE Line Location: DIV+21 DIV+32 DIV+43 DIV+54 WARDMAP+22 HISTDAY+28
Routine Call	DIE Line Location: ADD+11
Routine Call	DIR Line Location: DIV+15 DIV+26 DIV+37 DIV+48 FLESPC+17 DEL+7 ADD+4 LAB+10 LAB+19 HISTDAY+21

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^MMRS(104 - [#104]	Classic Fileman Calls
^MMRS(104.1 - [#104.1]	Classic Fileman Calls
^MMRS(104.2 - [#104.2]	Classic Fileman Calls, GET1^DIQ
^MMRS(104.3 - [#104.3]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^MMRS(104 - [#104]	ADD+7
^MMRS(104.1 - [#104.1]	LAB+21
^MMRS(104.2 - [#104.2]	HISTDAY+6, HISTDAY+7, HISTDAY+20

Label References

Name	Line Occurrences
$$GETMDRO	LAB+7
ADD	FLESPC+24
DEL	DEL+13
FLESPC	ADD+7, ADD+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	DIV+1~, DIV+12, DIV+18, DIV+23, DIV+29, DIV+34, DIV+40, DIV+45, DIV+51, FLESPC+2~ , DEL+10, DEL+14!, LAB+1~, LAB+13~, LAB+16, LAB+21, LAB+22, LAB+23!, LAB+30, WARDMAP+1~ , WARDMAP+18, WARDMAP+23, WARDMAP+27, HISTDAY+1~, HISTDAY+7, HISTDAY+8, HISTDAY+9!, HISTDAY+16, ISLTORD+1~, ISLTORD+7*
DA(1	DEL+3, DEL+9, DEL+11, ADD+3, ADD+7, ADD+9, HISTDAY+12, HISTDAY+17*
DDSFILE	LAB+1~, LAB+31, WARDMAP+1~, WARDMAP+25, ISLTORD+1~, ISLTORD+8*
DDSPAGE	LAB+1~, WARDMAP+1~, ISLTORD+1~
DDSPARAM	LAB+1~, WARDMAP+1~, ISLTORD+1~
DIC	DIV+1~, DIV+2, FLESPC+2~, FLESPC+3, FLESPC+22~, LAB+1~, LAB+13~, LAB+15, LAB+24, GETMDRO+1~ , GETMDRO+3, GETMDRO+6!, WARDMAP+1~, WARDMAP+7, HISTDAY+1~, HISTDAY+10*
DIC("A"	DIV+4, FLESPC+5, GETMDRO+5, WARDMAP+9
DIC("DR"	LAB+27, WARDMAP+10
DIC(0	DIV+3, FLESPC+4, LAB+25, GETMDRO+4, WARDMAP+8, HISTDAY+11
DIDEL	DIV+1~, FLESPC+2~, WARDMAP+1~, WARDMAP+20*, HISTDAY+1~
DIE	DIV+1~, DIV+17, DIV+28, DIV+39, DIV+50, FLESPC+2~, WARDMAP+1~, WARDMAP+17, HISTDAY+1~, HISTDAY+24
DIK	DEL+11*, DEL+14!
DINUM	DIV+1~, FLESPC+2~, LAB+1~, GETMDRO+1~, WARDMAP+1~, HISTDAY+1~
DIQ	LAB+13~
DIR	DIV+1~, FLESPC+2~, DEL+4!, ADD+1!, LAB+1~, LAB+13~, HISTDAY+1~
DIR("?"	DEL+5*
DIR("A"	DIV+13, DIV+24, DIV+35, DIV+46, FLESPC+14, DEL+4, ADD+1, LAB+9, LAB+19, HISTDAY+20
DIR("B"	FLESPC+16, LAB+9
DIR("PRE"	HISTDAY+19*
DIR(0	DIV+14, DIV+25, DIV+36, DIV+47, FLESPC+14, FLESPC+15, DEL+6, ADD+2, LAB+9, LAB+19 , HISTDAY+18*
>> DIROUT	FLESPC+18
DIRUT	FLESPC+18, HISTDAY+1~
DLAYGO	DIV+1~, DIV+5, DIV+7!, FLESPC+2~, FLESPC+6, FLESPC+8!, FLESPC+22~, GETMDRO+1~, WARDMAP+1~, WARDMAP+11* , WARDMAP+13!
DO	LAB+1~, HISTDAY+1~
DR	DIV+1~, DIV+20, DIV+31, DIV+42, DIV+53, FLESPC+2~, LAB+1~, LAB+13~, LAB+17, LAB+32 , WARDMAP+1~, WARDMAP+19, WARDMAP+26, HISTDAY+1~, HISTDAY+25, HISTDAY+26, ISLTORD+1~, ISLTORD+9*
DTOUT	DIV+8, DIV+16, DIV+27, DIV+38, DIV+49, FLESPC+9, FLESPC+22~, ADD+5, LAB+11, GETMDRO+1~ , GETMDRO+7, WARDMAP+1~, WARDMAP+14, WARDMAP+23, HISTDAY+1~, HISTDAY+22
DUOUT	DIV+8, DIV+16, DIV+27, DIV+38, DIV+49, FLESPC+9, FLESPC+22~, ADD+5, LAB+11, GETMDRO+1~ , GETMDRO+7, WARDMAP+1~, WARDMAP+14, HISTDAY+1~, HISTDAY+22
EXTFLG	DIV+8, DIV+16, DIV+27, DIV+38, DIV+49, FLESPC+9, FLESPC+22~, FLESPC+23, DEL+1, ADD+5* , ADD+12, LAB+1~, LAB+3, LAB+5, LAB+7, LAB+11, LAB+22, LAB+29, GETMDRO+7, WARDMAP+1~ , WARDMAP+3, WARDMAP+5, WARDMAP+6, WARDMAP+14, WARDMAP+23, WARDMAP+24, HISTDAY+1~, HISTDAY+3, HISTDAY+4, HISTDAY+6 , HISTDAY+8, HISTDAY+15, HISTDAY+22, HISTDAY+29, ISLTORD+1~, ISLTORD+3, ISLTORD+5
>> IEN	ADD+9*, ADD+10
IOF	LAB+14, WARDMAP+29
>> LRFDA(61	ADD+10*
MDRO	LAB+1~, LAB+7, LAB+9, LAB+16, LAB+21, LAB+26, GETMDRO+1~, GETMDRO+2, GETMDRO+8, GETMDRO+9 , HISTDAY+1~, HISTDAY+6, HISTDAY+7, HISTDAY+10, HISTDAY+12, HISTDAY+17, HISTDAY+20, HISTDAY+24
MMRSDA	WARDMAP+1~, WARDMAP+15*, WARDMAP+18, WARDMAP+27
MMRSDIV	DIV+1~, DIV+9, DIV+12, DIV+18, DIV+23, DIV+29, DIV+34, DIV+40, DIV+45, DIV+51 , FLESPC+2~, FLESPC+10, DEL+3, DEL+9, ADD+3, LAB+1~, LAB+5, LAB+21, LAB+27, WARDMAP+1~ , WARDMAP+5, WARDMAP+10, HISTDAY+1~, HISTDAY+4, HISTDAY+7, HISTDAY+13, ISLTORD+1~, ISLTORD+5, ISLTORD+7
MMRSX	HISTDAY+1~, HISTDAY+25, HISTDAY+26, HISTDAY+27!
NUMDAY	HISTDAY+1~
SIEN	FLESPC+13~
STID	FLESPC+13~
STNM	FLESPC+13~
>> STOP	FLESPC+21*
U	DIV+19, DIV+30, DIV+41, DIV+52, WARDMAP+16, HISTDAY+20
>> VAL	ADD+6*, ADD+10
X	DIV+1~, FLESPC+2~, FLESPC+18, ADD+6, ADD+7, LAB+1~, LAB+26, GETMDRO+1~, WARDMAP+1~, HISTDAY+1~ , HISTDAY+13*
Y	DIV+1~, DIV+8, DIV+9, DIV+19, DIV+20, DIV+21, DIV+30, DIV+31, DIV+32, DIV+41* , DIV+42, DIV+43, DIV+52*, DIV+53, DIV+54, FLESPC+2~, FLESPC+9, FLESPC+10, FLESPC+20, FLESPC+24 , DEL+8, DEL+10, DEL+13, ADD+5, ADD+6, ADD+8, LAB+1~, LAB+12, LAB+29, LAB+30 , GETMDRO+1~, GETMDRO+7, GETMDRO+8, WARDMAP+1~, WARDMAP+14, WARDMAP+15, WARDMAP+16, HISTDAY+1~, HISTDAY+15, HISTDAY+16 , HISTDAY+23, HISTDAY+25, HISTDAY+26, HISTDAY+29

Customize PDF page

Package: Methicillin Resistant Staph Aurerus Initiative Reports