Routine: PSOORED1

Package	Total	Call Graph
Outpatient Pharmacy	15	REVERSE^PSOBPSU1 REF^PSOCAN2 RMP^PSOCAN3 SINS^PSODIR EN^PSOFSIG SIG^PSOHELP EXP^PSOHELP1 EN^PSOHLSN1 DEL^PSONEW CHECK^PSONRXN DRG^PSOORDRG DOLST1^PSOORED3 DOSE1^PSOORED5 EN^PSOORNE1 CAN^PSOTPCAN
VA Fileman	5	NOW^%DTC ^DIE ^DIK ^DIR EN^DIWE
IHS Changes To Pharmacy	2	$$POS^APSPFUNC $$AWP^APSQDAWP
Registration	1	PAUSE^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOORCPY PSOOREDT

Entry Points

Name	Comments	DBIA/ICR reference
UPMI	;add dosing data for pre-poe rxs
EN(PSORENW)	;
INS
TRY
INS1
INIT	;setup psorenw array
RF	;# of refills ; Changed default refill from 11 to 15
INSX
QTY
RFN

External References

Name	Field # of Occurrence
NOW^%DTC	TRY+21
$$POS^APSPFUNC	TRY+7
$$AWP^APSQDAWP	RFN+25
^DIE	EN+13, TRY+11
^DIK	TRY+17, TRY+26
^DIR	INS1+3, UPMI+2
EN^DIWE	INS+8
REVERSE^PSOBPSU1	TRY+2
REF^PSOCAN2	TRY+16
RMP^PSOCAN3	TRY+3
SINS^PSODIR	INSX+2
EN^PSOFSIG	INS1+9
SIG^PSOHELP	INS1+5
EXP^PSOHELP1	TRY+25
EN^PSOHLSN1	TRY+5
DEL^PSONEW	EN+5, EN+8
CHECK^PSONRXN	EN+7
DRG^PSOORDRG	RFN+6
DOLST1^PSOORED3	RFN+21
DOSE1^PSOORED5	UPMI+4
EN^PSOORNE1	EN+9
CAN^PSOTPCAN	TRY+2
PAUSE^VALM1	EN+4, EN+5, EN+8

Interaction Calls

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

