Routine: PSOQ0496

Information

PSOQ0496 ;BHAM ISC/SAB - returns patient's outpatient meds ; 30 Nov 2007 7:53 AM

Package	Total	Call Graph
Inpatient Medications	2	OCL^PSJORRE OEL^PSJORRE1
Outpatient Pharmacy	2	EN^PSOHLUP (END,MDR,NVA,PEN,SIG,SIG1)^PSOORRL1
VA FileMan	2	C^%DTC ^DIC

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Text Integration Utility	1	TIULMED

Entry Points

Name	Comments	DBIA/ICR reference
OCL(DFN,BDT,EDT)	;entry point to return condensed list	ICR #5197 Status: Active Usage: Private
OEL(DFN,RXNUM)	;returns expanded list on specific order
WAIT	; IF PENDING ENTRY STILL BEING BUILT SEE IF IT COMPLETES WITHIN ANOTHER SECOND
NVA	; Set Non-VA Med Orders in the ^TMP Global
TMPBLD

External References

Name	Field # of Occurrence
C^%DTC	OCL+4
^DIC	OCL+11, OEL+19
OCL^PSJORRE	OCL+38
OEL^PSJORRE1	OEL+1
EN^PSOHLUP	OCL+3, OEL+2
END^PSOORRL1	OCL+38
MDR^PSOORRL1	OEL+29
NVA^PSOORRL1	OEL+7
PEN^PSOORRL1	OEL+6
SIG^PSOORRL1	OEL+30
SIG1^PSOORRL1	OCL+22

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.606 - [#50.606]	OCL+31, NVA+9
^PS(50.7 - [#50.7]	OCL+31, NVA+9
^PS(51.2 - [#51.2]	OCL+18, OCL+19, OCL+20
^PS(52.41 - [#52.41]	OCL+27, OCL+34, OCL+35, OCL+36, WAIT+1
^PS(55 - [#55]	OCL+3, OCL+6, OEL+2, NVA+7
^PSDRUG - [#50]	OCL+10, OCL+31, OEL+18, OEL+24, OEL+25, NVA+9
^PSRX - [#52]	OCL+6, OCL+7, OCL+8, OCL+9, OCL+10, OCL+16, OCL+17, OCL+18, OCL+19, OCL+20 , OCL+22, OCL+24, OCL+25, OEL+8, OEL+9, OEL+10, OEL+11, OEL+12, OEL+13, OEL+15 , OEL+16, OEL+22, OEL+27, OEL+30, OEL+32, OEL+33, OEL+36
^TMP("PS"	OCL+4!, OCL+10, OCL+11, OCL+14, OCL+15, OCL+16, OCL+17, OCL+19, OCL+20, OCL+21* , OCL+24, OCL+25, OCL+31, OCL+32, OCL+33, OCL+34, OCL+35, OCL+36, OCL+37, OEL+5! , OEL+10, OEL+12, OEL+13, OEL+14, OEL+16, OEL+17, OEL+18, OEL+19, OEL+22, OEL+23* , OEL+25, OEL+26, OEL+27, OEL+28, OEL+32, OEL+33, OEL+35, OEL+36, TMPBLD, TMPBLD+1 , TMPBLD+2, TMPBLD+3

Label References

Name	Line Occurrences
NVA	OCL+38
TMPBLD	NVA+10, NVA+16, NVA+22, NVA+29
WAIT	OCL+27, OCL+29

Naked Globals

Name	Field # of Occurrence
^("STA"	OCL+8, OEL+9
^(0	OCL+9, OCL+20, OEL+12, OEL+16
^(2	OCL+8, OEL+9
^(3	OCL+8, OEL+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BDT	OCL~, OCL+4, OCL+38, OCL+39!, NVA+4~, NVA+5*, NVA+13, NVA+15, NVA+18, NVA+25
>> BDT1	NVA+18, NVA+19, NVA+21, NVA+25, NVA+26, NVA+28
COD	OEL+24*, OEL+25!
DBT1	OCL+39!
DFN	OCL~, OCL+3, OCL+6, OCL+27, OCL+38, OEL~, OEL+1, OEL+2, NVA+7
DIC	OCL+11~!, OEL+19~!
DIC(0	OCL+11, OEL+19
>> DRG	NVA+9*, TMPBLD
DT	OCL+4, OCL+12, OEL+20, OEL+24
EDT	OCL~, OCL+4, OCL+38, OCL+39!, NVA+14, NVA+18, NVA+25
EDT1	OCL+39!, NVA+18, NVA+20, NVA+25, NVA+27
>> EXDT	OCL+5, OCL+6
>> FL	OEL+5*, OEL+6, OEL+7
>> I	OCL+9, OCL+25, OEL+11, OEL+12, OEL+13, OEL+15, OEL+16, OEL+33, OEL+36, NVA+7* , TMPBLD
>> IEN	OCL+36, OCL+37
IFN	OCL+5, OCL+6, OCL+7, OCL+8, OCL+9, OCL+10, OCL+16, OCL+17, OCL+18, OCL+19 , OCL+20, OCL+22, OCL+24, OCL+25, OCL+27, OCL+31, OCL+34, OCL+35, OCL+36, OEL+5! , OEL+8, OEL+9, OEL+10, OEL+11, OEL+12, OEL+13, OEL+15, OEL+16, OEL+22, OEL+27 , OEL+30, OEL+32, OEL+33, OEL+36, WAIT+1
INST	OCL+36*, OEL+5!
INST(	OCL+36*
>> ITFN	OCL+23, OCL+24, OCL+25, OEL+31, OEL+32, OEL+33, OEL+35, OEL+36
>> LSTDS	OCL+8, OCL+9, OCL+14
>> LSTFD	OCL+8, OCL+9, OCL+14, OEL+9, OEL+11, OEL+22
>> LSTRD	OCL+8, OCL+9, OCL+14
>> MDR	OCL+17, OCL+18, OCL+19, OCL+20
>> MIG	OCL+36*, OCL+37
>> MR	OCL+17*, OCL+18, OCL+19, OCL+20
>> PSBDT	OCL+4*, OCL+5
>> PSEDT	OCL+4*
PSOELSE	OCL+22, OCL+23, OCL+26!, OEL+30, OEL+31, OEL+34!
>> PSOR	OCL+27, OCL+28, OCL+29, OCL+30, OCL+31, OCL+32, OCL+33, WAIT+1
>> RX0	OCL+8, OCL+10, OCL+11, OCL+14, OEL+9, OEL+10, OEL+18, OEL+19, OEL+22, OEL+23 , OEL+24, OEL+25
>> RX2	OCL+8, OCL+10, OCL+12, OEL+9, OEL+10, OEL+18, OEL+20
>> RX3	OCL+8, OEL+9, OEL+10
RXNUM	OEL~, OEL+1, OEL+2, OEL+5*
>> SC	OCL+16, OEL+26, OEL+27*
>> SCH	OCL+16, OCL+34, OCL+35, OEL+26, OEL+27*
SD	OCL+2~, OCL+34, OCL+35, OCL+36, OCL+37, OEL+4~
SDT	OCL+2~, OCL+39!, NVA+6~, NVA+10*, NVA+11, NVA+13, NVA+14, NVA+17, NVA+18, NVA+23 , NVA+25
SDT1	OCL+2~, OCL+39!, NVA+6~, NVA+18, NVA+19, NVA+20, NVA+25, NVA+26, NVA+27
>> SG	OCL+37*
>> ST	OCL+13, OCL+14, OEL+21, OEL+22
>> ST0	OCL+12, OCL+13, OEL+20, OEL+21
>> STA	OCL+8, OCL+12, OEL+9, OEL+20
>> TFN	OCL+4, OCL+8, OCL+10, OCL+11, OCL+14, OCL+15, OCL+16, OCL+17, OCL+19, OCL+20 , OCL+21, OCL+24, OCL+25, OCL+31, OCL+32, OCL+33, OCL+34, OCL+35, OCL+36, OCL+37 , OCL+38, TMPBLD, TMPBLD+1, TMPBLD+2, TMPBLD+3
>> TRM	OCL+8, OCL+9, OCL+10, OEL+9, OEL+11, OEL+22
X	OCL+4, OCL+11~!, OCL+22, OCL+39!, OEL+19~!, OEL+30, NVA+7*, NVA+8, NVA+9, NVA+10 , NVA+15, NVA+21, NVA+23, NVA+28, TMPBLD+1, TMPBLD+2, TMPBLD+3
>> X1	OCL+4*
>> X2	OCL+4*
Y	OCL+11~!, OEL+19~!

Customize PDF page

Package: Outpatient Pharmacy