Routine: RCDMC90

Package	Total	Call Graph
Accounts Receivable	7	$$EMERES^PRCAUTL $$DADD^RCAMADD (COMPILE,ERROR,PSEUDO)^RCDMC90U $$HOLDCHK^RCDMCUT1 ^RCEXINAD $$SITE^RCMSITE $$RFCHK^RCTOPD
Integrated Billing	1	$$SWSTAT^IBBAPI
Kernel	1	$$LJ^XLFSTR
MailMan	1	^XMD
Registration	1	(DEM,KVAR,PID)^VADPT
VA FileMan	1	C^%DTC

Name	Comments	DBIA/ICR reference
V	;;4.5;Accounts Receivable;45,108,133,121,163,190,192,236,237,229,253,338,343;Mar 20, 1995;Build 59
ENTER	;Entry point from nightly process
UPDATE	;WEEKLY UPDATE COMPILATION
KVAR
PROC(DEBTOR,QUIT)	;PROCESS BILLS FOR A SPECIFIC DEBTOR
TOTAL
PROCQ
DATE8(X)	;CHANGES FILEMAN DATE INTO 8 DIGIT DATE IN FORMAT MMDDYYYY
AMT(X)	;CHANGES AMOUNT TO ZERO FILLED, RIGHT JUSTIFIED
NM(DFN)	;Returns first, middle, and last name in 3 different variables
QNM
BAL(DEBTOR)	;COMPUTES TOTAL OF ACTIVE BILLS THAT COULD BE SENT TO DMC
BALQ
SETREC	;SETS TEMPORARY GLOBAL FOR MAIL MESSAGE TO USERS
CHKADD(DEBTOR)	; Checks for invalid and unknown addresses
CHKADDQ

