Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: RCDPESP6

Package: Accounts Receivable

Routine: RCDPESP6


Information

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

Source Information

Source file <RCDPESP6.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 HOME^%ZIS  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  MES^XPDUTL  
VA FileMan 2 UPDATE^DIE  $$GET1^DIQ  
MailMan 1 SENDMSG^XMXAPI  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Accounts Receivable 2 RCDPEP  RCDPESP  

Entry Points

Name Comments DBIA/ICR reference
EN ; EP from RCDPESP
; On entry into parameter edit, save a snapshot of the files
; Input: None
; Output: ^TMP("RCDPESP6",$J) for files 344.6, 344.61 and 344.62
EXIT ; EP from RCDPESP
; On exit compare snapshots with files
; sends mail message if any designated items have changed.
; Input: ^TMP($T(+0),$J) copies of files 344.6, 344.61 and 344.62
; Output: Mail message (if any parameters have changed)
HEADER(MSGTXT,RCSITE)
CHKCHNG(LINE) ;function, check for changes in EDI Lockbox site parameters
; PRCA*4.5*345 - Added checks for Auto-Decrease Rx/TRICARE 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(HEAD,COUNT,LINE) ; Check for TRICARE site parameter changes
; Input: HEAD - See subroutine LNOUT for details
; COUNT - Current # of parameter changes
; LINE - Array of current site parameter changes
; Output: COUNT - Updated # of parameter changes
; LINE - Array of updated site parameter changes
PAYEXC(COUNT,LINE)
CARCHNG(COUNT,LINE)
ZERCHNG(COUNT,LINE) ; Check for TRICARE site parameter changes
; Input: COUNT - Current # of parameter changes
; LINE - Array of current site parameter changes
; Output: COUNT - Updated # of parameter changes
; LINE - Array of updated site parameter changes
LNOUT(HEAD,LINE,TXT,XOLD,XNEW,TYPE,COUNT)
FRMT(VAL,TP) ;function, format value, added PRCA*4.5*332
; Input: VAL - Value to be formatted
; TP - "$" - Dollar amount, B - Boolean, D - Days
; Returns formatted value
PAYEN ; save snapshot of file 344.6, added PRCA*4.5*332
; 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 PRCA*4.5*332
; 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
HOME^%ZIS ZERCHNG+23
^%ZTLOAD ZERCHNG+19
UPDATE^DIE LNOUT+31
$$GET1^DIQ MEDCHNG+8, MEDCHNG+13, MEDCHNG+17, MEDCHNG+21, MEDCHNG+26, MEDCHNG+31, RXCHNG+8, RXCHNG+12, RXCHNG+16, RXCHNG+20
, TRICHNG+12, TRICHNG+18, TRICHNG+24, TRICHNG+30, TRICHNG+36, TRICHNG+42, TRICHNG+48, PAYEXC+14, PAYEXC+16, PAYEXC+20
, PAYEXC+24, PAYEXC+28, PAYEXC+33, PAYEXC+37, CARCHNG+18, CARCHNG+23, CARCHNG+26, CARCHNG+29, CARCHNG+32, CARCHNG+35
, CARCHNG+38, CARCHNG+42, CARCHNG+45, CARCHNG+48, CARCHNG+51, ZERCHNG+9, PAYEX+12, PAYEX+14, PAYEX+17, PAYEX+20
$$SITE^VASITE EXIT+11
$$FMTE^XLFDT HEADER+7
$$NOW^XLFDT HEADER+7, ZERCHNG+17, LNOUT+25
SENDMSG^XMXAPI EXIT+17
MES^XPDUTL EXIT+20, EXIT+21, EXIT+23, EXIT+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Task number "_ZTSK_" was queued to auto-post historic zero payment ERAs"
  • Line Location: ZERCHNG+20
Function Call: WRITE
  • Prompt: !!,"Unable to queue auto post of historic zero pay ERAs."
  • Line Location: ZERCHNG+21
Routine Call
  • %ZIS
  • Line Location:
    • ZERCHNG+23
Routine Call
  • DIE
  • Line Location:
    • LNOUT+31

FileMan Files Accessed Via FileMan Db Call

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+5, PAYEXC+11, PAYEN+4, PAYEX+10
^RCY(344.61 - [#344.61] EN+6
^RCY(344.62 - [#344.62] EN+7, CARCHNG+12
^TMP( MEDCHNG+6, RXCHNG+6, PAYEXC+12, CARCHNG+13, CARCHNG+14, CARCHNG+15, CARCHNG+16, PAYEN+3!, PAYEN+4*, PAYEX+11
^TMP("RCDPESP6" EN+4!, EN+5*, EN+6*, EN+7*, EXIT+27!, TRICHNG+8, TRICHNG+9, ZERCHNG+7
^TMP("XMERR" EXIT+16!, EXIT+19, EXIT+22, EXIT+25!
^VA(200 - [#200] HEADER+8
^XMB("NETNAME" HEADER+6

Label References

Name Line Occurrences
$$CHKCHNG EXIT+8
$$FRMT LNOUT+20, LNOUT+29, LNOUT+30
CARCHNG CHKCHNG+18
HEADER EXIT+13
LNOUT MEDCHNG+10, MEDCHNG+14, MEDCHNG+18, MEDCHNG+23, MEDCHNG+28, MEDCHNG+32, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21
, TRICHNG+14, TRICHNG+20, TRICHNG+26, TRICHNG+32, TRICHNG+38, TRICHNG+44, TRICHNG+50, PAYEXC+17, PAYEXC+21, PAYEXC+25
, PAYEXC+29, PAYEXC+34, PAYEXC+38, CARCHNG+24, CARCHNG+27, CARCHNG+30, CARCHNG+33, CARCHNG+36, CARCHNG+39, CARCHNG+43
, CARCHNG+46, CARCHNG+49, CARCHNG+52, ZERCHNG+11, PAYEX+15, PAYEX+18, PAYEX+21
MEDCHNG CHKCHNG+13
PAYEXC CHKCHNG+17
RXCHNG CHKCHNG+14
TRICHNG CHKCHNG+15
ZERCHNG CHKCHNG+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C EXIT+6~
CHANGES EXIT+6~
CHGCNT EXIT+6~, EXIT+8*, EXIT+9
COUNT CHKCHNG+7~, CHKCHNG+8*, CHKCHNG+13, CHKCHNG+14, CHKCHNG+15, CHKCHNG+16, CHKCHNG+17, CHKCHNG+18, CHKCHNG+19, MEDCHNG~
, MEDCHNG+10, MEDCHNG+14, MEDCHNG+18, MEDCHNG+23, MEDCHNG+28, MEDCHNG+32, RXCHNG~, RXCHNG+9, RXCHNG+13, RXCHNG+17
, RXCHNG+21, TRICHNG~, TRICHNG+14, TRICHNG+20, TRICHNG+26, TRICHNG+32, TRICHNG+38, TRICHNG+44, TRICHNG+50, PAYEXC~
, PAYEXC+17, PAYEXC+21, PAYEXC+25, PAYEXC+29, PAYEXC+34, PAYEXC+38, CARCHNG~, CARCHNG+24, CARCHNG+27, CARCHNG+30
, CARCHNG+33, CARCHNG+36, CARCHNG+39, CARCHNG+43, CARCHNG+46, CARCHNG+49, CARCHNG+52, ZERCHNG~, ZERCHNG+11, LNOUT~
, LNOUT+18*, LNOUT+21*, PAYEX+5~, PAYEX+7*, PAYEX+15, PAYEX+18, PAYEX+21
DOTS LNOUT+14~, LNOUT+15*, LNOUT+20
DUZ EXIT+15, EXIT+17, HEADER+8, LNOUT+26
G EXIT+6~, EXIT+22*, EXIT+23*
HEAD CHKCHNG+7~, CHKCHNG+8*, CHKCHNG+13, CHKCHNG+14, CHKCHNG+15, MEDCHNG~, MEDCHNG+10, MEDCHNG+14, MEDCHNG+18, MEDCHNG+23
, MEDCHNG+28, MEDCHNG+32, RXCHNG~, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21, TRICHNG~, TRICHNG+14, TRICHNG+20
, TRICHNG+26, TRICHNG+32, TRICHNG+38, TRICHNG+44, TRICHNG+50, PAYEXC+13*, PAYEXC+17, PAYEXC+21, PAYEXC+25, PAYEXC+29
, PAYEXC+34, PAYEXC+38, CARCHNG+17*, CARCHNG+24, CARCHNG+27, CARCHNG+30, CARCHNG+33, CARCHNG+36, CARCHNG+39, CARCHNG+43
, CARCHNG+46, CARCHNG+49, CARCHNG+52, ZERCHNG+11, LNOUT~, LNOUT+18*, PAYEX+5~, PAYEX+7*, PAYEX+15, PAYEX+18
, PAYEX+21
HEAD("DETAIL" CHKCHNG+9*, PAYEXC+14*, CARCHNG+18*, CARCHNG+19, LNOUT+28, PAYEX+12*
HEAD("SIZE" CHKCHNG+8*, LNOUT+18, LNOUT+21, PAYEX+7*
HEAD("TXT" CHKCHNG+9*, PAYEXC+14*, CARCHNG+19*, LNOUT+18, PAYEX+12*
IEN PAYEXC+8~, PAYEXC+11*, PAYEXC+12, PAYEXC+14, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28, PAYEXC+33, PAYEXC+37
, CARCHNG+9~, CARCHNG+12*, CARCHNG+13, CARCHNG+14, CARCHNG+15, CARCHNG+16, CARCHNG+18, CARCHNG+23, CARCHNG+26, CARCHNG+29
, CARCHNG+32, CARCHNG+35, CARCHNG+38, CARCHNG+42, CARCHNG+45, CARCHNG+48, CARCHNG+51, PAYEX+5~, PAYEX+9*, PAYEX+10*
, PAYEX+11, PAYEX+12, PAYEX+14, PAYEX+17, PAYEX+20
IO("Q" ZERCHNG+22!
LINE CHKCHNG~, CHKCHNG+13, CHKCHNG+14, CHKCHNG+15, CHKCHNG+16, CHKCHNG+17, CHKCHNG+18, MEDCHNG~, MEDCHNG+10, MEDCHNG+14
, MEDCHNG+18, MEDCHNG+23, MEDCHNG+28, MEDCHNG+32, RXCHNG~, RXCHNG+9, RXCHNG+13, RXCHNG+17, RXCHNG+21, TRICHNG~
, TRICHNG+14, TRICHNG+20, TRICHNG+26, TRICHNG+32, TRICHNG+38, TRICHNG+44, TRICHNG+50, PAYEXC~, PAYEXC+17, PAYEXC+21
, PAYEXC+25, PAYEXC+29, PAYEXC+34, PAYEXC+38, CARCHNG~, CARCHNG+24, CARCHNG+27, CARCHNG+30, CARCHNG+33, CARCHNG+36
, CARCHNG+39, CARCHNG+43, CARCHNG+46, CARCHNG+49, CARCHNG+52, ZERCHNG~, ZERCHNG+11, LNOUT~, PAYEX+5~, PAYEX+15
, PAYEX+18, PAYEX+21
LINE( LNOUT+18*, LNOUT+21*
LINES EXIT+6~
MEDND MEDCHNG+5~, MEDCHNG+6*, MEDCHNG+8, MEDCHNG+13, MEDCHNG+17, MEDCHNG+21, MEDCHNG+26, MEDCHNG+31
MSGTXT HEADER~
MSGTXT(1 HEADER+3*
MSGTXT(10 HEADER+12*
MSGTXT(2 HEADER+4*
MSGTXT(3 HEADER+5*
MSGTXT(4 HEADER+6*
MSGTXT(5 HEADER+7*
MSGTXT(6 HEADER+8*
MSGTXT(7 HEADER+9*
MSGTXT(8 HEADER+10*
MSGTXT(9 HEADER+11*
RCFDA LNOUT+14~
RCFDA( LNOUT+25*, LNOUT+26*, LNOUT+27*, LNOUT+28*, LNOUT+29*, LNOUT+30*
RCIENS LNOUT+14~, LNOUT+24*, LNOUT+25, LNOUT+26, LNOUT+27, LNOUT+28, LNOUT+29, LNOUT+30
RCMSGTXT EXIT+6~, EXIT+8, EXIT+13
RCSITE EXIT+6~, EXIT+11*, EXIT+12, EXIT+13, HEADER~, HEADER+4, HEADER+5
RCSUBJ EXIT+6~, EXIT+12*, EXIT+17
REC CARCHNG+9~
REC(0 CARCHNG+13*, CARCHNG+23, CARCHNG+26
REC(1 CARCHNG+14*, CARCHNG+29, CARCHNG+32
REC(2 CARCHNG+15*, CARCHNG+35, CARCHNG+38
REC(3 CARCHNG+16*, CARCHNG+42, CARCHNG+45, CARCHNG+48, CARCHNG+51
REC0 CHKCHNG+7~, TRICHNG+7~, TRICHNG+8*, TRICHNG+47, PAYEXC+8~, PAYEXC+12*, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28
, PAYEXC+33, PAYEXC+37, ZERCHNG+6~, PAYEX+5~, PAYEX+11*, PAYEX+14, PAYEX+17, PAYEX+20
REC1 CHKCHNG+7~, TRICHNG+7~, TRICHNG+9*, TRICHNG+11, TRICHNG+17, TRICHNG+23, TRICHNG+29, TRICHNG+35, TRICHNG+41, ZERCHNG+6~
, ZERCHNG+7*, ZERCHNG+8
REC2 CHKCHNG+7~
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
TXT LNOUT~, LNOUT+20, LNOUT+27
TXTLNS EXIT+6~
TYPE LNOUT~, LNOUT+20, LNOUT+29, LNOUT+30
U EXIT+12, HEADER+4, HEADER+5, HEADER+8, MEDCHNG+8, MEDCHNG+13, MEDCHNG+17, MEDCHNG+21, MEDCHNG+26, MEDCHNG+31
, RXCHNG+8, RXCHNG+12, RXCHNG+16, RXCHNG+20, TRICHNG+11, TRICHNG+17, TRICHNG+23, TRICHNG+29, TRICHNG+35, TRICHNG+41
, TRICHNG+47, PAYEXC+16, PAYEXC+20, PAYEXC+24, PAYEXC+28, PAYEXC+33, PAYEXC+37, CARCHNG+23, CARCHNG+26, CARCHNG+29
, CARCHNG+32, CARCHNG+35, CARCHNG+38, CARCHNG+42, CARCHNG+45, CARCHNG+48, CARCHNG+51, PAYEX+14, PAYEX+17, PAYEX+20
VAL FRMT~, FRMT+4, FRMT+5, FRMT+6
XMINSTR EXIT+6~, EXIT+17
XMINSTR("FROM" EXIT+15*
XMTO EXIT+6~, EXIT+17
XMTO( EXIT+15*
XMTO("G.RCDPE AUDIT" , EXIT+15*
XNEW CHKCHNG+7~, MEDCHNG+5~, MEDCHNG+8*, MEDCHNG+9, MEDCHNG+10, MEDCHNG+13*, MEDCHNG+14, MEDCHNG+17*, MEDCHNG+18, MEDCHNG+21*
, MEDCHNG+22, MEDCHNG+23, MEDCHNG+26*, MEDCHNG+27, MEDCHNG+28, MEDCHNG+31*, MEDCHNG+32, RXCHNG+5~, RXCHNG+8*, RXCHNG+9
, RXCHNG+12*, RXCHNG+13, RXCHNG+16*, RXCHNG+17, RXCHNG+20*, RXCHNG+21, TRICHNG+7~, TRICHNG+12*, TRICHNG+13, TRICHNG+14
, TRICHNG+18*, TRICHNG+19, TRICHNG+20, TRICHNG+24*, TRICHNG+25, TRICHNG+26, TRICHNG+30*, TRICHNG+31, TRICHNG+32, TRICHNG+36*
, TRICHNG+37, TRICHNG+38, TRICHNG+42*, TRICHNG+43, TRICHNG+44, TRICHNG+48*, TRICHNG+49, TRICHNG+50, PAYEXC+8~, PAYEXC+16*
, PAYEXC+17, PAYEXC+20*, PAYEXC+21, PAYEXC+24*, PAYEXC+25, PAYEXC+28*, PAYEXC+29, PAYEXC+33*, PAYEXC+34, PAYEXC+37*
, PAYEXC+38, CARCHNG+9~, CARCHNG+23*, CARCHNG+24, CARCHNG+26*, CARCHNG+27, CARCHNG+29*, CARCHNG+30, CARCHNG+32*, CARCHNG+33
, CARCHNG+35*, CARCHNG+36, CARCHNG+38*, CARCHNG+39, CARCHNG+42*, CARCHNG+43, CARCHNG+45*, CARCHNG+46, CARCHNG+48*, CARCHNG+49
, CARCHNG+51*, CARCHNG+52, ZERCHNG+6~, ZERCHNG+9*, ZERCHNG+10, ZERCHNG+11, ZERCHNG+12, LNOUT~, LNOUT+20, LNOUT+30
, PAYEX+5~, PAYEX+14*, PAYEX+15, PAYEX+17*, PAYEX+18, PAYEX+20*, PAYEX+21
XOLD CHKCHNG+7~, MEDCHNG+5~, MEDCHNG+8*, MEDCHNG+9, MEDCHNG+10, MEDCHNG+13*, MEDCHNG+14, MEDCHNG+17*, MEDCHNG+18, MEDCHNG+21*
, MEDCHNG+22, MEDCHNG+23, MEDCHNG+26*, MEDCHNG+27, MEDCHNG+28, MEDCHNG+31*, MEDCHNG+32, RXCHNG+5~, RXCHNG+8*, RXCHNG+9
, RXCHNG+12*, RXCHNG+13, RXCHNG+16*, RXCHNG+17, RXCHNG+20*, RXCHNG+21, TRICHNG+7~, TRICHNG+11*, TRICHNG+13, TRICHNG+14
, TRICHNG+17*, TRICHNG+19, TRICHNG+20, TRICHNG+23*, TRICHNG+25, TRICHNG+26, TRICHNG+29*, TRICHNG+31, TRICHNG+32, TRICHNG+35*
, TRICHNG+37, TRICHNG+38, TRICHNG+41*, TRICHNG+43, TRICHNG+44, TRICHNG+47*, TRICHNG+49, TRICHNG+50, PAYEXC+8~, PAYEXC+16*
, PAYEXC+17, PAYEXC+20*, PAYEXC+21, PAYEXC+24*, PAYEXC+25, PAYEXC+28*, PAYEXC+29, PAYEXC+33*, PAYEXC+34, PAYEXC+37*
, PAYEXC+38, CARCHNG+9~, CARCHNG+23*, CARCHNG+24, CARCHNG+26*, CARCHNG+27, CARCHNG+29*, CARCHNG+30, CARCHNG+32*, CARCHNG+33
, CARCHNG+35*, CARCHNG+36, CARCHNG+38*, CARCHNG+39, CARCHNG+42*, CARCHNG+43, CARCHNG+45*, CARCHNG+46, CARCHNG+48*, CARCHNG+49
, CARCHNG+51*, CARCHNG+52, ZERCHNG+6~, ZERCHNG+8*, ZERCHNG+10, ZERCHNG+11, LNOUT~, LNOUT+20, LNOUT+29, PAYEX+5~
, PAYEX+14*, PAYEX+15, PAYEX+17*, PAYEX+18, PAYEX+20*, PAYEX+21
Y LNOUT+14~, LNOUT+20*, LNOUT+21
ZTDESC ZERCHNG+13~, ZERCHNG+15*
>> ZTDTH ZERCHNG+17*
>> ZTIO ZERCHNG+16*
>> ZTPRI ZERCHNG+18*
ZTRTN ZERCHNG+13~, ZERCHNG+14*
ZTSAVE ZERCHNG+13~
ZTSK ZERCHNG+13~, ZERCHNG+20

Marked Items

Name Field # of Occurrence
$T( MEDCHNG+6, RXCHNG+6, PAYEXC+12, CARCHNG+13, CARCHNG+14, CARCHNG+15, CARCHNG+16, PAYEN+3, PAYEN+4, PAYEX+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All