Routine: AMHGRAP

Information

AMHGRAP ; IHS/CMI/MAW - AMHG Intake Form Data - frmIntake 9/16/2009 10:57:49 AM ;

Source Information

Source file <AMHGRAP.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
IHS Changes To Scheduling	3	$$DIV^BSDU ($$APPTYP,$$CI,$$CO,$$OI)^BSDU2 WLDATA^BSDWLV
Kernel	2	$$FMTE^XLFDT $$REPEAT^XLFSTR
IHS Patient	1	KILL^AUPNPAT
VA Fileman	1	$$GET1^DIQ

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Mental Health Social Services	1	AMHGR

Entry Points

Name	Comments	DBIA/ICR reference
OI(PAT,CLINIC,DATE)	; -- returns other info display line
RESVIEW()	; -- returns 1 if restrict viewing of who made appt turned on
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
INIT(DFN,AMHBD,AMHED)	;EP -- init variables and list array ; variables set are DFN, AMHBD, AMHED ; AMHLN keeps track of line #s to update VALMCNT which is returned ; AMHNUM used to link display line with entry
SP(N)	; -- SUBRTN to pad N number of spaces
EXIT	;EP -- exit code
STATUS(PAT,DATE,NODE)	; returns appt status
SET(LINE,DATA,NUM,AMHLN)	; -- set ^tmp with display line
GETVST(PAT,DATE)	; returns visit ien for appt date and patient

External References

Name	Field # of Occurrence
KILL^AUPNPAT	EXIT+4
$$DIV^BSDU	RESVIEW+1
$$APPTYP^BSDU2	STATUS+2
$$CI^BSDU2	STATUS+6
$$CO^BSDU2	STATUS+5
$$OI^BSDU2	OI+1
WLDATA^BSDWLV	INIT+24
$$GET1^DIQ	INIT+14, RESVIEW+1
$$FMTE^XLFDT	INIT+13
$$REPEAT^XLFSTR	INIT+31, PAD+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^SC - [#44]	GET1^DIQ
^BSDPAR - [#9009020.2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	INIT+11, INIT+12, INIT+19, INIT+20, GETVST+3
^SCE - [#409.68]	GETVST+5
^TMP("AMHDPA"	INIT+5!, SET+2, SET+3

Label References

Name	Line Occurrences
$$OI	INIT+18
$$PAD	INIT+13, INIT+14, SP+1
$$SP	INIT+8, INIT+20, INIT+27, INIT+29, INIT+35, OI+1
$$STATUS	INIT+15
SET	INIT+9, INIT+17, INIT+18, INIT+20, INIT+21, INIT+25, INIT+27, INIT+29, INIT+30, INIT+31 , INIT+35, INIT+36

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMHBD	INIT~, INIT+10, EXIT+1!
AMHED	INIT~, INIT+10, EXIT+1!
AMHLN	INIT+4~, INIT+9, INIT+17, INIT+18, INIT+20, INIT+21, INIT+25, INIT+27, INIT+29, INIT+30 , INIT+31, INIT+35, INIT+36, INIT+39, SET~, SET+1*, SET+2, SET+3, EXIT+1!
AMHM	INIT+4~
AMHNUM	INIT+4~, INIT+16, INIT+17, INIT+18, INIT+20, INIT+21, INIT+25, INIT+27, INIT+29, INIT+30 , INIT+31, INIT+35, INIT+36, EXIT+1!
AMHU	INIT+4~
AMHWLR	INIT+24!
AMHWLR(	INIT+33, INIT+34, INIT+35
AMHWLR(0	INIT+27, INIT+30
APDT	INIT+4~, INIT+10, INIT+11, INIT+12, INIT+13, INIT+15, INIT+17, INIT+18, INIT+19, INIT+20
CLINIC	OI~, OI+1
DATA	SET~, SET+3, PAD~, PAD+1
DATE	INIT+32~, INIT+33*, INIT+34, INIT+35, STATUS~, STATUS+2, STATUS+5, STATUS+6, OI~, OI+1 , GETVST~, GETVST+2, GETVST+3
DFN	INIT~, INIT+11, INIT+12, INIT+15, INIT+17, INIT+18, INIT+19, INIT+20, INIT+24
END	INIT+4~, INIT+10*, INIT+11
>> HDR	INIT+8*, INIT+9
LENGTH	PAD~, PAD+1
LINE	INIT+4~, INIT+13, INIT+14, INIT+15, INIT+16, INIT+17, INIT+32~, INIT+34*, INIT+35, SET~ , SET+2
N	SP~, SP+1
NODE	INIT+4~, INIT+12*, INIT+14, INIT+15, INIT+17, INIT+18, INIT+19, STATUS~, STATUS+3, STATUS+4 , STATUS+5, STATUS+6
NUM	SET~, SET+3
ORX	EXIT+2!
PAT	STATUS~, STATUS+2, STATUS+5, STATUS+6, OI~, OI+1, GETVST~, GETVST+2, GETVST+3, GETVST+6
SDC	EXIT+2!
SDIFN	EXIT+2!
SDP	EXIT+2!
SDPP	EXIT+2!
SDS	EXIT+2!
SDSTAT	EXIT+2!
TYP	STATUS+1~, STATUS+2*, STATUS+3, STATUS+4, STATUS+5, STATUS+6, STATUS+7
U	INIT+17, INIT+19, INIT+35, STATUS+3, STATUS+4, GETVST+4, GETVST+6, GETVST+7
VALMBCK	EXIT+3!
VALMCNT	INIT+39*, EXIT+3!
VALMHDR	EXIT+3!
VALMY	EXIT+2!
X	INIT+4~, INIT+17, GETVST+1~, GETVST+3, GETVST+4, GETVST+5, GETVST+6, GETVST+7

Customize PDF page

Package: Mental Health Social Services

Routine: AMHGRAP

Call Graph Total: 7

Caller Graph Total: 1