Routine: PSOCAN2

Package	Total	Call Graph
Outpatient Pharmacy	15	$$STATUS^PSOBPSUT ^PSOBUILD CAN^PSOCAN AREC^PSOCAN1 REF^PSOCAN4 (,REINS)^PSOCMOPA DOSCK^PSODOSUT (POST,SET,WAIT)^PSODRG EN^PSOHLSN1 DAOC^PSONEW $$TRIC^PSOREJP1 SUBMIT^PSOREJU3 $$FIND^PSOREJUT Q^PSORXL SPR^PSOUTL
VA FileMan	7	DD^%DT NOW^%DTC ^DIC FILE^DICN ^DIE (,IX)^DIK ^DIR
List Manager	1	PAUSE^VALM1
Registration	1	KVA^VADPT

Package	Total	Caller Graph
Outpatient Pharmacy	11	PSOAUTOC PSOCAN PSOCAN1 PSOCAN3 PSOCAN3N PSOCAN4 PSOHLDC PSOORED1 PSOORFI6 PSOORUTL PSOUTL
Electronic Health Modernization	1	EHMPSRXDC

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

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

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ACT+0
Function Call: WRITE	Prompt: "=" Line Location: ACT+0
Function Call: WRITE	Prompt: !!,RX_" "_DRG Line Location: ACT+2
Function Call: WRITE	Prompt: ! Line Location: ACT+6
Function Call: WRITE	Prompt: !,"Prescription #"_RX_" REINSTATED!" Line Location: ACT+19
Function Call: WRITE	Prompt: !?3,"Prescription #",RX_": " Line Location: ACT+24
Function Call: WRITE	Prompt: !?5,"Either print the label using the reprint option " Line Location: ACT+36
Function Call: WRITE	Prompt: !?7,"or check later to see if the label has been printed." Line Location: ACT+37
Function Call: WRITE	Prompt: !?5,"Placing Rx on suspense. Please wait..." Line Location: ACT+38
Function Call: WRITE	Prompt: ! Line Location: DRGDRG+13
Routine Call	DIC Line Location: DRGDRG+5
Routine Call	DIE Line Location: HLD+2
Routine Call	DIR Line Location: ACT+31

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

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	REINS+3
^PS(52.4 - [#52.4]	AUTOD+5*
^PS(52.5 - [#52.5]	SUS+1, SUS+3, AUTOD+11, AUTOD+13
^PSDRUG - [#50]	REINS+4, ACT+1
^PSRX - [#52]	REINS+2, REINS+3, REINS+4, REINS+6, REINS+8, ACT+1, ACT+5, ACT+9, ACT+10, ACT+11 , ACT+12, ACT+29, ACT+35, SUS+1, SUS+4, DRGDRG+1, DRGDRG+4, DRGDRG+5, DRGDRG+12, VERIFY+3 , HLD, HLD+1, HLD+2, HLD+3, HLD+4!, HLD+5, 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!, AUTOD+24!, LOG, LOG+1, LOG+3, LOG+5, LOG+6* , LOG+7*
^PSRX("AD"	HLD+4!, REF+8!
^PSRX("AH"	HLD+1!, AUTOD+19*
^PSRX("APSOD"	REINS+6, AUTOD+1!, AUTOD+7!, AUTOD+16!, AUTOD+22!, AUTOD+24!, LOG+4!
^TMP("PSODAOC"	DRGDRG+16, DRGDRG+19!
^XUSEC("PSORPH"	REINS+7, DRGDRG+9

Name	Line Occurrences
ACT	REINS+6
AUTOD	REINS+6
DELREF	REF+1
DRGDRG	REINS+7, ACT+3
LOG	AUTOD+8, AUTOD+17, AUTOD+21, AUTOD+23
SUS	ACT+38
VERIFY	REINS+7

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

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+6!, KILL!
CMOP(	HLD+6
CMOP("L"	HLD+6
CMOP("S"	HLD+6
CNT	KILL!
DA	REINS+2, REINS+3, REINS+4, REINS+6, REINS+7, REINS+8, ACT+1, ACT+6, ACT+7, ACT+9 , ACT+10, ACT+11, ACT+12, SUS+1, SUS+4, SUS+5, DRGDRG+1, DRGDRG+4, DRGDRG+5, DRGDRG+10 , VERIFY+1, VERIFY+3, VERIFY+4, HLD, HLD+1, HLD+2, HLD+3, HLD+4, HLD+5, 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, AUTOD+24, LOG, LOG+1, LOG+3, LOG+4 , LOG+5, LOG+6, LOG+7, 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+5!, VERIFY+1, VERIFY+2!, AUTOD+12
DIC("DR"	SUS+2, VERIFY+1
DIC(0	SUS+2, DRGDRG+5, VERIFY+1, AUTOD+12
DIE	HLD+2*!
DIK	SUS+1, AUTOD+5!, AUTOD+11, AUTOD+14!
DINUM	VERIFY+1*, VERIFY+2!
DIR	ACT+31!
DIR("?"	ACT+30*
DIR("A"	ACT+30*
DIR("B"	ACT+30*
DIR(0	ACT+30*
DIRUT	ACT+31, 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+6*, ACT+38, ACT+39!, AUTOD+1!
>> DODS	AUTOD+2*, AUTOD+3
DR	HLD+2*!, KILL!
DRG	ACT+1*, ACT+2, KILL!
DRUG	KILL!
DT	REINS+2, ACT+26, ACT+32, ACT+38, DRGDRG+1, VERIFY+1, AUTOD+20
DTOUT	DRGDRG+5, KILL!
DUOUT	KILL!
DUZ	REINS+7, DRGDRG+9, VERIFY+1, LOG+3
EN	KILL!
FDT	ACT+11, ACT+12, ACT+13, ACT+26, ACT+32, ACT+38, SUS+2, KILL!
>> FILE	AUTOD+3*, AUTOD+4, AUTOD+9, AUTOD+18
HOLD	DRGDRG+6!, DRGDRG+13!, KILL!
HOLD(	DRGDRG+6*, DRGDRG+13
HOLDRX	ACT+1*, ACT+5!
HPOERR	ACT+2*, ACT+4, ACT+5!
I	ACT*, KILL!
IDX	RMB~, RMB+2, RMB+6
IFN	HLD+3, HLD+4!, 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+10*, KILL!
LPRT	ACT+10*, ACT+14, KILL!
LREF	ACT+10*, ACT+16, ACT+25, KILL!
LSI	KILL!
NAME	DRGDRG+6*, DRGDRG+13, KILL!
NDF	KILL!
NODE	REF+10*!
NOEXP	KILL!
NSF	KILL!
ORN	REINS~
OUT	KILL!
PCNT	KILL+1!
PDA	HLD~, HLD+5*
PHST	SUS+5!, VERIFY+4!, AUTOD+6, AUTOD+8!, AUTOD+17!
PLINE	KILL+1!
>> POERR	ACT+2, ACT+4*, KILL
POP	KILL+1!
PPL	ACT+31*, KILL+1!
PS	KILL+1!
>> PSCAN(	REINS+6, REINS+8, ACT+5, ACT+6, DRGDRG+6, DRGDRG+12
PSCNODE	DELREF+1~, DELREF+3*, DELREF+4, DELREF+5
PSDTEST	HLD~, HLD+4, HLD+5, HLD+7*
PSFROM	KILL+1!
PSI	KILL+1!
PSINV	KILL+1!
PSOCAN	KILL+1!
PSOCMOP	KILL+1!
PSODAOC	DRGDRG+17~*
PSODFN	REINS+1, VERIFY+1, KILL+1!, AUTOD+16, AUTOD+22, AUTOD+24, LOG+4
PSODRG	KILL+1!
PSODRG("QFLG"	DRGDRG+7*
PSODRUG	KILL+1!
PSOLBL	REF+4~, REF+6*
>> PSONEW("OLD V	AL" , DRGDRG+7
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*
>> PSOODOSP	REINS+1*
PSOOPT	KILL+1!
>> PSOPAR	REINS+7
>> PSOQUIT	REINS+7, ACT+3, DRGDRG+10
PSOREINF	REINS+1!
PSOREINO	REINS~*
>> PSOREINS	REINS+7, ACT+3, DRGDRG+10
>> PSORENW("OIRXN"	DRGDRG+10*, DRGDRG+12, DRGDRG+13!
PSORFDEL	REF+1!, REF+8!, DELREF+2, DELREF+5
>> PSORX("DFLG"	REINS+7, ACT+4, ACT+5, DRGDRG+2, DRGDRG+11
>> PSORX("DOSING	OFF" , REINS+1!
>> PSORXED("DFLG"	DRGDRG+2*
PSOSD	KILL+1!
PSOSD(	DRGDRG+6!, DRGDRG+13*
>> PSOSITE	SUS+2
PSOTECCK	DRGDRG+8!, DRGDRG+9*
PSOTRIC	ACT+21~*, ACT+22, ACT+28, ACT+29, ACT+34, ACT+35
PSOVODA	REINS+7~*
PSOY	DRGDRG+8!*
PSOY(0	DRGDRG+8*
PSPOP	KILL+1!
PSRXDA	VERIFY+1*, VERIFY+3, KILL+1!
PSS	KILL+1!
PSVC	KILL+1!
>> PSXSYS	ACT+18
RDL	DELREF+1~, DELREF+3*
REA	ACT+6, DRGDRG+12, HLD+1, KILL+2!
RELDT	ACT+11, ACT+12, ACT+13, ACT+16, KILL+2!
RET	DRGDRG+19!
RF	ACT+9, REF+10!, KILL+2!, LOG+1, LOG+4!
RFCNT	ACT+9, ACT+11, ACT+12, ACT+16, ACT+21, ACT+22, ACT+25, ACT+28, ACT+34, SUS+3 , KILL+2!, LOG+1, LOG+3, LOG+4!
RFDATE	KILL+2!
RFDT	HLD+3*, HLD+4!
RFL	KILL+2!
RFL1	KILL+2!
RFLL	KILL+2!
RP	KILL+2!
RX	ACT+1, ACT+2, ACT+5*, ACT+6, ACT+16, ACT+19, ACT+24, DRGDRG+6, KILL+2!
RX0	SUS+1*, SUS+2, KILL+2!
RX1	REINS+8*!
RXCNT	KILL+2!
RXDA	KILL+2!
RXIEN	ACT+7~*, ACT+21, ACT+22, ACT+27, ACT+28, ACT+29, ACT+31, ACT+33, ACT+34, ACT+35
RXN	SUS+1, SUS+2, SUS+4, DRGDRG+17~, 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+3, DRGDRG+4, DRGDRG+13!, AUTOD+3, AUTOD+5, AUTOD+14, AUTOD+17, AUTOD+18, AUTOD+20
STAT	DRGDRG+4*, DRGDRG+6, DRGDRG+13!, KILL+2!
SUB	KILL+2!, LOG*
SUSD	HLD~, HLD+3*, HLD+4!, HLD+5, REF, REF+8, REF+11, REF+12, REF+13!
VCOM	VERIFY+4*!
WARN	KILL!
X	SUS+2, DRGDRG+5, VERIFY+1, KILL+2!, AUTOD+12
XFDT	ACT+10, ACT+13, ACT+16, ACT+25, KILL+2!
XFLAG	ACT+18!
XLPDT	ACT+14*, ACT+16, ACT+25, KILL+2!
XRELDT	ACT+10, ACT+13, ACT+16, ACT+25, KILL+2!
Y	REINS+3, REINS+4, ACT+13, ACT+14*, ACT+31, SUS+3, DRGDRG+5, DRGDRG+7, DRGDRG+8, KILL+2! , AUTOD+12
Y(0	DRGDRG+6, DRGDRG+8
ZRXN	DRGDRG+9~, DRGDRG+10*, DRGDRG+17

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOCAN2

Information

Source Information

Call Graph

Call Graph Total: 24

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: