Routine: PSXREF

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

PSXREF ;BIR/BAB-Cross Reference Utility ;[ 04/08/97 2:06 PM ]

Source Information

Source file <PSXREF.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
VA FileMan	1	NOW^%DTC

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: 4

Package	Total	Caller Graph
National Drug File	2	PSNHELP PSNQA
CMOP	1	PSXCMOP
Outpatient Pharmacy	1	CMOP EVENT

Entry Points

Name	Comments	DBIA/ICR reference
ACT	;Entry point to create xref for CMOP Dispense field edit
DEL	; Called by ^DD(52.1,.01,"DEL",550,0)- PREVENTS DELETING REFILL DATE
AR	; Sets the "AR" xref if CMOP status in 52 =1 ; ^PSRX("AR",RELEASE D/T,INTERNAL ENTRY # RX in 52,fill #
AS	; Transmission D/T xref ; ^PSRX("AS",TRANS D/T,INTERNAL ENTRY # RX in 52, fill #
ASKILL	;
DISPUNIT	;Called by ^DD(50,14.5,"DEL",0) to prevent deleting CMOP disp units.

External References

Name	Field # of Occurrence
NOW^%DTC	ACT+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The Dispense Unit of a CMOP drug cannot be deleted!",! Line Location: DISPUNIT+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSDRUG - [#50]	ACT+1, ACT+2, ACT+3, ACT+4, ACT+5*
^PSDRUG("AQ"	DISPUNIT+1
^PSRX - [#52]	AR+3, AR+4, AR+5, AS+2
^PSRX("AR"	AR+3, AR+5
^PSRX("AS"	AS+2*
^PSX(550.2 - [#550.2]	AS+2

Naked Globals

Name	Field # of Occurrence
^(0	ACT+5*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ACT+4, ACT+6!
>> DA	ACT+1, ACT+2, ACT+3, ACT+4, ACT+5, DEL+1, DEL+2, AR+3, AR+4, AR+5 , AS+2, DISPUNIT+1
>> DA(1	AR+3, AR+4, AR+5, AS+2
DUZ	ACT+4
PSX	ACT+3, ACT+4, ACT+5, ACT+6!
PSX(	DEL+1, DEL+2
U	AR+3, AR+4, AR+5, AS+2
>> X	AR+2
Z	ACT+3*, ACT+6!