Routine: RCDPEMA

Information

RCDPEMA ;ALB/PJH - AUTO-POSTING RECEIPT CREATION ;Oct 15, 2014@12:37:52

Package	Total	Call Graph
Accounts Receivable	5	AUDIT^RCDPECH $$SETERR^RCDPEM0 $$AUTO^RCDPEM5 $$NEXT^RCDPUREC $$ADDTRAN^RCDPURET
VA FileMan	3	FILE^DICN ^DIE $$GET1^DIQ
Integrated Billing	1	SPL1^IBCEOBAR

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	RCDPEAP

Entry Points

Name	Comments	DBIA/ICR reference
RCPTDET(RCRZ,RECTDA1,RCLINES,RCER)	; Adds detail to a receipt based on file 344.49 and exceptions in array RCLINES ; RCRZ = ien of ERA entry in file 344.49 ; RECTDA1 = ien of receipt entry in file 344 ; RCER = error array returned if passed by reference ; RCLINES = array to indicate which scratchpad lines can be posted (assigned a receipt)
SPLIT(Z,Z1,RCERA)	;Check if worklist was split to single claim
DET(RCZ,RCR,RECTDA1,RCTRANDA)	; Store receipt detail ; RCZ = ien of entry file 344.49 ; RCR = ien of entry in file 344.491 ; RECTDA1 = ien of entry in file 344 ; RCTRANDA = ien of entry in subfile 344.01
BLDRCPT(RCERA,RCDUZ)	; Create a receipt for Auto Posting ERA with multiple Receipts - alpha char at the 10th character ; LAYGO new entry to AR BATCH PAYMENT file (#344) ; input - RCERA = Pointer to 344.4 ; returns new IEN on success, else zero ; called by auto-post process (RCDPEAP)
GETREC(RCERA)	; returns the receipt number ; input - RCERA = ien of entry in 344.4 ; output - returns the receipt number in external form

External References

Name	Field # of Occurrence
FILE^DICN	BLDRCPT+31
^DIE	DET+20
$$GET1^DIQ	RCPTDET+17, RCPTDET+50, RCPTDET+52
SPL1^IBCEOBAR	RCPTDET+37, RCPTDET+39
AUDIT^RCDPECH	DET+22
$$SETERR^RCDPEM0	RCPTDET+21
$$AUTO^RCDPEM5	RCPTDET+54
$$NEXT^RCDPUREC	BLDRCPT+15
$$ADDTRAN^RCDPURET	RCPTDET+18

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RCY(344 - [#344]	Classic Fileman Calls
344.41	GET1^DIQ
344.491	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RC(341.1 - [#341.1]	BLDRCPT+7
^RCY(344 - [#344]	RCPTDET+22, BLDRCPT+18, BLDRCPT+21, BLDRCPT+32, GETREC+6
^RCY(344.4 - [#344.4]	RCPTDET+34, GETREC+5
^RCY(344.49 - [#344.49]	RCPTDET+8, RCPTDET+9, RCPTDET+15, RCPTDET+48, SPLIT+3, SPLIT+5, DET+7, DET+8, DET+9, DET+14 , DET+18

Label References

Name	Line Occurrences
$$GETREC	BLDRCPT+9
$$SPLIT	RCPTDET+32
DET	RCPTDET+25

Naked Globals

Name	Field # of Occurrence
^(	DET+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	BLDRCPT+24~
%DT	BLDRCPT+24~
CLAIM	RCPTDET+42~, RCPTDET+50*, RCPTDET+54
D0	BLDRCPT+24~
DA	RCPTDET+6~, DET+6~, DET+19*, BLDRCPT+24~
DA(1	DET+19*
DD	BLDRCPT+24~
DI	BLDRCPT+24~
DIC	BLDRCPT+24~, BLDRCPT+25*
DIC("DR"	BLDRCPT+29*
DIC(0	BLDRCPT+25*
DIE	RCPTDET+6~, DET+6~, DET+19*, BLDRCPT+24~
>> DILOCKTM	BLDRCPT+21
DLAYGO	BLDRCPT+24~, BLDRCPT+25*
DO	BLDRCPT+24~
DQ	BLDRCPT+24~
DR	RCPTDET+6~, DET+6~, DET+9, DET+10, DET+11, DET+12, DET+13, DET+14, DET+17, DET+18 , BLDRCPT+24~
DT	BLDRCPT+15, BLDRCPT+29
DUZ	BLDRCPT+29
IEN3611	RCPTDET+42~, RCPTDET+52*, RCPTDET+54
LASTREC	BLDRCPT+6~, BLDRCPT+9*, BLDRCPT+12, BLDRCPT+13
NBILL	SPLIT+1~, SPLIT+7*, SPLIT+9
OBILL	SPLIT+1~, SPLIT+5*, SPLIT+9
Q	RCPTDET+6~, RCPTDET+34*, RCPTDET+35, RCPTDET+37, RCPTDET+39
RC0	DET+6~, DET+7*, DET+12, DET+13
RCCOM	DET+6~, DET+15, DET+16, DET+17, DET+22
RCDUZ	RCPTDET+6~, RCPTDET+17*, RCPTDET+18, BLDRCPT~, BLDRCPT+29
RCER	RCPTDET~
RCER(	RCPTDET+22*
RCER(""	RCPTDET+22
RCER(1	RCPTDET+21*
RCERA	RCPTDET+32, RCPTDET+54, SPLIT~, SPLIT+3, SPLIT+5, BLDRCPT~, BLDRCPT+9, GETREC~, GETREC+5
RCLINE	RCPTDET+6~
RCLINES	RCPTDET~
RCLINES(	RCPTDET+11
RCOSEQ	RCPTDET+6~, RCPTDET+16*, RCPTDET+17
RCQ	RCPTDET+6~, RCPTDET+29*, RCPTDET+34, RCPTDET+52
RCR	RCPTDET+6~, RCPTDET+8*, RCPTDET+9, RCPTDET+25, DET~, DET+8, DET+11, DET+14, DET+22
RCRZ	RCPTDET~, RCPTDET+8, RCPTDET+9, RCPTDET+15, RCPTDET+17, RCPTDET+25, RCPTDET+34, RCPTDET+48, RCPTDET+50, RCPTDET+52
RCSEQ	RCPTDET+6~, RCPTDET+9*, RCPTDET+11, RCPTDET+13, RCPTDET+14, RCPTDET+16
RCSPL	RCPTDET+6~
RCSPL(	RCPTDET+14, RCPTDET+15, RCPTDET+16, RCPTDET+26*, RCPTDET+29, RCPTDET+31, RCPTDET+32, RCPTDET+33, RCPTDET+44, SPLIT+7
RCSPLIT	RCPTDET+42~, RCPTDET+44*, RCPTDET+54
RCSUB	RCPTDET+42~, RCPTDET+48*, RCPTDET+50
RCTRANDA	RCPTDET+6~, RCPTDET+18*, RCPTDET+20, RCPTDET+25, DET~, DET+19, DET+22
RCUP	DET+6~, DET+9*, DET+16
RCZ	DET~, DET+7, DET+8, DET+9, DET+14, DET+18, DET+22
RCZ0	RCPTDET+6~, RCPTDET+9, RCPTDET+11, RCPTDET+14, RCPTDET+15, RCPTDET+22, RCPTDET+26, DET+6~, DET+8, DET+9 , DET+10, DET+11, DET+15
RCZSAV	RCPTDET+42~, RCPTDET+46*, RCPTDET+56
RECEIPT	BLDRCPT+6~, BLDRCPT+13, BLDRCPT+15, BLDRCPT+18, BLDRCPT+19, BLDRCPT+21, BLDRCPT+30, BLDRCPT+32, GETREC+3~, GETREC+4 , GETREC+6*, GETREC+7
RECTDA1	RCPTDET~, RCPTDET+18, RCPTDET+22, RCPTDET+25, DET~, DET+19, DET+22
SEQLINES	RCPTDET+6~
SEQLINES(	RCPTDET+11*, RCPTDET+13
SUB	SPLIT+1~, SPLIT+3*, SPLIT+5
TYPE	BLDRCPT+6~, BLDRCPT+7*, BLDRCPT+15
U	RCPTDET+9, RCPTDET+11, RCPTDET+14, RCPTDET+15, RCPTDET+22, RCPTDET+34, RCPTDET+36, RCPTDET+37, RCPTDET+39, SPLIT+5 , SPLIT+7, DET+10, DET+11, DET+12, DET+13, DET+14, DET+15, DET+16, DET+18, GETREC+6
X	RCPTDET+6~, DET+6~, BLDRCPT+24~, BLDRCPT+30, GETREC+3~, GETREC+5, GETREC+6
Y	RCPTDET+6~, DET+6~, BLDRCPT+24~, BLDRCPT+33
Z	RCPTDET+6~, RCPTDET+29, RCPTDET+31, RCPTDET+32, RCPTDET+33, RCPTDET+44, RCPTDET+46, RCPTDET+48, RCPTDET+56, SPLIT~ , SPLIT+7, DET+6~, DET+14*
Z0	RCPTDET+6~, RCPTDET+33*, RCPTDET+36, RCPTDET+37, RCPTDET+39
Z1	RCPTDET+6~, RCPTDET+31, RCPTDET+32, RCPTDET+33, SPLIT~, SPLIT+3, SPLIT+7

Customize PDF page

Package: Accounts Receivable