RCDPESP6 ;AITC/CJE - ePayment Lockbox Site Parameters - Notify Changes;29 Jan 2019 18:00:14
Source file <RCDPESP6.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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
; PRCA*4.5*345 - 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 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 |
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 |
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! |
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 |
>> | 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 |