Routine: PSORXEDT

Package	Total	Call Graph
Outpatient Pharmacy	9	^PSOBING1 RE^PSODEM ICN^PSODPT EN^PSOHLUP ^PSOLSET ACT^PSOORNE2 COPAY^PSOPTPST ^PSORXL PDIR^PSOTPCAN
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Registration	2	(,ADD,KVA)^VADPT (CLEAR,FULL)^VALM1
VA Fileman	2	(C,NOW)^%DTC ^DIR
Adverse Reaction Tracking	1	^GMRADPT

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSO RXEDIT PSOREJP1

Name	Field # of Occurrence
C^%DTC	QUP
NOW^%DTC	PT+3, PT+18
^%ZIS	PRF+5
^%ZISC	QUP+5
^%ZTLOAD	QUP+4
^DIR	PSORXEDT+7, BAD+3
^GMRADPT	PT+17
^PSOBING1	BBG
RE^PSODEM	PT+13
ICN^PSODPT	PT+6
EN^PSOHLUP	BAD+9, PT+19
^PSOLSET	PSORXEDT+4
ACT^PSOORNE2	PT+24
COPAY^PSOPTPST	PT+8
^PSORXL	EPH+4
PDIR^PSOTPCAN	PT+1
^VADPT	PT+9
ADD^VADPT	PT+9
KVA^VADPT	EOJ+3
CLEAR^VALM1	PT+21
FULL^VALM1	EOJ+4

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: PSORXEDT+6
Function Call: WRITE	Prompt: !?5,$C(7),"Duplicate Rx # "_RXM_" was found in your list, ignoring it!",! Line Location: PSORXEDT+9
Function Call: WRITE	Prompt: !!?5,"Couldn't Find RX # "_RXM Line Location: BAD+7
Function Call: WRITE	Prompt: !!?5,"Rx # "_RXM_" is marked for Deletion." Line Location: BAD+8
Function Call: WRITE	Prompt: !,"Profiles must be sent to Printer !!",! Line Location: PRF+4
Function Call: WRITE	Prompt: !,$C(7),"Rx data is not on file !",! Line Location: LIST+1
Function Call: WRITE	Prompt: !,$C(7),"Rx # "_RXM_" has been deleted." Line Location: LIST+2
Function Call: WRITE	Prompt: "." Line Location: LIST+3
Routine Call	DIR Line Location: PSORXEDT+7 BAD+3
Routine Call	%ZIS Line Location: PRF+5

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PT+5
^PS(52.91 - [#52.91]	PT+1
^PS(53 - [#53]	PT+20
^PS(55 - [#55]	BAD+9, PT+19, PT+20
^PSRX - [#52]	BAD+8, BAD+9, PT+1, PT+5, PT+7, PT+23, LIST+1, LIST+2, LIST+7, LIST+8
^PSRX("B"	BAD+6, BAD+8, LIST+6
^TMP("PS"	EOJ+3!
^TMP("PSOAL"	EOJ+4!
^TMP("PSOAO"	EOJ+4!
^TMP("PSOBB"	BBG, NX+2!, PT+3, PT+18
^TMP("PSOBEDT"	PSORXEDT+5!, PRF, PRF+1, QUP+1, BBG, NX+2!
^TMP("PSOHDR"	PT+9!, PT+10, PT+11, PT+12, PT+14, PT+15, PT+16, PT+17*, EOJ+4!
^TMP("PSOPF"	EOJ+4!
^TMP("PSOPI"	PT+9!, EOJ+4!
^TMP("PSOPO"	EOJ+4!
^TMP("PSOSF"	EOJ+4!

Name	Line Occurrences
BBG	PRF, PRF+3
EOJ	PSORXEDT+4, PSORXEDT+7, NX+2, PT+1
LIST	BAD+10
LISTX	LIST+1, LIST+10, LST1
LST1	LIST+3, LIST+9
NX	EPH+3, EPH+4
PSORXEDT	BAD, BAD+5
PT	EPH+1
QUP	PRF+2

Name	Field # of Occurrence
^($J	BBG
^(0	PT+1
^(2	PT+7
^(3	PT+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PT+3, PT+18
%X	NX+1!
%Y	NX+1!
%ZIS	PRF+4!, PRF+5*
%ZIS("A"	PRF+5*!
ACNT	EOJ+3!
ACOM	EOJ+6!
ACTREF	NX+1!
ACTREN	NX+1!
BAD	PSORXEDT+8, PSORXEDT+9, PSORXEDT+10*, BAD+4!, BAD+5!
BBFLG	NX+1!
BBRX	NX+1!
BINGCRT	NX+1!
BINGRTE	NX+1!
C	NX+1!
CC	NX+1!
CLOZPAT	EOJ+6!
CLOZPST	PSORXEDT+5!
CMOP	NX+1!
COM	NX+1!
CRIT	EOJ+6!
CT	NX+1!
D	NX+1!
D0	NX+1!
D1	NX+1!
DA	EOJ+6!
DAT	NX+1!
DDH	EOJ+6!
DFN	QUP+1, BBG!, NX+1!, PT+5, PT+6
DGI	EOJ+6!
DGS	EOJ+6!
DI	NX+1!
DIC	NX+1!
DIQ	NX+1!
DIR	PSORXEDT+5!, PSORXEDT+7!, BAD+2!, BAD+3!, EOJ+3!
DIR("?"	PSORXEDT+6*
DIR("A"	PSORXEDT+6, BAD+2
DIR("B"	BAD+2*
DIR(0	PSORXEDT+6, BAD+2
DIRUT	PSORXEDT+5!, PSORXEDT+7, BAD+2!, BAD+4, EOJ+3!
>> DISGROUP	BBG
DQ	NX+1!
DREN	NX+1!
DRG	NX+1!
DT	QUP, PT+1
DTOUT	EOJ+3!
DUOUT	PSORXEDT+5!, EOJ+3!
>> DUP	PSORXEDT+9, PSORXEDT+11
DUZ("AG"	PT+8
END	PSORXEDT+8*, PSORXEDT+9, PSORXEDT+10, PSORXEDT+11, BAD+11!, NX+1!
FDR	NX+1!
FEV	EOJ+3!
G	QUP+3*, QUP+5!
GG	EOJ+3!
>> GMRA	PT+17*
GMRAL	PT+17, EOJ+3!
GOOD	BAD+6*, BAD+7, BAD+10!, BAD+11!
HDR	EOJ+1!
HOLDRPAS	QUP*, QUP+6!
HT	PT+15!
>> I	PSORXEDT+9, PSORXEDT+10, PSORXEDT+11, BAD+6
IK	EOJ+1!
INDT	EOJ+1!
INS1	EOJ+1!
IO("Q"	PRF+4!
ION	PRF+1, PRF+2, PRF+3, PRF+4, PRF+6
IOP	PRF+4!
IOST	PRF+3, PRF+6
IT	NX+1!
>> J	PSORXEDT+9, PSORXEDT+11
JJ	EOJ+5!
K	EOJ+5!
LOG	EOJ+1!
MM	EOJ+5!
NOBG	EPH+4, NX+1!
NODE	EOJ+1!
NOPP	PSORXEDT+5!, PRF, NX+2!
ORD	PT+23*, EOJ+6!
ORN	EPH+1*, PT+1, PT+4, PT+5, PT+7, PT+23, EOJ+1!
P1	EOJ+1!
PAT	EOJ+4!
POERR	PT+13*!
POP	EPH+3!, PRF+3, PRF+4!, PRF+6, NX+1!
PPL	QUP+1, BBG, NX+1!
PSDAYS	EOJ+5!
PSI	EOJ+1!
PSL	EOJ+1!
PSLST	PT+23*, EOJ+1!
PSNP	EOJ+1!
PSOAC	EOJ+5!
PSOACT	EOJ+1!
PSOAL	EOJ+5!
PSOBCK	NX+1!, EOJ+6!
PSOBEDT	NX+1!, PT+4*
PSOBILL	EOJ+6!
PSOBM	NX+1!, EOJ+1!
PSOCLC	EOJ+1!
PSOCNT	EOJ+1!
PSOCOU	EOJ+5!
PSOCOUU	EOJ+5!
PSODD	EOJ+1!
PSODFN	BBG, PT+5, PT+19, PT+20, EOJ+1!
PSODRUG	PSORXEDT+5!, EOJ+5!
>> PSODTCUT	QUP*
PSOEDIT	EOJ+3!
PSOERR	NX+1!, EOJ+6!
PSOFROM	PSORXEDT+5!, PRF+1*, NX+1!
PSOHD	PT+15*, EOJ+1!
PSOIBQS	EOJ+2!
>> PSOION	PRF+1, PRF+3, PRF+4, PRF+6
PSOJ	EOJ+1!
PSOLION	EOJ+1!
PSOLIST	PSORXEDT+5!, EPH+3!
PSOLIST(	EPH+1, LST1+1, LST1+2, LST1+3
PSOLIST(1	LST1*
PSOLOUD	BAD+9!, PT+19!, EOJ+3!
PSOLST	EOJ+1!
PSOLST(	PT+4, PT+23
PSOLST2	EPH+1*, NX+1!
PSONEW	EOJ+5!
PSONEW3	EOJ+6!
PSONOOR	EOJ+5!
PSOOI	EOJ+1!
>> PSOPAR	PSORXEDT+4, PRF, PRF+1, QUP
PSOPF	EOJ+1!
>> PSOPROP	PRF+2, PRF+3, PRF+6*, QUP+2
PSOPRPAS	QUP, QUP+6!
PSOQFLG	EOJ+3!
PSORLST	PSORXEDT+10, PSORXEDT+11, BAD, BAD+1, BAD+4!, BAD+5!, BAD+6, EOJ+2!
PSORX	EPH+4!
PSORX("FN"	EOJ+6!
PSORX("NAME"	PT+5*
PSORX("PATIEN	T STATUS" , PT+20*
PSORX("PSOL"	EPH+3, EPH+4
PSORX("QFLG"	NX+1!, EOJ+6!
PSORX0	EOJ+2!
PSORX1	EOJ+2!
PSORXED	EOJ+3!
PSOSD	EOJ+2!
PSOSIG	EOJ+2!
PSOT1	EPH+1*, NX+1!
PSOTPEXT	PT+1~!, PT+2!
PSOTXEDT	PT+1~*!, PT+2!
PSOX	PT+20*, EOJ+6!
PSOX1	LST1+1*, LISTX!
PSOX2	LST1+1*, LST1+2, LST1+3, LISTX!
PSPRXN	EOJ+2!
PSRX0	EOJ+5!
PSVD	LIST+2*, LIST+3, LISTX!
PTST	EOJ+2!
QTY	EOJ+5!
REA	EOJ+5!
REFL	EOJ+2!
RF	EOJ+2!
RFCNT	EOJ+5!
RFD	EOJ+2!
RFDT	EOJ+5!
RIFN	EOJ+2!
RLD	EOJ+2!
RN	EOJ+6!
RPH	EOJ+2!
RTS	EOJ+2!
RX0	PT+7*, EOJ+2!
RX1	EOJ+2!
RX2	PT+7*, EOJ+2!
RX3	PT+7*, EOJ+2!
RXDA	EOJ+5!
RXFL	EOJ+5!
RXM	PSORXEDT+9, PSORXEDT+10, PSORXEDT+11, BAD+6, BAD+7, BAD+8, EOJ+2!, LIST+2, LIST+3*, LIST+6
RXM1	LIST+3*!
RXN	BAD+8, BAD+9, EOJ+6!, LIST+1, LIST+2, LIST+3, LIST+6*, LIST+7, LIST+8, LST1 , LST1+2, LST1+3, LISTX!
RXN1	LIST+3*!, LIST+10!
RXOR	EOJ+2!
RXREF	EOJ+5!
RXRS	PRF+1!
SER	EOJ+6!
SERS	EOJ+6!
SIG	EOJ+2!
SIGOK	EOJ+2!
SLPPL	EOJ+3!
ST	EOJ+3!
STA	PT+22*, PT+23, EOJ+3!
SUB	EOJ+5!
SURX	EOJ+6!
TM	EPH+3!, BBG, NX+1!, PT+3, PT+18*
TM1	EPH+3!, BBG, NX+1!, PT+3, PT+18*
>> VADM(1	PT+10
>> VADM(2	PT+10
>> VADM(3	PT+11
>> VADM(4	PT+12
>> VADM(5	PT+12
VALMBCK	NX+2!, PT+13!
VALMSG	NX+2!
VM	PT+15!
WT	PT+14, PT+15!
X	PSORXEDT+5!, PSORXEDT+8, PSORXEDT+9*, PSORXEDT+10, BAD+4!, QUP, EOJ+5!
>> X1	QUP*
>> X2	QUP*
Y	PSORXEDT+5!, BAD!, BAD+4
Z	EOJ+5!
ZII	EOJ+5!
ZONE	EOJ+6!
>> ZTDESC	QUP+2*
>> ZTDTH	QUP+2*
>> ZTIO	QUP+2*
>> ZTRTN	QUP+2*
>> ZTSAVE(	QUP+3*
ZTSK	QUP+5!, NX+2!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSORXEDT

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
QUP
PRF
END
LST1
PT	;
BBG
EOJ	;
LIST	;
NX	;
BAD
EPH	; - Entry for Epharmacy Rx Edit (PSOREJP1)
LISTX