Routine: AMEREDAU

Package	Total	Call Graph
VA Fileman	7	DD^%DT NOW^%DTC EN^DDIOL ^DIC FILE^DICN ^DIE ^DIR
Emergency Room	2	$$CAT^AMER0 $$DX^AMERPOV
DRG Grouper	1	$$ICDDX^ICDCODE

Package	Total	Caller Graph
Emergency Room	10	AMEREDDX AMEREDIT AMEREDTA AMEREDTD AMEREDTE AMEREDTI AMEREDTT AMEREDTU AMERPCC AMERTIME

Entry Points

Name	Comments	DBIA/ICR reference
DIEREC(AMERAIEN,AMERSTRG)	; EP from multiple AMERED* routines
CREATAUD(ERVSTIEN,USERID)
DIC(AMERSTMP)	; ; GIVEN AN AUDIT TIMESTAMP CREATE AN ENTRY IN THE ER AUDIT FILE AND RETURN THE IEN
EDDISPL(AMERVAL,AMERTYPE)	; EP from multiple AMERED* routines ; Provides a user friendly format for audit trail interface
DIE(DA,DR)	; GIVEN AN ENTRY NUMBER AND A DR STRING, EDIT THE ER AUDIT FILE
DIE1
EDREASON()	;
MULTAUDT(AMEREDTS,AMERAIEN)
EDAUDIT(FIELD,OLDVAL,NEWVAL,FLDNAME)	; EP From all AMERED* routines ; Provides audit trail interface ; INPUT: ; FIELD : the Field number of ER VISIT file that is being changed ; OLDVAL : the original value of the field before editing ; NEWVAL : the value that the field is being changed to ; FLDNAME : User friendly field name for ease in creating readable audit trail reports

Name	Field # of Occurrence
DD^%DT	EDAUDIT+12, EDDISPL+26
NOW^%DTC	EDAUDIT+11, CREATAUD+3
$$CAT^AMER0	EDDISPL+35, EDDISPL+42, EDDISPL+50, EDDISPL+61, EDDISPL+73, EDDISPL+94, EDDISPL+102, EDDISPL+117, EDDISPL+125
$$DX^AMERPOV	EDDISPL+69
EN^DDIOL	EDAUDIT+14, EDAUDIT+15, EDAUDIT+16, EDAUDIT+17, EDAUDIT+18
^DIC	EDDISPL+38, EDDISPL+45, EDDISPL+53, EDDISPL+64, EDDISPL+76, EDDISPL+84, EDDISPL+97, EDDISPL+105, EDDISPL+112, EDDISPL+120 , EDDISPL+128, DIEREC+8
FILE^DICN	DIC+8
^DIE	DIEREC+17, DIE1+1
^DIR	EDAUDIT+25, EDREASON+12
$$ICDDX^ICDCODE	EDDISPL+89, EDDISPL+90

