Routine: AMER2

Package	Total	Call Graph
Emergency Room	5	OUT^AMER UTL^AMER0 CHECK^AMER1A ($$TCK,$$TVAL)^AMER2A INJ^AMERBEDD
VA Fileman	4	EN^DDIOL ^DIC $$GET1^DIQ ^DIR
IHS Emergency Dept Dashboard	1	INJURY^BEDDINJ

Entry Points

Name	Comments	DBIA/ICR reference
REM(AMERO)
PQ
PICK	;
QD6
QD7	; ER CONSULTANT TYPE
TCK(Z,T,X,A)	; TIME CHECK WHERE Z=TIME,T=COMPARISON TIME,X=1:AFTER,X=0:BEFORE AND A=NARRATIVE
QD5	; WORK RELATED
QD2	; INJURY
QD1	; NAME
PREV
QD8	; ER CONSULTANT TIME

External References

Name	Field # of Occurrence
OUT^AMER	QD2+27, QD5+3, QD6+4, PQ+10
UTL^AMER0	QD1+3
CHECK^AMER1A	PICK+1
$$TCK^AMER2A	QD8+7
$$TVAL^AMER2A	QD8+8
INJ^AMERBEDD	QD2+32, QD5+9
INJURY^BEDDINJ	QD2+4
EN^DDIOL	QD7+14, QD7+47, QD7+48
^DIC	QD7+10, QD7+41, PQ+10
$$GET1^DIQ	QD2+4
^DIR	QD2+26, QD5+2, QD6+3, QD7+53, QD8+6, REM+3, PQ+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?5,"*** PROCESS PATIENT WHO LEFT BEFORE VISIT WAS COMPLETED **",!!,7 Line Location: QD1+1
Function Call: WRITE	Prompt: !!,*7,"Sorry, this time must be ",$S(X:"AFTER",1:"BEFORE")," the time of ",A,": ",Y,!,"Please try again...",! Line Location: TCK+6
Function Call: WRITE	Prompt: !,"You have already selected =>",! Line Location: PREV+0
Function Call: WRITE	Prompt: ?3,$P(^(%),U,2),! Line Location: PREV+1
Function Call: WRITE	Prompt: " ",$P($G(^DPT(%,0)),U) Line Location: PQ+8
Routine Call	DIC Line Location: QD7+10 QD7+41 PQ+10
Routine Call	DIR Line Location: QD2+26 QD5+2 QD6+3 QD7+53 QD8+6 REM+3 PQ+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^VA(200 - [#200]	Classic Fileman Calls
^AMERADM - [#9009081]	GET1^DIQ
^AMER(2.9 - [#9009082.9]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMERADM("B"	PICK+1
^DD("DD"	QD8+2, TCK+3
^DPT - [#2]	PQ+8
^TMP("AMER TEMP"	QD1+2!, PQ+8
^TMP("AMER"	QD2+14, QD2+15, QD2+16, QD2+17, QD2+18, QD2+19, QD2+20, QD2+21, QD2+22, QD2+23 , QD2+25, QD2+35, QD2+37!, QD5+1, QD6+2, QD6+5!, QD6+8, QD7+4, QD7+9, QD7+13 , QD7+14!, QD7+19, QD7+20, QD7+22, QD7+23, QD7+24!, QD7+26!, QD7+35, QD7+46!, QD7+50* , QD7+56, QD8+2, QD8+7, QD8+8, QD8+10, QD8+11, PREV+1

Label References

Name	Line Occurrences
$$REM	QD7+25
PICK	QD1+2
PQ	PQ+13
QD8	QD7+31, QD8+7, QD8+8

Naked Globals

Name	Field # of Occurrence
^(	PREV+1, PQ+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	TCK+1~, PREV+1, PQ+8, PQ+11!
A	TCK~, TCK+2, TCK+6
AMERDEL	QD7+2~, QD7+61!
>> AMERDFN	QD1+3, PQ+14*
>> AMERDNA	QD1+1, QD1+4
>> AMEREFLG	QD2+34, QD2+35, QD5+3, QD6+6
>> AMERFIN	QD2+34, QD2+36
AMERI	PQ+10*, PQ+11!
AMERO	QD7+2~, QD7+3, QD7+4, QD7+12, QD7+13, QD7+14, QD7+21, QD7+22, QD7+23, QD7+26 , QD7+56*, QD7+61!, REM~
>> AMEROPT	QD7+8, QD7+55
AMERPCC	QD2+3~, QD2+4*
>> AMERQUIT	QD1+2, QD7+30, PICK+1, PICK+2, PQ+5*, PQ+12
AMERREM	QD7+2~, QD7+3, QD7+6, QD7+25*, QD7+26, QD7+29, QD7+61!
>> AMERRUN	QD1+4, QD1+5, QD2+34, QD2+35, QD2+36, QD2+38, QD6+5, QD6+6, QD7+1, QD7+18 , QD7+30*
AMERSNO	QD7+2~, QD7+3, QD7+4, QD7+11, QD7+19, QD7+20, QD7+23, QD7+24, QD7+35, QD7+46 , QD7+50, QD7+55, QD7+56, QD7+61!, QD8+2, QD8+10, QD8+11
AMERSTOP	QD7+2~, QD7+3, QD7+5, QD7+15, QD7+17, QD7+18, QD7+33, QD7+45, QD7+55, QD7+58 , QD7+61!
B	PQ*, PQ+2, PQ+7, PQ+11!
D	PQ+11!
>> DFN	QD2+4
DIC	QD7+2~, QD7+7, QD7+37, QD7+41!, QD7+61!, PQ+9*, PQ+11!
DIC("?"	QD7+38*
DIC("A"	QD7+8, QD7+36
DIC("B"	QD7+9, QD7+34!, QD7+35
DIC("S"	QD7+7, QD7+40, PQ+9*
DIC(0	QD7+7, QD7+37, PQ+9*
DIR	QD2+26!, QD5+2!, QD6+1~, QD6+3!, QD7+2~, QD7+61!, QD8+1~, QD8+6!, PQ+4!
DIR("?"	QD8+5*
DIR("A"	QD2+26, QD5+2, QD6+3, QD7+51, QD8+4, REM+1, PQ+2*
DIR("B"	QD2+25, QD5+1, QD6+2, QD7+52, QD8+2, REM+2, PQ+2*
DIR(0	QD2+26, QD5+2, QD6+3, QD7+52, QD8+4, REM+2, PQ+2*
>> DIROUT	QD7+17*
DTOUT	QD7+33!, QD7+44, QD7+45!, PQ+3, PQ+4!
DUOUT	QD7+33!, QD7+44, QD7+45!, PQ+3, PQ+4!
EXEC	QD2+5~, QD2+8*
>> I	QD2+37, PQ, PQ+10
INJ	QD2+3~, QD2+5~, QD2+30, QD2+32, QD5+6~, QD5+7, QD5+9, QD5+10!
INJ("ICIEN"	QD2+17
INJ("INDAT"	QD2+16
INJ("INJEQ"	QD2+19
INJ("INLOC"	QD2+15
INJ("INSCO"	QD2+20
INJ("INSET"	QD2+18
INJ("INSPO"	QD2+21
INJ("ISINJ"	QD2+11
INJ("MVLOC"	QD2+22
INJ("WKREL"	QD2+23
T	TCK~, TCK+4, TCK+5
U	QD2+34, QD5+3, QD7+9, QD7+23, QD7+30, PREV+1, PQ+3, PQ+5, PQ+8
X	QD1+3, QD5+3, QD6+4, QD7+11, QD7+17, QD7+18, QD7+30, TCK~, TCK+4, TCK+5 , TCK+6, PQ+3, PQ+5, PQ+6, PQ+7, PQ+8*, PQ+11!
Y	QD1+3, QD2+30, QD2+31~, QD2+34, QD2+35, QD2+36, QD5+7, QD5+8~, QD6+5, QD6+6 , QD6+7, QD7+7, QD7+19, QD7+20, QD7+23, QD7+44, QD7+50, QD7+54, QD8+1~, QD8+2* , QD8+7!, QD8+8!, QD8+10, QD8+11, REM+4, TCK+1~, TCK+3*, TCK+6, PQ+3, PQ+4! , PQ+13, PQ+14
Z	TCK~, TCK+2, TCK+3, TCK+4, TCK+5

Marked Items

Customize PDF page

Package: Emergency Room

Routine: AMER2

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items