RCDPLPL4 ;ALB/SAB - Multiple Bill Link Payments ;17 Mar 16
Source file <RCDPLPL4.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 |
|---|---|---|
| MULTIPLE(RCRECTDA,RCTRANDA,RCGECSCR,RCSTATUS) | ; Process multiple bills for the same receipt transaction.
|
|
| GETACCT(RCRECTDA) | ; Ask the user for the account
|
|
| GETAMT(RCACCT,RCAMT) | ; Ask the user for the amount
|
|
| GETCMT() | ; Ask the user for a comment
|
|
| CONTINUE(RCAMTRM) | ; Ask the user to see if they wish to continue
|
|
| CONQUIT() | ;
|
|
| COPYTRAN(RCRECTDA,RCTDATA,RCAMT,RCGECSCR) | ;
; Input ; RCRECTDA - IEN of Receipt file #344 ; RCPAYDA - IEN of Receipt Transaction file #344.01 ; RCAMT - Amount ; RCGECSCR - null = receipt not processed ; Output ; Update Receipt file #344 and Audit log #344,71 |
|
| ADJTRAMT(RCRECTDA,RCTRANDA,RCAMT,RCGECSCR,RCARRAY) | ; Added RCARRAY - PRCA*4.5*326
; Input ; RCRECTDA - IEN of Receipt file #344 ; RCPAYDA - IEN of Receipt Transaction file #344.01 ; RCAMT - Amount ; RCGECSCR - null = receipt not processed ; RCARRAY - Array of Multi-Trans split information (OPTIONAL) ; Output ; Update Receipt file #344 and Audit log #344,71 |
|
| LINKPAY(RCRECTDA,RCTRANDA,RCACCT) | ;
|
|
| REMCMT(RCRECTDA,RCTRANDA) | ;
|
|
| GETACTNM(RCACCT) | ;
|
|
| UPDCMT(RCRECTDA,RCTRANDA,RCCMT) | ;
|
|
| PROCESS(RCRECTDA,RCTRANDA,RCTDNM) | ;
|
|
| ENDMSG(RCSTATUS) | ;
|
|
| GETANS(RCIDX) | ;
|
|
| GETANS1() | ;
|
|
| PAYCHK(RCACCT,RCAMT) | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^DIE | COPYTRAN+32, ADJTRAMT+16, LINKPAY+6, REMCMT+6, UPDCMT+5 |
| $$GET1^DIQ | GETACCT+25, GETACTNM+6 |
| ^DIR | GETACCT+7, GETAMT+9, CONTINUE+4, CONQUIT+5, GETANS+14 |
| $$PROCESS^RCBEPAY | PROCESS+3 |
| AUDIT^RCBEPAY | MULTIPLE+139, MULTIPLE+166, COPYTRAN+36, ADJTRAMT+20, PROCESS+20 |
| SUSPDIS^RCBEPAY | MULTIPLE+140, MULTIPLE+167, PROCESS+23 |
| $$COM^RCDPECH | GETCMT+4 |
| AUDIT^RCDPECH | ADJTRAMT+22, UPDCMT+7 |
| CHKEOB^RCDPEU2 | MULTIPLE+186 |
| MAILMSG^RCDPLPSR | PROCESS+27 |
| WRITE^RCDPRPLU | MULTIPLE+10, MULTIPLE+17, MULTIPLE+192 |
| LASTEDIT^RCDPUREC | ADJTRAMT+17, LINKPAY+7, REMCMT+7 |
| PNORBILL^RCDPURED | GETACCT+21 |
| $$ADDTRAN^RCDPURET | COPYTRAN+13 |
| DELEACCT^RCDPURET | PROCESS+16 |
| EDITFMS^RCDPURET | PROCESS+30 |
| SETUNAPP^RCDPURET | MULTIPLE+132 |
| $$TRIM^XLFSTR | GETCMT+6 |
| $$UP^XLFSTR | GETACCT+12, GETANS1+9 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PRCA(430 - [#430] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | MULTIPLE+90 |
| ^DPT - [#2] | MULTIPLE+85, MULTIPLE+92 |
| ^PRCA(430 - [#430] | MULTIPLE+89, GETACCT+15, GETACCT+26, PAYCHK+8 |
| ^RCD(340 - [#340] | GETACCT+26 |
| ^RCY(344 - [#344] | MULTIPLE+7, MULTIPLE+129, COPYTRAN+11, COPYTRAN+33*, PROCESS+8 |
| Name | Line Occurrences |
|---|---|
| $$CONQUIT | MULTIPLE+28, MULTIPLE+60 |
| $$CONTINUE | MULTIPLE+54 |
| $$COPYTRAN | MULTIPLE+123 |
| $$GETACCT | MULTIPLE+26 |
| $$GETACTNM | MULTIPLE+47 |
| $$GETAMT | MULTIPLE+36 |
| $$GETANS | MULTIPLE+70, MULTIPLE+97 |
| $$GETCMT | MULTIPLE+41 |
| $$PAYCHK | GETAMT+12 |
| ADJTRAMT | MULTIPLE+160 |
| ENDMSG | MULTIPLE+190 |
| LINKPAY | MULTIPLE+126, MULTIPLE+171 |
| PROCESS | MULTIPLE+150, MULTIPLE+179 |
| REMCMT | MULTIPLE+149, MULTIPLE+174 |
| UPDCMT | MULTIPLE+137, MULTIPLE+164 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AMTFLG | GETAMT+2~, GETAMT+7*, GETAMT+12*, GETAMT+14 |
| DA | GETACCT+2~, GETAMT+2~, COPYTRAN+9~, COPYTRAN+31*, ADJTRAMT+10~, ADJTRAMT+15*, LINKPAY+2~, LINKPAY+5*, REMCMT+2~, REMCMT+5* , UPDCMT+2~, UPDCMT+4*, GETANS+1~ |
| DA(1 | GETACCT+20*, COPYTRAN+31*, ADJTRAMT+15*, LINKPAY+5*, REMCMT+5*, UPDCMT+4* |
| DIE | COPYTRAN+9~, COPYTRAN+30*, ADJTRAMT+10~, ADJTRAMT+14*, LINKPAY+2~, LINKPAY+4*, REMCMT+2~, REMCMT+4*, UPDCMT+2~, UPDCMT+3* |
| DIR | GETACCT+2~, GETAMT+2~, GETCMT+2~, CONTINUE+2~, CONQUIT+2~, GETANS+1~, GETANS+15! |
| DIR("?" | GETANS+5*, GETANS+10* |
| DIR("A" | GETACCT+5*, GETAMT+8*, CONTINUE+3*, CONQUIT+3*, CONQUIT+4*, GETANS+6*, GETANS+11* |
| DIR("PRE" | GETACCT+6* |
| DIR(0 | GETACCT+5*, GETAMT+8*, CONTINUE+3*, CONQUIT+4*, GETANS+13* |
| DIROUT | GETACCT+2~, GETAMT+2~, GETCMT+2~, CONTINUE+2~, CONQUIT+2~, GETANS+1~ |
| DIRUT | GETACCT+2~, GETAMT+2~, GETCMT+2~, CONTINUE+2~, CONQUIT+2~, GETANS+1~ |
| DR | COPYTRAN+9~, COPYTRAN+17*, COPYTRAN+18*, COPYTRAN+19*, COPYTRAN+20*, COPYTRAN+21*, COPYTRAN+22*, COPYTRAN+23*, COPYTRAN+24*, COPYTRAN+25* , COPYTRAN+26*, COPYTRAN+27*, COPYTRAN+28*, COPYTRAN+29*, ADJTRAMT+10~, ADJTRAMT+13*, LINKPAY+2~, LINKPAY+3*, REMCMT+2~, REMCMT+3* , UPDCMT+2~, UPDCMT+3* |
| DTIME | GETANS1+5 |
| DTOUT | GETACCT+2~, GETACCT+9, GETAMT+2~, GETAMT+10, GETCMT+2~, GETCMT+8, CONTINUE+2~, CONTINUE+5, CONQUIT+2~, CONQUIT+6 , COPYTRAN+9~, ADJTRAMT+10~, LINKPAY+2~, REMCMT+2~, UPDCMT+2~, GETANS+1~, GETANS+16 |
| DUOUT | GETACCT+2~, GETACCT+9, GETAMT+2~, GETAMT+10, GETCMT+2~, CONTINUE+2~, CONTINUE+5, CONQUIT+2~, CONQUIT+6, GETANS+1~ , GETANS+16 |
| DUZ | COPYTRAN+26 |
| FLG | GETANS1+2~, GETANS1+3*, GETANS1+4, GETANS1+10*, GETANS1+11*, PAYCHK+2~, PAYCHK+4*, PAYCHK+10, PAYCHK+11*, PAYCHK+12 |
| HRCDCKSW | MULTIPLE+4~, MULTIPLE+26* |
| I | MULTIPLE+3~, MULTIPLE+77*, MULTIPLE+79*, MULTIPLE+81 |
| OWED | PAYCHK+2~, PAYCHK+8*, PAYCHK+9*, PAYCHK+10 |
| RCACCT | MULTIPLE+26*, MULTIPLE+27, MULTIPLE+31, MULTIPLE+33*, MULTIPLE+36, MULTIPLE+41, MULTIPLE+47, GETAMT~, GETAMT+12, LINKPAY~ , LINKPAY+3, GETACTNM~, GETACTNM+3, GETACTNM+4, GETACTNM+5, PAYCHK~, PAYCHK+6, PAYCHK+8 |
| RCACCTL | GETACTNM+1~, GETACTNM+2*, GETACTNM+3, GETACTNM+6*, GETACTNM+7*, GETACTNM+8 |
| RCACT | MULTIPLE+2~, MULTIPLE+110*, MULTIPLE+113, MULTIPLE+114, MULTIPLE+115, MULTIPLE+116, MULTIPLE+120, MULTIPLE+157 |
| RCAMT | MULTIPLE+2~, MULTIPLE+13*, MULTIPLE+15, MULTIPLE+36*, MULTIPLE+37, MULTIPLE+47, MULTIPLE+48, GETAMT~, GETAMT+8, COPYTRAN~ , COPYTRAN+18, ADJTRAMT~, ADJTRAMT+13, PAYCHK~, PAYCHK+10 |
| RCAMTRM | MULTIPLE+2~, MULTIPLE+13*, MULTIPLE+20, MULTIPLE+36, MULTIPLE+48*, MULTIPLE+51, MULTIPLE+54, CONTINUE~, CONTINUE+3 |
| RCANS | MULTIPLE+3~, MULTIPLE+70*, MULTIPLE+76, MULTIPLE+97*, MULTIPLE+98 |
| RCARRAY | MULTIPLE+2~, MULTIPLE+160, MULTIPLE+186, ADJTRAMT~, ADJTRAMT+20 |
| RCARRAY( | MULTIPLE+47*, MULTIPLE+81, MULTIPLE+113, MULTIPLE+114, MULTIPLE+115, MULTIPLE+116 |
| RCBLIEN | MULTIPLE+3~ |
| RCCMT | MULTIPLE+40*, MULTIPLE+41*, MULTIPLE+43, MULTIPLE+47, COPYTRAN+14*, COPYTRAN+27, ADJTRAMT+10~, ADJTRAMT+11*, ADJTRAMT+13, UPDCMT~ , UPDCMT+3 |
| RCCT | MULTIPLE+2~, MULTIPLE+6*, MULTIPLE+46*, MULTIPLE+47, MULTIPLE+79, MULTIPLE+110 |
| RCDACNO | MULTIPLE+3~, MULTIPLE+80*, MULTIPLE+86*, MULTIPLE+89*, MULTIPLE+94 |
| RCDACNOI | MULTIPLE+3~, MULTIPLE+80*, MULTIPLE+88*, MULTIPLE+89, MULTIPLE+90 |
| RCDACT | MULTIPLE+3~, MULTIPLE+82*, MULTIPLE+83, MULTIPLE+84, MULTIPLE+85, MULTIPLE+87, MULTIPLE+88 |
| RCDATA | MULTIPLE+3~, MULTIPLE+81*, MULTIPLE+82, MULTIPLE+94 |
| RCDCHKSW | MULTIPLE+4~, MULTIPLE+26* |
| >> RCDPTYPE | COPYTRAN+33 |
| RCERROR | MULTIPLE+101*, MULTIPLE+110, PROCESS+2~, PROCESS+3*, PROCESS+5, PROCESS+11 |
| RCEXIT | MULTIPLE+2~, MULTIPLE+6*, MULTIPLE+20, MULTIPLE+29*, MULTIPLE+61*, MULTIPLE+64 |
| RCEXT | MULTIPLE+2~ |
| RCFILE | GETACTNM+1~, GETACTNM+4*, GETACTNM+6 |
| RCFLG | GETAMT+2~, GETAMT+5*, GETAMT+6, GETAMT+10*, GETAMT+15*, GETAMT+16* |
| RCGECSCR | MULTIPLE~, MULTIPLE+123, MULTIPLE+138, MULTIPLE+147, MULTIPLE+160, MULTIPLE+165, MULTIPLE+177, COPYTRAN~, COPYTRAN+36, ADJTRAMT~ , ADJTRAMT+20 |
| RCIDX | GETANS~, GETANS+4, GETANS+9 |
| RCIEN | GETACTNM+1~, GETACTNM+5*, GETACTNM+6 |
| RCMSG | MULTIPLE+2~, MULTIPLE+9*, MULTIPLE+10, MULTIPLE+16*, MULTIPLE+17 |
| RCNM | MULTIPLE+3~, MULTIPLE+80*, MULTIPLE+83*, MULTIPLE+85*, MULTIPLE+91*, MULTIPLE+92*, MULTIPLE+93*, MULTIPLE+94 |
| RCNWTRAN | MULTIPLE+2~, MULTIPLE+123*, MULTIPLE+126, MULTIPLE+131, MULTIPLE+132, MULTIPLE+137, MULTIPLE+139, MULTIPLE+140, MULTIPLE+149, MULTIPLE+150 , COPYTRAN+9~, COPYTRAN+13*, COPYTRAN+31, COPYTRAN+33, COPYTRAN+36, COPYTRAN+38 |
| RCPIEN | MULTIPLE+3~, MULTIPLE+90*, MULTIPLE+91, MULTIPLE+92 |
| RCQTSP | MULTIPLE+3~, MULTIPLE+23* |
| RCRECTDA | MULTIPLE~, MULTIPLE+7, MULTIPLE+26, MULTIPLE+123, MULTIPLE+126, MULTIPLE+129, MULTIPLE+132, MULTIPLE+137, MULTIPLE+139, MULTIPLE+140 , MULTIPLE+149, MULTIPLE+150, MULTIPLE+160, MULTIPLE+164, MULTIPLE+166, MULTIPLE+167, MULTIPLE+171, MULTIPLE+174, MULTIPLE+179, MULTIPLE+186 , GETACCT~, GETACCT+20, COPYTRAN~, COPYTRAN+11, COPYTRAN+13, COPYTRAN+30, COPYTRAN+31, COPYTRAN+33, COPYTRAN+36, ADJTRAMT~ , ADJTRAMT+14, ADJTRAMT+15, ADJTRAMT+17, ADJTRAMT+20, ADJTRAMT+22, LINKPAY~, LINKPAY+4, LINKPAY+5, LINKPAY+7, REMCMT~ , REMCMT+4, REMCMT+5, REMCMT+7, UPDCMT~, UPDCMT+3, UPDCMT+4, UPDCMT+7, PROCESS~, PROCESS+3, PROCESS+8 , PROCESS+16, PROCESS+20, PROCESS+23, PROCESS+27, PROCESS+30 |
| RCRSP | MULTIPLE+2~, MULTIPLE+28*, MULTIPLE+29, MULTIPLE+54*, MULTIPLE+57, MULTIPLE+60*, MULTIPLE+61 |
| RCSPRSS | MULTIPLE+2~, MULTIPLE+6*, MULTIPLE+104* |
| RCSTAT | GETACCT+2~, GETACCT+24, GETACCT+25*, GETACCT+26 |
| RCSTATUS | MULTIPLE~, MULTIPLE+190, PROCESS+25, ENDMSG~, ENDMSG+2, ENDMSG+7 |
| RCSUSFLG | GETACCT+2~, GETACCT+4*, GETACCT+8 |
| RCTACCT | MULTIPLE+2~, MULTIPLE+114*, MULTIPLE+117 |
| RCTACCTT | MULTIPLE+3~, MULTIPLE+117* |
| RCTAMT | MULTIPLE+2~, MULTIPLE+4~, MULTIPLE+113*, MULTIPLE+123, MULTIPLE+141, MULTIPLE+148, MULTIPLE+154, MULTIPLE+160, MULTIPLE+168, MULTIPLE+178 , MULTIPLE+183 |
| RCTCMT | MULTIPLE+4~, MULTIPLE+115*, MULTIPLE+135, MULTIPLE+137, MULTIPLE+144, MULTIPLE+163, MULTIPLE+164 |
| RCTDATA | MULTIPLE+2~, MULTIPLE+7*, MULTIPLE+8, MULTIPLE+13, MULTIPLE+123, COPYTRAN~, COPYTRAN+17, COPYTRAN+19, COPYTRAN+20, COPYTRAN+21 , COPYTRAN+22, COPYTRAN+23, COPYTRAN+24, COPYTRAN+25 |
| RCTDATA3 | COPYTRAN+9~, COPYTRAN+11*, COPYTRAN+28, COPYTRAN+29 |
| RCTDNM | MULTIPLE+4~, MULTIPLE+116*, MULTIPLE+126, MULTIPLE+148, MULTIPLE+150, MULTIPLE+153, MULTIPLE+171, MULTIPLE+178, MULTIPLE+179, MULTIPLE+182 , PROCESS~, PROCESS+17 |
| RCTRANDA | MULTIPLE~, MULTIPLE+7, MULTIPLE+160, MULTIPLE+164, MULTIPLE+166, MULTIPLE+167, MULTIPLE+171, MULTIPLE+174, MULTIPLE+179, MULTIPLE+186 , COPYTRAN+11, ADJTRAMT~, ADJTRAMT+15, ADJTRAMT+20, ADJTRAMT+22, LINKPAY~, LINKPAY+5, REMCMT~, REMCMT+5, UPDCMT~ , UPDCMT+4, UPDCMT+7, PROCESS~, PROCESS+3, PROCESS+8, PROCESS+16, PROCESS+20, PROCESS+23, PROCESS+27, PROCESS+30 |
| RCUNAPN | MULTIPLE+3~, MULTIPLE+130*, MULTIPLE+131*, MULTIPLE+132 |
| RCUNRCN | MULTIPLE+4~, MULTIPLE+129*, MULTIPLE+130 |
| U | MULTIPLE+13, MULTIPLE+47, MULTIPLE+82, MULTIPLE+85, MULTIPLE+89, MULTIPLE+90, MULTIPLE+92, MULTIPLE+94, MULTIPLE+113, MULTIPLE+114 , MULTIPLE+115, MULTIPLE+116, MULTIPLE+129, COPYTRAN+17, COPYTRAN+19, COPYTRAN+20, COPYTRAN+21, COPYTRAN+22, COPYTRAN+23, COPYTRAN+24 , COPYTRAN+25, COPYTRAN+28, COPYTRAN+29 |
| X | GETACCT+2~, GETACCT+19*, GETACCT+24, GETACCT+25, GETACCT+26, GETACCT+29, GETACCT+32, GETAMT+2~, GETCMT+2~, CONTINUE+2~ , CONQUIT+2~, COPYTRAN+9~, GETANS+1~, GETANS1+2~, GETANS1+5*, GETANS1+7, GETANS1+8, GETANS1+9*, GETANS1+10, GETANS1+11 |
| Y | GETACCT+2~, GETACCT+9, GETACCT+12*, GETACCT+15*, GETACCT+17, GETACCT+19, GETAMT+2~, GETAMT+10*, GETAMT+12, GETAMT+15 , GETAMT+16*, GETAMT+17, GETCMT+2~, GETCMT+3, GETCMT+4*, GETCMT+6*, GETCMT+7, GETCMT+8*, GETCMT+9, CONTINUE+2~ , CONTINUE+5, CONTINUE+6, CONQUIT+2~, CONQUIT+6, CONQUIT+7, COPYTRAN+9~, GETANS+1~, GETANS+17, GETANS1+2~, GETANS1+3* , GETANS1+10*, GETANS1+11*, GETANS1+13 |