Routine: PSOEPRPT

Package	Total	Call Graph
Outpatient Pharmacy	5	GUI^PSODEARA GUI^PSODEARB GUI^PSODEARL GUI^PSODEARP GUI^PSODEART
Kernel	4	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$FMTH)^XLFDT
VA FileMan	1	^%DT

Entry Points

Name	Comments	DBIA/ICR reference
REQCHK(EPCSVV)	;Required data check
DATECHK(EPCSSD,EPCSED)	;Check human-friendly date and convert to FileMan format ; Input EPCSSD - Start Date (ex. 10/9/01) ; EPCSED - End Date
QUEUE	;Queues report to printer
EPCSEXP	;DEA Expiration Date Report for RPC Call ; Variables passed in ; EPCSCPRS - System Access to CPRS - Include: ; (A)ctive, (D)isusered or (B)oth ; EPCSTYPE - Type of System Access: ; (C)PRS Active Users Only or (A)ll Active Users ; EPCSSTAT - Expiration Date Status: ; (E)xpired, (N)o expiration date, <= (3)0 days, <= (9)0 days ; EPCSPTYP - Send output to: ; (P)rinter, (D)evice or screen
EPCSPPP	;Print Prescribers with Privileges [PSO EPCS PRIVS]
EPCSDIS	;Print DISUSER Prescriber with Privileges [PSO EPCS DISUSER PRIVS]
EPCSAUD	;Changes to DEA Prescribing Privileges Report RPC Call [PSO EPCS LOGICAL ACCESS REPORT]
EPCSLACA	;Logical Access Control Audit Report RPC Call [PSO EPCS LOGICAL ACCESS CONTROL AUDIT]

Name	Line Occurrences (* Changed, ! Killed)
^TMP("EPCSMSG"	REQCHK+4, QUEUE+3, QUEUE+10, QUEUE+11

Name	Line Occurrences
DATECHK	EPCSAUD+13, EPCSLACA+12
QUEUE	EPCSEXP+18, EPCSPPP+14, EPCSDIS+14, EPCSAUD+19, EPCSLACA+17
REQCHK	EPCSEXP+14, EPCSAUD+12, EPCSLACA+11

Name	Field # of Occurrence
>> %DT	DATECHK+4*
%ZIS	QUEUE+1~, QUEUE+2*
C	REQCHK+1~, REQCHK+2, REQCHK+4, REQCHK+5
DT	DATECHK+5
>> EPCSDATE	DATECHK+6*
EPCSDESC	QUEUE+4, EPCSEXP+13~, EPCSEXP+17, EPCSPPP+9~, EPCSPPP+13, EPCSDIS+9~, EPCSDIS+13, EPCSAUD+11~, EPCSAUD+18, EPCSLACA+10~ , EPCSLACA+16*
>> EPCSDEV	QUEUE+2
EPCSED	DATECHK~, DATECHK+5, DATECHK+6, EPCSAUD+13, EPCSAUD+14, EPCSLACA+12, EPCSLACA+13*
>> EPCSERR	REQCHK+5*, EPCSEXP+14, EPCSAUD+12, EPCSLACA+11
EPCSI	DATECHK+3~, DATECHK+4*
>> EPCSPTYP	EPCSEXP+15, EPCSPPP+11, EPCSDIS+11, EPCSAUD+15, EPCSLACA+14
>> EPCSQDT	QUEUE+5
EPCSROU	QUEUE+4, EPCSEXP+13~, EPCSEXP+16, EPCSPPP+9~, EPCSPPP+12, EPCSDIS+9~, EPCSDIS+12, EPCSAUD+11~, EPCSAUD+17, EPCSLACA+10~ , EPCSLACA+15*
EPCSSAVE	QUEUE+8, EPCSAUD+11~, EPCSLACA+10~
EPCSSD	DATECHK~, DATECHK+5, DATECHK+6, EPCSAUD+13, EPCSAUD+14, EPCSLACA+12, EPCSLACA+13*
EPCSV	REQCHK+3, REQCHK+4, QUEUE+7, EPCSEXP+13~, EPCSEXP+14, EPCSPPP+9~, EPCSPPP+10, EPCSDIS+9~, EPCSDIS+10, EPCSAUD+11~ , EPCSAUD+12, EPCSAUD+16, EPCSLACA+10~, EPCSLACA+11, EPCSLACA+15*
EPCSVV	REQCHK~
I	REQCHK+1~, REQCHK+3, REQCHK+4, QUEUE+1~, QUEUE+7
IO	EPCSAUD+20, EPCSLACA+18
ION	QUEUE+4
IOP	QUEUE+1~, QUEUE+2*
POP	QUEUE+1~, QUEUE+2
U	REQCHK+3, REQCHK+4, QUEUE+7
X	DATECHK+3~, DATECHK+4*
Y	DATECHK+3~, DATECHK+4
ZTDESC	QUEUE+1~, QUEUE+4*
ZTDTH	QUEUE+1~, QUEUE+5*
ZTIO	QUEUE+1~, QUEUE+4*
ZTRTN	QUEUE+1~, QUEUE+4*
ZTSAVE	QUEUE+1~, QUEUE+8*
ZTSAVE(	QUEUE+7*
>> ZTSK	QUEUE+10