Routine: PSOFUNC

Customize PDF page

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

Information

PSOFUNC ;BHAM ISC/DRI - functions moved from the psf global ;10/26/92 11:49

Source Information

Source file <PSOFUNC.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Outpatient Pharmacy	2	^PSOEXDT CAN^PSOTPCAN
VA FileMan	2	(,C)^%DTC EN^DDIOL

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

Package	Total	Caller Graph
Outpatient Pharmacy	20	^PSRX PSOCPDUP PSODDPR2 PSODDPR8 PSODDPRE PSODGDG1 PSODISPS PSODRDUP PSOHLDS3 PSOHLSG3 PSOLSET PSOP PSOP1 PSOPRF PSOPRFSS PSORESK1 PSORXPR PSOSD PSOSD2 PSOVERC
Controlled Substances	1	PSDOPT
Medicine	1	MCPSOP

Entry Points

Name	Comments	DBIA/ICR reference
STAT	;gets status of rx	ICR #675 Status: Active Usage: Private
CUTDATE	;calculates exp/cancel cutoff date in PSODTCUT
FIXEXPDT	;calculate expiration date on rx's missing them
INP526	;input transform for drug field (#6) in prescription file (#52)
INP5261

External References

Name	Field # of Occurrence
^%DTC	INP526+2
C^%DTC	CUTDATE+1
EN^DDIOL	INP5261, INP5261+1, INP5261+2, INP5261+3
^PSOEXDT	FIXEXPDT+1
CAN^PSOTPCAN	INP5261+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.5 - [#52.5]	STAT+1
^PS(55 - [#55]	INP526+2
^PSRX - [#52]	FIXEXPDT+1, INP526+2, INP5261, INP5261+3*

Label References

Name	Line Occurrences
INP5261	INP526+2, INP5261+2

Naked Globals

Name	Field # of Occurrence
^(	FIXEXPDT+1, INP526+2
^("P"	STAT+1
^("STA"	INP526+2
^(0	STAT+1, FIXEXPDT+1, INP526+2
^(2	FIXEXPDT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	INP526+2
DT	STAT+2, CUTDATE+1, INP5261+3
DTIME	INP5261
>> I	INP526+2*
>> J	STAT+1, FIXEXPDT+1*
>> PSODFN	INP526+2*
>> PSODTCUT	CUTDATE+1*
>> PSOPAR	CUTDATE+1
>> PSOPRPAS	CUTDATE+1*
>> RX	INP526+2*, INP5261, INP5261+3
>> RX0	STAT+1, STAT+3, FIXEXPDT+1
>> RX2	STAT+2, FIXEXPDT+1*
>> ST	STAT+3*
>> ST0	STAT+1, STAT+2, STAT+3
X	CUTDATE+1, INP526+2*, INP5261+4!
>> X1	CUTDATE+1, INP526+2
>> X2	CUTDATE+1, INP526+2
XS	INP526+2*, INP5261+4!
ZS	INP5261+4!
>> ZX	INP5261, INP5261+1, INP5261+2, INP5261+3*