Routine: APSPDRX

Package	Total	Call Graph
VA Fileman	2	$$GET1^DIQ ^DIR
IHS Changes To Pharmacy	1	($$DIR,$$GETIEN,ASKDATES)^APSPUTIL
IHS Patient	1	$$HRN^AUPNPAT
IHS VA Utilities	1	^XBDBQUE
Kernel	1	($$FMTE,$$NOW)^XLFDT
Outpatient Pharmacy	1	^PSOLSET

Entry Points

Name	Comments	DBIA/ICR reference
HDR
PRNT
DIVVRY(RXDIV,RPTDIV)	;EP
DEV	;
DSPL	;GET DATA FROM TMP GBL
DSPS
PRT	;
INIT	;
PR1
PR2
DSET	;
EP	;ENTRY POINT
OUT

External References

Name	Field # of Occurrence
$$DIR^APSPUTIL	INIT+12
$$GETIEN^APSPUTIL	INIT+17
ASKDATES^APSPUTIL	INIT+6
$$HRN^AUPNPAT	DSET+13
$$GET1^DIQ	DSET+8, DSET+9, DSET+10, DSET+13, DSPL+3, DSPS+1, DSPS+9, HDR+4
^DIR	HDR
^PSOLSET	INIT+1
^XBDBQUE	DEV+4
$$FMTE^XLFDT	INIT+8, INIT+9, DSPS+10, HDR+3
$$NOW^XLFDT	HDR+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No Site Param's Defined!..quitting." Line Location: INIT+1
Function Call: WRITE	Prompt: @IOF Line Location: INIT+4
Function Call: WRITE	Prompt: "Pharmacy Daily Rx Report",!! Line Location: INIT+5
Function Call: WRITE	Prompt: !!,"End of Report" Line Location: OUT+6
Function Call: WRITE	Prompt: !,"Rx #: "_APSPRX,?17,"Name: "_APSPNM,?54,"Chart #: "_$P(APSP,U,6) Line Location: DSPS+8
Function Call: WRITE	Prompt: !,"DRUG: "_$P(APSP,U,3),?37,"Qty: "_$P(APSP,U,5),?47,"Provider: "_$$GET1^DIQ(200,$P(APSP,U,4),.01) Line Location: DSPS+9
Function Call: WRITE	Prompt: !,"Division: "_DIVNM,?37,APSPTYP,?53,"D/Time: "_$TR($$FMTE^XLFDT($E(APSPDT,1,12),"5Z"),"@"," ") Line Location: DSPS+10
Function Call: WRITE	Prompt: ! Line Location: DSPS+11
Function Call: WRITE	Prompt: @IOF,?38,"(",APSPG,")",!,"DAILY PRESCRIPTION ACTIVITY REPORT" Line Location: HDR+2
Function Call: WRITE	Prompt: ?51,"Print Date: ",?59,$TR($$FMTE^XLFDT($E($$NOW^XLFDT(),1,12),"5Z"),"@"," "),! Line Location: HDR+3
Function Call: WRITE	Prompt: ?5,"Pharmacy Division: "_$S(APSPDIV:$$GET1^DIQ(59,APSPDIV,.01),1:"All"),! Line Location: HDR+4
Function Call: WRITE	Prompt: "." Line Location: HDR+5
Function Call: WRITE	Prompt: !,?10,"For Rx's dispensed from "_APSPBDF_" to "_APSPEDF,!! Line Location: HDR+6
Routine Call	DIR Line Location: HDR

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^PS(59 - [#59]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSDRUG - [#50]	DSET+7
^PSRX - [#52]	DSET+4
^PSRX("ZAL"	OUT+5, PRT+1, PR1, PR2
^TMP($J	OUT+3!, DSET+2, DSET+14, DSET+15, DSPL+2, DSPL+4, DSPL+5, DSPL+6, DSPS

Label References

Name	Line Occurrences
$$DIVVRY	DSET+11
DEV	INIT+19
DSET	PR2
DSPL	PRNT
DSPS	DSPL+6
HDR	PRNT, DSPS+6
PR1	PRT+1
PR2	PR1
PRNT	OUT+6
PRT	OUT+5

Naked Globals

Name	Field # of Occurrence
^(0	DSET+5, DSET+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APSBDF	INIT+2~
APSP	DSPL+1~, DSPS*, DSPS+1, DSPS+2, DSPS+3, DSPS+4, DSPS+5, DSPS+8, DSPS+9
APSPBD	INIT+2~, INIT+6, INIT+8, INIT+10*, OUT+5
>> APSPBDF	INIT+8*, HDR+6
>> APSPCN	DSET+13, DSET+15, DSPS+4
APSPDFN	OUT+1~, DSET+5*, DSET+13, DSET+15
APSPDG	OUT+1~, DSET+6*, DSET+7
APSPDIV	INIT+2~, INIT+12, INIT+14, INIT+15, INIT+17*, DSET+11, HDR+4
>> APSPDP	PRNT*
>> APSPDRG	DSET+7*, DSET+15
APSPDT	OUT~, OUT+5, PRT+1, PR1, PR2, DSET+14, DSPL+1~, DSPL+4, DSPL+5, DSPL+6 , DSPS+10
APSPED	INIT+2~, INIT+6, INIT+9, INIT+10*, OUT+5
APSPEDF	INIT+2~, INIT+9*, HDR+6
APSPG	OUT~, OUT+4, HDR, HDR+1, HDR+2
APSPLN	OUT~, PR1*, PR2, DSET+8, DSET+9, DSET+10
APSPNM	OUT+1~, DSPL+1~, DSPS+1*, DSPS+8
APSPOUT	OUT~, OUT+4, DSPL+4, DSPL+5, DSPL+6, DSPS+6, HDR
>> APSPP	DSPS+2*
APSPPRV	OUT+1~, DSET+8*, DSET+15
>> APSPQ	INIT+6, INIT+7, INIT+12, INIT+13, INIT+16, INIT+17, INIT+18, DSPS+3*
APSPRN	OUT~
APSPRX	OUT~, DSET+4, DSET+14, DSET+15, DSPL+1~, DSPL+5, DSPL+6, DSPS+8
APSPSTN	OUT+1~
>> APSPTYP	DSPS+7*, DSPS+10
>> APSPZX	PRNT*
DIR	HDR!
DIR("A"	HDR*
DIR(0	HDR*
DIV	OUT+1~, DSET+9, DSET+11, DSET+13, DSET+14, DSPL+1~, DSPL+2, DSPL+3, DSPL+4, DSPL+5 , DSPL+6
DIVNM	DSPL+1~, DSPL+3*, DSPS+10
DT	INIT+6
FTYPE	OUT~, PR2, DSET+8, DSET+9, DSET+10, DSET+15, DSPS+5, DSPS+7
>> I	HDR+5*
IO	OUT+2
IOF	INIT+4, HDR+2
IOSL	DSPS+6
IOST	HDR
NXT	DSET+1~, DSET+2, DSET+3, DSET+14, DSET+15, DSPL+1~, DSPL+6*, DSPS
>> PSOPAR	INIT+1
QTY	OUT+1~, DSET+10*, DSET+15
RPTDIV	DIVVRY~, DIVVRY+1, DIVVRY+2
RXDIV	DIVVRY~, DIVVRY+2
>> RXIEN	PRT+1*, PR1, PR2, DSET+4, DSET+8, DSET+9, DSET+10
U	DSET+4, DSET+5, DSET+6, DSET+7, DSET+15, DSPS+1, DSPS+2, DSPS+3, DSPS+4, DSPS+5 , DSPS+8, DSPS+9
>> X	HDR
XBNS	DEV+1~, DEV+3*
XBRP	DEV+1~, DEV+2*

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSPDRX

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: