RCRPU1 ;EDE/SAB - REPAYMENT PLAN UTILITIES;12/11/2020 8:40 AM
Source file <RCRPU1.m>
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 8 | LOCKF^PRCAWO1 ADJSCHED^RCRPENTR (BLDSTARY,UPDPRDF,UPDPRDL)^RCRPNP ($$GETNXTPY,REMBILL,TRAN,UPDPAYST)^RCRPU RMVPLN^RCRPU1 (UPDAUDIT,UPDRVW)^RCRPU2 ($$PMNTS,$$REMPMNTS)^RCRPU3 UPDMET^RCSTATU |
| VA FileMan | 5 | ^DIC FILE^DICN (,FILE)^DIE $$GET1^DIQ ^DIR |
| Kernel | 1 | ($$DT,$$FMDIFF)^XLFDT |
| 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 |
|---|---|---|
| UPDTERMS(RCRPIEN,RCPLNS,RCRVW) | ; Update the terms of the plan. PRCA*4.5*389
|
|
| CHKFLGS(RCRPIEN,RPMNTS,FLG36,FLG60) | ; check if we need to update 36 months and 60 months review flags PRCA*4.5*423
|
|
| UPDFLG36(RCRPIEN,VAL) | ; update 36 months review flag (field 340.5/1.06) PRCA*4.5*389
|
|
| GETRSN() | ; Get the reason the plan was closed.
|
|
| UPDSTAT(RCRPIEN,RCNWSTAT) | ; Update the status of the plan
|
|
| RMBILL(RCIEN) | ; Remove the Repayment Plan info from the bills in the plan
|
|
| UPDTRAN(RCIEN) | ; Update all bills on a plan if an edit to the plan is made
|
|
| DBTCOM(RCTRANDA,RCTXTFLG) | ;Add Transaction comments
; RCDBTR - Referance to #433 - IEN^Name ; RCTXTFLG - Comment text |
|
| SELRPP() | ; select RPP to display
|
|
| UPDPAY(RCIEN,RCTRAN,RCAMT) | ; Update the payment information, schedule, and status.
|
|
| UPDPAID(RCIEN,RCCMP) | ; Update the Paid flag in the payments.
|
|
| UPDBAL(RCBILLDA,RCTRANDA,RCSPFLG) | ; Update the Plan Amount Owed (#.11) in the AR
; REPAYMENT PLAN file (#340.5). |
|
| UPDPAO(RCIEN,RCAMT) | ; Update the PLAN AMOUNT OWE3D field
|
|
| PAID(RCIEN,RCSPFLG) | ; Repayment Plan is paid in full, update the status to PAID IN FULL and attempt to remove plan information from bills in plan.
|
|
| RMVPLN(RCBILLDA,RCNOCLS) | ;Remove the Plan info from a bill and file a Close Plan Transaction file.
; Input: RCBILLDA - IEN of the AR Bill (from file #430) to remove ; RCNOCLS - (Optional) - Flag to indicate whether to file a close Repayment Plan transaction or not. |
|
| AUTOADD(DEF) | ; display "allow bills to be auto-added?" prompt PRCA*4.5*378
|
|
| UPDAUTO(RCIEN,RCAUTO) | ; Update "auto-add bills" flag. PRCA*4.5*378
|
|
| STATUS(RCRPIEN) | ; Returns the current status of the plan.
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | SELRPP+9 |
| FILE^DICN | DBTCOM+8, UPDPAY+13 |
| ^DIE | UPDTERMS+11, UPDSTAT+10, RMBILL+10, UPDPAID+15, UPDPAO+5, RMVPLN+10, UPDAUTO+7 |
| FILE^DIE | UPDFLG36+8 |
| $$GET1^DIQ | UPDSTAT+6, UPDSTAT+24, UPDPAY+19, UPDBAL+13, UPDBAL+16, UPDBAL+26, UPDBAL+30, UPDBAL+39, UPDBAL+52, UPDBAL+53 |
| ^DIR | GETRSN+8, AUTOADD+9 |
| LOCKF^PRCAWO1 | RMVPLN+10 |
| ADJSCHED^RCRPENTR | UPDBAL+58 |
| BLDSTARY^RCRPNP | UPDSTAT+16 |
| UPDPRDF^RCRPNP | UPDSTAT+33, STATUS+15, STATUS+20 |
| UPDPRDL^RCRPNP | UPDSTAT+32, STATUS+14, STATUS+19 |
| $$GETNXTPY^RCRPU | STATUS+12 |
| REMBILL^RCRPU | UPDBAL+21 |
| TRAN^RCRPU | UPDSTAT+40, RMBILL+14, UPDTRAN+11, UPDBAL+64, RMVPLN+14 |
| UPDPAYST^RCRPU | UPDPAY+16 |
| RMVPLN^RCRPU1 | UPDSTAT+39 |
| UPDAUDIT^RCRPU2 | CHKFLGS+7, UPDSTAT+25, UPDSTAT+41, PAID+12, PAID+21, UPDAUTO+10 |
| UPDRVW^RCRPU2 | CHKFLGS+9, CHKFLGS+10, UPDSTAT+28 |
| $$PMNTS^RCRPU3 | UPDBAL+61 |
| $$REMPMNTS^RCRPU3 | UPDTERMS+12 |
| UPDMET^RCSTATU | UPDSTAT+20 |
| $$DT^XLFDT | UPDPAY+11, PAID+12, PAID+21, UPDAUTO+10, STATUS+8 |
| $$FMDIFF^XLFDT | STATUS+17 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^RCRP(340.5 - [#340.5] | Classic Fileman Calls, GET1^DIQ |
| ^PRCA(430 - [#430] | Classic Fileman Calls, GET1^DIQ |
| ^PRCA(430.3 - [#430.3] | GET1^DIQ |
| ^PRCA(433 - [#433] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCA(430 - [#430] | RMBILL+12, UPDTRAN+9 |
| ^RCRP(340.5 - [#340.5] | UPDTERMS+4, UPDTERMS+12, UPDFLG36+6, UPDFLG36+9, UPDSTAT+36, UPDSTAT+37, RMBILL+6, RMBILL+7, UPDTRAN+6, UPDTRAN+7 , UPDPAID+9, PAID+17, PAID+27, PAID+28, STATUS+4 |
| ^TMP($J | UPDSTAT+19, UPDSTAT+21! |
| Name | Line Occurrences |
|---|---|
| $$STATUS | UPDPAY+20 |
| CHKFLGS | UPDTERMS+12 |
| PAID | UPDBAL+63 |
| RMVPLN | UPDBAL+22, PAID+30 |
| UPDFLG36 | CHKFLGS+7, CHKFLGS+8 |
| UPDPAO | UPDBAL+49 |
| UPDPAY | UPDBAL+36 |
| UPDSTAT | UPDPAY+21, PAID+6, PAID+11, PAID+20 |
| UPDTERMS | UPDBAL+58 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | UPDTERMS+2~, UPDTERMS+10*, UPDSTAT+4~, UPDSTAT+8*, RMBILL+8*, RMBILL+11!, UPDTRAN+8!, UPDPAY+6~, UPDPAID+4~, UPDPAID+13* , UPDPAO+2~, UPDPAO+4*, RMVPLN+9*, RMVPLN+11!, UPDAUTO+5~, UPDAUTO+6* |
| DA(1 | UPDPAY+11*, UPDPAID+13*, UPDPAID+14 |
| DD | UPDTRAN+8!, UPDPAY+6~ |
| DEF | AUTOADD~, AUTOADD+7 |
| DIC | UPDTRAN+8!, DBTCOM+4~, DBTCOM+7*, SELRPP+4~, SELRPP+6*, UPDPAY+6~, UPDPAY+11*, RMVPLN+3~, RMVPLN+9*, RMVPLN+11! |
| DIC("A" | SELRPP+8* |
| DIC("DR" | UPDPAY+12* |
| DIC("W" | SELRPP+7* |
| DIC(0 | DBTCOM+7*, SELRPP+6*, UPDPAY+11* |
| DIE | UPDTERMS+2~, UPDTERMS+10*, UPDSTAT+4~, UPDSTAT+8*, RMBILL+8*, RMBILL+11!, UPDPAID+4~, UPDPAID+14*, UPDPAO+2~, UPDPAO+4* , RMVPLN+3~, RMVPLN+9*, RMVPLN+11!, UPDAUTO+5~, UPDAUTO+6* |
| DIR | GETRSN+1~, GETRSN+8!, AUTOADD+6~ |
| DIR("?" | GETRSN+6* |
| DIR("A" | GETRSN+4*, AUTOADD+8* |
| DIR("B" | AUTOADD+7* |
| DIR(0 | GETRSN+5*, AUTOADD+7* |
| DIROUT | GETRSN+1~, AUTOADD+6~, AUTOADD+9 |
| DIRUT | GETRSN+1~, AUTOADD+6~, AUTOADD+9 |
| DLAYGO | UPDTRAN+8!, UPDPAY+6~, UPDPAY+11* |
| DO | UPDTRAN+8!, UPDPAY+6~ |
| DR | UPDTERMS+2~, UPDTERMS+8*, UPDTERMS+9*, UPDSTAT+4~, UPDSTAT+9*, RMBILL+9*, RMBILL+11!, UPDPAY+6~, UPDPAID+4~, UPDPAID+12* , UPDPAO+2~, UPDPAO+3*, RMVPLN+3~, RMVPLN+9*, RMVPLN+11!, UPDAUTO+5~, UPDAUTO+6* |
| DT | CHKFLGS+7, UPDSTAT+9, UPDSTAT+25, UPDSTAT+41 |
| DTOUT | GETRSN+1~, GETRSN+9, SELRPP+4~, AUTOADD+6~, AUTOADD+9 |
| DUOUT | GETRSN+1~, GETRSN+9, SELRPP+4~, AUTOADD+6~, AUTOADD+9 |
| FDA | UPDFLG36+5~ |
| FDA( | UPDFLG36+7* |
| FLG36 | UPDTERMS+3~, UPDTERMS+5*, UPDTERMS+12, CHKFLGS~, CHKFLGS+7, CHKFLGS+8 |
| FLG60 | UPDTERMS+3~, UPDTERMS+6*, UPDTERMS+12, CHKFLGS~, CHKFLGS+9, CHKFLGS+10 |
| N1 | UPDTERMS+3~, UPDTERMS+4*, UPDTERMS+5, UPDTERMS+6 |
| PMNTS | UPDTERMS+3~, UPDTERMS+7*, UPDTERMS+8 |
| PRCA | RMVPLN+3~ |
| PRCA("LOCK" | RMVPLN+10* |
| RCAMT | UPDPAY~, UPDPAY+12, UPDBAL+7~, UPDBAL+30*, UPDBAL+31, UPDBAL+36, UPDBAL+43*, UPDBAL+46, UPDPAO~, UPDPAO+3 , RMVPLN+3~ |
| RCAUTO | UPDAUTO~, UPDAUTO+6 |
| RCBILLDA | UPDSTAT+4~, UPDSTAT+37*, UPDSTAT+39, UPDSTAT+40, UPDBAL~, UPDBAL+13, UPDBAL+21, UPDBAL+22, UPDBAL+64, PAID+2~ , PAID+28*, PAID+29, PAID+30, RMVPLN~, RMVPLN+9, RMVPLN+14 |
| RCBLIEN | RMBILL+3~, RMBILL+7*, RMBILL+8, RMBILL+12, RMBILL+14, UPDTRAN+3~, UPDTRAN+7*, UPDTRAN+9, UPDTRAN+11 |
| RCCMP | UPDPAID~, UPDPAID+8 |
| RCCNT | UPDPAID+5~, UPDPAID+7*, UPDPAID+8, UPDPAID+10*, UPDPAID+16* |
| RCCURDT | STATUS+2~, STATUS+8*, STATUS+9, STATUS+11, STATUS+17 |
| RCCURST | UPDSTAT+4~, UPDSTAT+6*, UPDSTAT+19, UPDPAY+7~, UPDPAY+19*, UPDPAY+21 |
| RCD0 | STATUS+2~, STATUS+4*, STATUS+5, STATUS+6, STATUS+7 |
| RCD7 | RMBILL+3~, RMBILL+12*, RMBILL+13, UPDTRAN+3~, UPDTRAN+9*, UPDTRAN+10 |
| RCDIFF | STATUS+2~, STATUS+17*, STATUS+18 |
| RCDONE | GETRSN+1~ |
| RCFBFLG | UPDPAID+5~, UPDPAID+9*, UPDPAID+11 |
| RCFIELD | UPDSTAT+4~, UPDSTAT+19*, UPDSTAT+20 |
| RCFRDT | STATUS+2~, STATUS+5*, STATUS+11 |
| RCI | RMBILL+3~, RMBILL+13*, UPDTRAN+3~, UPDTRAN+10*, UPDPAID+5~, UPDPAID+8*, UPDPAID+9, UPDPAID+13, PAID+2~, PAID+26* , PAID+27*, PAID+28 |
| RCIEN | GETRSN+1~, RMBILL~, RMBILL+6, RMBILL+7, UPDTRAN~, UPDTRAN+6, UPDTRAN+7, UPDPAY~, UPDPAY+9, UPDPAY+11 , UPDPAY+16, UPDPAY+19, UPDPAY+20, UPDPAY+21, UPDPAID~, UPDPAID+9, UPDPAID+13, UPDBAL+7~, UPDBAL+13*, UPDBAL+14 , UPDBAL+21, UPDBAL+36, UPDBAL+39, UPDBAL+49, UPDBAL+52, UPDBAL+53, UPDBAL+58, UPDBAL+61, UPDBAL+63, UPDPAO~ , UPDPAO+4, PAID~, PAID+6, PAID+11, PAID+12, PAID+17, PAID+20, PAID+21, PAID+27, PAID+28 , UPDAUTO~, UPDAUTO+6, UPDAUTO+10 |
| RCLP | RMBILL+3~, RMBILL+5*, RMBILL+6*, RMBILL+7, UPDTRAN+3~, UPDTRAN+5*, UPDTRAN+6*, UPDTRAN+7 |
| RCLSTDT | STATUS+2~, STATUS+12*, STATUS+13, STATUS+17 |
| RCMNPY | UPDBAL+7~, UPDBAL+52*, UPDBAL+54, UPDBAL+58 |
| RCNOCLS | RMVPLN~, RMVPLN+6*, RMVPLN+14 |
| RCNOMN | UPDBAL+7~, UPDBAL+53*, UPDBAL+58 |
| RCNWLN | UPDBAL+7~, UPDBAL+54*, UPDBAL+55*, UPDBAL+58 |
| RCNWMOD | UPDBAL+7~, UPDBAL+54*, UPDBAL+55 |
| RCNWSTAT | UPDSTAT~, UPDSTAT+9, UPDSTAT+14, UPDSTAT+19, UPDSTAT+28, UPDSTAT+31, UPDSTAT+35, UPDSTAT+40, UPDSTAT+41 |
| RCOLDST | STATUS+2~, STATUS+6*, STATUS+19, STATUS+20 |
| RCPD | UPDPAID+5~, UPDPAID+9* |
| RCPDFLG | UPDPAID+5~, UPDPAID+9*, UPDPAID+10, UPDPAID+11 |
| RCPLNS | UPDTERMS~, UPDTERMS+7, UPDTERMS+8, UPDTERMS+12 |
| RCPYFLG | PAID+2~, PAID+17*, PAID+19, PAID+21, PAID+22 |
| RCPYMNTS | UPDBAL+7~, UPDBAL+61*, UPDBAL+62 |
| RCRMBAL | UPDBAL+7~, UPDBAL+39*, UPDBAL+46*, UPDBAL+49, UPDBAL+54, UPDBAL+62 |
| RCRPIEN | UPDTERMS~, UPDTERMS+4, UPDTERMS+10, UPDTERMS+12, CHKFLGS~, CHKFLGS+7, CHKFLGS+8, CHKFLGS+9, CHKFLGS+10, UPDFLG36~ , UPDFLG36+6, UPDFLG36+7, UPDFLG36+9, UPDSTAT~, UPDSTAT+6, UPDSTAT+8, UPDSTAT+24, UPDSTAT+25, UPDSTAT+28, UPDSTAT+32 , UPDSTAT+33, UPDSTAT+36, UPDSTAT+37, UPDSTAT+41, STATUS~, STATUS+4, STATUS+12, STATUS+14, STATUS+15, STATUS+19 , STATUS+20 |
| RCRPPFLG | UPDBAL+7~, UPDBAL+26*, UPDBAL+27, UPDBAL+35, UPDBAL+43 |
| RCRVW | UPDTERMS~, UPDTERMS+9 |
| RCSPFLG | UPDBAL~, UPDBAL+10*, UPDBAL+20, UPDBAL+63, UPDBAL+64, PAID~, PAID+5, PAID+10, PAID+16 |
| RCSTAT | UPDPAY+7~, UPDPAY+20*, UPDPAY+21, PAID+2~, PAID+18*, PAID+19*, PAID+20, STATUS+2~, STATUS+6*, STATUS+9 , STATUS+10, STATUS+11, STATUS+18*, STATUS+19, STATUS+20, STATUS+21 |
| RCSTATDT | STATUS+2~, STATUS+7*, STATUS+9 |
| RCSTTXT | UPDSTAT+4~, UPDSTAT+24*, UPDSTAT+25 |
| RCTEXT | DBTCOM+4~, DBTCOM+6*, DBTCOM+7 |
| RCTOT | RMBILL+3~, RMBILL+12*, RMBILL+13*, RMBILL+14, UPDTRAN+3~, UPDTRAN+9*, UPDTRAN+10*, UPDTRAN+11 |
| RCTRAN | UPDPAY~, UPDPAY+12 |
| RCTRANDA | DBTCOM~, DBTCOM+7, UPDBAL~, UPDBAL+16, UPDBAL+30, UPDBAL+36 |
| RCTRTYPE | UPDBAL+7~, UPDBAL+16*, UPDBAL+17, UPDBAL+26 |
| RCTXTFLG | DBTCOM~, DBTCOM+6 |
| RPMNTS | UPDTERMS+3~, UPDTERMS+12*, CHKFLGS~, CHKFLGS+7, CHKFLGS+8, CHKFLGS+9, CHKFLGS+10 |
| U | UPDTERMS+5, UPDTERMS+6, UPDTERMS+7, UPDTERMS+12, UPDSTAT+35, RMBILL+13, UPDTRAN+10, UPDPAID+9, UPDBAL+58, STATUS+5 , STATUS+6, STATUS+7 |
| VAL | UPDFLG36~, UPDFLG36+7 |
| X | UPDTERMS+2~, GETRSN+1~, UPDSTAT+4~, RMBILL+11!, UPDTRAN+8!, DBTCOM+4~, DBTCOM+7*, SELRPP+4~, SELRPP+5*, UPDPAY+11* , UPDPAID+4~, UPDPAO+2~, RMVPLN+3~, AUTOADD+6~, UPDAUTO+5~ |
| Y | UPDTERMS+2~, GETRSN+1~, GETRSN+9, GETRSN+10, UPDSTAT+4~, RMBILL+11!, UPDTRAN+8!, DBTCOM+4~, SELRPP+4~, SELRPP+10 , UPDPAID+4~, UPDPAO+2~, RMVPLN+3~, AUTOADD+6~, AUTOADD+10, UPDAUTO+5~ |
| Z | UPDSTAT+4~, UPDSTAT+36*, UPDSTAT+37 |
| >> ZTQUEUED | PAID+7, PAID+13, PAID+22, PAID+23 |