Routine: AZQ2RXP1

Information

AZQ2RXP1 ;IHS/ASU/RPL;PRINT PVT INS. AND PRESCRIPTION INFO; ; 8/31/89 10:33 AM [ 09/18/90 1:45 PM ]

Package	Total	Caller Graph
Local Area Programs	1	AZQ2RXP
Phoenix Devel Center	1	AZX2RXP

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$J(AZQ2HRN,6),?8,AZQ2NAME,?40,Y Line Location: C1+3
Function Call: WRITE	Prompt: ! Line Location: C2+3
Function Call: WRITE	Prompt: ?40,$P(^AUTTRLSH($P(AZQ2PRV,"^",5),0),"^") Line Location: PI+5
Function Call: WRITE	Prompt: ! Line Location: PI+6
Function Call: WRITE	Prompt: !,AZPRX,?8,Y Line Location: PRNT+3
Function Call: WRITE	Prompt: ?21,$P(^PSDRUG(AZQ2DDFN,0),"^") Line Location: PRNT+4
Function Call: WRITE	Prompt: ?50,AZQ2NDC Line Location: PRNT+5
Function Call: WRITE	Prompt: !,?21,AZQ2QTY_" "_AZQ2DU_" at $"_$J(AZQ2PPDU,6,3)_" each",?64,$J(AZQ2CST,6,2),?72,$J(AZQ2BILL,6,2),! Line Location: PRNT+7
Function Call: READ	Prompt: "Press <RETURN> to continue. " Timeout: DTIME Variable: X Line Location: HEAD+1
Function Call: WRITE	Prompt: @IOF Line Location: HEAD1+0
Function Call: WRITE	Prompt: $P(^DIC(4,DUZ(2),0),"^"),?59,AZQ2DTP,?73,"Page ",AZQ2PG,! Line Location: HEAD1+1
Function Call: WRITE	Prompt: !,"Prescriptions between "_AZQ2SDY_" and "_AZQ2FDY_" for Prvt. Insurance Eligibles." Line Location: HEAD1+2
Function Call: WRITE	Prompt: !!,?2,"HRN",?8,"Patient Name",?40,"DOB",!! Line Location: HEAD1+3
Function Call: WRITE	Prompt: !,AZQ280D Line Location: HEAD1+4
Function Call: WRITE	Prompt: !,"RX #",?8,"Fill Date",?21,"Drug",?50,"NDC Code",?66,"Cost",?74,"Bill",!,"----",?8,"-----------",?21,"---------------------------",?50,"------------",?64,"------",?72,"------" Line Location: SUBHD+1

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPRVT - [#9000006]	C2, PI
^DD("DD"	START+2, C1+1, PRNT+2
^DIC(4 - [#4]	HEAD1+1
^DPT - [#2]	C1+1
^PSDRUG - [#50]	PRNT+4, PRNT+5, PRNT+6
^PSRX - [#52]	PRNT+1, PRNT+6
^UTILITY($J	START+4, SCRIP, C2+2

Name	Field # of Occurrence
>> AZPRX	PRNT+1*, PRNT+3
>> AZQ280D	START+1*, HEAD1+4
>> AZQ2BILL	PRNT+6*, PRNT+7
>> AZQ2CST	PRNT+6*, PRNT+7
>> AZQ2DDFN	PRNT+1*, PRNT+4, PRNT+5, PRNT+6
>> AZQ2DFN	START+4*, C1, SCRIP, C2+2
>> AZQ2DPT	C1+1*
>> AZQ2DT	SCRIP*, C2+2, PI+2, PRNT+2
>> AZQ2DTP	START+2*, HEAD1+1
>> AZQ2DU	PRNT+6*, PRNT+7
>> AZQ2FD	START+2
>> AZQ2FDY	START+2*, HEAD1+2
>> AZQ2HRN	C1*, C1+3
>> AZQ2N0	PRNT+1*
>> AZQ2NAME	C1+1*, C1+3
>> AZQ2NDC	PRNT+5*
>> AZQ2PDFN	C2+2*, PRNT+1, PRNT+6
>> AZQ2PG	START+3, HEAD, HEAD1+1
>> AZQ2PPDU	PRNT+6*, PRNT+7
>> AZQ2PRV	PI*, PI+1
>> AZQ2PRVE	PI+1*
>> AZQ2PRVI	C2*, PI
>> AZQ2PRVS	PI+1*, PI+2
>> AZQ2QTY	PRNT+1*, PRNT+6, PRNT+7
>> AZQ2QUIT	START+4, C1+2, SCRIP, C2, C2+1, C2+2, PRNT, HEAD+1*, SUBHD, DONE
>> AZQ2S	PI+1
>> AZQ2SD	START+2
>> AZQ2SDY	START+2*, HEAD1+2
>> DFN	C1*, C1+1, C2, PI
DT	START+2
DTIME	HEAD+1, DONE
DUZ(2	HEAD1+1
>> I	START+4*
IO	HEAD+1, DONE
IO(0	HEAD+1, DONE
IOF	HEAD1
IOSL	C1+2, PI+3, PRNT, SUBHD
IOST	HEAD+1, DONE
>> J	C2*
>> K	SCRIP*
>> L	C2+2*
>> X	HEAD+1, DONE
>> Y	START+2, C1+1, C1+3, PRNT+2*, PRNT+3