Routine: PSOORED2

Package	Total	Call Graph
Outpatient Pharmacy	16	(ECMESND,REVERSE)^PSOBPSU1 RXACT^PSOBPSU2 CLRSHD^PSOBPSU4 ($$RXSITE,$$STATUS,$$SUBMIT)^PSOBPSUT EXPDT^PSOCLO1 (EDTDAW,SAVDAW)^PSODAWUT NDC^PSODRG EN^PSOFSIG ($$GETNDC,SAVNDC)^PSONDCUT ^PSOORED3 DOSE^PSOORED5 (PRK,UNPARK)^PSOPRK $$PSOET^PSOREJP3 $$HDLG^PSOREJU1 $$FIND^PSOREJUT (CID,CIDH)^PSOUTL
VA FileMan	5	^%DT NOW^%DTC ^DIE ($$GET1,GETS)^DIQ ^DIR
E Claims Management Engine	2	$$DIVNCPDP^BPSBUTL $$ECMEON^BPSUTIL
Inpatient Medications	1	$$ISCLOZ^PSJCLOZ
List Manager	1	PAUSE^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOORED7 PSOOREDT

Name	Field # of Occurrence
^%DT	ISDT+2
NOW^%DTC	RFX+19
$$DIVNCPDP^BPSBUTL	CHANGED+8
$$ECMEON^BPSUTIL	RFE+19
^DIE	RFX+9, RFX+24, DIE
$$GET1^DIQ	RFX+8, RFX+12
GETS^DIQ	RFX+2, CHANGED+6
^DIR	FLDT+4, REF+4, SRF+10
$$ISCLOZ^PSJCLOZ	ISDT+7
ECMESND^PSOBPSU1	RFE+24
REVERSE^PSOBPSU1	RFX+22, RFE+20
RXACT^PSOBPSU2	RFE+13
CLRSHD^PSOBPSU4	RFX+12
$$RXSITE^PSOBPSUT	RFE+19
$$STATUS^PSOBPSUT	RFX+4, RFE+2, RFE+23
$$SUBMIT^PSOBPSUT	RFE+21
EXPDT^PSOCLO1	ISDT+7
EDTDAW^PSODAWUT	RFE+3
SAVDAW^PSODAWUT	RFE+5
NDC^PSODRG	RFE+11
EN^PSOFSIG	UPD1+17, UPD2+18
$$GETNDC^PSONDCUT	RFE+10, RFE+12, RFE+13, RFE+24
SAVNDC^PSONDCUT	RFE+14
^PSOORED3	EDTDOSE+3
DOSE^PSOORED5	EDTDOSE+2
PRK^PSOPRK	RFX+30
UNPARK^PSOPRK	RFX+29
$$PSOET^PSOREJP3	RFE+26
$$HDLG^PSOREJU1	RFE+28
$$FIND^PSOREJUT	RFE+28
CID^PSOUTL	ISDT+2
CIDH^PSOUTL	ISDT+4
PAUSE^VALM1	ISDT, FLDT

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Released by CMOP. No editing allowed on Issue Date." Line Location: ISDT+0
Function Call: WRITE	Prompt: ! Line Location: ISDT+4
Function Call: WRITE	Prompt: ! Line Location: ISDT+4
Function Call: WRITE	Prompt: !,"Released by CMOP. No editing allowed on Fill Date." Line Location: FLDT+0
Function Call: WRITE	Prompt: ! Line Location: REF+3
Function Call: WRITE	Prompt: !!,"# Log Date Refill Date Qty Routing Lot # Pharmacist",! Line Location: SRF+0
Function Call: WRITE	Prompt: "=" Line Location: SRF+0
Function Call: WRITE	Prompt: !,"Division: "_PSDIV_$E(" ",$L(PSDIV)+1,8)_" " Line Location: SRF+5
Function Call: WRITE	Prompt: ! Line Location: SRF+10
Function Call: WRITE	Prompt: !,$C(7),"Invalid selection.",! Line Location: RFM+0
Routine Call	DIE Line Location: RFX+9 RFX+24 DIE
Routine Call	DIR Line Location: FLDT+4 REF+4 SRF+10