FileNo	Call Tags
^AMERAUDT - [#9009080.1]	Classic Fileman Calls
^AMER(2.9 - [#9009082.9]	Classic Fileman Calls
^AMER(3 - [#9009083]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AMERAUDT - [#9009080.1]	DIEREC+16, DIEREC+18, DIE1, DIE1+2
^DPT - [#2]	EDDISPL+32
^VA(200 - [#200]	EDDISPL+57

Name	Line Occurrences
$$DIC	CREATAUD+4
$$EDREASON	EDAUDIT+20
DIE	CREATAUD+7
DIEREC	MULTAUDT+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EDAUDIT+8~, EDAUDIT+12, EDAUDIT+22!, CREATAUD+1~, CREATAUD+4, CREATAUD+9!, DIE+1~, DIE1+3!
%H	CREATAUD+9!
%I	CREATAUD+9!
AMERAIEN	DIEREC~, DIEREC+6, DIEREC+9, MULTAUDT~, MULTAUDT+7
AMERAUDT	DIC+2~, DIC+9, DIC+10, DIC+12
AMERAUID	CREATAUD+2~, CREATAUD+4*, CREATAUD+5, CREATAUD+7, CREATAUD+10
AMERCOMM	EDAUDIT+9~, EDAUDIT+10, EDAUDIT+26, EDAUDIT+27*, EDAUDIT+28, EDAUDIT+29
>> AMERDA	EDDISPL+69
AMERDATE	EDAUDIT+9~, EDAUDIT+13*, EDAUDIT+14
AMERDR	CREATAUD+2~, CREATAUD+6*, CREATAUD+7, CREATAUD+9!
AMERDT	EDAUDIT+9~, EDAUDIT+12*, EDAUDIT+29
AMEREDAU	EDAUDIT+9~, EDAUDIT+21, EDAUDIT+28, EDAUDIT+29*, EDAUDIT+30
AMEREDTN	MULTAUDT+6~, MULTAUDT+7*
AMEREDTS	MULTAUDT~, MULTAUDT+7
AMERNVAL	EDDISPL+23~, EDDISPL+24, EDDISPL+26, EDDISPL+29, EDDISPL+32, EDDISPL+39, EDDISPL+46, EDDISPL+54, EDDISPL+57, EDDISPL+65* , EDDISPL+69, EDDISPL+77, EDDISPL+85, EDDISPL+88, EDDISPL+89, EDDISPL+90, EDDISPL+98, EDDISPL+106, EDDISPL+113, EDDISPL+121 , EDDISPL+130*, EDDISPL+132
AMERREAS	EDAUDIT+9~, EDAUDIT+10, EDAUDIT+19, EDAUDIT+20*, EDAUDIT+21, EDAUDIT+28, EDAUDIT+29
AMERSTMP	DIC~, DIC+3, DIC+4
AMERSTRG	DIEREC~, DIEREC+7, DIEREC+10, DIEREC+11, DIEREC+12, DIEREC+13, DIEREC+14, DIEREC+15, MULTAUDT+6~, MULTAUDT+7*
AMERTEMP	EDDISPL+23~
AMERTIME	EDAUDIT+9~, EDAUDIT+13*, EDAUDIT+15
AMERTYPE	EDDISPL~, EDDISPL+25, EDDISPL+28, EDDISPL+31, EDDISPL+34, EDDISPL+41, EDDISPL+48, EDDISPL+56, EDDISPL+59, EDDISPL+67 , EDDISPL+71, EDDISPL+79, EDDISPL+87, EDDISPL+92, EDDISPL+100, EDDISPL+108, EDDISPL+115, EDDISPL+123
AMERVAL	EDDISPL~, EDDISPL+22, EDDISPL+26, EDDISPL+29, EDDISPL+32, EDDISPL+37, EDDISPL+44, EDDISPL+52, EDDISPL+57, EDDISPL+63 , EDDISPL+69, EDDISPL+75, EDDISPL+83, EDDISPL+88, EDDISPL+89, EDDISPL+90, EDDISPL+96, EDDISPL+104, EDDISPL+111, EDDISPL+119 , EDDISPL+127
D	DIE+2~
D0	DIE+2~
DA	DIEREC+9*, DIE~
DA(1	DIEREC+6, DIEREC+9, DIEREC+19!
DD	DIC+7!
DI	DIE+2~
DIADD	DIC+6*, DIC+11!
DIC	EDAUDIT+9~, EDDISPL+23~, EDDISPL+35, EDDISPL+38!, EDDISPL+42, EDDISPL+45!, EDDISPL+49, EDDISPL+53!, EDDISPL+60, EDDISPL+64! , EDDISPL+72, EDDISPL+76!, EDDISPL+80, EDDISPL+84!, EDDISPL+93, EDDISPL+97!, EDDISPL+101, EDDISPL+105!, EDDISPL+109, EDDISPL+112! , EDDISPL+116, EDDISPL+120!, EDDISPL+124, EDDISPL+128!, DIEREC+5~, DIEREC+6, DIEREC+9, DIEREC+19!, DIC+2~, DIC+5~ , DIC+6*, DIC+11!, DIE+2~
DIC("S"	EDDISPL+35, EDDISPL+42, EDDISPL+50, EDDISPL+61, EDDISPL+73, EDDISPL+81, EDDISPL+94, EDDISPL+102, EDDISPL+117, EDDISPL+125
DIC(0	EDDISPL+36, EDDISPL+43, EDDISPL+51, EDDISPL+62, EDDISPL+74, EDDISPL+82, EDDISPL+95, EDDISPL+103, EDDISPL+110, EDDISPL+118 , EDDISPL+126, DIEREC+6, DIC+6*
DICR	DIE+2~
DIE	EDAUDIT+9~, DIEREC+5~, DIEREC+9, DIEREC+19!, DIE+1~, DIE+2~, DIE+3, DIE1+3!
DIG	DIE+2~
DIH	DIE+2~
DIR	EDAUDIT+9~, EDAUDIT+25!, EDREASON+7~, EDREASON+12!
DIR("?"	EDAUDIT+24, EDREASON+10
DIR("A"	EDAUDIT+23, EDREASON+10
DIR("B"	EDAUDIT+22!, EDREASON+11*
DIR(0	EDAUDIT+23, EDREASON+8, EDREASON+9*
DIU	DIE+2~
DIV	DIE+2~
DIW	DIE+2~
DO	DIC+7!
DQ	DIE+2~
DR	DIEREC+5~, DIEREC+10, DIEREC+11, DIEREC+12, DIEREC+13, DIEREC+14, DIEREC+15, DIE~
ERVSTIEN	CREATAUD~, CREATAUD+6
FIELD	EDAUDIT~, EDAUDIT+19, EDAUDIT+29
FLDNAME	EDAUDIT~, EDAUDIT+16, EDAUDIT+29
NEWVAL	EDAUDIT~, EDAUDIT+18, EDAUDIT+29
OLDVAL	EDAUDIT~, EDAUDIT+17, EDAUDIT+29
REASON	EDREASON+7~, EDREASON+13, EDREASON+14, EDREASON+15
U	EDDISPL+32, EDDISPL+39, EDDISPL+46, EDDISPL+54, EDDISPL+57, EDDISPL+65, EDDISPL+77, EDDISPL+85, EDDISPL+89, EDDISPL+90 , EDDISPL+98, EDDISPL+106, EDDISPL+113, EDDISPL+121, EDDISPL+130, MULTAUDT+7
USERID	CREATAUD~, CREATAUD+6
X	EDAUDIT+8~, EDAUDIT+22!, EDDISPL+23~, EDDISPL+37, EDDISPL+44, EDDISPL+52, EDDISPL+63, EDDISPL+75, EDDISPL+83, EDDISPL+96* , EDDISPL+104, EDDISPL+111, EDDISPL+119, EDDISPL+127, DIEREC+7, CREATAUD+1~, CREATAUD+9!, DIC+4, DIE+1~, DIE1+3!
Y	EDAUDIT+8~, EDAUDIT+12, EDAUDIT+13, EDAUDIT+22!, EDAUDIT+26, EDDISPL+23~, EDDISPL+26, EDDISPL+39, EDDISPL+46, EDDISPL+54 , EDDISPL+65, EDDISPL+77, EDDISPL+85, EDDISPL+98, EDDISPL+106, EDDISPL+113, EDDISPL+121, EDDISPL+130, EDREASON+13, EDREASON+14 , DIEREC+8, DIEREC+9, CREATAUD+1~, DIC+2~, DIC+5~, DIC+9, DIC+10, DIE+1~, DIE1+3!

Customize PDF page

Package: Emergency Room

Routine: AMEREDAU

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 10

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: