Routine: RCDPEWLE

Package	Total	Call Graph
Accounts Receivable	3	($$DTRNG,$$PAUSE,$$SELERA)^RCDPEAPS ($$ISTYPE,$$RTYPE)^RCDPEU1 (TXT0,TXT2)^RCDPEX31
Kernel	3	(,HOME)^%ZIS ^%ZTLOAD ($$DT,$$FMTE)^XLFDT
VA FileMan	2	($$GET1,GETS)^DIQ ^DIR

Package	Total	Caller Graph
Accounts Receivable	2	RCDPE ERA MATCH POST AUDIT RPT RCDPEWL0

Entry Points

Name	Comments	DBIA/ICR reference
ERADET()	; Created for PRCA4.5439 - EP from ^RCDPEWL0
AUDIT()	; Created for PRCA4.5439 - EP from ^RCDPEWL0
GETAUD(ERAIEN,OUTARR)	; Get auto-post and match audit information for a single ERA (EP) ; Input : ERAIEN - Internal entry number for file #344.4 ; Output: OUTARR - Passed by reference - returns array of text information for a report.
FMTSTAMP(X)	; Format date stamp ; Input : X date/time in fileman format ; Return : date/time in format MM/DD/YY:HH:MM:SS
PAD(X,Y)	; Right pad X to length Y ; Input : X - String to PAD ; Y - Length ; Return: X padded to length Y.
ABB(X)	; Abbreviate match status to be no more than 10 chars
ERASTR	; Enter here for new style ERA Status Change Report with ERA Detail, Auto-Post and Match Audit - PRCA4.5439
ENQ	;
RUN(RCERA,RCRANGE,RCTYPE)	;
COMPILE	; Compile report data
REPORT	; Print Report
ONE(RCERA,CNT)	; Extract data for one ERA ; Input : RCERA - Internal entry number from file 344.4 ; Output : Lines of Text in ^TMP("RCDPEWLE",$J,CNT)
HDR1	; Print main header for report
HDR2	; Print header for audit trail

External References

Name	Field # of Occurrence
^%ZIS	ERASTR+22
HOME^%ZIS	ERASTR+31
^%ZTLOAD	ERASTR+29
$$GET1^DIQ	GETAUD+14, GETAUD+16, GETAUD+19, GETAUD+35, GETAUD+36, GETAUD+39, GETAUD+43
GETS^DIQ	ONE+6, ONE+12
^DIR	ERADET+7, AUDIT+6, ERASTR+5
$$DTRNG^RCDPEAPS	ERASTR+14
$$PAUSE^RCDPEAPS	REPORT+7, REPORT+12
$$SELERA^RCDPEAPS	ERASTR+12
$$ISTYPE^RCDPEU1	COMPILE+13
$$RTYPE^RCDPEU1	ERASTR+16
TXT0^RCDPEX31	ONE+7
TXT2^RCDPEX31	ONE+13
$$DT^XLFDT	RUN+4
$$FMTE^XLFDT	RUN+4, RUN+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ERADET+6
Function Call: WRITE	Prompt: ! Line Location: AUDIT+5
Function Call: WRITE	Prompt: !,$S($D(ZTSK):"REQUEST QUEUED TASK="_ZTSK,1:"REQUEST CANCELLED") Line Location: ERASTR+30
Function Call: WRITE	Prompt: !,^TMP("RCDPEWLE",$J,CNT) Line Location: REPORT+9
Function Call: WRITE	Prompt: @IOF Line Location: HDR1+2
Function Call: WRITE	Prompt: HDR Line Location: HDR1+10
Function Call: WRITE	Prompt: !,EQL Line Location: HDR1+11
Routine Call	%ZIS Line Location: ERASTR+22
Routine Call	%ZIS Line Location: ERASTR+31
Routine Call	DIR Line Location: ERADET+7 AUDIT+6 ERASTR+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RCY(344.31 - [#344.31]	GET1^DIQ
^RCY(344.4 - [#344.4]	GETS^DIQ
344.42	GETS^DIQ
344.43	GET1^DIQ
^RCY(344.72 - [#344.72]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RCY(344.4 - [#344.4]	GETAUD+29, GETAUD+32, GETAUD+33, COMPILE+11, COMPILE+12, ONE+9, ONE+10
^RCY(344.72 - [#344.72]	GETAUD+8, GETAUD+11, GETAUD+12
^TMP("RCDPEAPS"	RUN+16!
^TMP("RCDPEWLE"	RUN+6!, REPORT+5, REPORT+9, ONE+15, ONE+20, ONE+21, HDR2+3, HDR2+5, HDR2+6

Label References

Name	Line Occurrences
$$ABB	GETAUD+37, GETAUD+40
$$FMTSTAMP	GETAUD+13, GETAUD+34
$$PAD	GETAUD+21, GETAUD+46, HDR1+8
COMPILE	RUN+11
ENQ	ERASTR+23, ERASTR+24
GETAUD	ONE+18
HDR1	REPORT+4, REPORT+8
HDR2	ONE+17
ONE	COMPILE+6, COMPILE+13
REPORT	RUN+14
RUN	ERASTR+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	ERASTR+20~, ERASTR+21*
AUDDATE	COMPILE+1~, COMPILE+11*, COMPILE+12
BDATE	COMPILE+1~, COMPILE+10*, COMPILE+11
CNT	GETAUD+4~, GETAUD+5, GETAUD+6, GETAUD+9, GETAUD+10, GETAUD+20, GETAUD+21, GETAUD+22, GETAUD+23, GETAUD+24 , GETAUD+25, GETAUD+27, GETAUD+30, GETAUD+31, GETAUD+45, GETAUD+46, COMPILE+1~, COMPILE+2, COMPILE+6, COMPILE+13 , REPORT+1~, REPORT+2, REPORT+5, REPORT+9, ONE~, ONE+15, ONE+20, ONE+21, HDR2+3, HDR2+5 , HDR2+6*
DASH	RUN+1~, RUN+2*, HDR2+6
DATA	GETAUD+4~, GETAUD+12, GETAUD+13, GETAUD+18, GETAUD+33, GETAUD+34, GETAUD+42, COMPILE+1~
DATE	FMTSTAMP+3~, FMTSTAMP+4, FMTSTAMP+5, FMTSTAMP+6
DIR	ERADET+1~, AUDIT+1~, ERASTR+2~
DIR("?"	ERADET+2, ERADET+3, ERADET+4, AUDIT+2, AUDIT+3*
DIR("A"	ERADET+5, AUDIT+4, ERASTR+4*
DIR("B"	ERADET+5, AUDIT+4, ERASTR+4*
DIR(0	ERADET+5, AUDIT+4, ERASTR+3*
DIROUT	ERASTR+2~
DIRUT	ERASTR+2~
DTOUT	ERADET+8, AUDIT+7, ERASTR+2~
DUOUT	ERADET+8, AUDIT+7, ERASTR+2~
EDATE	COMPILE+1~, COMPILE+10*, COMPILE+11
EFT	GETAUD+4~, GETAUD+42, GETAUD+43, GETAUD+44*, GETAUD+46
EQL	RUN+1~, RUN+3*, ONE+21, HDR1+11
ERAIEN	GETAUD~, GETAUD+8, GETAUD+11, GETAUD+29, GETAUD+32, GETAUD+33, GETAUD+35, GETAUD+36, GETAUD+39
HDR	HDR1+1~, HDR1+4, HDR1+6, HDR1+8, HDR1+9, HDR1+10, HDR2+1~, HDR2+2, HDR2+3, HDR2+4 , HDR2+5
IEN	GETAUD+4~, GETAUD+7, GETAUD+8, GETAUD+11, GETAUD+12, GETAUD+14, GETAUD+16, GETAUD+19, COMPILE+1~, COMPILE+12* , COMPILE+13
IEN2	GETAUD+4~, GETAUD+28, GETAUD+29, GETAUD+32, GETAUD+33, GETAUD+35, GETAUD+36, GETAUD+39
IO	ERASTR+32
IO("Q"	ERASTR+24
IOF	HDR1+2
IOM	RUN+2, RUN+3
ION	ERASTR+26
IOSL	REPORT+6
IOST	REPORT+3
J	ONE+4~, ONE+15*
LINE	REPORT+1~, REPORT+2, REPORT+6, REPORT+10, HDR1+12*
NEW	GETAUD+4~, GETAUD+16, GETAUD+17, GETAUD+21, GETAUD+39, GETAUD+40, GETAUD+41*, GETAUD+46
OLD	GETAUD+4~, GETAUD+14, GETAUD+15, GETAUD+21, GETAUD+36, GETAUD+37, GETAUD+38*, GETAUD+46
OUTARR	GETAUD~
OUTARR(	GETAUD+6, GETAUD+9, GETAUD+10, GETAUD+21, GETAUD+23, GETAUD+25, GETAUD+27, GETAUD+30, GETAUD+31, GETAUD+46
PAGE	REPORT+1~, REPORT+2, REPORT+5, REPORT+6, REPORT+7, REPORT+12, HDR1+3*, HDR1+9
POP	ERASTR+20~, ERASTR+23
QUIT	ERASTR+2~, ERASTR+10, ERASTR+13, ERASTR+15, ERASTR+17*
RC	ONE+4~, ONE+5, ONE+7, ONE+9, ONE+13, ONE+15, ONE+19*, ONE+20
RCALL	ERASTR+2~, ERASTR+7*, ERASTR+11
RCAUDIT	ONE+4~, ONE+18
RCAUDIT(	ONE+19, ONE+20
RCD1	RUN+1~, RUN+8, RUN+9, HDR1+5, HDR1+8
RCD2	RUN+1~, RUN+8, RUN+9, HDR1+8
RCDATE	RUN+1~, RUN+4*, COMPILE+1~, HDR1+6
RCDIQ	ONE+4~, ONE+7
RCDIQ2	ONE+11!, ONE+13
RCERA	ERASTR+2~, ERASTR+10, ERASTR+11, ERASTR+12, ERASTR+34, RUN~, RUN+9, COMPILE+5, COMPILE+6, COMPILE+9 , ONE~, ONE+6, ONE+7, ONE+9, ONE+10, ONE+12, ONE+13, ONE+18
RCRANGE	ERASTR+2~, ERASTR+10, ERASTR+14, ERASTR+15, ERASTR+34, RUN~, RUN+9, COMPILE+10
RCSCR	REPORT+1~, REPORT+3*, REPORT+7
RCSCR1	ONE+4~, ONE+10*, ONE+12, ONE+13
RCTYPE	ERASTR+2~, ERASTR+10, ERASTR+16, ERASTR+17, ERASTR+34, RUN~, COMPILE+13
RCXM1	ONE+4~, ONE+7, ONE+13
RCXM1(	ONE+9*, ONE+15
REASON	GETAUD+4~, GETAUD+18*, GETAUD+23
RETURN	ABB+1~, ABB+2, ABB+3, ABB+4, ABB+5, ABB+6, ABB+7, ABB+8*, ABB+9
STAMP	GETAUD+4~, GETAUD+13, GETAUD+21, GETAUD+34, GETAUD+46, FMTSTAMP+3~, FMTSTAMP+6*, FMTSTAMP+7
TIME	FMTSTAMP+3~, FMTSTAMP+4*, FMTSTAMP+6
U	RUN+9, COMPILE+10
USER	GETAUD+4~, GETAUD+19, GETAUD+21, GETAUD+35, GETAUD+46
X	ERADET+1~, AUDIT+1~, FMTSTAMP~, FMTSTAMP+4, PAD~, PAD+4, ABB~, ABB+2, ABB+3, ABB+4 , ABB+5, ABB+6, ABB+7, ERASTR+2~
Y	ERADET+1~, ERADET+9, AUDIT+1~, AUDIT+8, PAD~, PAD+4, ERASTR+2~, ERASTR+6, ERASTR+7
ZTDESC	ERASTR+20~, ERASTR+28*
ZTIO	ERASTR+20~, ERASTR+26*
ZTRTN	ERASTR+20~, ERASTR+25*
ZTSAVE	ERASTR+20~
ZTSAVE("*"	ERASTR+27*
ZTSK	ERASTR+20~, ERASTR+30

Customize PDF page

Package: Accounts Receivable

Routine: RCDPEWLE

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: