Routine: APCLAUD2

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$J(APCLHRN,7),?10,APCLVDT,?24,$E(APCLPNM,1,20),?45,$E(APCLPAT,1,24),?70,$E(DOB,4,5),"/",$E(DOB,6,7),"/",(1700+($E(DOB,1,3))),!?10,APCLICNO,?24,$E(APCLINM,1,55) Line Location: PR120+8
Function Call: WRITE	Prompt: $P(^DIC(4,APCLSITE,0),"^"),?58,APCLDTP,?72,"Page ",APCLPG,! Line Location: HEAD1+1
Function Call: WRITE	Prompt: !,"Audit Search for Ambulatory Visits from ",APCLBDY," through ",APCLEDY,"." Line Location: HEAD1+2
Function Call: WRITE	Prompt: !!,"HRCN",?10,"Visit Date",?24,"Primary Provider",?45,"Patient Name",?70,"DOB",!?10,"ICD9",?24,"DIAGNOSIS" Line Location: HEAD1+3
Function Call: WRITE	Prompt: !,APCL80D Line Location: HEAD1+4
Routine Call	DIR Line Location: HEAD+3

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	PR120
^AUPNVSIT - [#9000010]	PR120
^DD("DD"	PR120
^DD(9000010.06	PR120+4
^DIC(16 - [#16]	PR120+4
^DIC(4 - [#4]	HEAD1+1
^DIC(6 - [#6]	PR120+4
^DPT - [#2]	PR120+1
^VA(200 - [#200]	PR120+4
^XTMP("APCLAUD"	PR01+3!
^XTMP("APCLAUD2"	PR01+1, PR01+3!, PR1, PR10, PR10+2, PR11+3, PR120+2

Name	Field # of Occurrence
^(	PR120+2
^(0	PR10, PR120

Name	Field # of Occurrence
>> APCL80D	HEAD1+4
>> APCLALLR	PR12
>> APCLBDY	HEAD1+2
>> APCLBT	PR01+1, PR01+3, PR1, PR10, PR10+2, PR11+3, PR120+2
APCLCAR	SETCAR!
APCLCAR(	PR12+2, SETCAR+1, SCR1+3, SCR1+4
>> APCLCNT	PR10*, SETCAR+1, SETCAR+2, SCR1+2
>> APCLCNTR	PR10, PR12+1, PR12+2
>> APCLDTP	HEAD1+1
>> APCLEDY	HEAD1+2
>> APCLGOT	SETCAR+2, SCR0, SCR1+1, SCR1+4*
>> APCLHRN	PR120*, PR120+8
>> APCLICNO	PR11+2*, PR120+8
>> APCLIJ	SETCAR+1*
>> APCLINM	PR120+3*, PR120+8
>> APCLINO	PR10+1, PR10+2, PR11+2, PR11+3, PR120+2
>> APCLIRNG	PR1*, PR10, PR10+2, PR11+3, PR120+2
>> APCLJOB	PR01+1, PR01+3, PR1, PR10, PR10+2, PR11+3, PR120+2
>> APCLLIM	SETCAR+1, SCR1+1
>> APCLPAT	PR120+1*, PR120+8
>> APCLPG	START+1, HEAD+2, HEAD1+1
>> APCLPNM	PR120+4*, PR120+8
>> APCLPNO	PR01, PR01+1, PR1, PR10, PR10+2, PR11+3, PR120+2
>> APCLPNO1	PR120+2*, PR120+4
>> APCLPOVD	PR120+2*, PR120+3
>> APCLPTNM	PR120*, PR120+1
>> APCLQ	START+1, PR, PR+1, PR01+1, PR1, PR10, PR10+2, PR11+3, PR120+5, HEAD+4*
>> APCLSITE	PR120, HEAD1+1
>> APCLSKP	SCR0, SCR1, SCR1+3
>> APCLVDT	PR120*, PR120+8
>> APCLVNO	PR11+2, PR11+3, PR120, PR120+2
DIR	HEAD+3!
DIR(0	HEAD+3*
>> DIRUT	HEAD+3*, HEAD+4
>> DOB	PR120+1*, PR120+8
>> DUOUT	HEAD+3
IOF	HEAD1
IOSL	PR, PR120+5
IOST	HEAD+3
U	PR120+1, PR120+2, PR120+4
>> X	SCR1+2*, SCR1+3, SCR1+4
>> Y	PR120*

Information