Routine: PSOCAN2

Package	Total	Call Graph
Outpatient Pharmacy	13	$$STATUS^PSOBPSUT ^PSOBUILD CAN^PSOCAN AREC^PSOCAN1 REF^PSOCAN4 (,REINS)^PSOCMOPA (POST,SET)^PSODRG EN^PSOHLSN1 $$TRIC^PSOREJP1 SUBMIT^PSOREJU3 $$FIND^PSOREJUT Q^PSORXL SPR^PSOUTL
VA Fileman	6	DD^%DT NOW^%DTC ^DIC FILE^DICN (,IX)^DIK ^DIR
Registration	2	KVA^VADPT PAUSE^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	11	PSOAUTOC PSOCAN PSOCAN1 PSOCAN3 PSOCAN3N PSOCAN4 PSOHLDC PSOORED1 PSOORFI6 PSOORUTL PSOUTL

Entry Points

Name	Comments	DBIA/ICR reference
DRGDRG	;Checks for drug/drug interaction, duplicate drug and class
DELREF	;
LOG
AUTOD	;reinstates Rxs dc'd by date of death
VERIFY	;Put in non-verify file
REINS
RMB(IDX)	;remove Rx if found in array BBRX() (Bingo Board)
SUS	;Adds rec to suspense
ACT
KILL
HLD
REF
NVER	;Called from PSOCAN3, needs DA defined

External References

