Routine: AMHLESF

Package	Total	Call Graph
VA Fileman	7	EN^DDIOL ^DDS ^DIC (FILE,YN)^DICN ^DIE ^DIK ^DIR
IHS VA Utilities	5	$$VAL^XBDIQ1 ^XBFMK $$EXTSET^XBFUNC VIEWR^XBLM EN^XBVK
Mental Health Social Services	5	(GETPAT,PAUSE)^AMHLEA CONTACT^AMHLEP1 EP^AMHLESF1 ($$ALLOWP,NALLOWP)^AMHUTIL EP^AMHVD
Registration	4	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1 EN^VALM2
Kernel	2	($$FMDIFF,$$FMTE,$$NOW)^XLFDT DISP^XQORM1
IHS Patient	1	(,$$COMMRES,$$DOB,$$HRN,$$TRIBE,KILL)^AUPNPAT

Package	Total	Caller Graph
Mental Health Social Services	5	AMH40P6 AMHGD AMHLEA AMHLEP2 AMHSFR

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP
HELP	; -- help code
DEFAULT	;
HS	;EP
UPDATE(V,P,E)	;EP - called from xref
BV	;
PAUSE	;EP
DEL	;EP - called from protocol
HDR	; -- header code
CTR(X,Y)	;EP - Center X in a field Y wide.
INIT	;
EOJ	;
INCOMPSF(AMHSF)	;EP - check record for completeness
CHECK	; check record for completeness
GETDATE	;EP
EN	;EP -- main entry point
END	;
UPI(P,D)	;
METHOD(VAL)	;
GETTYPE	;
PS(VAL)	;
GETPAT	;
START	;
AV	;EP add visit
ADDSF(AMHPAT)	;EP
EDIT	;EP
PROV	;
GATHER	;
EXPND	; -- expand code
ADDDS	;
EXIT	; -- exit code

External References

Name	Field # of Occurrence
GETPAT^AMHLEA	AV+2
PAUSE^AMHLEA	AV+3, AV+8
CONTACT^AMHLEP1	AV+6
EP^AMHLESF1	DISP+7
$$ALLOWP^AMHUTIL	GETPAT+4
NALLOWP^AMHUTIL	GETPAT+4
EP^AMHVD	BV+2
^AUPNPAT	HS+2
$$COMMRES^AUPNPAT	HDR+3
$$DOB^AUPNPAT	HDR+2
$$HRN^AUPNPAT	HDR+2
$$TRIBE^AUPNPAT	HDR+3
KILL^AUPNPAT	EOJ+7
EN^DDIOL	METHOD+13, METHOD+22, PS+13, PS+22
^DDS	ADDDS+2
^DIC	GETPAT+2, DEFAULT+2, PROV+3
FILE^DICN	GETDATE+16
YN^DICN	GETPAT+7
^DIE	EDIT+7, CHECK+5, CHECK+30
^DIK	DEL+11, CHECK+31
^DIR	DEL+8, GETDATE+2, GETDATE+8, CHECK+32, PAUSE+1
EN^VALM	EN+2
TERM^VALM0	EXIT+1
CLEAR^VALM1	EOJ+5
FULL^VALM1	EDIT+6, DISP+6, DEL+7, HS+1, ADDSF+1, AV+1
EN^VALM2	EDIT+1, DISP+1, DEL+2
$$VAL^XBDIQ1	HDR+2, GATHER+8, GATHER+10, GETDATE+7, CHECK+2, CHECK+3, CHECK+4, CHECK+5, CHECK+29, CHECK+30 , INCOMPSF+3, INCOMPSF+5, INCOMPSF+7, INCOMPSF+9
^XBFMK	PROV+1
$$EXTSET^XBFUNC	GATHER+11
VIEWR^XBLM	HS+7
EN^XBVK	START+1, HS+4, HS+8, EOJ+1
$$FMDIFF^XLFDT	UPDATE+11
$$FMTE^XLFDT	GETPAT+6
$$NOW^XLFDT	EDIT+7, GETDATE+14
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$CTR("Update Suicide Forms",80) Line Location: START+3
Function Call: WRITE	Prompt: !!?10,"***** PATIENT'S DATE OF DEATH IS ",$$FMTE^XLFDT(AUPNDOD),!! Line Location: GETPAT+6
Function Call: WRITE	Prompt: !,"No records selected." Line Location: EDIT+2
Function Call: WRITE	Prompt: !,"No record selected." Line Location: EDIT+3
Function Call: WRITE	Prompt: !,"Not a valid SUICIDE RECORD." Line Location: EDIT+5
Function Call: WRITE	Prompt: !,"No records selected." Line Location: DISP+2
Function Call: WRITE	Prompt: !,"No record selected." Line Location: DISP+3
Function Call: WRITE	Prompt: !,"Not a valid SUICIDE RECORD." Line Location: DISP+5
Function Call: WRITE	Prompt: !!,"You do not have the security access to delete a Suicide Form.",!,"Please see your supervisor or program manager.",! Line Location: DEL+1
Function Call: WRITE	Prompt: !,"No records selected." Line Location: DEL+3
Function Call: WRITE	Prompt: !,"No record selected." Line Location: DEL+4
Function Call: WRITE	Prompt: !,"Not a valid SUICIDE RECORD." Line Location: DEL+6
Function Call: WRITE	Prompt: !,"Error in Site Parameter File!",$C(7),$C(7) Line Location: GETTYPE+3
Function Call: WRITE	Prompt: !!,"PCC MENTAL HEALTH HEALTH SUMMARY TYPE IS MISSING!! NOTIFY YOUR SUPERVISOR OR SITE MANAGER.",!! Line Location: DEFAULT+3
Function Call: WRITE	Prompt: !! Line Location: PROV+3
Function Call: WRITE	Prompt: !,"No Provider Selected." Line Location: PROV+4
Function Call: WRITE	Prompt: !! Line Location: GETDATE+1
Function Call: WRITE	Prompt: !!,"This patient already has a suicide form on file for this Date of Act." Line Location: GETDATE+6
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"Error creating Suicide form!! Deleting form.",! Line Location: GETDATE+17
Function Call: WRITE	Prompt: !!,"ERROR IN SCREENMAN FORM!! *NOTIFY PROGRAMMER*" Line Location: ADDDS+3
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,$P(^DD(9002011.65,AMHF,0),U)," is a required data element." Line Location: CHECK+2
Function Call: WRITE	Prompt: !,$P(^DD(9002011.65,AMHF,0),U)," is a required data element." Line Location: CHECK+3
Function Call: WRITE	Prompt: !,"Location of Act is OTHER, OTHER description is required." Line Location: CHECK+4
Function Call: WRITE	Prompt: !,"One of the Methods is OTHER. OTHER description is Required." Line Location: CHECK+8
Function Call: WRITE	Prompt: !,"Method is Overdose, Drug type is Other, Other description is required." Line Location: CHECK+13
Function Call: WRITE	Prompt: !!,"You must enter a METHOD." Line Location: CHECK+15
Function Call: WRITE	Prompt: !!,"You must enter a value for SUBSTANCE Use. None or Unknown are valid values." Line Location: CHECK+17
Function Call: WRITE	Prompt: !,"Substance Involved is Alcohol/Drugs, Drug is Other, Other Description is Required." Line Location: CHECK+21
Function Call: WRITE	Prompt: !,"Contributing Factor is OTHER, OTHER description is required." Line Location: CHECK+25
Function Call: WRITE	Prompt: !!,"You must enter a CONTRIBUTING FACTOR. Unknown is a valid value." Line Location: CHECK+28
Function Call: WRITE	Prompt: !,"Location of Act is OTHER, OTHER description is required." Line Location: CHECK+29
Function Call: WRITE	Prompt: !!,"One or more required data elements are missing.",!! Line Location: CHECK+31
Function Call: WRITE	Prompt: !,"Deleting form..." Line Location: CHECK+31
Function Call: WRITE	Prompt: !,"NO Patient selected!",! Line Location: AV+3
Routine Call	VALM Line Location: EN+2
Routine Call	DIE Line Location: EDIT+7 CHECK+5 CHECK+30
Routine Call	DDS Line Location: ADDDS+2
Routine Call	DIC Line Location: GETPAT+2 DEFAULT+2 PROV+3
Routine Call	DIR Line Location: DEL+8 GETDATE+2 GETDATE+8 CHECK+32 PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls
^AUPNPAT - [#9000001]	Classic Fileman Calls
^APCHSCTL - [#9001015]	Classic Fileman Calls
^AMHPSUIC - [#9002011.65]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPSUIC - [#9002011.65]	GATHER+6, GATHER+11, EDIT+5, DISP+5, DEL+6, GETDATE+5, CHECK+6, CHECK+7, CHECK+8, CHECK+9! , CHECK+10, CHECK+11, CHECK+12, CHECK+13, CHECK+16, CHECK+19, CHECK+20, CHECK+21, CHECK+22, CHECK+23 , CHECK+24, CHECK+25, CHECK+29, CHECK+30, METHOD+7, METHOD+8, METHOD+17, PS+7, PS+8, PS+17 , UPDATE+4, UPDATE+5, UPDATE+8, UPDATE+9, UPDATE+13, UPDATE+15, UPDATE+16, UPDATE+17, UPDATE+18, UPDATE+19* , INCOMPSF+7, INCOMPSF+11, INCOMPSF+12, INCOMPSF+13!, INCOMPSF+16, INCOMPSF+17, INCOMPSF+20, INCOMPSF+21, INCOMPSF+22, INCOMPSF+23 , INCOMPSF+24, INCOMPSF+27, INCOMPSF+31, INCOMPSF+32, INCOMPSF+33, INCOMPSF+35, INCOMPSF+36, INCOMPSF+39, INCOMPSF+40, INCOMPSF+41
^AMHPSUIC("AA"	GATHER+4
^AMHPSUIC("AC"	GATHER+3, GETDATE+5
^AMHSITE - [#9002013]	GETTYPE+1, GETTYPE+2
^AMHTSCF - [#9002014.9]	CHECK+25, PS+6, PS+8, PS+17, INCOMPSF+41
^AMHTSDRG - [#9002014.7]	CHECK+13, INCOMPSF+24
^AMHTSSU - [#9002014.71]	CHECK+21, INCOMPSF+33
^APCHSCTL - [#9001015]	GETTYPE+3
^AUTTLOC - [#9999999.06]	UPI+2
^AUTTSITE(1	UPI+2*, UPI+4
^DD(9002011.65	CHECK+2, CHECK+3
^DPT - [#2]	HDR+1, GATHER+3, HS+6
^VA(200 - [#200]	PROV+3
^XUSEC("AMHZ DELETE RECORD"	DEL+1

Label References

Name	Line Occurrences
$$CTR	START+3
$$INCOMPSF	GATHER+13
$$UPI	GETDATE+13
ADDDS	EDIT+8, GETDATE+19, CHECK+31
CHECK	ADDDS+4
DEFAULT	GETTYPE+1, GETTYPE+2
EN	GETPAT+8
EOJ	GETPAT+3, GETPAT+7, END+1
EXIT	EDIT+2, EDIT+3, EDIT+5, EDIT+9, DISP+2, DISP+3, DISP+5, DISP+8, DEL+1, DEL+3 , DEL+4, DEL+6, DEL+9, DEL+10, DEL+12, BV+3, HS+9, PROV+4, GETDATE+3, GETDATE+12 , GETDATE+17, GETDATE+20, ADDDS+3, CHECK+31, AV+3, AV+9
GATHER	INIT+2, EXIT+3
GETPAT	GETPAT+4
GETTYPE	HS+3
HDR	EXIT+5
PAUSE	EDIT+5, DISP+5, DEL+1, DEL+6, GETDATE+12, GETDATE+17, ADDDS+3, CHECK+31
PROV	GETDATE+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	GETPAT+7, HS+6, HS+7, HS+8!, EOJ+4!
A	METHOD+10~!, METHOD+13, METHOD+14!, METHOD+19~!, METHOD+22, METHOD+23!, PS+10~!, PS+13, PS+14!, PS+19~! , PS+22, PS+23!
A(1	METHOD+11, METHOD+20, PS+11, PS+20
A(2	METHOD+12, METHOD+21, PS+12, PS+21
AMCHDAYS	HS+8!
AMCHDOB	HS+8!
AMHC	CHECK+1, CHECK+2, CHECK+3, CHECK+4, CHECK+8, CHECK+13, CHECK+15, CHECK+17, CHECK+21, CHECK+25 , CHECK+28, CHECK+29, CHECK+31, INCOMPSF+1~, INCOMPSF+2*
AMHCASE	EN+3!
AMHCDATE	EN+3!
AMHD	EN+3!
AMHDA	METHOD+5~, METHOD+8, METHOD+17, PS+4~, PS+8, PS+17
>> AMHDATE	GETDATE+2, GETDATE+4, GETDATE+5, GETDATE+13, GETDATE+14
AMHDP	EN+3!, PROV+2*
>> AMHDPEEP	AV+5*, AV+7
AMHF	EN+3!, CHECK+2, CHECK+3, INCOMPSF+1~, INCOMPSF+3, INCOMPSF+5
AMHG	METHOD+5~, METHOD+6, METHOD+8, METHOD+9, METHOD+16, METHOD+17, METHOD+18, PS+4~, PS+5, PS+8 , PS+9, PS+16, PS+17, PS+18
AMHIISFE	EN+3!, ADDDS+1*, METHOD+3, PS+2
AMHLEAP	EN+1~
AMHLESF	EN+3!, GATHER+1!
AMHLESF(	GATHER+7, GATHER+9, GATHER+10, GATHER+12, GATHER+13*
AMHLESF("IDX"	GATHER+3, GATHER+7, GATHER+9, GATHER+10, GATHER+12, GATHER+13, EDIT+4, DISP+4, DEL+5
AMHLESF(1	GATHER+3*
AMHLINE	EN+3!, INIT+3, GATHER+2, GATHER+7, GATHER+9, GATHER+10, GATHER+12, GATHER+13, EXIT+4
AMHP	END+2!
AMHPAT	GETPAT+1, GETPAT+5, GETPAT+7*, BV+1~, HS+7~, ADDSF~, GETDATE+13, GETDATE+14, AV+3, AV+4 , AV+6
>> AMHPROV	PROV+5, GETDATE+14, AV+5, AV+7
AMHQUIT	END+2!, ADDDS+3*
AMHRCNT	EN+3!, GATHER+2, GATHER+3, GATHER+5*, GATHER+6, GATHER+7, GATHER+9, GATHER+10, GATHER+12, GATHER+13
AMHRDEL	EDIT+5!, DISP+5!, DEL+6!
>> AMHSD	GATHER+4*
AMHSF	EN+3!, GATHER+4, GATHER+6, GATHER+7, GATHER+8, GATHER+9, GATHER+10, GATHER+11, GATHER+12, GATHER+13 , EDIT+4, EDIT+5!, EDIT+7, DISP+4, DISP+5!, DISP+7, DEL+5, DEL+6!, DEL+11, GETDATE+18* , ADDDS+2, CHECK+2, CHECK+3, CHECK+4, CHECK+5, CHECK+6, CHECK+7, CHECK+8, CHECK+9, CHECK+10 , CHECK+11, CHECK+12, CHECK+13, CHECK+16, CHECK+19, CHECK+20, CHECK+21, CHECK+22, CHECK+23, CHECK+24 , CHECK+25, CHECK+29, CHECK+30, CHECK+31, METHOD+4, METHOD+7, METHOD+8, METHOD+17, PS+3, PS+7 , PS+8, PS+17, INCOMPSF~, INCOMPSF+3, INCOMPSF+5, INCOMPSF+7, INCOMPSF+9, INCOMPSF+11, INCOMPSF+12, INCOMPSF+13 , INCOMPSF+16, INCOMPSF+17, INCOMPSF+20, INCOMPSF+21, INCOMPSF+22, INCOMPSF+23, INCOMPSF+24, INCOMPSF+27, INCOMPSF+31, INCOMPSF+32 , INCOMPSF+33, INCOMPSF+35, INCOMPSF+36, INCOMPSF+39, INCOMPSF+40, INCOMPSF+41
AMHW	END+2!
AMHX	EN+3!, METHOD+5~, PS+4~, PS+6*, PS+9, PS+18
>> AMHY	METHOD+8, METHOD+17, PS+8, PS+17
>> APCHSPAT	HS+5*, HS+6
>> APCHSTYP	HS+4, GETTYPE+2, GETTYPE+3, DEFAULT+1, DEFAULT+4
>> AUPNDOD	GETPAT+6
BALMON	EOJ+6!
C	UPDATE+6~, UPDATE+9, UPDATE+11, UPDATE+13, UPDATE+14, UPDATE+17*, UPDATE+19
D	CHECK+12, CHECK+13, CHECK+20, CHECK+21, CHECK+24, CHECK+25, UPI~, UPI+4, INCOMPSF+23, INCOMPSF+24 , INCOMPSF+31, INCOMPSF+32, INCOMPSF+33, INCOMPSF+40*, INCOMPSF+41
D0	GETDATE+13!, GETDATE+16!
DA	GETPAT+2!, EDIT+7, DEL+8!, DEL+11, DEFAULT+2!, PROV+3!, GETDATE+8!, GETDATE+13!, ADDDS+2, CHECK+5! , CHECK+30!, CHECK+31, CHECK+32!, EOJ+4!
DD	GETDATE+13!
DDH	METHOD+1~
DDS	EOJ+4!
DDSFILE	ADDDS+2*, EOJ+3!
DFN	GETPAT+1, GETPAT+4, GETPAT+5, GETPAT+7, HDR+1, HDR+2, HDR+3, GATHER+3, GATHER+4, BV+2 , HS+2, HS+5, HS+7~, GETDATE+5, EOJ+2!, AV+4*
DIADD	GETPAT+2!, PROV+3!, GETDATE+13*, GETDATE+16!
DIC	GETPAT+2!, DEFAULT+2!, PROV+3!, GETDATE+13!, GETDATE+16!, EOJ+4!
DIC("A"	PROV+3*
DIC("B"	PROV+3*
DIC("DR"	GETDATE+14, GETDATE+15
DIC(0	GETPAT+2, DEFAULT+2, PROV+3, GETDATE+13
DIE	EDIT+7, GETDATE+16!, CHECK+5!, CHECK+30*!
>> DIK	DEL+11, CHECK+31
DIMSG	ADDDS+3!
DINUM	GETDATE+13!
DIPGM	EOJ+3!
DIR	DEL+8!, GETDATE+2!, GETDATE+8!, CHECK+32!, PAUSE+1!
DIR("A"	DEL+8, GETDATE+2, GETDATE+8, CHECK+32, PAUSE+1*
DIR("B"	DEL+8, GETDATE+8, CHECK+32*
DIR(0	DEL+8, GETDATE+2, GETDATE+8, CHECK+32, PAUSE+1*
>> DIRUT	DEL+9, GETDATE+2, GETDATE+3, GETDATE+9, CHECK+33, PAUSE+1
DLAYGO	GETPAT+2!, PROV+3!, GETDATE+13*, GETDATE+16!
DO	GETDATE+13!
DR	GETPAT+2!, EDIT+7, PROV+3!, GETDATE+13!, GETDATE+16!, ADDDS+2, CHECK+5!, CHECK+30!, EOJ+4!
DT	EDIT+7, GETDATE+2, GETDATE+14
>> DUOUT	GETDATE+2, PAUSE+1
DUZ	GETPAT+4, EDIT+7, DEL+1, PROV+3, GETDATE+14
DUZ(2	HDR+2, GETTYPE+1, GETTYPE+2
E	UPDATE~, UPDATE+3, UPDATE+4, UPDATE+5, UPDATE+8, UPDATE+9, UPDATE+13, UPDATE+15, UPDATE+16, UPDATE+17 , UPDATE+18, UPDATE+19
G	GETDATE+5, GETDATE+11, CHECK+6, CHECK+7, CHECK+15, CHECK+16, CHECK+17, CHECK+18, CHECK+22, CHECK+23* , CHECK+28, UPDATE+6~, UPDATE+8, UPDATE+11, UPDATE+12, INCOMPSF+1~, INCOMPSF+3, INCOMPSF+4, INCOMPSF+5, INCOMPSF+6 , INCOMPSF+7, INCOMPSF+8, INCOMPSF+9, INCOMPSF+10, INCOMPSF+11, INCOMPSF+12, INCOMPSF+15, INCOMPSF+16, INCOMPSF+17, INCOMPSF+19 , INCOMPSF+20, INCOMPSF+24, INCOMPSF+26, INCOMPSF+27, INCOMPSF+28, INCOMPSF+29, INCOMPSF+30, INCOMPSF+31, INCOMPSF+33, INCOMPSF+34 , INCOMPSF+35, INCOMPSF+36, INCOMPSF+38, INCOMPSF+39, INCOMPSF+41, INCOMPSF+42
I	EXIT+6!
IOF	START+2, ADDSF+2
>> IOINORM	HDR+1, GATHER+13
IOM	CTR+1
>> IORVON	HDR+1, GATHER+13
N	UPDATE+6~, UPDATE+9, UPDATE+10, UPDATE+14, UPDATE+15, UPDATE+16, UPDATE+18
P	UPI~, UPI+1, UPI+4, UPDATE~, UPDATE+2, UPDATE+10, UPDATE+15
>> Q	GETDATE+5*
R	EDIT+3!, EDIT+4, EDIT+5!, DISP+3!, DISP+4, DISP+5!, DEL+4*!, DEL+5, DEL+6!
R1	EDIT+5!, DISP+5!, DEL+6!
U	HDR+1, GATHER+3, GATHER+6, GATHER+11, HS+6, GETTYPE+2, PROV+3, GETDATE+5, CHECK+2, CHECK+3 , CHECK+7, CHECK+8, CHECK+9, CHECK+10, CHECK+12, CHECK+13, CHECK+16, CHECK+20, CHECK+21, CHECK+23 , CHECK+24, CHECK+25, CHECK+29, CHECK+30, UPI+2, UPI+4, METHOD+8, METHOD+17, PS+6, PS+8 , PS+17, UPDATE+9, UPDATE+18, UPDATE+19, INCOMPSF+7, INCOMPSF+12, INCOMPSF+13, INCOMPSF+17, INCOMPSF+21, INCOMPSF+23 , INCOMPSF+24, INCOMPSF+27, INCOMPSF+32, INCOMPSF+33, INCOMPSF+36, INCOMPSF+40, INCOMPSF+41
V	UPDATE~, UPDATE+1, UPDATE+11, UPDATE+15, UPDATE+16
VAL	METHOD~, METHOD+2, METHOD+9, METHOD+18, PS~, PS+1, PS+6
VALM	EOJ+6!
VALMAR	EOJ+6!
VALMBCK	EXIT+2*, EOJ+6!
VALMBG	EOJ+6!
VALMCAP	EOJ+6!
VALMCC	EOJ+6!
VALMCNT	INIT+3, EXIT+4, EOJ+6!
VALMCOFF	EOJ+6!
VALMCON	EOJ+6!
VALMEVL	EOJ+6!
VALMHDR	EOJ+6!
VALMHDR(1	HDR+1*
VALMHDR(2	HDR+2*
VALMHDR(3	HDR+3*
VALMIOXY	EOJ+6!
VALMKEY	EOJ+6!
VALMLFT	EOJ+6!
VALMLST	EOJ+6!
VALMMENU	EOJ+6!
>> VALMSG	INIT+1*
VALMSGR	EOJ+6!
VALMUP	EOJ+6!
VALMVAR	EOJ+6!
VALMWD	EOJ+5, EOJ+6!
VALMY	EDIT+2, EDIT+3!, DISP+2, DISP+3!, DEL+3, DEL+4!
VALMY(0	EDIT+3, DISP+3, DEL+4
X	CTR~, CTR+1, GATHER+6, GATHER+7, GATHER+8, GATHER+9, GATHER+10, GATHER+12, GATHER+13, EDIT+4 , DISP+4, DEL+5, DEFAULT+2, GETDATE+5, GETDATE+7, GETDATE+13, GETDATE+16!, HELP+1, CHECK+6, CHECK+7 , CHECK+8, CHECK+9, CHECK+10, CHECK+11, CHECK+12, CHECK+13, CHECK+19, CHECK+20, CHECK+21, CHECK+22* , CHECK+23, CHECK+24, CHECK+25, EXIT+6!, EOJ+4!, INCOMPSF+1~, INCOMPSF+11, INCOMPSF+12, INCOMPSF+13, INCOMPSF+16 , INCOMPSF+17, INCOMPSF+20, INCOMPSF+21, INCOMPSF+22, INCOMPSF+23, INCOMPSF+24, INCOMPSF+31, INCOMPSF+32, INCOMPSF+33, INCOMPSF+35* , INCOMPSF+36, INCOMPSF+39*, INCOMPSF+40, INCOMPSF+41
XQORNOD	EDIT+3!, DISP+3!, DEL+4!
XQORNOD(0	EDIT+1, DISP+1, DEL+2
Y	GETPAT+3, GETPAT+5, CTR~, CTR+1, GATHER+11, GATHER+12, EDIT+4, DISP+4, DEL+5, DEL+10 , HS+2, DEFAULT+3, DEFAULT+4, PROV+4, PROV+5, GETDATE+4, GETDATE+5, GETDATE+6, GETDATE+9, GETDATE+10 , GETDATE+12, GETDATE+17, GETDATE+18, CHECK+11, CHECK+12, CHECK+13, CHECK+31, CHECK+33, EXIT+6!, EOJ+3! , EOJ+4!, INCOMPSF+22*, INCOMPSF+23, INCOMPSF+24
Z	GATHER+11, CHECK+6, CHECK+22, EXIT+6!, UPDATE+6~, UPDATE+8, UPDATE+9, UPDATE+13, UPDATE+17, INCOMPSF+1~ , INCOMPSF+11, INCOMPSF+16, INCOMPSF+20, INCOMPSF+35, INCOMPSF+39*

Customize PDF page

Package: Mental Health Social Services

Routine: AMHLESF

Information

Source Information

Call Graph

Call Graph Total: 24

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: