Routine: AMHLENS

Package	Total	Call Graph
Mental Health Social Services	8	EN^AMHEKL (PCCLINK,RECCHECK)^AMHLE2 OTHER^AMHLEA EN^AMHLEDEL (,CALLDIE)^AMHLEIN REGULAR^AMHLEP2 ^AMHPEDIT $$PPINT^AMHUTIL
VA Fileman	5	^DDS ^DIC (FILE,YN)^DICN ^DIE ^DIR
IHS VA Utilities	1	^XBFMK
Kernel	1	$$FMTE^XLFDT

Package

Total

Call Graph

EN^AMHEKL (PCCLINK,RECCHECK)^AMHLE2 OTHER^AMHLEA EN^AMHLEDEL (,CALLDIE)^AMHLEIN REGULAR^AMHLEP2 ^AMHPEDIT $$PPINT^AMHUTIL

VA Fileman

^DDS ^DIC (FILE,YN)^DICN ^DIE ^DIR

IHS VA Utilities

^XBFMK

Kernel

$$FMTE^XLFDT

Package	Total	Caller Graph
Mental Health Social Services	2	AMHLEA AMHLENS1

Package

Total

Caller Graph

Mental Health Social Services

AMHLEA AMHLENS1

Name	Comments	DBIA/ICR reference
GENPOV	;EPgenerate pov of 8
ADDR	;EP
GETPROV	;get providers
EOJ	;EOJ CLEANUP
GETTYPE	;EP
GETPAT	;EP
TEXT	;
START	; Write Header
PAUSE	;EP
DEL	;EP
GETPAT1	;
GETDATE	;EP - GET DATE OF ENCOUNTER

External References

Name	Field # of Occurrence
EN^AMHEKL	START+1
PCCLINK^AMHLE2	ADDR+21
RECCHECK^AMHLE2	ADDR+17
OTHER^AMHLEA	ADDR+20
EN^AMHLEDEL	DEL+3
^AMHLEIN	START+6
CALLDIE^AMHLEIN	ADDR+11
REGULAR^AMHLEP2	ADDR+19
^AMHPEDIT	GETPAT1+5
$$PPINT^AMHUTIL	ADDR+12
^DDS	ADDR+13
^DIC	GETPAT1+2
FILE^DICN	ADDR+6, GENPOV+8, GETPROV+5
YN^DICN	GETPAT1+7
^DIE	ADDR+10
^DIR	GETTYPE+5, GETDATE+3, GENPOV+3, GETPROV+2, PAUSE+1
^XBFMK	GENPOV+10, GETPAT+1, EOJ+3
$$FMTE^XLFDT	GETPAT1+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(X)\2,X Line Location: START+3
Function Call: WRITE	Prompt: !! Line Location: START+5
Function Call: WRITE	Prompt: !,"Please enter the appropriate set of defaults to be used in Data entry.",!,"This applies to default clinic, location, community and program.",! Line Location: GETTYPE+4
Function Call: WRITE	Prompt: ! Line Location: GETDATE+2
Function Call: WRITE	Prompt: !!,"Date not entered." Line Location: ADDR+1
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"Behavioral Health Record is NOT complete!! Deleting Record.",! Line Location: ADDR+7
Function Call: WRITE	Prompt: !,"No PRIMARY PROVIDER entered!! - Required element" Line Location: ADDR+12
Function Call: WRITE	Prompt: !!,"ERROR IN SCREENMAN FORM!! *NOTIFY PROGRAMMER*" Line Location: ADDR+14
Function Call: WRITE	Prompt: !!,"Incomplete record!! Deleting record!!" Line Location: ADDR+17
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"PLEASE EDIT THIS RECORD!!",!! Line Location: ADDR+18
Function Call: WRITE	Prompt: !!,"ERROR - NO PROBLEM 8" Line Location: GENPOV+1
Function Call: WRITE	Prompt: !!,"ERROR - NO POV CODE" Line Location: GENPOV+4
Function Call: WRITE	Prompt: !,"ERROR - NO POV CODE" Line Location: GENPOV+7
Function Call: WRITE	Prompt: !!,"Creating POV Failed!",$C(7),$C(7) Line Location: GENPOV+9
Function Call: WRITE	Prompt: !! Line Location: GETPROV+1
Function Call: WRITE	Prompt: !!,"Creating Primary Provider entry failed!!!",$C(7),$C(7) Line Location: GETPROV+6
Function Call: WRITE	Prompt: !!?10,"***** PATIENT'S DATE OF DEATH IS ",$$FMTE^XLFDT(AUPNDOD),!! Line Location: GETPAT1+6
Function Call: WRITE	Prompt: !,"Record deleted." Line Location: DEL+4
Routine Call	DIE Line Location: ADDR+10
Routine Call	DDS Line Location: ADDR+13
Routine Call	DIC Line Location: GETPAT1+2
Routine Call	DIR Line Location: GETTYPE+5 GETDATE+3 GENPOV+3 GETPROV+2 PAUSE+1

FileNo	Call Tags
^AUPNPAT - [#9000001]	Classic Fileman Calls
^AMHREC - [#9002011]	Classic Fileman Calls
^AMHRPRO - [#9002011.01]	Classic Fileman Calls
^AMHRPROV - [#9002011.02]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	GENPOV+8
^AMHPROB("B"	GENPOV+1, GENPOV+6
^AMHREC - [#9002011]	DEL+1
^VA(200 - [#200]	GETPROV+2

Name	Line Occurrences
DEL	ADDR+11, ADDR+12, ADDR+17
EOJ	GETTYPE+6, ADDR+22
GENPOV	ADDR+16
GETPAT	ADDR+11
GETPAT1	GETPAT1+5
GETPROV	ADDR+12
PAUSE	ADDR+7, DEL+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	GETPAT1+7*
>> AMHACTN	ADDR+2, ADDR+4
>> AMHADPTV	GETTYPE+1*, ADDR+19, ADDR+20, ADDR+21
AMHC	GETPAT+2, GETPAT1+3!, GETPAT1+5, GETPAT1+7!, GETPAT1+8!
>> AMHDATE	GETDATE+1, GETDATE+3, GETDATE+5*, ADDR+1, ADDR+5
>> AMHERROR	ADDR+18
>> AMHOKAY	ADDR+17*
>> AMHPAT	ADDR+11, GENPOV+8, GETPROV+5, GETPAT1+1, GETPAT1+4, GETPAT1+5, GETPAT1+7*
>> AMHPATCE	GETTYPE+2
>> AMHPTYPE	GETTYPE+3, GETTYPE+7
>> AMHQUIT	ADDR+2, ADDR+4, ADDR+14*
>> AMHR	ADDR+9*, ADDR+10, ADDR+11, ADDR+12, ADDR+13, GENPOV+8, GETPROV+5, DEL+1, DEL+2
>> AMHRDEL	DEL+2*
AMHVDLT	DEL+1*, EOJ+1!
AMHVTYPE	ADDR+5, EOJ+1!
>> APCDOVRR	ADDR+3*
>> AUPNDOD	GETPAT1+6
D0	ADDR+6!, GENPOV+8!, GETPROV+5!
DA	GETTYPE+5!, ADDR+10!, ADDR+11, ADDR+13*, GENPOV+3!, GETPROV+2!, GETPROV+5!, GETPAT1+2!
DD	GENPOV+8!, GETPROV+5!
>> DDSFILE	ADDR+13*
DG	GETPROV+5!
DH	GETPROV+5!
DI	GETPROV+5!
DIADD	ADDR+5, ADDR+6!, GENPOV+8, GENPOV+10!, GETPROV+5*!, GETPAT1+2!
DIC	ADDR+5!, ADDR+6!, GENPOV+8, GETPROV+2!, GETPROV+5!, GETPAT1+2!
DIC("DR"	ADDR+5, GENPOV+8, GETPROV+5*
DIC(0	ADDR+5, GENPOV+8, GETPROV+5, GETPAT1+2
DIE	ADDR+6!, ADDR+10!, ADDR+11, GETPROV+5!
DIMSG	ADDR+14!
DIR	GETTYPE+5!, GETDATE+3!, GENPOV+3!, GETPROV+2!, PAUSE+1!
DIR("A"	GETTYPE+5, GETDATE+3, GENPOV+3, GETPROV+2, PAUSE+1*
DIR("B"	GENPOV+3, GETPROV+2
DIR(0	GETTYPE+5, GETDATE+3, GENPOV+2, GETPROV+2, PAUSE+1*
DIRUT	GETTYPE+6, GETDATE+3, GETDATE+4, GENPOV+4, GETPROV+2!, GETPROV+3, PAUSE+1*
DIU	GETPROV+5!
DIW	GETPROV+5!
DLAYGO	ADDR+5, ADDR+6!, GENPOV+8, GENPOV+10!, GETPROV+5*!, GETPAT1+2!
DO	GENPOV+8!, GETPROV+5!
DQ	GETPROV+5!
DR	ADDR+6!, ADDR+10!, ADDR+11, ADDR+13*, GETPAT1+2!
DR(2	ADDR+10*
DT	GETDATE+3
DTOUT	GETPROV+2!
DUOUT	GETDATE+3, GETPROV+2!, PAUSE+1
DUZ	ADDR+5, GETPROV+2
IOF	START+2, GETTYPE+2
J	START+3*, START+4!
U	GENPOV+8, GETPROV+2, DEL+1
X	START+3, START+4!, ADDR+5, ADDR+6!, GENPOV+1, GENPOV+5, GENPOV+6, GENPOV+7, GENPOV+8, GETPROV+2! , GETPROV+5, GETPAT1+5*
Y	GETTYPE+7, GETDATE+5, ADDR+7, ADDR+9, GENPOV+5, GENPOV+9, GETPROV+2!, GETPROV+4, GETPROV+5, GETPROV+6 , GETPAT1+3, GETPAT1+4

Customize PDF page

Package: Mental Health Social Services

Routine: AMHLENS

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items