Name	Field # of Occurrence
DD^%DT	ACT+9, ACT+10
NOW^%DTC	LOG+3
^DIC	DRGDRG+4
FILE^DICN	SUS+2, VERIFY+2, AUTOD+12
^DIK	SUS+1, AUTOD+11
IX^DIK	AUTOD+5, AUTOD+14
^DIR	ACT+26
$$STATUS^PSOBPSUT	ACT+24, ACT+29
^PSOBUILD	ACT+1
CAN^PSOCAN	ACT+2
AREC^PSOCAN1	REINS+6, SUS+5
REF^PSOCAN4	REF+5
^PSOCMOPA	HLD+8
REINS^PSOCMOPA	ACT+14
POST^PSODRG	DRGDRG+8
SET^PSODRG	DRGDRG+8
EN^PSOHLSN1	SUS+5, VERIFY+4, AUTOD+8, AUTOD+17, AUTOD+21, AUTOD+23, NVER+2
$$TRIC^PSOREJP1	ACT+17
SUBMIT^PSOREJU3	ACT+18
$$FIND^PSOREJUT	ACT+23, ACT+28
Q^PSORXL	ACT+26
SPR^PSOUTL	REF+10
KVA^VADPT	KILL+2
PAUSE^VALM1	REINS+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ACT+0
Function Call: WRITE	Prompt: "=" Line Location: ACT+0
Function Call: WRITE	Prompt: ! Line Location: ACT+2
Function Call: WRITE	Prompt: !,"Prescription #"_RX_" REINSTATED!" Line Location: ACT+15
Function Call: WRITE	Prompt: !?3,"Prescription #",RX_": " Line Location: ACT+20
Function Call: WRITE	Prompt: !?5,"Either print the label using the reprint option " Line Location: ACT+30
Function Call: WRITE	Prompt: !?7,"or check later to see if the label has been printed." Line Location: ACT+31
Function Call: WRITE	Prompt: !?5,"Placing Rx on suspense. Please wait..." Line Location: ACT+32
Function Call: WRITE	Prompt: ! Line Location: DRGDRG+9
Routine Call	DIC Line Location: DRGDRG+4
Routine Call	DIR Line Location: ACT+26

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	REINS+2
^PS(52.4 - [#52.4]	AUTOD+5*
^PS(52.5 - [#52.5]	SUS+1, SUS+3, AUTOD+11, AUTOD+13
^PSDRUG - [#50]	REINS+3, ACT+1
^PSRX - [#52]	REINS+1, REINS+2, REINS+3, REINS+5, REINS+7, ACT+1, ACT+2, ACT+5, ACT+6, ACT+7 , ACT+8, SUS+1, SUS+4, DRGDRG+1, DRGDRG+3, DRGDRG+4, DRGDRG+8, VERIFY+3, HLD, HLD+1* , HLD+4, HLD+5, HLD+6!, HLD+7, REF, REF+3, REF+5, REF+6, REF+8!, REF+9* , REF+11, REF+12, DELREF+3, AUTOD+1, AUTOD+2, AUTOD+5, AUTOD+7!, AUTOD+14, AUTOD+16!, AUTOD+18* , AUTOD+19, AUTOD+22!, LOG, LOG+1, LOG+3, LOG+5, LOG+6
^PSRX("AD"	HLD+6!, REF+8!
^PSRX("AH"	HLD+1!, AUTOD+19*
^PSRX("APSOD"	REINS+5, AUTOD+1!, AUTOD+7!, AUTOD+16!, AUTOD+22!, LOG+4!
^XUSEC("PSORPH"	REINS+6

Label References

Name	Line Occurrences
ACT	REINS+5
AUTOD	REINS+5
DELREF	REF+1
DRGDRG	ACT+2
LOG	AUTOD+8, AUTOD+17, AUTOD+21, AUTOD+23
SUS	ACT+32
VERIFY	REINS+6

Naked Globals

Name	Field # of Occurrence
^("DDSTA"	AUTOD+2
^(0	REINS+3, ACT+1, ACT+6, ACT+8, REF, DELREF+3, AUTOD+13
^(2	ACT+7
^(3	SUS+4, REF+11, LOG+5, LOG+6*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	KILL!, LOG+3, LOG+4!
ACNT	KILL!, LOG!, LOG+2, LOG+3, LOG+4!
ACOM	SUS+5, HLD+1, KILL!, AUTOD+6, AUTOD+8!, AUTOD+15, AUTOD+17!, AUTOD+20, AUTOD+21!, AUTOD+23! , LOG+3
ACT	SUS+1*, KILL!
ALL	KILL!
>> BBRX	RMB+7
>> BBRX(	RMB+2, RMB+6*!
BCNUM	KILL!
BINGCRT	RMB+7!
CMOP	HLD~, HLD+8!, KILL!
CMOP(	HLD+8
CMOP("L"	HLD+8
CMOP("S"	HLD+8
CNT	KILL!
DA	REINS+1, REINS+2, REINS+3, REINS+5, REINS+7, ACT+1, ACT+2, ACT+3, ACT+5, ACT+6 , ACT+7, ACT+8, SUS+1, SUS+4, SUS+5, DRGDRG+1, DRGDRG+3, DRGDRG+4, DRGDRG+8, VERIFY+1 , VERIFY+3, VERIFY+4, HLD, HLD+1, HLD+4, HLD+5, HLD+6, HLD+7, REF, REF+3 , REF+5, REF+6, REF+8, REF+9, REF+11, REF+12, KILL!, DELREF+3, AUTOD+1, AUTOD+2 , AUTOD+5!, AUTOD+7, AUTOD+8, AUTOD+11, AUTOD+12, AUTOD+13, AUTOD+14!*, AUTOD+16, AUTOD+17, AUTOD+18 , AUTOD+19, AUTOD+21, AUTOD+22, AUTOD+23, LOG, LOG+1, LOG+3, LOG+4, LOG+5, LOG+6 , NVER+2, RMB+2, RMB+5
DA(1	REF+9*, REF+10!
DAYS360	KILL!
DD	SUS+2!, VERIFY+2!, AUTOD+12!
DEAD	KILL!
DIC	SUS+2, DRGDRG+4!, VERIFY+1, VERIFY+2!, AUTOD+12
DIC("DR"	SUS+2, VERIFY+1
DIC(0	SUS+2, DRGDRG+4, VERIFY+1, AUTOD+12
DIK	SUS+1, AUTOD+5!, AUTOD+11, AUTOD+14!
DINUM	VERIFY+1*, VERIFY+2!
DIR	ACT+26!
DIR("?"	ACT+25*
DIR("A"	ACT+25*
DIR("B"	ACT+25*
DIR(0	ACT+25*
DIRUT	ACT+26, KILL!
DLAYGO	VERIFY+1*, VERIFY+2!
DO	SUS+2!, VERIFY+2!, AUTOD+12!
>> DODD	AUTOD+2*, AUTOD+5, AUTOD+13, AUTOD+19
DODR	REINS~, REINS+5*, ACT+32, ACT+33!, AUTOD+1!
>> DODS	AUTOD+2*, AUTOD+3
DR	KILL!
DRG	ACT+1*, ACT+2, KILL!
DRUG	KILL!
DT	REINS+1, ACT+22, ACT+27, ACT+32, DRGDRG+1, VERIFY+1, AUTOD+20
DTOUT	DRGDRG+4, KILL!
DUOUT	KILL!
DUZ	REINS+6, VERIFY+1, LOG+3
EN	KILL!
FDT	ACT+7, ACT+8, ACT+9, ACT+22, ACT+27, ACT+32, SUS+2, KILL!
>> FILE	AUTOD+3*, AUTOD+4, AUTOD+9, AUTOD+18
HOLD	DRGDRG+5!, DRGDRG+9!, KILL!
HOLD(	DRGDRG+5*, DRGDRG+9
HOLDRX	ACT+1*, ACT+2!
I	ACT*, KILL!
IDX	RMB~, RMB+2, RMB+6
IFN	HLD+5, HLD+6!, REF, REF+3, REF+6, REF+8, REF+11*, REF+13!, DELREF+3
II	KILL!
IN	KILL!
INCOM	KILL!
IT	KILL!
JJ	KILL!
K	RMB+1~, RMB+4*
LC	KILL!
LFD	SUS+4, SUS+5, KILL!, AUTOD+13, AUTOD+15, AUTOD+17!
LINE	KILL!
LL	ACT+6*, KILL!
LPRT	ACT+6*, ACT+10, KILL!
LREF	ACT+6*, ACT+12, ACT+21, KILL!
LSI	KILL!
NAME	DRGDRG+5*, DRGDRG+9, KILL!
NDF	KILL!
NODE	REF+10*!
NOEXP	KILL!
NSF	KILL!
OUT	KILL!
PCNT	KILL+1!
PDA	HLD~, HLD+7*
PHST	SUS+5!, VERIFY+4!, AUTOD+6, AUTOD+8!, AUTOD+17!
PLINE	KILL+1!
>> POERR	KILL
POP	KILL+1!
PPL	ACT+26*, KILL+1!
PS	KILL+1!
>> PSCAN(	REINS+5, REINS+7, ACT+2, DRGDRG+5, DRGDRG+8
PSCNODE	DELREF+1~, DELREF+3*, DELREF+4, DELREF+5
PSDTEST	HLD~, HLD+6, HLD+7, HLD+9*
PSFROM	KILL+1!
PSI	KILL+1!
PSINV	KILL+1!
PSOCAN	KILL+1!
PSOCMOP	KILL+1!
PSODFN	VERIFY+1, KILL+1!, AUTOD+16, AUTOD+22, LOG+4
PSODRG	KILL+1!
PSODRG("QFLG"	DRGDRG+6*
PSODRUG	KILL+1!
PSOLBL	REF+4~, REF+6*
>> PSONEW("OLD V	AL" , DRGDRG+6
PSONODEL	REF+4~, REF+5, REF+6, REF+7
PSONOOR	KILL+1!
PSONVC	NVER+1~, NVER+2*
PSONVCC	NVER+1~, NVER+2*
PSONVCP	NVER+1~, NVER+2*
PSOOPT	KILL+1!
>> PSOPAR	REINS+6
>> PSORENW("OIRXN"	DRGDRG+8*, DRGDRG+9!
PSORFDEL	REF+1!, REF+8!, DELREF+2, DELREF+5
>> PSORX("DFLG"	ACT+2
PSOSD	KILL+1!
PSOSD(	DRGDRG+5!, DRGDRG+9*
>> PSOSITE	SUS+2
PSOTRIC	ACT+17~*, ACT+18, ACT+24, ACT+29
PSOY	DRGDRG+7!*
PSOY(0	DRGDRG+7*
PSPOP	KILL+1!
PSRXDA	VERIFY+1*, VERIFY+3, KILL+1!
PSS	KILL+1!
PSVC	KILL+1!
>> PSXSYS	ACT+14
RDL	DELREF+1~, DELREF+3*
REA	ACT+2, DRGDRG+8, HLD+1, KILL+2!
RELDT	ACT+7, ACT+8, ACT+9, ACT+12, KILL+2!
RF	ACT+5, REF+10!, KILL+2!, LOG+1, LOG+4!
RFCNT	ACT+5, ACT+7, ACT+8, ACT+12, ACT+17, ACT+18, ACT+21, ACT+24, ACT+29, SUS+3 , KILL+2!, LOG+1, LOG+3, LOG+4!
RFDATE	KILL+2!
RFDT	HLD+5*, HLD+6!
RFL	KILL+2!
RFL1	KILL+2!
RFLL	KILL+2!
RP	KILL+2!
RX	ACT+1, ACT+2*, ACT+12, ACT+15, ACT+20, DRGDRG+5, KILL+2!
RX0	SUS+1*, SUS+2, KILL+2!
RX1	REINS+7*!
RXCNT	KILL+2!
RXDA	KILL+2!
RXIEN	ACT+3~*, ACT+17, ACT+18, ACT+23, ACT+24, ACT+26, ACT+28, ACT+29
RXN	SUS+1, SUS+2, SUS+4, KILL+2!, AUTOD+5, AUTOD+8!, AUTOD+11*, AUTOD+12, AUTOD+14
RXNUM	KILL+2!
RXP	SUS+2*, KILL+2!
RXREC	KILL+2!
RXREF	KILL+2!
RXS	SUS+1, KILL+2!, AUTOD+11
RXSP	KILL!
SDATE	KILL+2!
SPCANC	KILL+2!
SS	KILL+2!
ST	SUS+5!, VERIFY+4!, AUTOD+6, AUTOD+8!, AUTOD+17!
ST4	RMB+1~, RMB+2*, RMB+4
ST5	RMB+1~, RMB+4*, RMB+5
ST6	RMB+1~, RMB+3, RMB+5, RMB+6
STA	DRGDRG+2, DRGDRG+3, DRGDRG+9!, AUTOD+3, AUTOD+5, AUTOD+14, AUTOD+17, AUTOD+18, AUTOD+20
STAT	DRGDRG+3*, DRGDRG+5, DRGDRG+9!, KILL+2!
SUB	KILL+2!, LOG*
SUSD	HLD~, HLD+5*, HLD+6!, HLD+7, REF, REF+8, REF+11, REF+12, REF+13!
VCOM	VERIFY+4*!
WARN	KILL!
X	SUS+2, DRGDRG+4, VERIFY+1, KILL+2!, AUTOD+12
XFDT	ACT+9*, ACT+12, ACT+21, KILL+2!
XFLAG	ACT+14!
XLPDT	ACT+10*, ACT+12, ACT+21, KILL+2!
XRELDT	ACT+9*, ACT+12, ACT+21, KILL+2!
Y	REINS+2, REINS+3, ACT+9, ACT+10*, ACT+26, SUS+3, DRGDRG+4, DRGDRG+6, DRGDRG+7, KILL+2! , AUTOD+12
Y(0	DRGDRG+5, DRGDRG+7

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOCAN2

Information

Source Information

Call Graph

Call Graph Total: 21

Caller Graph

Caller Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: