Routine: IBODIV

Customize PDF page

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

Information

IBODIV ;BSN/GRR - MULTI-DIVISION SELECT ; 27 FEB 84 9:40 am

Source Information

Source file <IBODIV.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Registration	2	$$PRIM^VASITE DIVISION^VAUTOMA
VA FileMan	1	^DIC

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

Package	Total	Caller Graph
Integrated Billing	17	IBCONS4 IBCROIP IBFBWL IBJD IBJDB1 IBJDF1 IBJDF2 IBJDI1 IBJDI2 IBJDI3 IBJDI4 IBJDI7 IBOEMP IBOHLS IBOMHC IBOTR IBTOPW

Entry Points

Name	Comments	DBIA/ICR reference
ROUT
APLST
FRLST
CLST
PALST
CNLET
PCNLET
NSLET
NSLET1
RALST
A223
CSSD
SDCP
DSSA
PSDR
CSEE
CALST
CACTLST
ASK
DIC
AWAY
ERR
ASK2

External References

Name	Field # of Occurrence
^DIC	DIC
$$PRIM^VASITE	ASK
DIVISION^VAUTOMA	ASK2+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: DTIME Line Location: ASK+0
Function Call: WRITE	Prompt: !,DIC("A")," ",$P(^(0),"^"),"// " Line Location: ASK+0
Function Call: WRITE	Prompt: *7," ??" Line Location: ASK+1
Function Call: WRITE	Prompt: " Enter 'ALL' for all divisions or" Line Location: ASK+2
Function Call: WRITE	Prompt: !,7,"**WARNING...MEDICAL CENTER DIVISION FILE IS NOT SET UP" Line Location: ASK2+0
Routine Call	DIC Line Location: DIC

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DG(40.8 - [#40.8]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	ASK, ASK2, ASK2+2
^DG(43 - [#43]	ASK2+1

Label References

Name	Line Occurrences
ASK	ROUT, APLST, FRLST, CLST, NSLET, RALST, A223, CSSD, SDCP, DSSA , CSEE, CALST, CACTLST, DIC
ASK2	PSDR
AWAY	ASK+2
DIC	PALST, CNLET, PCNLET, NSLET1
ERR	ASK, ASK2, ASK2+2

Naked Globals

Name	Field # of Occurrence
^("GL"	ASK2+1
^(0	ASK, ASK2+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ALL	ASK, ASK+1
DIC	ASK+2*, DIC!, AWAY!, ERR!, ASK2+2!
DIC("A"	ROUT, APLST, FRLST, CLST, PALST, CNLET, PCNLET, NSLET, NSLET1, RALST , A223, CSSD, SDCP, DSSA, PSDR, CSEE, CALST, CACTLST, ASK
DIC(0	ASK+2*
>> DIV	ASK+2, DIC
DTIME	ASK
>> I	ASK2+2*
SDALL	ASK+1, ASK+2, ERR!
SDEF	ASK*, ASK+2, AWAY!, ERR!
>> SDLT	DIC
>> SDV1	DIC*
U	ASK2+1, ASK2+2
>> VAUTD	ASK2*
>> VAUTD(	ASK2+2*
>> X	ASK, ASK+1, ASK+2, DIC
>> Y	DIC, AWAY, ERR, ASK2*