Name	Field # of Occurrence
C^%DTC	ENTER+10
$$SWSTAT^IBBAPI	TOTAL+2
$$EMERES^PRCAUTL	ENTER+17
$$DADD^RCAMADD	CHKADD+3
COMPILE^RCDMC90U	ENTER+42, UPDATE+17
ERROR^RCDMC90U	TOTAL+16
PSEUDO^RCDMC90U	TOTAL+4
$$HOLDCHK^RCDMCUT1	PROC+49
^RCEXINAD	ENTER+3
$$SITE^RCMSITE	ENTER+9
$$RFCHK^RCTOPD	PROC+43
DEM^VADPT	PROC+4
KVAR^VADPT	KVAR
PID^VADPT	SETREC+1
$$LJ^XLFSTR	ENTER+25, ENTER+29, ENTER+31, ENTER+33, ENTER+35, UPDATE+7, UPDATE+9, UPDATE+11, TOTAL+10, SETREC+3
^XMD	PROC+31, TOTAL+36

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	TOTAL+35, NM+2, SETREC+3
^PRCA(430 - [#430]	ENTER+14, ENTER+39*, PROC+8!, PROC+11, PROC+15!, BAL+3, BAL+4
^RC(342 - [#342]	ENTER+3
^RCD(340 - [#340]	ENTER+16, ENTER+17, ENTER+19, ENTER+38, UPDATE+1, UPDATE+2!, UPDATE+3, UPDATE+14, PROC+2, PROC+7 , TOTAL+5, TOTAL+26!, CHKADD+2
^TMP($J	ENTER+8!, ENTER+18!, ENTER+39, PROC+52*
^XTMP("RCDMC90"	ENTER+8!, ENTER+29, ENTER+31, ENTER+33, ENTER+35, ENTER+37, UPDATE+7, UPDATE+9, UPDATE+11, UPDATE+13 , KVAR+1!, SETREC+3*

Name	Line Occurrences
$$AMT	ENTER+35, ENTER+37, UPDATE+11, UPDATE+13
$$BAL	ENTER+37, UPDATE+13
$$CHKADD	TOTAL+15
$$DATE8	ENTER+26, ENTER+35, ENTER+37, UPDATE+13
$$NM	ENTER+22
CHKADDQ	CHKADD+2
KVAR	ENTER+42, UPDATE+17
PROC	ENTER+20, UPDATE+4
SETREC	ENTER+40, UPDATE+15
TOTAL	PROC+7
UPDATE	ENTER+12

Name	Field # of Occurrence
^(	ENTER+39
^(0	TOTAL+35
^(12	PROC+11
^(3	ENTER+38, UPDATE+14
^(4	PROC+11
^(6	PROC+11
^(7	PROC+11, BAL+4

Name	Field # of Occurrence
ADDR	ENTER+7~, ENTER+29, ENTER+31, ENTER+33, ENTER+35, UPDATE+7, UPDATE+9, UPDATE+11, TOTAL+18, TOTAL+21 , CHKADD+1, CHKADD+3, CHKADD+4
ADDRPHO	ENTER+7~, TOTAL+21*, TOTAL+22
ADMIN	ENTER+4~, PROC+9, PROC+19, PROC+20, PROC+52, PROC+53
B0	ENTER+4~, PROC+11, PROC+12, PROC+30, PROC+41, BAL+4, BAL+5, BAL+6
B12	ENTER+4~, PROC+11*, PROC+18, PROC+51, PROC+52
B4	ENTER+4~, PROC+11*, PROC+13, PROC+33
B6	ENTER+4~, PROC+11*, PROC+35, PROC+36, PROC+38, PROC+43, PROC+50
B7	ENTER+4~, PROC+11, PROC+19, BAL+4, BAL+8
BAL	BAL+1~, BAL+2, BAL+8, BALQ
BILL	ENTER+4~, PROC+6, PROC+8, PROC+11, PROC+49, PROC+52, BAL+1~, BAL+2, BAL+3, BAL+4
CATYP	ENTER+5~, ENTER+37, UPDATE+13, TOTAL+9, TOTAL+10
CATYP(	PROC+5*, PROC+46!, TOTAL+9
CHK	CHKADD+1~, CHKADD+2, CHKADD+4*, CHKADDQ
CHKPHONE	ENTER+7~, TOTAL+22*
CNTR	ENTER+5~, ENTER+12, ENTER+28, ENTER+29, ENTER+30, ENTER+31, ENTER+32, ENTER+33, ENTER+34, ENTER+35 , ENTER+36, ENTER+37, ENTER+42, UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+9, UPDATE+10, UPDATE+11, UPDATE+12 , UPDATE+13, UPDATE+17
DEBTOR	ENTER+4~, ENTER+12, ENTER+14, ENTER+16, ENTER+17, ENTER+19, ENTER+20, ENTER+37, ENTER+38, UPDATE+1* , UPDATE+2, UPDATE+3, UPDATE+4, UPDATE+13, UPDATE+14, PROC~, PROC+2, PROC+7, PROC+8, PROC+15 , TOTAL+5, TOTAL+15, TOTAL+26, BAL~, BAL+3, CHKADD~, CHKADD+2, CHKADD+3
DEBTOR0	ENTER+4~, PROC+2*, PROC+3, PROC+4, TOTAL+6
DFN	ENTER+5~, ENTER+22, PROC+4, PROC+49, TOTAL+4, TOTAL+6, TOTAL+16, TOTAL+35, NM~, NM+2 , SETREC+3
DOB	ENTER+5~, ENTER+26*, ENTER+29
DT	ENTER+3, ENTER+8, ENTER+10, ENTER+37, ENTER+38, UPDATE+13, PROC+52
ESTDT	ENTER+5~, ENTER+35, ENTER+38, PROC+6, PROC+50
FN	ENTER+5~, ENTER+22, ENTER+24, ENTER+25, NM+1~, NM+6, QNM
FULLNM	ENTER+6~, ENTER+22, ENTER+23, ENTER+24, ENTER+29
>> I	TOTAL+22*
INT	ENTER+4~, PROC+9, PROC+19, PROC+20, PROC+52, PROC+53
LKUP	ENTER+7~, TOTAL+15*, TOTAL+16
LN	ENTER+5~, ENTER+23, ENTER+24, ENTER+25, NM+1~, NM+3, QNM
LTRDT3	ENTER+4~, PROC+35*
MN	ENTER+5~, ENTER+22, ENTER+24, ENTER+25, NM+1~, NM+3, NM+4*, QNM
MSG	PROC+21~, TOTAL+27~
MSG(1	PROC+26, TOTAL+32
MSG(2	PROC+27, TOTAL+33
MSG(3	PROC+28, TOTAL+34
MSG(4	PROC+29, TOTAL+35
MSG(5	PROC+30*
NM	TOTAL+27~, NM+1~, NM+2*, NM+3, NM+5, NM+6
OFFAMT	ENTER+6~, ENTER+19, ENTER+37, UPDATE+3, UPDATE+13
PHONE	ENTER+6~, ENTER+29, UPDATE+11, TOTAL+21, TOTAL+22, TOTAL+23*
PRIN	ENTER+4~, PROC+8, PROC+9, PROC+19, PROC+20, PROC+51*, PROC+52, PROC+53
PSSN	ENTER+7~, TOTAL+4*
QUIT	ENTER+6~, ENTER+19, ENTER+20, UPDATE+3, UPDATE+4, PROC~, TOTAL+38*
RC91DT	ENTER+6~, ENTER+10*, PROC+6, PROC+36
RCDFN	ENTER+15~, ENTER+16*, ENTER+17
RCDOC	ENTER+1, ENTER+12, KVAR+1!, PROC+7, PROC+18, TOTAL+1, TOTAL+2, TOTAL+4, TOTAL+5, TOTAL+16 , TOTAL+25
RCNT	ENTER+6~, ENTER+12, SETREC+1
REPAY	ENTER+6~, PROC+6, PROC+8, PROC+16
SITE	ENTER+5~, ENTER+9*, ENTER+29, UPDATE+11
STNM	ENTER+5~, ENTER+25*, ENTER+29
TADMIN	ENTER+5~, ENTER+35, ENTER+37, ENTER+38, UPDATE+13, UPDATE+14, PROC+6, PROC+14, PROC+53, TOTAL , TOTAL+5, TOTAL+16, SETREC+2, SETREC+3
TINT	ENTER+5~, ENTER+35, ENTER+38, UPDATE+13, UPDATE+14, PROC+6, PROC+14, PROC+53, TOTAL, TOTAL+5 , TOTAL+16, SETREC+2, SETREC+3
TLINE	ENTER+6~, ENTER+9, ENTER+42, UPDATE+17, SETREC+2
TOTAL	ENTER+6~, ENTER+38, UPDATE+14, PROC+6, PROC+14, TOTAL, TOTAL+2, TOTAL+5, TOTAL+16, TOTAL+25 , SETREC+3
TPRIN	ENTER+5~, ENTER+35, ENTER+38, UPDATE+11, UPDATE+13, UPDATE+14, PROC+6, PROC+14, PROC+53, TOTAL , TOTAL+1, TOTAL+5, TOTAL+16, SETREC+2, SETREC+3
U	ENTER+19, ENTER+22, ENTER+23, ENTER+29, ENTER+31, ENTER+33, ENTER+35, ENTER+38, UPDATE+3, UPDATE+7 , UPDATE+9, UPDATE+11, UPDATE+14, PROC+3, PROC+7, PROC+12, PROC+18, PROC+19, PROC+30, PROC+33 , PROC+35, PROC+38, PROC+41, PROC+43, PROC+50, PROC+51, PROC+52, TOTAL+4, TOTAL+5, TOTAL+18 , TOTAL+21, TOTAL+35, BAL+5, BAL+6, BAL+8, SETREC+2, SETREC+3
>> VA("BID"	KVAR+1!, SETREC+1*, SETREC+3
>> VADM(2	ENTER+29, UPDATE+7, PROC+4, TOTAL+4
>> VADM(3	ENTER+26
>> VADM(6	PROC+10
X	ENTER+10, ENTER+15~, ENTER+17, ENTER+39, PROC+5, PROC+15, PROC+41, PROC+43, PROC+46, TOTAL+9 , DATE8~, DATE8+1, DATE8+2, AMT~, AMT+1, AMT+2, AMT+3, BAL+6, BAL+7
X1	ENTER+6~, ENTER+10*
X2	ENTER+6~, ENTER+10*
XMDUZ	KVAR+1!, PROC+24, TOTAL+30
XMSUB	PROC+21~, PROC+22, TOTAL+27~, TOTAL+28
XMTEXT	PROC+21~, PROC+25, TOTAL+27~, TOTAL+31
XMY	PROC+21~, TOTAL+27~
XMY("G.DMR"	PROC+23*
XMY("G.DMX"	TOTAL+29*
XN	ENTER+6~, ENTER+23, ENTER+24, NM+1~, NM+4, NM+5*, QNM
ZIPCODE	ENTER+6~, ENTER+35, UPDATE+11, TOTAL+18*

Name

Field # of Occurrence

ADDR

ENTER+7~, ENTER+29, ENTER+31, ENTER+33, ENTER+35, UPDATE+7, UPDATE+9, UPDATE+11, TOTAL+18, TOTAL+21
, CHKADD+1*, CHKADD+3*, CHKADD+4

ADDRPHO

ENTER+7~, TOTAL+21*, TOTAL+22

ADMIN

ENTER+4~, PROC+9*, PROC+19*, PROC+20, PROC+52, PROC+53

B0

ENTER+4~, PROC+11*, PROC+12, PROC+30, PROC+41, BAL+4*, BAL+5, BAL+6

B12

ENTER+4~, PROC+11*, PROC+18, PROC+51, PROC+52

B4

ENTER+4~, PROC+11*, PROC+13, PROC+33

B6

ENTER+4~, PROC+11*, PROC+35, PROC+36, PROC+38, PROC+43, PROC+50

B7

ENTER+4~, PROC+11*, PROC+19, BAL+4*, BAL+8

BAL

BAL+1~, BAL+2*, BAL+8*, BALQ

BILL

ENTER+4~, PROC+6*, PROC+8*, PROC+11, PROC+49, PROC+52, BAL+1~, BAL+2*, BAL+3*, BAL+4

CATYP

ENTER+5~, ENTER+37, UPDATE+13, TOTAL+9*, TOTAL+10*

CATYP(

PROC+5*, PROC+46!, TOTAL+9

CHK

CHKADD+1~*, CHKADD+2*, CHKADD+4*, CHKADDQ

CHKPHONE

ENTER+7~, TOTAL+22*

CNTR

ENTER+5~, ENTER+12*, ENTER+28*, ENTER+29, ENTER+30*, ENTER+31, ENTER+32*, ENTER+33, ENTER+34*, ENTER+35
, ENTER+36*, ENTER+37, ENTER+42, UPDATE+6*, UPDATE+7, UPDATE+8*, UPDATE+9, UPDATE+10*, UPDATE+11, UPDATE+12*
, UPDATE+13, UPDATE+17

DEBTOR

ENTER+4~, ENTER+12*, ENTER+14*, ENTER+16, ENTER+17, ENTER+19, ENTER+20, ENTER+37, ENTER+38, UPDATE+1*
, UPDATE+2, UPDATE+3, UPDATE+4, UPDATE+13, UPDATE+14, PROC~, PROC+2, PROC+7, PROC+8, PROC+15
, TOTAL+5, TOTAL+15, TOTAL+26, BAL~, BAL+3, CHKADD~, CHKADD+2, CHKADD+3

DEBTOR0

ENTER+4~, PROC+2*, PROC+3, PROC+4, TOTAL+6

DFN

ENTER+5~, ENTER+22, PROC+4*, PROC+49, TOTAL+4, TOTAL+6*, TOTAL+16, TOTAL+35, NM~, NM+2
, SETREC+3

DOB

ENTER+5~, ENTER+26*, ENTER+29

DT

ENTER+3, ENTER+8, ENTER+10, ENTER+37, ENTER+38, UPDATE+13, PROC+52

ESTDT

ENTER+5~, ENTER+35, ENTER+38, PROC+6*, PROC+50*

FN

ENTER+5~, ENTER+22*, ENTER+24, ENTER+25, NM+1~, NM+6*, QNM

FULLNM

ENTER+6~, ENTER+22*, ENTER+23, ENTER+24*, ENTER+29

>> I

TOTAL+22*

INT

ENTER+4~, PROC+9*, PROC+19*, PROC+20, PROC+52, PROC+53

LKUP

ENTER+7~, TOTAL+15*, TOTAL+16

LN

ENTER+5~, ENTER+23*, ENTER+24, ENTER+25, NM+1~, NM+3*, QNM

LTRDT3

ENTER+4~, PROC+35*

MN

ENTER+5~, ENTER+22*, ENTER+24, ENTER+25, NM+1~, NM+3*, NM+4*, QNM

MSG

PROC+21~, TOTAL+27~

MSG(1

PROC+26*, TOTAL+32*

MSG(2

PROC+27*, TOTAL+33*

MSG(3

PROC+28*, TOTAL+34*

MSG(4

PROC+29*, TOTAL+35*

MSG(5

PROC+30*

NM

TOTAL+27~, NM+1~, NM+2*, NM+3, NM+5, NM+6

OFFAMT

ENTER+6~, ENTER+19*, ENTER+37, UPDATE+3*, UPDATE+13

PHONE

ENTER+6~, ENTER+29, UPDATE+11, TOTAL+21*, TOTAL+22*, TOTAL+23*

PRIN

ENTER+4~, PROC+8, PROC+9*, PROC+19*, PROC+20, PROC+51*, PROC+52, PROC+53

PSSN

ENTER+7~, TOTAL+4*

QUIT

ENTER+6~, ENTER+19*, ENTER+20, UPDATE+3*, UPDATE+4, PROC~, TOTAL+38*

RC91DT

ENTER+6~, ENTER+10*, PROC+6, PROC+36

RCDFN

ENTER+15~, ENTER+16*, ENTER+17

RCDOC

ENTER+1, ENTER+12, KVAR+1!, PROC+7, PROC+18, TOTAL+1, TOTAL+2, TOTAL+4, TOTAL+5, TOTAL+16
, TOTAL+25

RCNT

ENTER+6~, ENTER+12*, SETREC+1*

REPAY

ENTER+6~, PROC+6*, PROC+8, PROC+16*

SITE

ENTER+5~, ENTER+9*, ENTER+29, UPDATE+11

STNM

ENTER+5~, ENTER+25*, ENTER+29

TADMIN

ENTER+5~, ENTER+35, ENTER+37, ENTER+38, UPDATE+13, UPDATE+14, PROC+6*, PROC+14*, PROC+53*, TOTAL
, TOTAL+5, TOTAL+16*, SETREC+2, SETREC+3

TINT

ENTER+5~, ENTER+35, ENTER+38, UPDATE+13, UPDATE+14, PROC+6*, PROC+14*, PROC+53*, TOTAL, TOTAL+5
, TOTAL+16*, SETREC+2, SETREC+3

TLINE

ENTER+6~, ENTER+9*, ENTER+42, UPDATE+17, SETREC+2*

TOTAL

ENTER+6~, ENTER+38, UPDATE+14, PROC+6*, PROC+14*, TOTAL*, TOTAL+2, TOTAL+5, TOTAL+16*, TOTAL+25
, SETREC+3

TPRIN

ENTER+5~, ENTER+35, ENTER+38, UPDATE+11, UPDATE+13, UPDATE+14, PROC+6*, PROC+14*, PROC+53*, TOTAL
, TOTAL+1, TOTAL+5, TOTAL+16*, SETREC+2, SETREC+3

U

ENTER+19, ENTER+22, ENTER+23, ENTER+29, ENTER+31, ENTER+33, ENTER+35, ENTER+38, UPDATE+3, UPDATE+7
, UPDATE+9, UPDATE+11, UPDATE+14, PROC+3, PROC+7, PROC+12, PROC+18, PROC+19, PROC+30, PROC+33
, PROC+35, PROC+38, PROC+41, PROC+43, PROC+50, PROC+51, PROC+52, TOTAL+4, TOTAL+5, TOTAL+18
, TOTAL+21, TOTAL+35, BAL+5, BAL+6, BAL+8, SETREC+2, SETREC+3

>> VA("BID"

KVAR+1!, SETREC+1*, SETREC+3

>> VADM(2

ENTER+29, UPDATE+7, PROC+4, TOTAL+4

>> VADM(3

ENTER+26

>> VADM(6

PROC+10

X

ENTER+10, ENTER+15~, ENTER+17*, ENTER+39*, PROC+5*, PROC+15*, PROC+41*, PROC+43, PROC+46, TOTAL+9*
, DATE8~, DATE8+1*, DATE8+2, AMT~, AMT+1*, AMT+2*, AMT+3, BAL+6*, BAL+7

X1

ENTER+6~, ENTER+10*

X2

ENTER+6~, ENTER+10*

XMDUZ

KVAR+1!, PROC+24*, TOTAL+30*

XMSUB

PROC+21~, PROC+22*, TOTAL+27~, TOTAL+28*

XMTEXT

PROC+21~, PROC+25*, TOTAL+27~, TOTAL+31*

XMY

PROC+21~, TOTAL+27~

XMY("G.DMR"

PROC+23*

XMY("G.DMX"

TOTAL+29*

XN

ENTER+6~, ENTER+23*, ENTER+24, NM+1~, NM+4*, NM+5*, QNM

ZIPCODE

ENTER+6~, ENTER+35, UPDATE+11, TOTAL+18*

Customize PDF page

Package: Accounts Receivable

Routine: RCDMC90

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed