Routine: PSOORED1

Package	Total	Call Graph
Outpatient Pharmacy	17	REVERSE^PSOBPSU1 REF^PSOCAN2 RMP^PSOCAN3 (INDICAT,SIND,SINS)^PSODIR EN^PSOFSIG SIG^PSOHELP EXP^PSOHELP1 ($$INSCHK,DELINS)^PSOHELP3 EN^PSOHLSN1 DEL^PSONEW CHECK^PSONRXN DRG^PSOORDRG DOLST1^PSOORED3 DOSE1^PSOORED5 EN^PSOORNE1 CAN^PSOTPCAN ($$MAXNUMRF,$$PRVDETOX,$$RXDEA)^PSOUTIL
VA FileMan	6	NOW^%DTC ^DIE ^DIK $$GET1^DIQ ^DIR EN^DIWE
List Manager	1	PAUSE^VALM1
Pharmacy Data Management	1	$$DETOX^PSSOPKI

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOORCPY PSOOREDT

Name	Comments	DBIA/ICR reference
EN(PSORENW)	;
TRY
INS
INS1
INSX
INSQ	;
INSQX	;
INIT	;setup psorenw array
QTY
RFN
RF	;# of refills ; Retrieving the Maximum Number of Refills allowed
UPMI	;add dosing data for pre-poe rxs

Name	Field # of Occurrence
NOW^%DTC	TRY+19
^DIE	EN+13, TRY+9
^DIK	TRY+15, TRY+24
$$GET1^DIQ	INIT+28
^DIR	INS1+4, UPMI+2
EN^DIWE	INS+8
REVERSE^PSOBPSU1	TRY+2
REF^PSOCAN2	TRY+14
RMP^PSOCAN3	TRY+3
INDICAT^PSODIR	INSQ+4
SIND^PSODIR	INSQ+10
SINS^PSODIR	INSX+3
EN^PSOFSIG	INS1+5, INS1+6, INS1+12, INSX+4, INSQ+6
SIG^PSOHELP	INS1+10
EXP^PSOHELP1	TRY+23
$$INSCHK^PSOHELP3	INSX+6
DELINS^PSOHELP3	INS1+7
EN^PSOHLSN1	TRY+5
DEL^PSONEW	EN+5, EN+8
CHECK^PSONRXN	EN+7
DRG^PSOORDRG	RFN+14
DOLST1^PSOORED3	RFN+34
DOSE1^PSOORED5	UPMI+4
EN^PSOORNE1	EN+9
CAN^PSOTPCAN	TRY+2
$$MAXNUMRF^PSOUTIL	RF+2
$$PRVDETOX^PSOUTIL	INIT+31
$$RXDEA^PSOUTIL	INIT+14
$$DETOX^PSSOPKI	INIT+31
PAUSE^VALM1	EN+4, EN+5, EN+8

Name	Line Occurrences
Function Call: WRITE	Prompt: " ("_$E(INS1,2,9999999)_")" Line Location: INS1+11
Function Call: WRITE	Prompt: !! Line Location: UPMI+1
Routine Call	DIE Line Location: EN+13 TRY+9
Routine Call	DIR Line Location: INS1+4 UPMI+2

FileNo	Call Tags
^PSDRUG - [#50]	GET1^DIQ
^PS(52.4 - [#52.4]	Classic Fileman Calls
^PS(52.5 - [#52.5]	Classic Fileman Calls
^PS(59 - [#59]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DILOCKTM"	EN+11
^PS(50.7 - [#50.7]	INS1+2
^PS(52.4 - [#52.4]	TRY+24
^PS(52.5 - [#52.5]	TRY+11, TRY+12, TRY+13, TRY+14
^PS(53 - [#53]	RFN+12
^PS(55 - [#55]	INS1+5, INSX, INSX+4, INSQ+2, INSQ+7, RFN+11
^PS(59 - [#59]	EN+11, EN+13
^PSRX - [#52]	TRY, TRY+1, TRY+6, TRY+7, TRY+8, TRY+9, TRY+10, TRY+14, TRY+16, TRY+17 , TRY+18, TRY+19, TRY+20, TRY+21, TRY+22*, INS+1, INS+2, INS+3, INS+4, INS+5 , INS+6, INS+7, INS+10, INS1+1, INSX+2, INSQ+3, INSQ+8, INSQ+9, INIT+1, INIT+5 , INIT+8, RFN+32, RFN+33
^PSRX("AH"	TRY+9!
^PSRX("B"	EN+14
^SC - [#44]	RFN+10
^TMP($J	INS!, INS+6, INS+7, INS+8!, INS+9, RFN+28, RFN+30, RFN+31!
^VA(200 - [#200]	INIT+12, INIT+15, RFN+25

Name	Line Occurrences
@(	EN+3
INIT	EN+2
INS	INSX+7
INS1	INS+2, INS+4, INS1+10
INSQ	INS1+13, INSX, INSX+4
INSQX	INS1+5, INS1+6
INSX	INS+5
QTY	INIT+32
RF	RFN+15
UPMI	INS+1

Name	Field # of Occurrence
^("IND"	INIT+4
^("PS"	INIT+15
^("SIG"	INIT+5
^("STA"	TRY+8, INIT+1
^("TN"	INIT+1
^(2	INIT+1
^(3	INIT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	TRY+19
>> ACNT	TRY+17*, TRY+19, TRY+20, TRY+21, TRY+22
>> ACOM	TRY+6, TRY+9, TRY+13*, TRY+19
>> CLOZPAT	INIT+33, RFN, RF+2
COMM	TRY+5*!
>> COPY	EN+16, INIT+17, RFN+26
D	INS+10, INIT+8, INIT+9!
>> DA	EN+10, TRY, TRY+1, TRY+2, TRY+5, TRY+7, TRY+8, TRY+9, TRY+10, TRY+11* , TRY+12, TRY+13, TRY+14, TRY+15, TRY+16, TRY+17, TRY+18, TRY+19, TRY+20, TRY+21 , TRY+22, TRY+24
DD	INS+3!*, INS+4!, RFN+29!
DIC	INS!, INS+8*, INS1!, INSQX+1!
DIE	EN+10, EN+13!, TRY+9
DIK	TRY+15!, TRY+24!
DIR	INS!, INS1!, INSX+1!, INSQX+1!, UPMI+1!, UPMI+2!
DIR("?"	INS1+4*
DIR("A"	UPMI+1*
DIR("B"	INS1+3, UPMI+1
DIR(0	INS1+4, UPMI+1
DIRUT	INS!, INS1!, INSQX+1!, UPMI+1!, UPMI+2!
>> DR	EN+12, TRY+9
>> DREN	RFN+14*
DT	TRY+1, RFN+1, RFN+8
DTOUT	INS!, INS1!, INS1+5, INSQ+5, INSQX+1!, UPMI+1!
DUOT	UPMI+2!
DUOUT	INS!, INS1!, INS1+5, INSQ+5, INSQX+1!, UPMI+1!, UPMI+2!
DUZ	TRY+19, RFN+24, RFN+25
>> DWLW	INS+8*
DWPK	INS+8*, INSQX+1!
EDTHLD	UPMI+3*, UPMI+4!
GG	INS+3!
>> I	INS+3, INS+6, INIT+8, RFN+27, RFN+30*
>> INS1	INS1+8, INS1+9, INS1+11, INS1+12
INSDEL	INS!, INS+9*
LST	EN+1~
>> OLENT	RFN+34
ORD	EN+1~
ORN	EN+1~
PHARM	TRY+5*!
POERR	RFN+14*!
PSCDA	TRY+24*!
>> PSDAYS	RFN+13*, RF+2
>> PSOAC	EN+1*
PSODELINS	INS1+7*, INS1+8, INS1+9, INS1+13, INSQX+1!
>> PSODFN	TRY+16*, INS1+5, INSX, INSX+4, INSQ+2, INSQ+7
>> PSODRUG("DEA"	RFN+21
>> PSODRUG("IEN"	INIT+26, INIT+28, RFN+14, RF+2
>> PSODRUG("OI"	INS1+2
>> PSOEDIT	INIT+17
>> PSOID	RFN+1, RFN+6
>> PSOINSCH	INSX+6*, INSX+7
>> PSOMRFLG	TRY+20, TRY+21, TRY+22
>> PSOMTFLG	INIT+20, RFN+4, RFN+18
>> PSONEW	INS1+6
>> PSONEW("DFLG"	EN+6, EN+8, UPMI+1!, UPMI+4
>> PSONEW("OLD L	AST RX#" , EN+10
>> PSONEW("QFLG"	EN+4!, EN+6, EN+8
>> PSONEW("RX #"	, EN+4, EN+5, EN+6, EN+14
>> PSONOOR	TRY+5
PSOOEINS	INS1+1*, INS1+5, INS1+6, INS1+8, INSX+4, INSQX+1!
>> PSOOIFLG	TRY+20, TRY+21, TRY+22
PSOOSINS	INS1+1*, INS1+5, INS1+6, INSX+4, INSQX+1!
>> PSOPAR	EN+3, EN+4, EN+6, EN+9
PSORENW	EN~, EN+8!, EN+9, RFN+34
PSORENW("# OF	REFILLS" , RFN, RFN+15, RFN+18, RF+2*
PSORENW("CLER	K CODE" , RFN+24*
PSORENW("CLINIC"	INIT+16*, RFN+10
PSORENW("COPIES"	RFN+23*
PSORENW("COSI	GNING PROVIDER" , INIT+15*
PSORENW("COSIGNER"	INIT+22*, INIT+23!
PSORENW("DAYS	SUPPLY" , INIT+28, INIT+32, INIT+33, RFN+13
PSORENW("DEA"	INIT+14*
PSORENW("DETX"	INIT+31*
PSORENW("DOSE"	RFN+27
PSORENW("DRUG	IEN" , INIT+26*, INIT+31
PSORENW("ENT"	RFN+26, RFN+27!, RFN+34*
PSORENW("FILL	DATE" , RFN+1, RFN+8
PSORENW("IND"	INIT+4*
PSORENW("INDF"	INIT+4*
PSORENW("INS"	RFN+32*
PSORENW("IRXN"	TRY+6, INIT+1, INIT+5, INIT+8, INIT+10, INIT+14, RFN+32, RFN+33
PSORENW("ISSU	E DATE" , RFN+1, RFN+6
PSORENW("MAIL/WINDOW"	RFN+20, RFN+21, RFN+22
PSORENW("OIRXN"	TRY, INIT+10*
PSORENW("ORX	#" , INIT+25*
PSORENW("PATI	ENT STATUS" , RFN+11*, RFN+12, RF+2
PSORENW("PROV	IDER NAME" , INIT+12*
PSORENW("PROVIDER"	INIT+11*, INIT+12, INIT+15, INIT+31
PSORENW("PSODFN"	INIT+24*, RFN+11
PSORENW("PTST	NODE" , RFN+12*, RFN+13
PSORENW("QTY"	QTY*
PSORENW("REMARKS"	INIT+17, INIT+20
PSORENW("RX #	" , EN+6*, EN+7
PSORENW("RX0"	INIT+1*, INIT+11, INIT+16, INIT+17, INIT+20, INIT+24, INIT+25, INIT+28, INIT+33, QTY , RFN, RFN+6, RFN+11, RFN+13, RFN+20, RFN+23
PSORENW("RX2"	INIT+1*
PSORENW("RX3"	INIT+1*, INIT+22, RFN+8
PSORENW("SIG"	INIT+2, INIT+5, RFN+30*
PSORENW("SINS"	RFN+33*
PSORENW("STA"	INIT+1*
PSORENW("TN"	INIT+1*
>> PSORX("CLERK	CODE" , RFN+25*
>> PSORX("CLINIC"	RFN+10*
>> PSORX("DFLG"	EN+1*
>> PSORX("EDIT"	UPMI+3!, UPMI+4*
>> PSORX("FN"	EN+1!, EN+9
>> PSORX("MAIL/WINDOW"	RFN+22*
>> PSORX("PROVID	ER NAME" , INIT+12*
>> PSORX("QFLG"	EN+1*
>> PSORX("SIG"	INIT+2
>> PSORXED	INS1+5, INS1+12, INSX+3, INSX+4, INSX+6, INSQ+4, INSQ+6, INSQ+10, UPMI+4*
>> PSORXED("DEACOPY"	INIT+14
>> PSORXED("DFLG"	INS1+6, INSX+4
>> PSORXED("DOSE"	INS+1
>> PSORXED("FLD"	INS+2, INS+4, INS1+2, INS1+3, INS1+5!, INS1+9, INS1+12, INSX+4!, INSX+5, INSQ+3* , INSQ+5!, INSQ+8, INSQ+9
>> PSORXED("IND"	INSQ+3, INSQ+8
>> PSORXED("INDF"	INSQ+3, INSQ+8
>> PSORXED("INDO"	INSQ+9*
>> PSORXED("INS"	INS+10, INS1+5, INS1+6, INS1+8, INS1+9!, INS1+12, INSX+4
>> PSORXED("IRXN"	INS+1, INS+2, INS+3, INS+4, INS+5, INS+6, INS+7, INS+10, INS1+1, INSX+2 , INSQ+3, INSQ+8, INSQ+9
>> PSORXED("SIG"	INS+10, INS1+5, INS1+6!, INS1+9!, INS1+12, RFN+29!
>> PSORXED("SINS"	INS1+5, INS1+6, INS1+9!, INSX+2, INSX+4, INSX+5
>> PSOSIGFL	INIT+2, RFN+34
>> PSOSITE	EN+10, EN+11, EN+13
PSOX	EN+7, EN+10, EN+12, EN+13, EN+15!
PSOX1	INIT+9!
PSOY	EN+10*, EN+11, EN+12, EN+13, EN+15!
QUIT	INS!, INS+1, UPMI+2, UPMI+4
>> REA	TRY+23*
>> RF	TRY+18*
>> RFCNT	TRY+18*, TRY+19
>> RXDA	TRY+11*, TRY+14, TRY+16
>> RXREF	TRY+16*
>> SIG(	INIT+8*
>> SIG(0	INIT+7
>> SIGOK	INIT+2, INIT+7
STAT	TRY+5*!
>> SUB	TRY+17*
SUSD	TRY+12*, TRY+16!
SUSDA	TRY+11*, TRY+14, TRY+15, TRY+16!
UPMI	INS!, INS+2!, INS+4!, INS1+2!, UPMI+3*
VALMBCK	EN+1!, EN+4, EN+5, EN+8, EN+9
VALMSG	EN+4!, EN+5!
X	EN+13!, INS!, INS+8, INS1!, INS1+7, INS1+8*, INS1+10, INSQX+1!
Y	EN+13!, INS!, INS1!, INSQX+1!, RFN+1*, UPMI+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOORED1

Information

Source Information

Call Graph

Call Graph Total: 25

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: