Routine: RCDPESP6

Information

RCDPESP6 ;AITC/CJE - ePayment Lockbox Site Parameters - Notify Changes;29 Jan 2019 18:00:14

Package	Total	Call Graph
Kernel	2	$$NOW^XLFDT MES^XPDUTL
VA FileMan	2	UPDATE^DIE $$GET1^DIQ
Accounts Receivable	1	XMSGBODY^RCDPESPB
MailMan	1	SENDMSG^XMXAPI
Registration	1	$$SITE^VASITE

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: 2

Package	Total	Caller Graph
Accounts Receivable	2	RCDPEP RCDPESP

Entry Points

Name	Comments	DBIA/ICR reference
EN	; On entry into parameter edit, save a snapshot of the files ; Input: None ; Output: ^TMP($T(+0),$J) for files 344.6, 344.61 and 344.62
EXIT	; On exit compare snapshots with files ; Input: ^TMP($T(+0),$J) copies of files 344.6, 344.61 and 344.62 ; sends mail message if parameters changed
HEADER(MSGTXT)
CHKCHNG(LINE)	;function, check for changes in EDI Lockbox site parameters ; PRCA4.5345 - Added checks for Auto-Decrease Rx parameters ; Input: ; ^TMP($T(+0),$J): Copies of file 344.6, 344.61 and 344.62 taken on entry
MEDCHNG(HEAD,COUNT,LINE)
RXCHNG(HEAD,COUNT,LINE)
TRICHNG(TRIND,HEAD,COUNT,LINE)
PAYEXC(COUNT,LINE)
CARCHNG(COUNT,LINE)
LNOUT(HEAD,LINE,TXT,XOLD,XNEW,TYPE,COUNT)
FRMT(VAL,TP)	;function, format value, added PRCA4.5332 ; Input: VAL - Value to be formatted ; TP - "$" - Dollar amount, B - Boolean, D - Days ; Returns formatted value
PAYEN	; save snapshot of file 344.6, added PRCA4.5332 ; Input: None ; Output: ^TMP($T(+0),$J) created by merging in files 344.6, 344.61 and 344.62
PAYEX	; (EN) On exit from identify payers option, compare snapshot with live files. - Added for PRCA4.5332 ; Save changes to the parameter audit multiple 344.611 ; Input: ^TMP($T(+0),$J) created above by merging in file 344.6 ; Output: Enties in multiple 344.611 to keep history of payer flag changes

External References

Name	Field # of Occurrence
UPDATE^DIE	LNOUT+32
$$GET1^DIQ	MEDCHNG+8, MEDCHNG+12, MEDCHNG+16, MEDCHNG+20, MEDCHNG+24, MEDCHNG+28, RXCHNG+8, RXCHNG+12, RXCHNG+16, RXCHNG+20 , TRICHNG+9, PAYEXC+14, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28, CARCHNG+17, CARCHNG+22, CARCHNG+25, CARCHNG+28 , CARCHNG+31, CARCHNG+34, CARCHNG+37, PAYEX+12, PAYEX+14, PAYEX+17
XMSGBODY^RCDPESPB	HEADER+2
$$SITE^VASITE	EXIT+8
$$NOW^XLFDT	LNOUT+26
SENDMSG^XMXAPI	EXIT+15
MES^XPDUTL	EXIT+18, EXIT+19, EXIT+21, EXIT+22

FileNo	Call Tags
^RCY(344.6 - [#344.6]	GET1^DIQ
^RCY(344.61 - [#344.61]	GET1^DIQ
^RCY(344.62 - [#344.62]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RCY(344.6 - [#344.6]	EN+4, PAYEXC+11, PAYEN+4, PAYEX+10
^RCY(344.61 - [#344.61]	EN+5
^RCY(344.62 - [#344.62]	EN+6, CARCHNG+12
^TMP(	EN+3!, EN+4, EN+5, EN+6, EXIT+25!, MEDCHNG+6, RXCHNG+6, PAYEXC+12, CARCHNG+13, CARCHNG+14 , CARCHNG+15, PAYEN+3!, PAYEN+4, PAYEX+11
^TMP("XMERR"	EXIT+14!, EXIT+17, EXIT+20, EXIT+23!

Label References

Name	Line Occurrences
$$CHKCHNG	EXIT+6
$$FRMT	LNOUT+21, LNOUT+30, LNOUT+31
CARCHNG	CHKCHNG+16
HEADER	EXIT+9
LNOUT	MEDCHNG+9, MEDCHNG+13, MEDCHNG+17, MEDCHNG+21, MEDCHNG+25, MEDCHNG+29, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21 , TRICHNG+10, PAYEXC+17, PAYEXC+21, PAYEXC+25, PAYEXC+29, CARCHNG+23, CARCHNG+26, CARCHNG+29, CARCHNG+32, CARCHNG+35 , CARCHNG+38, PAYEX+15, PAYEX+18
MEDCHNG	CHKCHNG+13
PAYEXC	CHKCHNG+15
RXCHNG	CHKCHNG+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
C	EXIT+4~, EXIT+10, EXIT+11, HEADER+2~, HEADER+3, HEADER+4, HEADER+5, HEADER+6, HEADER+7
CHANGES	EXIT+4~
COUNT	CHKCHNG+7~, CHKCHNG+8, CHKCHNG+13, CHKCHNG+14, CHKCHNG+15, CHKCHNG+16, CHKCHNG+17, MEDCHNG~, MEDCHNG+9, MEDCHNG+13 , MEDCHNG+17, MEDCHNG+21, MEDCHNG+25, MEDCHNG+29, RXCHNG~, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21, TRICHNG~ , TRICHNG+10, PAYEXC~, PAYEXC+17, PAYEXC+21, PAYEXC+25, PAYEXC+29, CARCHNG~, CARCHNG+23, CARCHNG+26, CARCHNG+29 , CARCHNG+32, CARCHNG+35, CARCHNG+38, LNOUT~, LNOUT+19, LNOUT+22, PAYEX+5~, PAYEX+7, PAYEX+15, PAYEX+18
DOTS	LNOUT+15~, LNOUT+16*, LNOUT+21
DUZ	EXIT+13, EXIT+15, LNOUT+27
G	EXIT+4~, EXIT+10, EXIT+11, EXIT+20, EXIT+21*
HEAD	CHKCHNG+7~, CHKCHNG+8, CHKCHNG+13, CHKCHNG+14, MEDCHNG~, MEDCHNG+9, MEDCHNG+13, MEDCHNG+17, MEDCHNG+21, MEDCHNG+25 , MEDCHNG+29, RXCHNG~, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21, TRICHNG~, TRICHNG+10, PAYEXC+13, PAYEXC+17 , PAYEXC+21, PAYEXC+25, PAYEXC+29, CARCHNG+16, CARCHNG+23, CARCHNG+26, CARCHNG+29, CARCHNG+32, CARCHNG+35, CARCHNG+38 , LNOUT~, LNOUT+19, PAYEX+5~, PAYEX+7*, PAYEX+15, PAYEX+18
HEAD("DETAIL"	CHKCHNG+9, PAYEXC+14, CARCHNG+17, CARCHNG+18, LNOUT+29, PAYEX+12
HEAD("SIZE"	CHKCHNG+8, LNOUT+19, LNOUT+22, PAYEX+7
HEAD("TXT"	CHKCHNG+9, PAYEXC+14, CARCHNG+18, LNOUT+19, PAYEX+12
IEN	PAYEXC+8~, PAYEXC+11, PAYEXC+12, PAYEXC+14, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28, CARCHNG+9~, CARCHNG+12 , CARCHNG+13, CARCHNG+14, CARCHNG+15, CARCHNG+17, CARCHNG+22, CARCHNG+25, CARCHNG+28, CARCHNG+31, CARCHNG+34, CARCHNG+37 , PAYEX+5~, PAYEX+9, PAYEX+10, PAYEX+11, PAYEX+12, PAYEX+14, PAYEX+17
LINE	CHKCHNG~, CHKCHNG+13, CHKCHNG+14, CHKCHNG+15, CHKCHNG+16, MEDCHNG~, MEDCHNG+9, MEDCHNG+13, MEDCHNG+17, MEDCHNG+21 , MEDCHNG+25, MEDCHNG+29, RXCHNG~, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21, TRICHNG~, TRICHNG+10, PAYEXC~ , PAYEXC+17, PAYEXC+21, PAYEXC+25, PAYEXC+29, CARCHNG~, CARCHNG+23, CARCHNG+26, CARCHNG+29, CARCHNG+32, CARCHNG+35 , CARCHNG+38, LNOUT~, PAYEX+5~, PAYEX+15, PAYEX+18
LINE(	LNOUT+19, LNOUT+22
LINES	EXIT+4~
MEDND	MEDCHNG+5~, MEDCHNG+6*, MEDCHNG+8, MEDCHNG+12, MEDCHNG+16, MEDCHNG+20, MEDCHNG+24, MEDCHNG+28
MSGTXT	HEADER~, HEADER+2, HEADER+3, HEADER+7*
MSGTXT(	HEADER+4, HEADER+5, HEADER+6*
RCFDA	LNOUT+15~
RCFDA(	LNOUT+26, LNOUT+27, LNOUT+28, LNOUT+29, LNOUT+30, LNOUT+31
RCIENS	LNOUT+15~, LNOUT+25*, LNOUT+26, LNOUT+27, LNOUT+28, LNOUT+29, LNOUT+30, LNOUT+31
RCMSGTXT	EXIT+4~, EXIT+9, EXIT+10
RCMSGTXT(	EXIT+11*
RCSUBJ	EXIT+4~, EXIT+8*, EXIT+15
REC	CARCHNG+9~
REC(0	CARCHNG+13*, CARCHNG+22, CARCHNG+25
REC(1	CARCHNG+14*, CARCHNG+28, CARCHNG+31
REC(2	CARCHNG+15*, CARCHNG+34, CARCHNG+37
REC0	PAYEXC+8~, PAYEXC+12, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28, PAYEX+5~, PAYEX+11, PAYEX+14, PAYEX+17
RTRN	FRMT+4~, FRMT+5, FRMT+6*, FRMT+7
RXND	RXCHNG+5~, RXCHNG+6*, RXCHNG+8, RXCHNG+12, RXCHNG+16, RXCHNG+20
TP	FRMT~, FRMT+5, FRMT+6
TRIND	TRICHNG~
TRIND(0	TRICHNG+9
TXT	LNOUT~, LNOUT+21, LNOUT+28
TXTLNS	EXIT+4~, EXIT+6
TXTLNS(	EXIT+11
TYPE	LNOUT~, LNOUT+21, LNOUT+30, LNOUT+31
U	EXIT+8, MEDCHNG+8, MEDCHNG+12, MEDCHNG+16, MEDCHNG+20, MEDCHNG+24, MEDCHNG+28, RXCHNG+8, RXCHNG+12, RXCHNG+16 , RXCHNG+20, TRICHNG+9, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28, CARCHNG+22, CARCHNG+25, CARCHNG+28, CARCHNG+31 , CARCHNG+34, CARCHNG+37, PAYEX+14, PAYEX+17
VAL	FRMT~, FRMT+4, FRMT+5, FRMT+6
XMINSTR	EXIT+4~, EXIT+15
XMINSTR("FROM"	EXIT+13*
XMTO	EXIT+4~, EXIT+15
XMTO(	EXIT+13*
XMTO("G.RCDPE	AUDIT" , EXIT+13*
XNEW	MEDCHNG+5~, MEDCHNG+8, MEDCHNG+9, MEDCHNG+12, MEDCHNG+13, MEDCHNG+16, MEDCHNG+17, MEDCHNG+20, MEDCHNG+21, MEDCHNG+24* , MEDCHNG+25, MEDCHNG+28, MEDCHNG+29, RXCHNG+5~, RXCHNG+8, RXCHNG+9, RXCHNG+12, RXCHNG+13, RXCHNG+16, RXCHNG+17 , RXCHNG+20, RXCHNG+21, TRICHNG+6~, TRICHNG+9, TRICHNG+10, PAYEXC+8~, PAYEXC+16, PAYEXC+17, PAYEXC+20, PAYEXC+21 , PAYEXC+24, PAYEXC+25, PAYEXC+28, PAYEXC+29, CARCHNG+9~, CARCHNG+22, CARCHNG+23, CARCHNG+25, CARCHNG+26, CARCHNG+28* , CARCHNG+29, CARCHNG+31, CARCHNG+32, CARCHNG+34, CARCHNG+35, CARCHNG+37, CARCHNG+38, LNOUT~, LNOUT+21, LNOUT+31 , PAYEX+5~, PAYEX+14, PAYEX+15, PAYEX+17*, PAYEX+18
XOLD	MEDCHNG+5~, MEDCHNG+8, MEDCHNG+9, MEDCHNG+12, MEDCHNG+13, MEDCHNG+16, MEDCHNG+17, MEDCHNG+20, MEDCHNG+21, MEDCHNG+24* , MEDCHNG+25, MEDCHNG+28, MEDCHNG+29, RXCHNG+5~, RXCHNG+8, RXCHNG+9, RXCHNG+12, RXCHNG+13, RXCHNG+16, RXCHNG+17 , RXCHNG+20, RXCHNG+21, TRICHNG+6~, TRICHNG+9, TRICHNG+10, PAYEXC+8~, PAYEXC+16, PAYEXC+17, PAYEXC+20, PAYEXC+21 , PAYEXC+24, PAYEXC+25, PAYEXC+28, PAYEXC+29, CARCHNG+9~, CARCHNG+22, CARCHNG+23, CARCHNG+25, CARCHNG+26, CARCHNG+28* , CARCHNG+29, CARCHNG+31, CARCHNG+32, CARCHNG+34, CARCHNG+35, CARCHNG+37, CARCHNG+38, LNOUT~, LNOUT+21, LNOUT+30 , PAYEX+5~, PAYEX+14, PAYEX+15, PAYEX+17*, PAYEX+18
Y	LNOUT+15~, LNOUT+21*, LNOUT+22

Marked Items

Name	Field # of Occurrence
$T(	EN+3, EN+4, EN+5, EN+6, EXIT+25, MEDCHNG+6, RXCHNG+6, PAYEXC+12, CARCHNG+13, CARCHNG+14 , CARCHNG+15, PAYEN+3, PAYEN+4, PAYEX+11

Customize PDF page

Package: Accounts Receivable