RCTCSPD0 ;ALBANY/RGB - CROSS-SERVICING TRANSMISSION START ;06/15/17 3:34 PM
Source file <RCTCSPD0.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 |
|---|---|---|
| SETUP | ;Entry point from nightly process PRCABJ
|
|
| RESTART | ||
| RS1 | ||
| FINISH | ;sends mailman message to TCSP mail group to show batch fully completed
|
|
| UNDEF | ;send message to mail group for any undefined debtor entries found
|
|
| RSBILCHK(BILL,NOCHK) | ; PRCA*4.5*350
; Input: BILL - IEN for 430 ; NOCHK - Comma separated value ; Output: 1 - bill passed ; 0^fail#^message - bill failed^fail number^fail message ; ************************************************************************* ; This is a copy of bill sending logic from RSBILL, except that it only checks if the bill passes or not and doesn't send any messages. ; If you are updating RSBILL, please update this as well. Alternatively, RSBILL can be rewritten. ; ************************************************************************* |
|
| RRMARK | ;
|
|
| NEWADI | ;Make new Agency Debt ID trailer PRCA*4.5*350
|
| Name | Field # of Occurrence |
|---|---|
| ^%DTC | RSBILCHK+48 |
| C^%DTC | RS1+6, RS1+7 |
| NOW^%DTC | RESTART |
| $$SITE^RCMSITE | RS1 |
| $$DEM^RCTCSP1 | RSBILCHK+20 |
| RS1^RCTCSPD0 | RSBILCHK+18 |
| $$RFCHK^RCTOPD | RSBILCHK+38 |
| $$FMADD^XLFDT | SETUP+7, SETUP+8 |
| $$FMTE^XLFDT | RSBILCHK+21, RSBILCHK+27, RSBILCHK+28, RSBILCHK+31, RSBILCHK+39, RSBILCHK+46, RSBILCHK+50 |
| ^XMD | FINISH+9, UNDEF+16 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCA(430 - [#430] | RSBILCHK+12, RSBILCHK+13, RSBILCHK+57, RSBILCHK+60, RRMARK+2*, RRMARK+3!*, RRMARK+4, RRMARK+5*, RRMARK+6*, RRMARK+7* , RRMARK+8*, RRMARK+9*, NEWADI+2, NEWADI+5* |
| ^PRCA(430.2 - [#430.2] | RSBILCHK+36 |
| ^RC(342 - [#342] | RS1, RS1+5, RSBILCHK+44, RSBILCHK+45, RSBILCHK+46 |
| ^RCD(340 - [#340] | RSBILCHK+15, RSBILCHK+16, RSBILCHK+17 |
| ^TMP("RCTCSPD" | SETUP+4!, FINISH+10! |
| ^XTMP("RCTCSPD" | SETUP+5!, SETUP+7*, RESTART*, FINISH+1, FINISH+6, UNDEF+12 |
| ^XTMP("RCTCSPDN" | SETUP+6!, SETUP+8* |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | RSBILCHK+16 |
| ^(12 | RSBILCHK+12 |
| ^(12.1 | RSBILCHK+12 |
| ^(14 | RSBILCHK+12 |
| ^(15 | RSBILCHK+12 |
| ^(16 | RSBILCHK+12 |
| ^(19 | RSBILCHK+12 |
| ^(20 | RSBILCHK+12 |
| ^(3 | RSBILCHK+16 |
| ^(4 | RSBILCHK+12 |
| ^(6 | RSBILCHK+12 |
| ^(7 | RSBILCHK+12, RSBILCHK+16 |
| ^(9 | RSBILCHK+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | RESTART |
| ACTDT | RS1+1*, RS1+2*, RS1+3*, RS1+4*, RSBILCHK+10~, RSBILCHK+21 |
| ACTION | RSBILCHK+9~ |
| B0 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+35, RSBILCHK+36, RSBILCHK+49, RSBILCHK+53 |
| B12 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+28 |
| B121 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+29, RSBILCHK+30 |
| B14 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+27 |
| B15 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+40, RSBILCHK+55, RRMARK+2*, NEWADI+5* |
| B16 | RSBILCHK+9~, RSBILCHK+12* |
| B19 | RSBILCHK+9~, RSBILCHK+12* |
| B20 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+44, RSBILCHK+45, RSBILCHK+46, RSBILCHK+48 |
| B4 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+28, RSBILCHK+39 |
| B6 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+21, RSBILCHK+31, RSBILCHK+38, RSBILCHK+49, RSBILCHK+50, RSBILCHK+61 |
| B7 | RSBILCHK+9~, RSBILCHK+12*, RSBILCHK+58 |
| B9 | RSBILCHK+9~, RSBILCHK+12* |
| BILL | RSBILCHK~, RSBILCHK+12, RSBILCHK+13, RSBILCHK+57, RSBILCHK+60, RRMARK+2, RRMARK+3, RRMARK+4, RRMARK+5, RRMARK+6 , RRMARK+7, RRMARK+8, RRMARK+9, NEWADI+2, NEWADI+5 |
| >> BILLDT | RSBILCHK+49*, RSBILCHK+50 |
| BMSG | FINISH+2~, UNDEF+1~ |
| BMSG( | UNDEF+13* |
| BMSG(1 | FINISH+6*, UNDEF+5* |
| BMSG(2 | UNDEF+6* |
| BMSG(3 | UNDEF+7* |
| BMSG(4 | UNDEF+8* |
| BMSG(97 | UNDEF+9* |
| BMSG(98 | UNDEF+10* |
| BMSG(99 | UNDEF+11* |
| CAT | RSBILCHK+9~, RSBILCHK+36*, RSBILCHK+37, RSBILCHK+38 |
| CHK | NEWADI+1~, NEWADI+4* |
| CNTR | RSBILCHK+10~ |
| CNTR("2A" | RS1+8* |
| CNTR("2C" | RS1+8* |
| CNTR("5A" | RS1+8* |
| CNTR("5B" | RS1+8* |
| CNTR(1 | RS1+8* |
| CNTR(2 | RS1+8* |
| CNTR(3 | RS1+8* |
| CTR | UNDEF+1~, UNDEF+12*, UNDEF+13* |
| DEBTOR | RSBILCHK+10~, RSBILCHK+13*, RSBILCHK+14, RSBILCHK+15, RSBILCHK+16, RSBILCHK+17 |
| DEBTOR0 | RSBILCHK+10~, RSBILCHK+16*, RSBILCHK+19 |
| DEBTOR1 | RSBILCHK+10~, RSBILCHK+16*, RSBILCHK+51 |
| DEBTOR3 | RSBILCHK+10~, RSBILCHK+16* |
| DEBTOR7 | RSBILCHK+10~, RSBILCHK+16* |
| DEBTOR8 | RSBILCHK+10~, RSBILCHK+17*, RSBILCHK+41 |
| DEMCS | RSBILCHK+10~, RSBILCHK+20*, RSBILCHK+32, RSBILCHK+52 |
| DT | SETUP+7, SETUP+8, RS1+6, RS1+7, RSBILCHK+44, RSBILCHK+45, RSBILCHK+46, RSBILCHK+48, RRMARK+8 |
| F60DT | RS1+7*, RSBILCHK+10~ |
| I | RRMARK+1~, RRMARK+2*, RRMARK+4*, RRMARK+6, RRMARK+8, RRMARK+9 |
| IEN | UNDEF+1~, UNDEF+12*, UNDEF+13 |
| NOCHK | RSBILCHK~, RSBILCHK+11*, RSBILCHK+14, RSBILCHK+15, RSBILCHK+21, RSBILCHK+27, RSBILCHK+28, RSBILCHK+29, RSBILCHK+30, RSBILCHK+31 , RSBILCHK+32, RSBILCHK+35, RSBILCHK+37, RSBILCHK+38, RSBILCHK+39, RSBILCHK+40, RSBILCHK+41, RSBILCHK+42, RSBILCHK+44, RSBILCHK+45 , RSBILCHK+46, RSBILCHK+50, RSBILCHK+51, RSBILCHK+52, RSBILCHK+53, RSBILCHK+55, RSBILCHK+57, RSBILCHK+59, RSBILCHK+60, RSBILCHK+61 |
| >> ONEBILL | FINISH+8, UNDEF+15 |
| >> PREPDT | RSBILCHK+49* |
| >> RC151DT | RS1+6*, RSBILCHK+50 |
| RC181DT | RSBILCHK+10~ |
| RCDFN | RSBILCHK+10~, RSBILCHK+19*, RSBILCHK+20 |
| SITE | RS1*, RS1+2, RS1+3, RS1+4, RSBILCHK+10~ |
| >> SITE40 | RS1+5*, RSBILCHK+42 |
| >> SITECD | RS1* |
| TOTAL | RSBILCHK+9~, RSBILCHK+58*, RSBILCHK+59 |
| TRAIL | NEWADI+1~, NEWADI+2*, NEWADI+3*, NEWADI+4*, NEWADI+5 |
| U | RS1, RS1+5, RSBILCHK+13, RSBILCHK+17, RSBILCHK+21, RSBILCHK+27, RSBILCHK+28, RSBILCHK+29, RSBILCHK+30, RSBILCHK+31 , RSBILCHK+32, RSBILCHK+35, RSBILCHK+36, RSBILCHK+38, RSBILCHK+39, RSBILCHK+40, RSBILCHK+44, RSBILCHK+45, RSBILCHK+46, RSBILCHK+48 , RSBILCHK+49, RSBILCHK+50, RSBILCHK+52, RSBILCHK+53, RSBILCHK+55, RSBILCHK+58, RSBILCHK+61, RRMARK+2, RRMARK+3, RRMARK+5 , RRMARK+6, RRMARK+7, RRMARK+8, NEWADI+2, NEWADI+5 |
| >> X | RS1+6, RS1+7, RSBILCHK+46 |
| X1 | RS1+6*, RS1+7*, RSBILCHK+10~, RSBILCHK+47~, RSBILCHK+48* |
| X2 | RS1+6*, RS1+7*, RSBILCHK+10~, RSBILCHK+47~, RSBILCHK+48* |
| XMDUZ | FINISH+2~, FINISH+3*, UNDEF+1~, UNDEF+2* |
| XMSUB | FINISH+2~, FINISH+5*, UNDEF+1~, UNDEF+4* |
| XMTEXT | FINISH+2~, FINISH+7*, UNDEF+1~, UNDEF+14* |
| XMY | FINISH+2~, UNDEF+1~ |
| XMY("G.TCSP" | FINISH+4*, UNDEF+3* |