Routine: RCBEUBI1

Customize PDF page

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

Information

RCBEUBI1 ;WISC/RFJ-utilties for bills (in file 430) ;1 Jun 00

Source Information

Source file <RCBEUBI1.m>

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
Accounts Receivable	1	^PRCA(430

Entry Points

Name	Comments	DBIA/ICR reference
DICW	; write identifier code for bill lookup
LOOKUP	; special lookup on bills, called from ^dd(430,.01,7.5) ; if rcbeflup flag not set, do not use special lookup

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?12," ",$E($P($G(^PRCA(430.2,+$P(DATA,"^",2),0)),"^")_" ",1,15) Line Location: DICW+5
Function Call: WRITE	Prompt: ?35," ",$E($P(DATA6,"^",21),4,5),"/",$E($P(DATA6,"^",21),6,7),"/",$E($P(DATA6,"^",21),2,3) Line Location: DICW+8
Function Call: WRITE	Prompt: ?46," ",$E($S(%="":"NO DEBTOR NAME",1:%),1,$S(RCX<46:20,1:10)_" ") Line Location: DICW+13
Function Call: WRITE	Prompt: ?68," ",$E($P($G(^PRCA(430.3,+$P(DATA,"^",8),0)),"^"),1,9) Line Location: DICW+15

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRCA(430 - [#430]	DICW+2, DICW+3
^PRCA(430.2 - [#430.2]	DICW+5
^PRCA(430.3 - [#430.3]	DICW+15
^RCD(340 - [#340]	DICW+12

Naked Globals

Name	Field # of Occurrence
^(0	DICW+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DICW+11, DICW+12, DICW+13
DATA	DICW+1~, DICW+2*, DICW+5, DICW+11, DICW+15
DATA6	DICW+1~, DICW+3, DICW+7, DICW+8
>> DIC("S"	LOOKUP+4, LOOKUP+6, LOOKUP+8, LOOKUP+10, LOOKUP+12*, LOOKUP+13!
>> RCBEFLUP	LOOKUP+2
RCX	DICW+1~, DICW+10*, DICW+13
U	DICW+12
>> X	LOOKUP+4, LOOKUP+6, LOOKUP+8, LOOKUP+10, LOOKUP+12*
>> Y	DICW+2, DICW+3