Routine: AMHDLOG

Information

AMHDLOG ; IHS/CMI/LAB - driver for primary care provider report ;

Source file <AMHDLOG.m>

Package	Total	Call Graph
VA Fileman	4	^%DT ^DIC EN1^DIP ^DIR
IHS Patient	1	KILL^AUPNPAT
Kernel	1	$$FMTE^XLFDT
Mental Health Social Services	1	^AMHRLKUP

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This report will display a list of who edited a BH record.",!! Line Location: AMHDLOG+4
Function Call: WRITE	Prompt: !!!,$C(7),$C(7),"SITE NOT SET IN YOUR USER PROFILE! Please notify your Site Manager!" Line Location: AMHDLOG+5
Function Call: WRITE	Prompt: !!,"No Date entered!" Line Location: AMHDLOG+8
Function Call: WRITE	Prompt: ! Line Location: GETDATE+1
Function Call: WRITE	Prompt: " <Future dates not allowed>",$C(7),$C(7) Line Location: GETDATE+6
Function Call: WRITE	Prompt: !!,"no patient selected." Line Location: GETPAT+3
Function Call: WRITE	Prompt: !!?10,"***** PATIENT'S DATE OF DEATH IS ",$$FMTE^XLFDT(AUPNDOD),!! Line Location: GETPAT+5
Function Call: WRITE	Prompt: @IOF Line Location: DONE+1
Routine Call	DIC Line Location: GETPAT+2 GETLOC+2
Routine Call	DIR Line Location: GETDATE+3 DONE+1

Name	Field # of Occurrence
>> %DT	GETDATE+5*
AMHDATE	AMHDLOG+8, GETDATE+2, GETDATE+8, EOJ+2!
AMHLOC	GETLOC+1, GETLOC+4, EOJ+2!
AMHODAT	GETDATE+7!
AMHPAT	GETPAT+1, GETPAT+4, EOJ+2!
AMHR	AMHDLOG+12, DIP+2, EOJ+2!
AMHRIEN	EOJ+2!
>> AUPNDOD	GETPAT+5
BY	DIP+1*, EOJ+1!
DA	GETLOC+2!
DHD	EOJ+1!
DHIT	DIP+3!
DIC	GETPAT+2!, GETLOC+2!, DIP+1*, EOJ+1!
DIC("A"	GETPAT+2, GETLOC+2
DIC(0	GETPAT+2, GETLOC+2
DIOBEG	DIP+3!
DIOEND	DIP+3!
DIP	EOJ+1!
DIR	GETDATE+3!, DONE+1!, EOJ+1!
DIR("A"	GETDATE+3, DONE+1
DIR(0	GETDATE+3, DONE+1
DIRUT	GETDATE+3, GETDATE+4, DONE+1, EOJ+1!
DT	GETDATE+3, GETDATE+6
DUOUT	GETDATE+3, DONE+1, EOJ+1!
DUZ(2	AMHDLOG+5
FLDS	DIP+1*, EOJ+1!
FR	DIP+2*, EOJ+1!
IOF	AMHDLOG+3, DONE+1
>> L	DIP+1*
TO	DIP+2*, EOJ+1!
X	GETDATE+6!, EOJ+1!
Y	GETDATE+5, GETDATE+6, GETDATE+8, GETPAT+3, GETPAT+4, GETLOC+3, GETLOC+4, EOJ+1!