RCDPESR3 ;ALB/TMK/PJH - Server auto-update utilities - EDI Lockbox ;Jun 06, 2014@19:11:19
Source file <RCDPESR3.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 |
|---|---|---|
| EFTIN(RCTXN,RCD,XMZ,RCGBL,RCEFLG) | ; Adds a new EFT record to AR file 344.3
; from Lockbox EFT msg ; Input: RCTXN - Data on the header record of the message text ; RCD - Array containing formatted mail message header data ; XMZ - Mail message number ; RCGBL - Name of the array or global where the message is stored ; Output: RCEFLG - Error flag returned if passed by reference |
|
| EFTQ | ;
|
|
| ADDEFT(RCTXN,RCXMZ,RCGBL,RCERR) | ; File EFT TOTAL record in file 344.3
; RCTXN = the data on the header record of the message text ; RCXMZ = the mail message number ; RCGBL = the name of the array or global where the message is stored ; Function returns the ien of the total record found/added ; and also returns RCERR if passed by reference |
|
| ADDQ | ||
| CHKSUM(RCTDA) | ; Calc the checksum for EFT record stored in RCTDA in 344.3
|
|
| DISP(RCTIT,RCCT,RCDXM,RCXMZ) | ; Sends bulletin with formatted data from message
; RCTIT = title of bulletin ; RCCT = # of lines previously populated ; RCXDM = array containing the text of the bulletin |
|
| DUP(RCM,RCIFN,RCAMT,RCAMT1) | ; EOB in mail message already stored in 361.1?
; RCM = msg # EOB was received in ; RCIFN = bill ien ; RCAMT = amt pd ; RCAMT1 = amt reported billed ; Returns 0 if none found, entry #^message checksum on file if found |
|
| DUPERA(DUP,RCNOUPD) | ; Msg for duplicate ERA
; RCNOUPD = # of message with duplicate data ; DUP = flag = -1 if duplicate message received in same mail msg # |
|
| BULLS(RCFILE,RCTDA,DUP,RCXMSG) | ; Error bulletins for ERA
; PRCA*4.5*298 - DUPLICATE TRANSMISSION MSG AND EEOB - EXCEPTIONS message disabled - 14 Feb 2014 |
|
| ADJERR(RCERR) | ; Set up adj error text in RCERR(n) - pass by ref
; Function returns # of lines for error text |
|
| SUMEFT(IEN) | ; Add up the total amount of all the EFTs on an EDI Lockbox Deposit
; Input IEN - Internal Entry # for file #344.3 ; Returns - Sum of amount in EFT Details (#344.31) associated with this EDI Lockbox Deposit |
| Name | Field # of Occurrence |
|---|---|
| ^%DT | ADDEFT+17, ADDEFT+30 |
| FILE^DICN | EFTIN+60, ADDEFT+47, ADDEFT+54 |
| ^DIE | ADDEFT+43 |
| FILE^DIE | EFTIN+81, EFTIN+85 |
| ^DIK | EFTIN+63, EFTIN+64 |
| CLEAN^DILF | EFTQ+1 |
| BULLEFT^RCDPESR0 | DISP+10 |
| ERRUPD^RCDPESR1 | EFTIN+23, EFTIN+30, EFTIN+66, EFTIN+75 |
| TAXERR^RCDPESR1 | EFTIN+57 |
| BULL2^RCDPESR5 | BULLS+3 |
| DISP^RCDPESR8 | DISP+8 |
| $$FDT^RCDPESR9 | EFTIN+49, ADDEFT+16, ADDEFT+29, ADDEFT+38 |
| $$ZERO^RCDPESR9 | EFTIN+17 |
| $$NOW^XLFDT | ADDEFT+39 |
| FileNo | Call Tags |
|---|---|
| ^RCY(344.3 - [#344.3] | Classic Fileman Calls |
| ^RCY(344.31 - [#344.31] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("LPC" | CHKSUM+7, CHKSUM+9 |
| ^IBM(361.1 - [#361.1] | DUP+8, DUP+9, DUP+10 |
| ^RCY(344 - [#344] | ADDEFT+23 |
| ^RCY(344.3 - [#344.3] | ADDEFT+21, ADDEFT+42, ADDEFT+48, ADDEFT+51, ADDEFT+52, ADDEFT+55, CHKSUM+4 |
| ^RCY(344.31 - [#344.31] | EFTIN+64, CHKSUM+9, SUMEFT+7, SUMEFT+8 |
| ^TMP("RC" | DISP+5!, DISP+9, DISP+11! |
| ^TMP("RC1" | DISP+5!, DISP+11! |
| ^TMP("RCERR1" | DUPERA+3!, DUPERA+4* |
| ^TMP("RCMSG" | DISP+7 |
| ^TMP("RCMSGH" | DISP+6 |
| ^TMP("RCTEMP" | DISP+5!, DISP+6*, DISP+7*, DISP+11! |
| Name | Line Occurrences |
|---|---|
| $$ADDEFT | EFTIN+27 |
| $$CHKSUM | EFTIN+84 |
| $$SUMEFT | EFTIN+79 |
| EFTQ | EFTIN+22, EFTIN+29, EFTIN+33, EFTIN+70 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EFTIN+38 |
| ^("LPC" | CHKSUM+7, CHKSUM+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | ADDEFT+7~, ADDEFT+17*, ADDEFT+30* |
| AMOUNT | SUMEFT+3~, SUMEFT+10*, SUMEFT+11*, SUMEFT+12 |
| AMT31 | EFTIN+8~, EFTIN+42*, EFTIN+68 |
| CT | EFTIN+8~, EFTIN+12*, EFTIN+15* |
| DA | EFTIN+8~, EFTIN+40~, EFTIN+63*, EFTIN+64*, ADDEFT+27~, ADDEFT+43*, ADDEFT+44!, ADDEFT+47! |
| DA(1 | ADDEFT+46* |
| DD | EFTIN+40~, EFTIN+61!, ADDEFT+27~, ADDEFT+54! |
| DEBIT | EFTIN+8~, EFTIN+52*, EFTIN+53, EFTIN+68, SUMEFT+3~, SUMEFT+9*, SUMEFT+11 |
| DEPAMT | ADDEFT+27~, ADDEFT+34*, ADDEFT+39 |
| DIC | EFTIN+40~, EFTIN+59*, EFTIN+61!, ADDEFT+27~, ADDEFT+43!, ADDEFT+46*, ADDEFT+47!, ADDEFT+53*, ADDEFT+54! |
| DIC("DR" | EFTIN+44*, EFTIN+45*, EFTIN+46*, EFTIN+47*, EFTIN+48*, EFTIN+49*, EFTIN+50*, EFTIN+51*, EFTIN+53*, ADDEFT+36* , ADDEFT+37*, ADDEFT+38*, ADDEFT+39*, ADDEFT+43 |
| DIC(0 | EFTIN+59*, ADDEFT+46*, ADDEFT+53* |
| DIE | EFTIN+40~, ADDEFT+27~, ADDEFT+43*, ADDEFT+44! |
| DIK | EFTIN+8~, EFTIN+63*, EFTIN+64* |
| DINUM | ADDEFT+27~, ADDEFT+53*, ADDEFT+54! |
| DLAYGO | EFTIN+8~, EFTIN+59*, EFTIN+61!, ADDEFT+27~, ADDEFT+53*, ADDEFT+54! |
| DO | EFTIN+40~, EFTIN+61!, ADDEFT+27~, ADDEFT+54! |
| DR | EFTIN+40~, ADDEFT+27~, ADDEFT+43*, ADDEFT+44! |
| DT | EFTIN+50 |
| DUP | DUP+6~, DUP+7*, DUP+8, DUP+10*, DUP+11*, DUP+12, DUPERA~, DUPERA+4, BULLS~ |
| DUP1 | DUP+6~, DUP+7*, DUP+9*, DUP+11 |
| FDA | EFTIN+8~, EFTIN+78!, EFTIN+83! |
| FDA( | EFTIN+79*, EFTIN+80*, EFTIN+84* |
| IEN | SUMEFT~, SUMEFT+5, SUMEFT+7 |
| IEN31 | SUMEFT+3~, SUMEFT+6*, SUMEFT+7*, SUMEFT+8 |
| RC | EFTIN+8~, EFTIN+37*, DISP+4~, DISP+6*, DISP+7* |
| RC1 | EFTIN+8~, EFTIN+37* |
| RCAMT | DUP~, DUP+10 |
| RCAMT1 | DUP~, DUP+10 |
| RCCT | DISP~, DISP+9* |
| RCD | EFTIN~, EFTIN+23, EFTIN+30, EFTIN+66, EFTIN+75 |
| RCDDAT | ADDEFT+15~, ADDEFT+17*, ADDEFT+21 |
| RCDEPAMT | EFTIN+8~, EFTIN+17*, EFTIN+73 |
| RCDPCSUM | CHKSUM+2~, CHKSUM+4*, CHKSUM+7*, CHKSUM+9*, CHKSUM+10 |
| RCDPDATA | CHKSUM+2~, CHKSUM+6*, CHKSUM+7, CHKSUM+9* |
| RCDTTM | ADDEFT+27~, ADDEFT+30*, ADDEFT+37 |
| RCDUP | ADDEFT+7~, ADDEFT+12*, ADDEFT+23* |
| RCDXM | DISP~, DISP+10 |
| RCDXM( | DISP+9* |
| RCEFLG | EFTIN~, EFTIN+12*, EFTIN+24*, EFTIN+31*, EFTIN+65*, EFTIN+74* |
| RCEFT | EFTIN+8~, EFTIN+27*, EFTIN+33, EFTIN+41, EFTIN+63, EFTIN+64, EFTIN+79, EFTIN+80, EFTIN+84 |
| RCERR | EFTIN+9~, EFTIN+20*, EFTIN+22, EFTIN+23, EFTIN+27, EFTIN+29, EFTIN+30, EFTIN+38, EFTIN+65*, EFTIN+66 , EFTIN+70, EFTIN+74*, EFTIN+75, ADDEFT~, ADDEFT+8*, ADDEFT+58*, ADJERR~ |
| RCERR(1 | ADJERR+2* |
| RCERR(2 | ADJERR+2* |
| RCERR(3 | ADJERR+2* |
| RCERR(4 | ADJERR+2* |
| RCFILE | BULLS~, BULLS+3 |
| RCGBL | EFTIN~, EFTIN+15, EFTIN+23, EFTIN+27, EFTIN+30, EFTIN+38, EFTIN+66, EFTIN+75, ADDEFT~ |
| RCHAC | ADDEFT+7~, ADDEFT+12* |
| RCIFN | DUP~, DUP+8 |
| RCLAST | EFTIN+8~, EFTIN+12*, EFTIN+13, EFTIN+14*, EFTIN+20 |
| RCM | DUP~, DUP+8 |
| RCMEFTS | EFTIN+9~ |
| RCNOUPD | DUPERA~, DUPERA+4 |
| RCRCPT | ADDEFT+7~ |
| RCTDA | EFTIN+9~, ADDEFT+7~, ADDEFT+8*, ADDEFT+21*, ADDEFT+24*, ADDEFT+39, ADDEFT+41, ADDEFT+42*, ADDEFT+43, ADDEFT+46 , ADDEFT+48, ADDEFT+50, ADDEFT+56*, ADDEFT+58, ADDQ, CHKSUM~, CHKSUM+4, CHKSUM+9, BULLS~, BULLS+3 |
| RCTIT | DISP~, DISP+10 |
| RCTXN | EFTIN~, EFTIN+17, EFTIN+27, EFTIN+56, EFTIN+57, ADDEFT~, ADDEFT+12, ADDEFT+13, ADDEFT+16, ADDEFT+21 , ADDEFT+29, ADDEFT+38 |
| RCTYP1 | EFTIN+9~, EFTIN+12*, EFTIN+23, EFTIN+30, EFTIN+66, EFTIN+75 |
| RCUN | EFTIN+9~, EFTIN+72*, EFTIN+74*, EFTIN+80 |
| RCX | ADDEFT+27~, ADDEFT+51*, ADDEFT+52*, ADDEFT+53, ADDEFT+55 |
| RCXMSG | BULLS~, BULLS+3 |
| RCXMZ | ADDEFT~, ADDEFT+39, ADDEFT+46, DISP~, DISP+10 |
| RCZ | EFTIN+9~, EFTIN+37*, EFTIN+38* |
| REC | SUMEFT+3~, SUMEFT+8*, SUMEFT+9, SUMEFT+10 |
| RETURN | SUMEFT+3~, SUMEFT+4*, SUMEFT+12*, SUMEFT+13 |
| TOT31 | EFTIN+9~, EFTIN+37*, EFTIN+68*, EFTIN+73 |
| U | EFTIN+14, EFTIN+17, EFTIN+39, EFTIN+42, EFTIN+44, EFTIN+45, EFTIN+46, EFTIN+47, EFTIN+48, EFTIN+49 , EFTIN+50, EFTIN+51, EFTIN+52, EFTIN+55, EFTIN+56, EFTIN+57, ADDEFT+12, ADDEFT+13, ADDEFT+16, ADDEFT+21 , ADDEFT+23, ADDEFT+29, ADDEFT+38, CHKSUM+6, CHKSUM+9, DUP+9, DUP+10 |
| X | EFTIN+40~, EFTIN+41*, ADDEFT+7~, ADDEFT+16*, ADDEFT+29*, ADDEFT+46*, ADDEFT+52*, CHKSUM+2~, CHKSUM+4*, CHKSUM+7* , CHKSUM+9* |
| >> XMER | EFTIN+13 |
| >> XMREC | EFTIN+13 |
| >> XMRG | EFTIN+14, EFTIN+15 |
| XMZ | EFTIN~, EFTIN+27 |
| XX | EFTIN+9~, EFTIN+56*, EFTIN+57 |
| Y | EFTIN+40~, EFTIN+62, ADDEFT+7~, ADDEFT+17, ADDEFT+30, ADDEFT+56, CHKSUM+2~, CHKSUM+7, CHKSUM+9 |
| Z | EFTIN+9~, EFTIN+64*, ADDEFT+7~, ADDEFT+18*, ADDEFT+21*, ADDEFT+23, ADDEFT+24, CHKSUM+2~, CHKSUM+9*, DISP+4~ , DISP+7*, DISP+9*, DUP+6~, DUP+7*, DUP+8*, DUP+9, DUP+10 |
| Z0 | EFTIN+9~, EFTIN+38*, EFTIN+39, EFTIN+42, EFTIN+44, EFTIN+45, EFTIN+46, EFTIN+47, EFTIN+48, EFTIN+49 , EFTIN+50, EFTIN+51, EFTIN+52, EFTIN+55, EFTIN+56, ADDEFT+7~, ADDEFT+21*, ADDEFT+23, CHKSUM+2~, CHKSUM+4* , CHKSUM+6, CHKSUM+9* |