FileNo	Call Tags
52.1	GET1^DIQ, GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	ISDT+2, FLDT+1
^PS(52.5 - [#52.5]	CHK1+1
^PS(59 - [#59]	SRF+5
^PSRX - [#52]	ISDT+2, FLDT+1, CHK+1, CHK1, CHK1+3, REF+1, SRF+1, RFM, RFM+1, RFM+2 , RFX+3, RFX+14, RFX+17, RFX+18, RFX+20, RFX+23, RFX+25, RFE, EDTDOSE+2
^PSRX("AR"	CHK, CHK+1, RFM+1
^VA(200 - [#200]	SRF+4

Name	Line Occurrences
$$CHANGED	RFE+17
CHK	ISDT, FLDT
DAT	SRF+2
ISDT	ISDT+4, ISDT+5
KV	ISDT+9, FLDT+1, FLDT+5, REF+3, REF+4, SRF+10
RFD	RFX+22
RFE	RFX+4
RFM	SRF+9
RFX	RFM+1
SRF	RFM
UPD1	UPD1+1, UPD2+1

Name	Field # of Occurrence
^(	SRF+1
^(0	CHK1+1, CHK1+3, SRF+4, SRF+5, RFM+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	RFX+19
%DT	ISDT+2*!, ISDT+9!
%DT("A"	ISDT+2*
%DT("B"	ISDT+2*
%DT(0	ISDT+2*
CHANGED	RFX~, RFE+17, RFE+18, RFE+19, RFE+23, RFE+24, CHANGED+5~, CHANGED+6, CHANGED+7, CHANGED+8 , CHANGED+9
CHGNDC	RFX~, RFE+13*, RFE+24
>> CLOZPAT	ISDT+7
CMRL	ISDT!, FLDT!, CHK, CHK+1, CHK1, CHK1+1, CHK1+2, CHK1+3, RFM+1, RFM+2* , RFX+1, RFX+22!, RFX+24, RFE+29!
DA	ISDT+2, FLDT+1, REF+3!, RFX+1, RFX+2, RFX+3, RFX+5, RFX+15~, RFX+16, RFX+17 , RFX+18, RFX+20, RFX+22, RFX+28, RFX+29!, RFX+30!, RFE+29!
DA(1	SRF+9*, RFX+1, RFX+2, RFX+3
>> DAT	SRF+2, SRF+3, DAT*
DAW	RFX~, RFE+3, RFE+4*, RFE+5
>> DI	RFX+22
DIE	RFX+1, RFX+28, RFX+29, RFX+30, RFE+29!, DIE, DIE+1!
DIR	KV!
DIR("?"	FLDT+3, FLDT+4
DIR("A"	FLDT+1, REF+3, SRF+10*
DIR("B"	FLDT+1, REF+3
DIR(0	FLDT+2, REF+3, SRF+10*
DIRUT	FLDT+5, KV!, SRF+10
DR	REF+3!, RFX+1, RFX+21!, RFX+24, RFE+29!, DIE+1!
DTOUT	ISDT+2!, KV!
>> DTT	SRF+2, DAT
DUOUT	ISDT+2!, KV!
DUZ	RFX+20
>> ENT	UPD+1
FDA	RFX+15~, RFX+17*
FEV	CHK1+3, RFM+2, RFX+21!
>> FLD	RFX+28, RFX+29, RFX+30
FLDPRE	RFX~, RFX+8*, RFX+12
FLDS	RFX~, RFE+17
HENT	UPD+1, UPD1, UPD1+1, UPD1+2, UPD1+3, UPD1+4, UPD1+5, UPD1+6, UPD1+7, UPD1+8 , UPD1+9, UPD1+10, UPD1+11, UPD1+12, UPD1+13, UPD1+14, UPD1+15, UPD1+16, UPD1+17!, UPD2 , UPD2+1, UPD2+2, UPD2+3, UPD2+4, UPD2+5, UPD2+6, UPD2+7, UPD2+8, UPD2+9, UPD2+10 , UPD2+11, UPD2+12, UPD2+13*, UPD2+14, UPD2+15, UPD2+16, UPD2+18!
I	SRF, CHANGED+7, RFD+1~, RFD+2, RFD+6, UPD2+17*
IR	RFX+15~, RFX+17, RFX+18, RFX+20
J	RFD+1~, RFD+3*
K	RFD+1~, RFD+2, RFD+4, RFD+6
>> LOG	SRF+2*, SRF+3
>> N	REF+1, SRF+1, SRF+3
NDC	RFX~, RFE+10*, RFE+11, RFE+12, RFE+13, RFE+14
NOW	RFX+15~, RFX+19*, RFX+20
>> P1	SRF+1*, SRF+2, SRF+3, SRF+4, SRF+5, SRF+6, SRF+7, SRF+8
>> PREVMWP	RFX+23*, RFX+26, RFX+27
PRIOR	CHANGED~
PRIOR(	CHANGED+7, CHANGED+8
>> PRKMW	RFX+25*, RFX+26, RFX+27
>> PSDA	RFX+29*
>> PSDIV	SRF+5*
>> PSODRUG("IEN"	ISDT+7
PSOEDDOS	EDTDOSE+1*, EDTDOSE+4!
>> PSOFRPK	RFX+27*, RFX+28, RFX+29
PSORFILL	RFX+5~*, RFX+8, RFX+12, RFX+14, RFX+20, RFX+23, RFX+25
>> PSORX("PSOL"	RFX+22, RFD+1, RFD+6*!
>> PSORXED	ISDT+7, UPD1+17, UPD2+18
>> PSORXED("CONJUNCTION"	UPD1!, UPD1+1, UPD1+2!, UPD1+9, UPD1+14, UPD1+15!, UPD2!, UPD2+1, UPD2+2!, UPD2+9 , UPD2+14
>> PSORXED("DFLG"	DIE*
>> PSORXED("DOSE	ORDERED" , UPD1+5, UPD1+15!, UPD2+4, UPD2+15!
>> PSORXED("DOSE"	UPD1, UPD1+3, UPD1+4, UPD1+15!, UPD2, UPD2+2, UPD2+3, UPD2+15!, UPD2+17
>> PSORXED("DURATION"	UPD1+8, UPD1+15!, UPD2+8, UPD2+15!
>> PSORXED("ENT"	UPD1+17, UPD2+18
>> PSORXED("FLD"	ISDT+5, FLDT+5!, FLDT+6
>> PSORXED("IRXN"	CHK, CHK+1, CHK1, CHK1+1, CHK1+3, REF+1, SRF+1, SRF+9, RFM, RFM+1 , RFM+2, RFX+4, RFX+8, RFX+12, RFX+14, RFX+16, RFX+22, RFX+23, RFX+25, RFX+29 , RFX+30, RFE, RFE+2, RFE+3, RFE+5, RFE+10, RFE+11, RFE+12, RFE+13, RFE+14 , RFE+17, RFE+19, RFE+20, RFE+21, RFE+22, RFD+2, RFD+4, EDTDOSE+2
>> PSORXED("NOUN"	UPD1+7, UPD1+15!, UPD2+6, UPD2+15!
>> PSORXED("ODOSE"	UPD1+12, UPD1+16!, UPD2+12, UPD2+16!
>> PSORXED("ROUTE"	UPD1+10, UPD1+15!, UPD2+10, UPD2+15!
>> PSORXED("RX1"	RFX+3*
>> PSORXED("RX2"	FLDT+2, CHK
>> PSORXED("SCHEDULE"	UPD1+11, UPD1+15!, UPD2+11, UPD2+15!
>> PSORXED("UNITS"	UPD1+6, UPD1+15!, UPD2+5, UPD2+15!
>> PSORXED("VERB"	UPD1+16!, UPD2+7*, UPD2+15!
>> PSOSFN	RFX+14
>> PSOTOPK	RFX+26*, RFX+28, RFX+30
PSOX2	RFD+1~, RFD+2*, RFD+3
PSOX3	RFD+1~, RFD+3*, RFD+4, RFD+5
PSOX9	RFD+1~, RFD+2, RFD+5, RFD+6
>> PSOZ1("PSOL"	RFD+1*, RFD+2, RFD+7!
QUIT	RFX~, RFX+4, RFX+10, RFX+24*, RFE+2, RFE+9
RF	ISDT!, FLDT!, CHK+1*
RFED	RFX+3*, RFX+22!
RFL	RFX~, RFX+3*, RFX+4, RFX+22, RFE, RFE+2, RFE+3, RFE+5, RFE+10, RFE+11 , RFE+12, RFE+13, RFE+14, RFE+17, RFE+19, RFE+20, RFE+21, RFE+23, RFE+24, RFE+26 , RFE+28, CHANGED~, CHANGED+6, CHANGED+7, CHANGED+8
RFM	REF+1*, SRF+9, SRF+10, RFX+21!
RFN	REF+1*, REF+3, SRF+9, RFX+21!
>> RN	SRF+2*, SRF+3
>> RTS	SRF+7*, SRF+8
RX	RFE+22~*, RFE+23, RFE+24, RFE+26, RFE+28, CHANGED~, CHANGED+6, CHANGED+7, CHANGED+8
>> RX0	ISDT+2, FLDT+2
SAVDA	RFX+28!*, RFX+29, RFX+30
>> SAVDIE	RFX+28*, RFX+29, RFX+30
SAVED	CHANGED+5~
SAVED(	CHANGED+7, CHANGED+8
>> SAVFLD	RFX+28*, RFX+29, RFX+30
SENT	UPD1+17!, UPD2+17*, UPD2+18!
>> ST	RFX+4
>> SURX	CHK1+1*
X	ISDT+2!, ISDT+9!, FLDT+5!, FLDT+7!, RFX+21!, RFE+26, RFE+28, DIE+1!
Y	ISDT+2!, ISDT+4, ISDT+5, ISDT+9!, FLDT+1, FLDT+5!, FLDT+6, FLDT+7!, REF+4, SRF+9* , RFM, RFM+1, RFM+2, RFX+1, RFX+10, RFX+21!, RFX+24, RFX+29!, RFX+30!, DIE , DIE+1!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOORED2

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:

Name	Comments	DBIA/ICR reference
ISDT
FLDT
KV
CHK
CHK1
REF	;shows refill info
SRF
RFM
RFX
RFE
CHANGED(RX,RFL,PRIOR)	; - Check if fields have changed and should for 3rd Party Claim resubmission
DAT
DIE
RFD	;check for deleted refill
EDTDOSE	;edit med instructions fields
UPD	;updates dosing array
UPD1
UPD2