Routine: APCLER2P

Package	Total	Call Graph
VA Fileman	3	DD^%DT EN^DIQ1 ^DIR
DRG Grouper	1	$$ICDDX^ICDEX
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Patient Care Component Reports	1	DONE^APCLOSUT

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No visits to report." Line Location: INIT+4
Function Call: WRITE	Prompt: !,APCLNAME,?16,APCLHRCN,?28,APCLVD,?45,?49,APCLFAC Line Location: PRINT1+2
Function Call: WRITE	Prompt: !?3,"ER Visit Information =>",?28,APCLVD,?45,APCLCLN,?49,APCLFAC Line Location: PRINT2+5
Function Call: WRITE	Prompt: ! Line Location: PRINT2+11
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: ! Line Location: HEAD1+2
Function Call: WRITE	Prompt: !!,$P(^VA(200,DUZ,0),"^",2),?(80-$L(X)/2),X,?70,"Page ",APCLPG Line Location: HEAD1+4
Function Call: WRITE	Prompt: !?25,"HOSPITAL ADMISSIONS AFTER ER VISIT" Line Location: HEAD1+5
Function Call: WRITE	Prompt: !?18,"VISITS DATES: ",APCLBDD," TO ",APCLEDD Line Location: HEAD1+6
Function Call: WRITE	Prompt: !!?5,"NAME",?17,"HRCN",?28,"VISIT DATE&TIME",?45,"CLN",?49,"FAC",?54,"ICD",?64,"PROV NARRATIVE" Line Location: HEAD1+7
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-") Line Location: HEAD1+8
Function Call: WRITE	Prompt: ! Line Location: HEAD1+9
Routine Call	DIR Line Location: HEAD+1

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	SET2+3
^AUPNVPOV - [#9000010.07]	PRINT1+6, PRINT2+9
^AUPNVPOV("AD"	PRINT1+3, PRINT2+6
^AUPNVSIT - [#9000010]	SET2+2, PRINT2+1, PRINT2+2, PRINT2+3
^AUTTLOC - [#9999999.06]	SET2+3, PRN+5, PRINT2+3
^DIC(4 - [#4]	HEAD1+3
^DIC(40.7 - [#40.7]	PRINT2+2
^DPT - [#2]	PRN+1
^UTILITY("DIQ1"	PRN+2!, PRN+3!
^VA(200 - [#200]	HEAD1+4
^XTMP("APCLER2"	INIT+4, SET+3, END+2!, SET2+1

Name	Field # of Occurrence
>> APCLAGE	PRN+3*
>> APCLBD	INIT+2
>> APCLBDD	INIT+2*, HEAD1+6
>> APCLBTH	INIT+4, SET+3, END+2, SET2+1
>> APCLCLN	PRINT2+2*, PRINT2+5
>> APCLDT	INIT+1*
>> APCLED	INIT+2
>> APCLEDD	INIT+2*, HEAD1+6
>> APCLFAC	PRN+5, PRINT1+2, PRINT2+3, PRINT2+5
>> APCLFRST	PRINT1+2, PRINT1+4, PRINT1+5, PRINT2+5, PRINT2+7, PRINT2+8
>> APCLHRCN	SET2+3*, PRINT1+2
>> APCLJOB	INIT+4, SET+3, END+2, SET2+1
>> APCLNAME	PRN+1*, PRINT1+2
>> APCLP	PRINT1+2, PRINT1+3, PRINT1+6, PRINT2+5, PRINT2+6, PRINT2+9
>> APCLPG	INIT+3, HEAD, HEAD1+1, HEAD1+4
>> APCLQUIT	SET+3, PRINT1+1, PRINT2+4, HEAD+1*
>> APCLVD	PRN+4, PRINT1+2, PRINT2+1, PRINT2+5
>> APCLVDFN	SET+2, SET+3, SET2+1, SET2+2, PRINT1+3
>> APCLVER	SET2+1*, PRINT2+1, PRINT2+2, PRINT2+3, PRINT2+6
>> APCLVREC	SET2+2*, SET2+3, PRN+1, PRN+2, PRN+3, PRN+4, PRN+5
>> DA	PRN+2*
>> DIC	PRN+2*
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DR	PRN+2*
DT	INIT+1
>> DTOUT	HEAD+1
DUZ	HEAD1+4
DUZ(2	SET2+3, HEAD1+3
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	PRINT1+1, PRINT2+4
IOST	HEAD+1
U	SET2+3, PRN+1, PRN+2, PRN+3, PRN+4, PRN+5, PRINT1+6, PRINT2+1, PRINT2+2, PRINT2+3 , PRINT2+9, HEAD1+3
>> X	HEAD1+3*, HEAD1+4
>> Y	INIT+2, PRN+4, PRINT2+1*, HEAD+1