Routine: AMHRPSP

Information

AMHRPSP ; IHS/CMI/LAB - ;

Package	Total	Call Graph
VA Fileman	3	DD^%DT NOW^%DTC ^DIR
Mental Health Social Services	2	^AMHEKL DONE^AMHLEIN

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No data to report.",! Line Location: PRINT+5
Function Call: WRITE	Prompt: !! Line Location: SORT+3
Function Call: WRITE	Prompt: ?32,$E(AMHRSRT2,1,9) Line Location: SORT1+4
Function Call: WRITE	Prompt: ?J,$J(K,6) Line Location: SORT1+5
Function Call: WRITE	Prompt: !,"TOTAL:" Line Location: SORT1+10
Function Call: WRITE	Prompt: ?J,$J(K,6) Line Location: SORT1+10
Function Call: WRITE	Prompt: ?J,$J(T,6) Line Location: SORT1+11
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: ?50,"BEHAVIORAL HEALTH",?100,AMHRDT,?123,"Page",AMHRPG,! Line Location: HEAD1+2
Function Call: WRITE	Prompt: ?((132-AMHRLENG)/2),AMHTITLE," BY AGE AND SEX",! Line Location: HEAD1+3
Function Call: WRITE	Prompt: ?46,"VISIT DATES: ",AMHBDD," TO ",AMHEDD,! Line Location: HEAD1+4
Function Call: WRITE	Prompt: !?61,"SEX: ",$S(AMHRSEX="M":"MALE",AMHRSEX="F":"FEMALE",1:"BOTH") Line Location: HEAD2+0
Function Call: WRITE	Prompt: !,"PROB CODE NARRATIVE" Line Location: HEAD2+1
Function Call: WRITE	Prompt: ?J,K Line Location: HEAD2+1
Function Call: WRITE	Prompt: ?J,"TOTAL" Line Location: HEAD2+2
Function Call: WRITE	Prompt: !,AMHR132S Line Location: HEAD2+3
Function Call: WRITE	Prompt: !,$P(X,"-")," - ",$P(X,"-",2) Line Location: LIST+2
Function Call: WRITE	Prompt: ! Line Location: LIST+3
Routine Call	DIR Line Location: HEAD+1

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	SORT1+3
^AMHPROB("B"	SORT1+3
^XTMP("AMHRAGS"	SORT1+4
^XTMP("AMHRPS"	PRINT+5, PRINT+6, DONE+2!, SORT1+1, SORT1+5, SORT1+6, SORT1+10

Name	Field # of Occurrence
^(	SORT1+5, SORT1+10

Name	Field # of Occurrence
>> %	LIST+1*, LIST+2
>> AMHBDD	HEAD1+4
>> AMHBTH	PRINT+5, PRINT+6, DONE+2, SORT1+1, SORT1+4, SORT1+5, SORT1+6, SORT1+10
>> AMHEDD	HEAD1+4
>> AMHJOB	PRINT+5, PRINT+6, DONE+2, SORT1+1, SORT1+4, SORT1+5, SORT1+6, SORT1+10
AMHQUIT	PRINT+4!, PRINT+6, SORT+1, SORT+2, SORT1+1, SORT1+2, SORT1+8, SORT1+9, HEAD+1*
>> AMHR132S	PRINT+1*, HEAD2+3
>> AMHRBIN	SORT1+5, SORT1+10, HEAD2+1, LIST+1, SETBIN+1*
>> AMHRDT	PRINT+2*, HEAD1+2
>> AMHRLENG	HEAD1+3*
>> AMHRPG	PRINT+3, HEAD, HEAD1+1, HEAD1+2
>> AMHRSEX	PRINT+3, PRINT+6, SORT+1, SORT1+1, SORT1+4, SORT1+5, SORT1+6, SORT1+10, HEAD2
>> AMHRSRT2	SORT1+4*
>> AMHSORT	PRINT+3, SORT1, SORT1+1*, SORT1+3, SORT1+4, SORT1+5, SORT1+6
>> AMHSORTP	SORT1+3*, SORT1+4
>> AMHTITLE	HEAD1+3
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DTOUT	HEAD+1
I	SORT1+5~, SORT1+10, HEAD2+1, LIST+2
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	SORT+2, SORT1+2, SORT1+9
IOST	HEAD+1
J	SORT1+5~, SORT1+6, SORT1+10, SORT1+11, HEAD2+1*, HEAD2+2
K	SORT1+5~, SORT1+10, HEAD2+1*
>> T	SORT1+10*, SORT1+11
U	SORT1+3
>> X	PRINT+2, LIST+2*
>> Y	PRINT+2*, HEAD+1