Routine: PSOCST5

Customize PDF page

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

Information

PSOCST5 ;BHAM ISC/SAB - PROVIDER BY DRUG COST ; 10/01/92 16:33

Source Information

Source file <PSOCST5.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Kernel	1	^%ZTLOAD
Outpatient Pharmacy	1	(CDT,CTP,DVC,EX,FTT,FTU,HD,HDC,HDN,PAS,PRT,PRV,SUB,TOT,ZER)^PSOCSTX

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

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSO COST PROVIDER BY DRUG

Entry Points

Name	Comments	DBIA/ICR reference
BEG
DEV
START
EX
PHY
DRUG
STORE
HD
SUB
HD1

External References

Name	Field # of Occurrence
^%ZTLOAD	DEV+2
CDT^PSOCSTX	BEG
CTP^PSOCSTX	BEG
DVC^PSOCSTX	DEV
EX^PSOCSTX	EX
FTT^PSOCSTX	SUB
FTU^PSOCSTX	SUB
HD^PSOCSTX	HD, HD1
HDC^PSOCSTX	BEG
HDN^PSOCSTX	HD1
PAS^PSOCSTX	DEV+1
PRT^PSOCSTX	START+3
PRV^PSOCSTX	BEG
SUB^PSOCSTX	SUB
TOT^PSOCSTX	START+4
ZER^PSOCSTX	START+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?5,"Provider: ",PHYX Line Location: HD+0
Function Call: WRITE	Prompt: !,"Total for ",PHYX Line Location: SUB+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSCST - [#50.9]	START, PHY, DRUG
^PSDRUG - [#50]	STORE+1
^TMP($J	START!, START+1, START+2, START+3, STORE+1, STORE+2
^VA(200 - [#200]	STORE

Label References

Name	Line Occurrences
@(	START
DEV	BEG
DRUG	PHY
EX	BEG+1, DEV+2
HD	START+2, START+3, SUB
HD1	START+1
STORE	DRUG
SUB	START+2

Naked Globals

Name	Field # of Occurrence
^(	DRUG
^(0	DRUG, STORE, STORE+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BEGDATE	START
>> CTR	BEG, DEV, START+2, START+3, START+4, HD
>> DRUG	DRUG*, STORE+1
>> DRUGX	START+2, START+3, STORE+1, STORE+2
>> ENDDATE	START
>> G	START+2*
>> I	START+2*
>> IFN	START, START+4
IO	START
IO("Q"	DEV+1, DEV+2!
IOSL	START+3, SUB
>> PHY	PHY*, DRUG, STORE
>> PHYX	START+1, START+2, START+3, STORE*, STORE+1, STORE+2, HD, SUB
>> PSDT	START*, PHY, DRUG
PSOION	DEV+1!
>> RP	BEG*
>> TTX	START+3*
>> UTL	STORE+2*
>> X	DRUG*, STORE+2
>> Y	START+3*
>> ZTDESC	DEV+1*
>> ZTRTN	DEV+1*
>> ZTSK	DEV+2