Routine: RCTOP2

Package	Total	Call Graph
Accounts Receivable	2	($$INST,$$INSUR,$$PAT,$$PER,$$VEN)^RCAMADD $$BLANK^RCTOP1
Kernel	1	$$LJ^XLFSTR

Package	Total	Caller Graph
Accounts Receivable	1	RCTOPD

Entry Points

Name	Comments	DBIA/ICR reference
V	;;4.5;Accounts Receivable;141,169,333;Mar 20, 1995;Build 7
EN1(DEBTOR,CODE,FILE)	;entry point to compile type 2 documents into global
QUIT
DADD(RCDB,RCCONF)	;
Q
ARDEB(RCDB)	;Get address from AR Debtor file (340)
Q6
PAT(RCDB,RCCONF)	;Get patient address as "Str1^Str2^Str3^City^State^ZIP^Telephone" from ^DPT ; if RCCONF=0 (default), then return patients permanent address ; if RCCONF=1, then return confidential address, or NULL
Q3
COUNTRY(Z)	;
COUNTRYQ	;

Name	Line Occurrences (* Changed, ! Killed)
^DIC(5 - [#5]	ARDEB+3, PAT+9
^DPT - [#2]	DADD+7, PAT+4, PAT+5, PAT+10, PAT+14
^RC(342 - [#342]	EN1+20
^RCD(340 - [#340]	EN1+7, EN1+12, EN1+32*, DADD+3, DADD+7, ARDEB+2
^XTMP("RCTOPD"	EN1+28*

Name	Line Occurrences
$$ARDEB	DADD+7
$$COUNTRY	EN1+15
$$DADD	EN1+13
$$PAT	DADD+8
COUNTRYQ	COUNTRY+3, COUNTRY+4, COUNTRY+5, COUNTRY+6, COUNTRY+7, COUNTRY+8, COUNTRY+9, COUNTRY+10, COUNTRY+11, COUNTRY+12 , COUNTRY+13, COUNTRY+14, COUNTRY+15, COUNTRY+16, COUNTRY+17, COUNTRY+18
Q	DADD+2, DADD+5, DADD+7, DADD+8, DADD+9, DADD+10, DADD+11
Q3	PAT+4, PAT+5, PAT+7
Q6	ARDEB+2
QUIT	EN1+7, EN1+16

Name	Field # of Occurrence
ADDR	EN1+8~, EN1+13, EN1+14, EN1+15*, EN1+16, EN1+24, EN1+32
ADDR(	EN1+24*, EN1+26
ADDR(5	EN1+25*
>> CNTR(2	EN1+28*
CODE	EN1~, EN1+16, EN1+22
DEBNR	EN1+8~, EN1+21*
DEBTOR	EN1~, EN1+7, EN1+12, EN1+13, EN1+21, EN1+32
DEBTOR5	EN1+8~, EN1+12*, EN1+16
DFN	PAT+3~, PAT+5*, PAT+10, PAT+14
FILE	EN1~, EN1+21
>> I	EN1+23*, EN1+24, EN1+25, EN1+26
II	PAT+3~
LENGTH	EN1+8~, EN1+24*, EN1+26
PRCACC	COUNTRY+1~, COUNTRY+3, COUNTRY+4, COUNTRY+5, COUNTRY+6, COUNTRY+7, COUNTRY+8, COUNTRY+9, COUNTRY+10, COUNTRY+11* , COUNTRY+12, COUNTRY+13, COUNTRY+14, COUNTRY+15, COUNTRY+16, COUNTRY+17, COUNTRY+18*, COUNTRYQ+1
RCCONF	DADD~, DADD+5, PAT~
RCDB	DADD~, DADD+2, DADD+3*, DADD+5, DADD+7, DADD+8, DADD+9, DADD+10, DADD+11, DADD+12 , ARDEB~, ARDEB+2, PAT~, PAT+4, PAT+5
RCTRY	PAT+3~
RCX	PAT+3~, PAT+4, PAT+5, PAT+6, PAT+8, PAT+9, PAT+10, PAT+11, PAT+12, PAT+13* , PAT+14, PAT+15, Q3
RCY	PAT+3~, PAT+5*, PAT+7, PAT+8, PAT+11, PAT+12, PAT+13, PAT+15
>> REC	EN1+20, EN1+21, EN1+22, EN1+26, EN1+27*, EN1+28
>> SITE	EN1+21
U	EN1+7, EN1+13, EN1+14, EN1+15, EN1+20, EN1+24, DADD+7, ARDEB+2, ARDEB+3, PAT+7 , PAT+8, PAT+9, PAT+10, PAT+11, PAT+12, PAT+13, PAT+14, PAT+15
X	DADD+1~, DADD+2, DADD+5, DADD+7, DADD+8, DADD+9, DADD+10, DADD+11, DADD+12, Q , ARDEB+1~, ARDEB+2, ARDEB+3, Q6
Y	ARDEB+1~
Z	COUNTRY~, COUNTRY+3, COUNTRY+4, COUNTRY+5, COUNTRY+6, COUNTRY+7, COUNTRY+8, COUNTRY+9, COUNTRY+10, COUNTRY+11 , COUNTRY+12, COUNTRY+13, COUNTRY+14, COUNTRY+15, COUNTRY+16, COUNTRY+17, COUNTRY+18