Name	Line Occurrences
@(	EN+3
INIT	EN+2
INS1	INS+2, INS+4, INS1+5
INSX	INS+5, INS1+4, INS1+8
QTY	INIT+20
RF	RFN+7
UPMI	INS+1

Naked Globals

Name	Field # of Occurrence
^("PS"	INIT+12
^("SIG"	INIT+4
^("STA"	TRY+10, 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+21
>> ACNT	TRY+19*, TRY+21, TRY+22, TRY+23, TRY+24
>> ACOM	TRY+8, TRY+11, TRY+15*, TRY+21
>> CLOZPAT	INIT+21, RFN
COMM	TRY+5*!
>> COPY	EN+16, INIT+14, RFN+13
CS	RF+4*, RF+5, RF+14!
D	INS+10, INIT+7, INIT+8!
>> DA	EN+10, TRY, TRY+1, TRY+2, TRY+5, TRY+7, 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+23, TRY+24, TRY+26*
DD	INS+3!*, INS+4!, RFN+16!
>> DEA	RF+4*
DIC	INS!, INS+8*, INS1!, INSX+4!
DIE	EN+10, EN+13!, TRY+11
DIK	TRY+17!, TRY+26!
DIR	INS!, INS1!, INSX!, INSX+4!, UPMI+1!, UPMI+2!
DIR("?"	INS1+3*
DIR("A"	UPMI+1*
DIR("B"	INS1+2, UPMI+1
DIR(0	INS1+3, UPMI+1
DIRUT	INS!, INS1!, INSX+4!, UPMI+1!, UPMI+2!
>> DR	EN+12, TRY+11
>> DREN	RFN+6*
DT	TRY+1, RFN+1
DTOUT	INS!, INS1!, INS1+4, INSX+4!, UPMI+1!
DUOT	UPMI+2!
DUOUT	INS!, INS1!, INS1+4, INSX+4!, UPMI+1!, UPMI+2!
DUZ	TRY+21, RFN+11, RFN+12
>> DWLW	INS+8*
DWPK	INS+8*, INSX+4!
EDTHLD	UPMI+3*, UPMI+4!
GG	INS+3!
>> I	INS+3, INS+6, INIT+7, RFN+14, RFN+17*
>> INS1	INS1+7, INS1+9
INSDEL	INS!, INS+9*
LST	EN+1~
>> OLENT	RFN+21
ORD	EN+1~
ORN	EN+1~
PHARM	TRY+5*!
POERR	RFN+6*!
PSCDA	TRY+26*!
PSDAYS	RFN+5*, RF+7, RF+9, RF+12, RF+14!
PSDY	RF+14!
PSDY1	RF+7, RF+12, RF+14!
>> PSOAC	EN+1*
>> PSODFN	TRY+18*, INSX
>> PSODRUG("DEA"	RF+4, RF+13
>> PSODRUG("IEN"	INIT+19, RFN+6, RFN+25
>> PSODRUG("OI"	INS1+1
>> PSOEDIT	INIT+14
>> PSOID	RFN+1*
>> PSOMRFLG	TRY+22, TRY+23, TRY+24
>> 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
>> PSOOIFLG	TRY+22, TRY+23, TRY+24
>> PSOPAR	EN+3, EN+4, EN+6, EN+9
PSORENW	EN~, EN+8!, EN+9, RFN+21
PSORENW("# OF	REFILLS" , RFN, RFN+7, RF+7, RF+12, RF+13
PSORENW("AWP"	RFN+25*
PSORENW("BST"	RFN+26*
PSORENW("CLER	K CODE" , RFN+11*
PSORENW("CLINIC"	INIT+13*, RFN+2
PSORENW("CM"	RFN+27*
PSORENW("COPIES"	RFN+10*
PSORENW("COSI	GNING PROVIDER" , INIT+12*
PSORENW("COSIGNER"	INIT+15*, INIT+16!
PSORENW("DAYS	SUPPLY" , INIT+20, INIT+21*, RFN+5
PSORENW("DOSE"	RFN+14
PSORENW("DRUG	IEN" , INIT+19*
PSORENW("ENT"	RFN+13, RFN+14!, RFN+21*
PSORENW("FILL	DATE" , RFN+1*
PSORENW("INS"	RFN+19*
PSORENW("IRXN"	TRY+8, INIT+1, INIT+4, INIT+7, INIT+9, RFN+19, RFN+20, RFN+24, RFN+26, RFN+27
PSORENW("ISSU	E DATE" , RFN+1*
PSORENW("MAIL/WINDOW"	RFN+8*, RFN+9
PSORENW("OIRXN"	TRY, TRY+6, INIT+9*
PSORENW("ORX	#" , INIT+18*
PSORENW("PATI	ENT STATUS" , RFN+3*, RFN+4
PSORENW("PROV	IDER NAME" , INIT+11*
PSORENW("PROVIDER"	INIT+10*, INIT+11, INIT+12
PSORENW("PSODFN"	INIT+17*, RFN+3
PSORENW("PTST	NODE" , RFN+4*, RFN+5, RF+3
PSORENW("QTY"	QTY*
PSORENW("REMARKS"	INIT+14*
PSORENW("RX #	" , EN+6*, EN+7
PSORENW("RX0"	INIT+1*, INIT+10, INIT+13, INIT+14, INIT+17, INIT+18, INIT+21, QTY, RFN, RFN+3 , RFN+5, RFN+8, RFN+10
PSORENW("RX2"	INIT+1*, RFN+25
PSORENW("RX3"	INIT+1*, INIT+15
PSORENW("SIG"	INIT+2, INIT+4, RFN+17*
PSORENW("SINS"	RFN+20*
PSORENW("STA"	INIT+1*
PSORENW("TN"	INIT+1*
>> PSORX("CLERK	CODE" , RFN+12*
>> PSORX("CLINIC"	RFN+2*
>> PSORX("DFLG"	EN+1*
>> PSORX("EDIT"	UPMI+3!, UPMI+4*
>> PSORX("FN"	EN+1!, EN+9
>> PSORX("MAIL/WINDOW"	RFN+9*
>> PSORX("PROVID	ER NAME" , INIT+11*
>> PSORX("QFLG"	EN+1*
>> PSORX("SIG"	INIT+2
>> PSORXED	INS1+9, INSX+2, UPMI+4*
>> PSORXED("DOSE"	INS+1
>> PSORXED("FLD"	INS+2, INS+4, INS1+1, INS1+2, INS1+4!, INS1+6, INSX+3*
>> PSORXED("INS"	INS1+9*
>> PSORXED("IRXN"	INS+1, INS+2, INS+3, INS+4, INS+5, INS+6, INS+7, INS+10, INSX+1, INSX+2
>> PSORXED("SIG"	INS+10, INS1+9, RFN+16!
>> PSORXED("SINS"	INSX+1*, INSX+2, INSX+3
>> PSOSIGFL	INIT+2, RFN+21
>> PSOSITE	EN+10, EN+11, EN+13
PSOX	EN+7, EN+10, EN+12, EN+13, EN+15!, RF+6, RF+7, RF+9*, RF+12, RF+14!
PSOX1	INIT+8!, RF+6, RF+9, RF+14!
PSOY	EN+10*, EN+11, EN+12, EN+13, EN+15!
PTRF	RF+3*, RF+6, RF+9, RF+14!
QUIT	INS!, INS+1, UPMI+2, UPMI+4
>> REA	TRY+25*
>> RF	TRY+20*
>> RFCNT	TRY+20*, TRY+21
>> RXDA	TRY+13*, TRY+16, TRY+18
>> RXREF	TRY+18*
>> SIG(	INIT+7*
>> SIG(0	INIT+6
>> SIGOK	INIT+2, INIT+6
STAT	TRY+5*!
>> SUB	TRY+19*
SUSD	TRY+14*, TRY+18!
SUSDA	TRY+13*, TRY+16, TRY+17, TRY+18!
TALK	RFN+23~, RFN+25
U	RFN+25, RFN+26, RFN+27
UPMI	INS!, INS+2!, INS+4!, INS1+1!, 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+4, INS1+5, INS1+6, INS1+8, INSX+4!
Y	EN+13!, INS!, INS1!, INSX+4!, RFN+1*, UPMI+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOORED1

Information

Source Information

Call Graph

Call Graph Total: 23

Caller Graph

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: