Routine: AMHRNSM

Package	Total	Call Graph
IHS VA Utilities	4	^XBDBQUE $$VAL^XBDIQ1 $$EXTSET^XBFUNC EN^XBVK
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
Mental Health Social Services	3	$$CTR^AMHLEIN ($$ALLOWP,$$ALLOWVI,$$PPINT,$$PPNAME,DBHUSR,XTMP)^AMHUTIL ($$DEMO,$$PRIMPOV,DEMOCHK)^AMHUTIL1
IHS Patient	1	($$HRN,KILL)^AUPNPAT
Kernel	1	$$FMTE^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
SORT	;
SET	;
ZIS	;
HEADER	;EP
BROWSE	;
PROV	;
PRINT	;EP - called from xbdbque
PRINT1	;
CTR(X,Y)	;EP - Center X in a field Y wide.
START	;EP - called from option
PROC	;EP - called from xbdbque
GETDATES	;
XIT	;
ED	;get ending date
PROG	;
HEADER1	;
DEMO	;

External References

Name	Field # of Occurrence
DD^%DT	ED+1, ED+4
C^%DTC	ED+4, PROC+4
$$CTR^AMHLEIN	START+3, HEADER1+8, HEADER1+9
$$ALLOWP^AMHUTIL	PROC+11
$$ALLOWVI^AMHUTIL	PROC+9
$$PPINT^AMHUTIL	PROC+8
$$PPNAME^AMHUTIL	PRINT1+8
DBHUSR^AMHUTIL	START+7
XTMP^AMHUTIL	PROC+3
$$DEMO^AMHUTIL1	PROC+12
$$PRIMPOV^AMHUTIL1	PRINT1+9, PRINT1+10
DEMOCHK^AMHUTIL1	DEMO+1
$$HRN^AUPNPAT	PRINT1+8
KILL^AUPNPAT	XIT+2
^DIC	PROV+5
^DIR	BD+1, ED+1, PROG+2, PROG+5, PROV+2, SORT+2, ZIS+1, HEADER+2
^XBDBQUE	ZIS+5, BROWSE+2
$$VAL^XBDIQ1	PRINT1+9
$$EXTSET^XBFUNC	HEADER1+8
EN^XBVK	XIT+1
$$FMTE^XLFDT	PRINT1+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$CTR^AMHLEIN(X,80) Line Location: START+3
Function Call: WRITE	Prompt: !!,"This option will print a list of visits with POVs related to No Shows" Line Location: START+4
Function Call: WRITE	Prompt: !,"and Cancellations for multiple patients. Date range, program and" Line Location: START+5
Function Call: WRITE	Prompt: !,"provider can be specified by the user.",!! Line Location: START+6
Function Call: WRITE	Prompt: !!,"Please enter the range of dates for the No Show visits" Line Location: GETDATES+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: !! Line Location: ZIS+4
Function Call: WRITE	Prompt: !!,"There were no NO SHOW visits during the time period.",! Line Location: PRINT1+2
Function Call: WRITE	Prompt: $E($P(^AMHPROB(X,0),U,2),1,12) Line Location: PRINT1+10
Function Call: WRITE	Prompt: !!,"Total # of Patients: ",AMHPTOT," Total # of No Show Visits: ",AMHTOT,! Line Location: PRINT1+14
Function Call: WRITE	Prompt: ! Line Location: HEADER+2
Function Call: WRITE	Prompt: !?13,"******** CONFIDENTIAL PATIENT INFORMATION ********" Line Location: HEADER1+2
Function Call: WRITE	Prompt: !?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),?($S(80=132:120,1:72)),"Page ",AMHPG,! Line Location: HEADER1+3
Function Call: WRITE	Prompt: !?(80-$L(AMHTEXT)/2),AMHTEXT,! Line Location: HEADER1+5
Function Call: WRITE	Prompt: ?(80-$L(AMHTEXT)/2),AMHTEXT,! Line Location: HEADER1+7
Function Call: WRITE	Prompt: $$CTR^AMHLEIN(X,80),! Line Location: HEADER1+8
Function Call: WRITE	Prompt: $$CTR^AMHLEIN(X,80),! Line Location: HEADER1+9
Function Call: WRITE	Prompt: !,"PATIENT NAME",?20,"HRN",?27,"DATE/TIME",?46,"PROVIDER",?59,"PG",?63,"POV" Line Location: HEADER1+10
Function Call: WRITE	Prompt: !,$TR($J(" ",80)," ","-") Line Location: HEADER1+11
Routine Call	DIC Line Location: PROV+5
Routine Call	DIR Line Location: BD+1 ED+1 PROG+2 PROG+5 PROV+2 SORT+2 ZIS+1 HEADER+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	PROC+15, PROC+16, PROC+17, PROC+18, PROC+19, PROC+20, PRINT1+10
^AMHREC - [#9002011]	PROC+7, PROC+10, PROC+21, PRINT1+7, PRINT1+8
^AMHREC("B"	PROC+5, PROC+6
^AMHRPRO - [#9002011.01]	PROC+15, PROC+16, PROC+17, PROC+18, PROC+19, PROC+20
^AMHRPRO("AD"	PROC+14
^DIC(4 - [#4]	HEADER1+3
^DPT - [#2]	SET+1, PRINT1+8
^VA(200 - [#200]	HEADER1+9
^XTMP("AMHRNSM"	SET+1, SET+2, SET+4, PRINT+2!, PRINT1+2, PRINT1+4, PRINT1+5

Label References

Name	Line Occurrences
BD	ED+2
BROWSE	ZIS+3
GETDATES	PROG+3
HEADER	PRINT1+2, PRINT1+3, PRINT1+6, PRINT1+13
HEADER1	HEADER+1
PRINT1	PRINT+1
PROG	PROG+6, PROG+7, PROV+3
PROV	PROG+4, PROV+7, SORT+3
SET	PROC+15, PROC+16, PROC+17, PROC+18, PROC+19, PROC+20, PROC+21
SORT	PROV+4, DEMO+2
XIT	START+1, BD+2, ZIS+2, ZIS+3, ZIS+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AMHBD	BD+3*, ED+1, ED+4, PROC+4
>> AMHBDD	ED+4*, HEADER1+6
>> AMHBT	PROC+2*, SET+1, SET+2, SET+4, PRINT+2, PRINT1+2, PRINT1+4, PRINT1+5
>> AMHDEMO	DEMO+1, DEMO+2, PROC+12
>> AMHDNKA	PROC+14, PROC+15, PROC+16, PROC+17, PROC+18, PROC+19, PROC+20*
>> AMHED	ED+3*, ED+4, PROC+5
>> AMHEDD	ED+4*, HEADER1+6
>> AMHJOB	PROC+2*, SET+1, SET+2, SET+4, PRINT+2, PRINT1+2, PRINT1+4, PRINT1+5
>> AMHODAT	PROC+5*, PROC+6, SET+1
>> AMHPG	PRINT1+1, HEADER+1, HEADER1+1, HEADER1+3
>> AMHPROG	PROG+1, PROG+8, PROC+7, HEADER1+8
>> AMHPROV	PROV+1, PROV+8, PROC+8, HEADER1+9
>> AMHPTOT	PROC+2, SET+3, PRINT1+14
AMHQ	PRINT1+1!, PRINT1+4, PRINT1+5, PRINT1+6, PRINT1+12, PRINT1+13, HEADER+2*
>> AMHR	PROC+6, PROC+7, PROC+8, PROC+9, PROC+10, PROC+14, PROC+21, SET+1, PRINT1+5, PRINT1+7 , PRINT1+8, PRINT1+9, PRINT1+10
>> AMHSD	ED+4, PROC+4, PROC+5
>> AMHSORT	SORT+1, SORT+4, SET+1, PRINT1+4*, PRINT1+5
>> AMHTEXT	HEADER1+4, HEADER1+5, HEADER1+6, HEADER1+7
>> AMHTOT	PROC+2, SET+1, PRINT1+14
>> AMHX	PROC+14*, PROC+15, PROC+16, PROC+17, PROC+18, PROC+19, PROC+20
DA	PROG+2!, PROG+5!, PROV+2!, PROV+6!, SORT+2!, ZIS+1!
>> DFN	PROC+10, PROC+11, PROC+12, SET+1, SET+2, SET+4, PRINT1+7, PRINT1+8
DIC	PROV+5*, PROV+6!
DIC("A"	PROV+5*
DIC(0	PROV+5*
DIR	BD+1!, ED+1!, PROG+2!, PROG+5!, PROV+2!, SORT+2!, ZIS+1!, HEADER+2!
DIR("A"	BD+1, ED+1, PROG+2, PROG+5, PROV+2, SORT+2, ZIS+1*
DIR("B"	PROG+2, PROV+2, SORT+2, ZIS+1
DIR(0	BD+1, ED+1, PROG+2, PROG+5, PROV+2, SORT+2, ZIS+1, HEADER+2
>> DIRUT	BD+1, BD+2, ED+1, ED+2, PROG+3, PROG+6, PROV+3, SORT+3, ZIS+2
>> DTOUT	HEADER+2
>> DUOUT	BD+1, ED+1
DUZ	PROC+9, PROC+11
DUZ(2	PRINT1+8, HEADER1+3
IO	HEADER+2
IO(0	HEADER+2
IOF	START+2, HEADER1+1
IOM	CTR+1
IOSL	PRINT1+6, PRINT1+13
IOST	HEADER+2
U	PROC+7, PROC+10, PROC+15, PROC+16, PROC+17, PROC+18, PROC+19, PROC+20, PROC+21, SET+1 , PRINT1+7, PRINT1+8, PRINT1+10, HEADER1+3, HEADER1+9
X	START+3, ED+4, PROG+7, PROC+4, PRINT1+10, CTR~, CTR+1, HEADER1+8, HEADER1+9
>> X1	ED+4, PROC+4
>> X2	ED+4, PROC+4
>> XBIOP	BROWSE+2*
>> XBNS	ZIS+4, BROWSE+2
>> XBRC	ZIS+4, BROWSE+2
>> XBRP	ZIS+4, BROWSE+1
>> XBRX	ZIS+4, BROWSE+2
Y	BD+3, ED+1, ED+3, ED+4, PROG+4, PROG+8, PROV+4, PROV+7, PROV+8, SORT+4 , ZIS+3, CTR~, CTR+1, HEADER+2

Customize PDF page

Package: Mental Health Social Services

Routine: AMHRNSM

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: