Routine: PSORENW1

Package	Total	Call Graph
Outpatient Pharmacy	4	$$DT^PSOMLLDT ICD^PSONEWF DRG^PSOORDRG (SCP,SET3)^PSORN52D
VA Fileman	1	C^%DTC

Package	Total	Caller Graph
Outpatient Pharmacy	6	PSOORNE4 PSOORRNW PSORENW PSORENW0 PSORENW2 PSORENW4

Entry Points

Name	Comments	DBIA/ICR reference
IHS	; EP
END
OERR	;renewal finish from oe/rr
KLIB	;Kill renewal IB array
STOP
ICD
START	;
ICD2	;
FDR
SET2	;for when patient status is exempt or SC>50
SET3	;for when patient status is exempt or SC>50
SETIB	;Set defaults on Renewals with Copay information
SETIBP	;

External References

Name	Field # of Occurrence
C^%DTC	STOP+6
$$DT^PSOMLLDT	SETIB+9, SETIBP+3
ICD^PSONEWF	ICD+3, ICD2+6
DRG^PSOORDRG	FDR+7
SCP^PSORN52D	SETIB+3
SET3^PSORN52D	SET3+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.41 - [#52.41]	SETIBP+1, SETIBP+4, SETIBP+13, ICD2+1, ICD2+3, ICD2+4
^PSRX - [#52]	START+1, START+10, START+15, START+16, START+19, START+20, START+25, FDR+1, OERR+1, OERR+9 , OERR+10, OERR+15, OERR+17, OERR+22, SETIB+7, SETIB+10, SETIB+11, SETIB+12, SETIB+13, SETIB+14 , SETIB+15, SETIB+16, SET2+1, ICD, ICD+2, ICD+3, IHS+4
^VA(200 - [#200]	START+5, FDR+3, FDR+5, OERR+4

Label References

Name	Line Occurrences
FDR	START+18, START+19
IHS	START+6, OERR+6
SET3	SET2+1, SETIBP+13
SETIB	START+3
SETIBP	SETIB+5

Naked Globals

Name	Field # of Occurrence
^("IBQ"	SETIB+7, SETIB+10, SETIB+11, SETIB+12, SETIB+13, SETIB+14, SETIB+15, SETIB+16
^("PS"	FDR+5
^("SIG"	START+1, OERR+9
^("STA"	START+1, OERR+1
^("TN"	START+1, OERR+1
^(0	SETIBP+1
^(2	START+1, OERR+1
^(3	START+1, OERR+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	STOP!, STOP+8!
>> D	START+16*
>> DAYS	STOP*, STOP+3
>> DEA	FDR+8, STOP+2
>> DEA("CS"	STOP+1, STOP+2, STOP+6
DIC	STOP+1!
DIR	STOP+1!
DOSE	START+20, START+21, START+22, START+23, START+24, START+26!, OERR+17, OERR+18, OERR+19, OERR+20 , OERR+21, OERR+23!
>> DREN	FDR+7*
DT	STOP+3
FLD	ICD+1~, ICD+3, ICD2+2~, ICD2+6
>> I	START+20, START+25, FDR+1, OERR+10, OERR+17, OERR+22
ICD	ICD+1~, ICD+3, ICD2+2~, ICD2+4, ICD2+5, ICD2+6
II	ICD+1~, ICD+2, ICD+3, ICD2+2~, ICD2+3, ICD2+4, ICD2+5
JJ	ICD+1~, ICD2+2~, ICD2+6*
JJJ	SETIB+2~
>> OR0	START+8, FDR+2, FDR+3, FDR+13*, OERR+2, OERR+3, OERR+5, OERR+7, OERR+8, OERR+14
>> ORD	SETIB+5, SETIBP+1, SETIBP+4, SETIBP+13, ICD2+1, ICD2+2, ICD2+3, ICD2+4
POERR	FDR+7*!
PSDY	FDR+6*, FDR+9, FDR+12, FDR+14!
PSEXDT	STOP!, STOP+7*
>> PSOANSQ("SC>50"	SETIB+3!*
>> PSODFN	START+12*
>> PSODIR("CS"	FDR+7, FDR+8, FDR+9, FDR+14!
>> PSODRUG("DEA"	FDR+8, STOP+2
>> PSOFDR	START+8, FDR, SETIB+5
PSOIBOLD	START+2*, SETIB+4, SETIB+7, SETIB+8, SETIB+10, SETIB+11, SETIB+12, SETIB+13, SETIB+14, SETIB+15 , SETIB+16, SET2+1, ICD+1, SETIBP+1, SETIBP+2, SETIBP+5, SETIBP+6, SETIBP+7, SETIBP+8, SETIBP+9 , SETIBP+10, SETIBP+11, ICD2+5, KLIB+1, KLIB+2, KLIB+3!
PSOIBQFN	SETIBP+4~*, SETIBP+5, SETIBP+6, SETIBP+7, SETIBP+8, SETIBP+9, SETIBP+10, SETIBP+11, ICD2+7!
>> PSON52("QFLG"	STOP*
PSOOICD	SETIB+2~, SET2+1, SETIBP+13
>> PSORENW("CLINIC"	START+7, START+8, OERR+7*
>> PSORENW("CM"	IHS+4*
>> PSORENW("CONJUNCTION"	START+23, OERR+20
>> PSORENW("COPIES"	START+7*
>> PSORENW("COSI	GNING PROVIDER" , START+11, FDR+4!, FDR+5, OERR+11*
>> PSORENW("DAYS	SUPPLY" , FDR+6*, STOP
>> PSORENW("DOSE	ORDERED" , START+22, OERR+19
>> PSORENW("DOSE"	START+21, OERR+18
>> PSORENW("DRUG	IEN" , START+14, OERR+14
>> PSORENW("DURATION"	START+23, OERR+20
>> PSORENW("ENT"	START+18, START+19, START+21, START+22, START+23, START+24, START+25, OERR+16, OERR+18*, OERR+19 , OERR+20, OERR+21, OERR+22
>> PSORENW("FILL	DATE" , STOP+7
>> PSORENW("INS"	START+15, START+17, OERR+15
>> PSORENW("ISSU	E DATE" , STOP+3
>> PSORENW("NOUN"	START+24, OERR+21
>> PSORENW("ODOSE"	START+25, FDR+1, OERR+22*
>> PSORENW("OIRXN"	START+1, START+2, START+10, START+15, START+16, START+19, START+20, START+25, FDR+1, OERR+1 , OERR+9, OERR+10, OERR+15, OERR+17, OERR+22, ICD, ICD+2, ICD+3, IHS+4
>> PSORENW("ORX	#" , START+13, OERR+13
>> PSORENW("PATI	ENT STATUS" , IHS+5*
>> PSORENW("PROV	IDER NAME" , FDR+3*
>> PSORENW("PROVIDER"	START+4, START+5, FDR+3, FDR+5, OERR+3*, OERR+4
>> PSORENW("PSODFN"	START+12, OERR+12
>> PSORENW("QTY"	IHS+1*
>> PSORENW("REMARKS"	START+9, OERR+8
>> PSORENW("ROUTE"	START+22, OERR+19
>> PSORENW("RX0"	START+1, START+4, START+7, START+9, START+12, START+13, START+14, FDR+2, FDR+6, FDR+7 , FDR+13, STOP, STOP+3, OERR+1, OERR+2, OERR+5, OERR+8, OERR+12, OERR+13, OERR+14* , IHS+1, IHS+5
>> PSORENW("RX2"	START+1, OERR+1
>> PSORENW("RX3"	START+1, START+11, OERR+1, OERR+11
>> PSORENW("SCHEDULE"	START+23, OERR+20
>> PSORENW("SIG"	START+10, START+16, START+17, OERR+9
>> PSORENW("STA"	START+1, OERR+1
>> PSORENW("TN"	START+1, OERR+1
>> PSORENW("UNITS"	START+22, OERR+19
>> PSORENW("VERB"	START+24, OERR+21
>> PSORX(	SETIB+7, SETIB+8!, SETIB+10, SETIB+11, SETIB+12, SETIB+13, SETIB+14, SETIB+15, SETIB+16, SETIBP+1* , SETIBP+2!, SETIBP+5, SETIBP+6, SETIBP+7, SETIBP+8, SETIBP+9, SETIBP+10, SETIBP+11, ICD2+5, KLIB+2!
>> PSORX("PROVID	ER NAME" , START+5, FDR+3, OERR+4*
PSOSCA	SETIB+3!
PSOSCP	SETIB+3!, ICD2+5
RFMX	FDR+9, FDR+12, FDR+13, FDR+14!
RXN	ICD+1~, ICD2+2~
>> SIG(	OERR+10*
>> SIGOK	START+1, OERR+9
U	ICD+3, ICD2+6
X	STOP!, STOP+7, STOP+8!
X1	STOP+3*, STOP+8!
X2	STOP+3, STOP+6, STOP+8!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSORENW1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: