Routine: PSOSUCAT

Package	Total	Call Graph
Outpatient Pharmacy	2	(ASK,MESS)^PSOSULB1 EXIT^PSOSULBL
VA FileMan	2	^DIC ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOSULB1 PSOSULBL

Name	Field # of Occurrence
^DIC	DSLCT2, VSLCT2+1
^DIR	START+15, INVR+4, DISPENSE+4, INCLD+21, INCLD+31, CONT+6, N+10, C+7
ASK^PSOSULB1	START+16, START+29
MESS^PSOSULB1	START+15, START+24, START+25, START+26, START+28
EXIT^PSOSULBL	START+15, START+24, START+25, START+26, START+28

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Drugs Selected:" Line Location: D+2
Function Call: WRITE	Prompt: !,PSOSRT Line Location: D+6
Function Call: WRITE	Prompt: !!,"VA Classification Selected:" Line Location: V+2
Function Call: WRITE	Prompt: !,PSOSRT Line Location: V+6
Function Call: WRITE	Prompt: ! Line Location: VSLCT2+4
Function Call: WRITE	Prompt: !!,"Dispense Drugs for VA Class ",PSOVACLS," are:" Line Location: VDISP+3
Function Call: WRITE	Prompt: !,$P(^PSDRUG(PSODRG,0),U) Line Location: VDISP+4
Routine Call	DIC Line Location: DSLCT2 VSLCT2+1
Routine Call	DIR Line Location: START+15 INVR+4 DISPENSE+4 INCLD+21 INCLD+31 CONT+6 N+10 C+7

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.605 - [#50.605]	V+4, VSLCT2+2, VSPLIT, VSPLIT+1, VSPLIT+2, VSPLIT2+1, CLASS+2
^PS(52.5 - [#52.5]	EN+1, EN+3
^PSDRUG - [#50]	D+4, VDISP+4, EN+2
^PSDRUG("AOC"	VDISP+2
^PSRX - [#52]	EN+1, EN+4, EN+5, EN+6, EN+7, EN+8

Name	Line Occurrences
@(	START+26, EN+9
CONT	START+28
DISPENSE	START+25
DSLCT	D+1
DSLCT2	DSLCT2+2
INCLD	N+14, C+9
INVR	START+24
VDISP	VSLCT2+3, VSPLIT+2, VSPLIT2+1
VSLCT	V+1
VSLCT2	VSLCT2+6
VSPLIT	VSLCT2+3
VSPLIT2	VSPLIT+1

Name	Field # of Occurrence
CHLDCLSS	VSLCT2~, VSPLIT+1*, VSPLIT+2, VSPLIT2+1
CHLDCLSS2	VSPLIT2~, VSPLIT2+1*
CNT	START+1, VDISP+1~, VDISP+3*
DIC	DSLCT~, DSLCT+1, VSLCT~, VSLCT+1
DIC("A"	DSLCT2+1, VSLCT2+5
DIC(0	DSLCT+1, VSLCT+1
DIR	START~, START+15!, INVR~, DISPENSE~, INCLD~, CONT~, N~, N+10!, C~, C+7! , D~, V~
DIR("?"	START+6, START+7, START+8, START+9, START+10, START+11, START+12, START+13, START+14, INCLD+5 , INCLD+6, INCLD+7, INCLD+9, INCLD+10, INCLD+12, INCLD+13, INCLD+14, INCLD+15, INCLD+16, INCLD+18 , INCLD+19, INCLD+20, INCLD+23, INCLD+24, INCLD+25, INCLD+26, INCLD+28, INCLD+29, INCLD+30, N+4 , N+5, N+6, N+7, C+5
DIR("A"	START+4, INVR+2, DISPENSE+2, INCLD+21, INCLD+31, CONT+2, CONT+3, N+2, N+3, C+2 , C+3*
DIR("B"	START+2, INVR+2, DISPENSE+2, INCLD+1, CONT+4, N+8, C+4*
DIR("T"	START+5, INVR+3, DISPENSE+3, INCLD+2, CONT+5, N+9, C+6*
DIR(0	START+3, INVR+1, DISPENSE+1, INCLD+1, CONT+1, N+1, C+1*
DIROUT	N~, C~, D~, V~
DIRUT	START+15, INVR+4, DISPENSE+4, INCLD+21, INCLD+31, N~, N+10, C~, C+7, D~ , V~
DTIME	START+5, INVR+3, DISPENSE+3, INCLD+2, CONT+5, N+9, C+6
DTOUT	START~, N~, C~, D~, DSLCT~, V~, VSLCT~
DUOUT	START~, N~, C~, D~, DSLCT~, V~, VSLCT~
OI	VDISP~, VDISP+2*
PSOCLSIN	VSLCT2~, VSLCT2+1*, VSLCT2+2, VSPLIT, VSPLIT+1
PSOCLSS	V~, V+3, V+4, CLASS~, CLASS+1, CLASS+2
PSODEA	EN~, EN+2*, DEA+1, DEA+2, SUPPLY, FRIDGE
PSODRG	D~, D+3, D+4, VDISP~, VDISP+2, VDISP+4, DRUG~, DRUG+1*, DRUG+2
PSODRUG	EN~, EN+1*, EN+2, DRUG+2
PSOIEN	EN~, EN+1*
PSOMOD	START~, START+27, INVR+5, INVR+6, DISPENSE+2, DISPENSE+5, INCLD+3, INCLD+21, INCLD+31*, CONT+3 , N+3, C+3
PSOMW	EN~, EN+4, EN+6, EN+7, EN+8, DEA+1, DRUG+2, CLASS+2, SUPPLY, FRIDGE
PSONODE	EN~, EN+3*, EN+4, EN+5, EN+6, EN+7, EN+8
>> PSOOK	EN+2, DEA+1, DEA+2, DEA+3, DRUG+2, CLASS+2, SUPPLY, FRIDGE*
PSOPMT	INCLD~, INCLD+3*, INCLD+4, INCLD+8, INCLD+11, INCLD+17, INCLD+22, INCLD+27
PSOPP	EN~, EN+7*
PSORESP	START~, START+17, START+18, START+19, START+20, START+21, START+22, START+23, START+26, INVR+1 , INVR+2, INCLD+4, INCLD+5, INCLD+6, INCLD+8, INCLD+9, INCLD+10, INCLD+11, INCLD+13, INCLD+15 , INCLD+17, INCLD+18, INCLD+20, INCLD+22, INCLD+27, INCLD+31, CONT+2, CONT+3, N+11, N+12 , N+13, C+8, D+1, D+3, DSLCT2, V+1, V+3, VSLCT2+1, VSPLIT+2, VSPLIT2+1
PSOSORT	D~, V~
PSOSORT(	D+4, D+5, V+4, V+5
PSOSRT	D~, D+5, D+6, V~, V+5, V+6
PSOSTPF	START~, START+24, START+25, START+26, START+28, INVR+4, DISPENSE+4, INCLD+21, INCLD+31, CONT+6* , N+10, N+14, C+7, C+9, D+1, V+1
PSOSULST	START~
PSOSULST(	START+23, START+27, N+11, N+12, N+13, C+8, D+1, D+3, DSLCT2, V+1 , V+3, VSLCT2+1, VSPLIT+2, VSPLIT2+1, EN+2
PSOSULST(""	EN+2, EN+9
PSOSULST("CLASS"	CLASS+1, CLASS+2
PSOSULST("DEA"	DEA+1, DEA+2, DEA+3
PSOSULST("DRUG"	DRUG+1, DRUG+2
PSOSULST("FRIDGE"	FRIDGE
PSOSULST("SUPPLY"	SUPPLY
PSOTAG	START~, START+27*
PSOVACLS	VSLCT2~, VSLCT2+2, VDISP+2, VDISP+3, VSPLIT+2, VSPLIT2+1, EN~, EN+2, CLASS+2
>> SFN	EN+1, EN+3
U	START+23, START+26, INVR+1, INVR+2, DISPENSE+2, INCLD+3, INCLD+4, INCLD+5, INCLD+6, INCLD+8 , INCLD+9, INCLD+10, INCLD+11, INCLD+13, INCLD+15, INCLD+17, INCLD+18, INCLD+20, INCLD+21, INCLD+22 , INCLD+27, INCLD+31, CONT+2, CONT+3, N+3, N+11, N+12, N+13, C+3, C+8 , D+1, D+3, D+4, DSLCT2, V+1, V+3, V+4, VSLCT2+1, VSLCT2+2, VDISP+4 , VSPLIT+2, VSPLIT2+1, EN+1, EN+2, DEA+1, DEA+2, DRUG+2, CLASS+2, SUPPLY, FRIDGE
X	START~, N~, C~, D~, DSLCT~, V~, VSLCT~
XX	C+8~, DEA~, DEA+1
Y	START~, START+15, START+16, START+17, START+18, START+19, START+20, START+21, START+22, INVR+6 , DISPENSE+5, INCLD+21, INCLD+31, CONT+6, N~, N+10, N+11, N+12, N+13, C~ , C+8, D~, DSLCT~, DSLCT2, V~, VSLCT~, VSLCT2+1

Name

Field # of Occurrence

CHLDCLSS

VSLCT2~, VSPLIT+1*, VSPLIT+2, VSPLIT2+1

CHLDCLSS2

VSPLIT2~, VSPLIT2+1*

CNT

START+1*, VDISP+1~*, VDISP+3*

DIC

DSLCT~, DSLCT+1*, VSLCT~, VSLCT+1*

DIC("A"

DSLCT2+1*, VSLCT2+5*

DIC(0

DSLCT+1*, VSLCT+1*

DIR

START~, START+15!, INVR~, DISPENSE~, INCLD~, CONT~, N~, N+10!, C~, C+7!
, D~, V~

DIR("?"

START+6*, START+7*, START+8*, START+9*, START+10*, START+11*, START+12*, START+13*, START+14*, INCLD+5*
, INCLD+6*, INCLD+7*, INCLD+9*, INCLD+10*, INCLD+12*, INCLD+13*, INCLD+14*, INCLD+15*, INCLD+16*, INCLD+18*
, INCLD+19*, INCLD+20*, INCLD+23*, INCLD+24*, INCLD+25*, INCLD+26*, INCLD+28*, INCLD+29*, INCLD+30*, N+4*
, N+5*, N+6*, N+7*, C+5*

DIR("A"

START+4*, INVR+2*, DISPENSE+2*, INCLD+21*, INCLD+31*, CONT+2*, CONT+3*, N+2*, N+3*, C+2*
, C+3*

DIR("B"

START+2*, INVR+2*, DISPENSE+2*, INCLD+1*, CONT+4*, N+8*, C+4*

DIR("T"

START+5*, INVR+3*, DISPENSE+3*, INCLD+2*, CONT+5*, N+9*, C+6*

DIR(0

START+3*, INVR+1*, DISPENSE+1*, INCLD+1*, CONT+1*, N+1*, C+1*

DIROUT

N~, C~, D~, V~

DIRUT

START+15, INVR+4, DISPENSE+4, INCLD+21, INCLD+31, N~, N+10, C~, C+7, D~
, V~

DTIME

START+5, INVR+3, DISPENSE+3, INCLD+2, CONT+5, N+9, C+6

DTOUT

START~, N~, C~, D~, DSLCT~, V~, VSLCT~

DUOUT

START~, N~, C~, D~, DSLCT~, V~, VSLCT~

OI

VDISP~, VDISP+2*

PSOCLSIN

VSLCT2~, VSLCT2+1*, VSLCT2+2, VSPLIT, VSPLIT+1

PSOCLSS

V~, V+3*, V+4, CLASS~, CLASS+1*, CLASS+2

PSODEA

EN~, EN+2*, DEA+1, DEA+2, SUPPLY, FRIDGE

PSODRG

D~, D+3*, D+4, VDISP~, VDISP+2*, VDISP+4, DRUG~, DRUG+1*, DRUG+2

PSODRUG

EN~, EN+1*, EN+2, DRUG+2

PSOIEN

EN~, EN+1*

PSOMOD

START~, START+27, INVR+5*, INVR+6*, DISPENSE+2, DISPENSE+5*, INCLD+3, INCLD+21*, INCLD+31*, CONT+3
, N+3, C+3

PSOMW

EN~, EN+4*, EN+6*, EN+7*, EN+8*, DEA+1, DRUG+2, CLASS+2, SUPPLY, FRIDGE

PSONODE

EN~, EN+3*, EN+4, EN+5, EN+6, EN+7, EN+8

>> PSOOK

EN+2*, DEA+1*, DEA+2*, DEA+3, DRUG+2*, CLASS+2*, SUPPLY*, FRIDGE*

PSOPMT

INCLD~, INCLD+3*, INCLD+4, INCLD+8, INCLD+11, INCLD+17, INCLD+22, INCLD+27

PSOPP

EN~, EN+7*

PSORESP

START~, START+17*, START+18*, START+19*, START+20*, START+21*, START+22*, START+23, START+26, INVR+1
, INVR+2, INCLD+4, INCLD+5, INCLD+6, INCLD+8, INCLD+9, INCLD+10, INCLD+11, INCLD+13, INCLD+15
, INCLD+17, INCLD+18, INCLD+20, INCLD+22, INCLD+27, INCLD+31, CONT+2, CONT+3, N+11, N+12
, N+13, C+8, D+1, D+3, DSLCT2, V+1, V+3, VSLCT2+1, VSPLIT+2, VSPLIT2+1

PSOSORT

D~, V~

PSOSORT(

D+4*, D+5, V+4*, V+5

PSOSRT

D~, D+5*, D+6, V~, V+5*, V+6

PSOSTPF

START~, START+24, START+25, START+26, START+28, INVR+4*, DISPENSE+4*, INCLD+21*, INCLD+31*, CONT+6*
, N+10*, N+14, C+7*, C+9, D+1*, V+1*

PSOSULST

START~

PSOSULST(

START+23*, START+27*, N+11*, N+12*, N+13*, C+8*, D+1, D+3, DSLCT2*, V+1
, V+3, VSLCT2+1*, VSPLIT+2*, VSPLIT2+1*, EN+2

PSOSULST(""

EN+2, EN+9

PSOSULST("CLASS"

CLASS+1, CLASS+2

PSOSULST("DEA"

DEA+1, DEA+2, DEA+3

PSOSULST("DRUG"

DRUG+1, DRUG+2

PSOSULST("FRIDGE"

FRIDGE

PSOSULST("SUPPLY"

SUPPLY

PSOTAG

START~, START+27*

PSOVACLS

VSLCT2~, VSLCT2+2*, VDISP+2, VDISP+3, VSPLIT+2*, VSPLIT2+1*, EN~, EN+2*, CLASS+2

>> SFN

EN+1, EN+3

U

START+23, START+26, INVR+1, INVR+2, DISPENSE+2, INCLD+3, INCLD+4, INCLD+5, INCLD+6, INCLD+8
, INCLD+9, INCLD+10, INCLD+11, INCLD+13, INCLD+15, INCLD+17, INCLD+18, INCLD+20, INCLD+21, INCLD+22
, INCLD+27, INCLD+31, CONT+2, CONT+3, N+3, N+11, N+12, N+13, C+3, C+8
, D+1, D+3, D+4, DSLCT2, V+1, V+3, V+4, VSLCT2+1, VSLCT2+2, VDISP+4
, VSPLIT+2, VSPLIT2+1, EN+1, EN+2, DEA+1, DEA+2, DRUG+2, CLASS+2, SUPPLY, FRIDGE

X

START~, N~, C~, D~, DSLCT~, V~, VSLCT~

XX

C+8~*, DEA~, DEA+1*

Y

START~, START+15, START+16, START+17, START+18, START+19, START+20, START+21, START+22, INVR+6
, DISPENSE+5, INCLD+21, INCLD+31, CONT+6, N~, N+10, N+11, N+12, N+13, C~
, C+8, D~, DSLCT~, DSLCT2, V~, VSLCT~, VSLCT2+1

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSUCAT

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
START
INVR
DISPENSE
INCLD
CONT
N
C
D
DSLCT
DSLCT2
V
VSLCT
VSLCT2
VDISP
VSPLIT
VSPLIT2
EN
DEA
DRUG
CLASS
SUPPLY
FRIDGE

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed