Routine: PRCBSUT

Customize PDF page

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

Information

PRCBSUT ;WISC@ALTOONA/CTB/SAW-GET STATION INFO ;8/25/00 16:18

Source Information

Source file <PRCBSUT.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
VA FileMan	2	MIX^DIC1 DT^DICRW
IFCAP	1	^PRCFSITE

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

Package	Total	Caller Graph
IFCAP	3	PRCBCPR PRCBR2 PRCBRBR

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;97;Oct 20, 2000
EN1	;STATION,FY,QUARTER,CONTROL POINT
QT	;SELECT QUARTER
CP	;SELECT CONTROL POINT
EX
EXIT

External References

Name	Field # of Occurrence
MIX^DIC1	CP+4
DT^DICRW	QT+1
^PRCFSITE	EN1+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Variable: PRC("QTR") Timeout: DTIME Line Location: QT+2
Function Call: WRITE	Prompt: !,"Select QUARTER: ",PRCSQTT,"// " Line Location: QT+2
Function Call: WRITE	Prompt: $C(7) Line Location: QT+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRC(420 - [#420]	CP+5

Label References

Name	Line Occurrences
CP	EN1+1
EX	EN1+1
EXIT	EN1+2, CP+4
QT	EN1+1, QT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EN1+1, EN1+2, QT+2, EX*
>> C	CP+4, CP+5
>> C1	EN1+2, CP+4, CP+5
>> D	CP+3*
DIC	CP+1*, CP+4!, CP+6!
DIC("A"	CP+1*
DIC("B"	CP+3*
DIC("S"	CP+1, CP+2
DIC(0	CP+1*
DT	QT+1
DTIME	QT+2
N	CP+6!
>> PRC("CP"	CP+3, CP+4*, CP+5, EX!
>> PRC("FY"	EN1+2, EX!
>> PRC("QTR"	EN1+1, EN1+2, QT+1, QT+2*, EX!
>> PRC("SITE"	EN1+2, CP+1, CP+5
PRCSFYT	EXIT!
PRCSI	QT+1*, EX!, EXIT!
PRCSK	CP+2, EXIT!
PRCSQTT	QT+1*, QT+2, EXIT!
U	QT+2
>> X	EN1+2*
>> Y	EN1+1, CP+4, EX*
>> Y(0	CP+4
>> Z	EN1+2*