Routine: PSOCPBA2

Package	Total	Call Graph
Outpatient Pharmacy	2	(CHKIB,XTYPE1)^PSOCP1 ^PSOLSET

Package

Total

Call Graph

(CHKIB,XTYPE1)^PSOCP1 ^PSOLSET

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOCPBAK PSOCPIB3

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
QUIT	;
TALLY	; ; IF NO IB NUMBER FOR THIS FILL, SET UP VARIABLES AND TALLY
RX	; Determine Original or Refill for RX
SITE	; SET UP VARIABLES NEEDED BY BILLING
COPAYREL	; Recheck copay status at release
CP	; Entry point to Check if COPAY - Requires RXP,PSOSITE7
ACCUM	; ACCUMULATE TOTALS AND SEE IF PATIENT MET ANNUAL CAP

Name	Line Occurrences (* Changed, ! Killed)
^IBAM(354.7	ACCUM+5
^PS(53 - [#53]	COPAYREL+3
^PS(59 - [#59]	CP+7, SITE+3, SITE+4
^PSDRUG - [#50]	COPAYREL+6
^PSRX - [#52]	TALLY+9, TALLY+12, CP+3, CP+4, CP+8, RX+4, RX+6, RX+7, RX+8, RX+9 , RX+15, COPAYREL+3, COPAYREL+6, COPAYREL+9, COPAYREL+10, SITE+1
^XTMP("PSOCPBAK"	TALLY+2, TALLY+3, TALLY+5, TALLY+6, ACCUM+3, ACCUM+8, ACCUM+9

Name	Field # of Occurrence
CHKXTYPE	COPAYREL+8!
DRG	COPAYREL+5~, COPAYREL+6*
DRGTYP	COPAYREL+5~, COPAYREL+6*, COPAYREL+7
PREA	QUIT+1!
>> PSOCAP(	TALLY+7, ACCUM+7*
>> PSOCAP(302	TALLY+4*
>> PSOCAP(303	TALLY+4*
PSOCHG	RX+10, RX+12, RX+13, QUIT+1!, COPAYREL+3, COPAYREL+7, COPAYREL+10
PSOCP	CP+2!, CP+4*, CP+5, CP+8, RX+13
PSOCP1	QUIT+1!
PSOCP2	QUIT+1!
PSOCPN	CP+3*, CP+8, QUIT+1!
PSOCPUN	RX+15*, QUIT+1!, ACCUM+7, ACCUM+8, ACCUM+9
>> PSODFN	TALLY+2*, TALLY+3, TALLY+5, TALLY+6, ACCUM+3, ACCUM+5, ACCUM+8, ACCUM+9
PSOIB	RX+1~, RX+2*, RX+6, RX+8
>> PSOLOG	ACCUM+5*, ACCUM+6
>> PSOPAR	CP+1, SITE+3*
PSOREF	RX+3, RX+4, RX+6, RX+7, RX+8, RX+9, QUIT+1!
>> PSOREL	TALLY+6*, TALLY+7, ACCUM+1
PSORSN	QUIT+1!
PSOSAVE	CP+5*, QUIT+1!
>> PSOSITE	CP+7, SITE+1*, SITE+2, SITE+3, SITE+4
>> PSOSITE7	CP+7, CP+8, SITE+4
>> PSOSQ	ACCUM+5*
PSOTG	COPAYREL+8!
>> PSOTOT	ACCUM+3, ACCUM+4, ACCUM+6, ACCUM+7, ACCUM+8
>> PSOYEAR	ACCUM+2*, ACCUM+3, ACCUM+8, ACCUM+9
>> PSOYR	ACCUM+1*, ACCUM+2, ACCUM+5, ACCUM+7
QQ	QUIT+1!
>> RXP	TALLY+5*, TALLY+6, TALLY+9, TALLY+12, CP+3, CP+4, CP+8, RX+4, RX+6, RX+7 , RX+8, RX+9, RX+15, COPAYREL+3, COPAYREL+6, COPAYREL+9, COPAYREL+10, SITE+1
X	CP+8*, QUIT+1!
Y	QUIT+1!
>> YY	TALLY+5*, TALLY+6, TALLY+8, TALLY+12, RX+4, SITE+1

Information