RCBDFST1 ;WISC/RFJ-patient statement utilities continued ;1 Dec 00
Source file <RCBDFST1.m>
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 2 | $$TRANVALU^RCDPBTLM $$VALID^RCRJRCOT |
| 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 |
|---|---|---|
| CHEKACCT(RCDEBTDA) | ; check to see if a debtor is in balance
; returns null if in balance, or the calculated statement ; if out of balance ; returns rcbilbal,rcevent,rcnewact,rcstate,rclastev ; returns ^tmp("rcbdfst1",$j ... (see NEWTRANS below) |
|
| BILLBAL(DEBTDA) | ; get the bill balances for a debtor
; returns array RCBILBAL("PB")=principal balance ; RCBILBAL("IN")=interest balance ; RCBILBAL("AD")=admin balance ; RCBILBAL("MF")=marshal fee balance ; RCBILBAL("CC")=court cost balance ; RCBILBAL =total balance |
|
| NEWTRANS(DEBTDA,BEGDATE,ENDDATE) | ; get new transaction activity between dates
; returns global array ; tmp("rcbdfst1",$j,account,transactiondate,bill,transaction)=value ; where ; value = ^ prin ^ int ^ admin ^ mf ^ cc |
|
| LASTEVNT(DEBTDA) | ; get last type of event for debtor patient statement (2)
|
|
| EVENTBAL(EVENTDA) | ; get the last statement balance
; returns array RCEVENT("PB")=principal balance ; RCEVENT("IN")=interest balance ; RCEVENT("AD")=admin balance ; RCEVENT("MF")=marshal fee balance ; RCEVENT("CC")=court cost balance ; RCEVENT =total balance |
| Name | Field # of Occurrence |
|---|---|
| $$TRANVALU^RCDPBTLM | NEWTRANS+26 |
| $$VALID^RCRJRCOT | NEWTRANS+23 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCA(430 - [#430] | BILLBAL+14, BILLBAL+15, BILLBAL+17, NEWTRANS+13, NEWTRANS+14, NEWTRANS+15, NEWTRANS+31 |
| ^PRCA(433 - [#433] | NEWTRANS+20, NEWTRANS+21, NEWTRANS+24 |
| ^RC(341 - [#341] | CHEKACCT+11, CHEKACCT+33, LASTEVNT+4, LASTEVNT+7, EVENTBAL+8 |
| ^RC(341.1 - [#341.1] | LASTEVNT+3 |
| ^TMP("RCBDFST1" | NEWTRANS+10!, NEWTRANS+16*, NEWTRANS+32* |
| Name | Line Occurrences |
|---|---|
| $$LASTEVNT | CHEKACCT+10 |
| BILLBAL | CHEKACCT+8 |
| EVENTBAL | CHEKACCT+13 |
| NEWTRANS | CHEKACCT+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CHEKACCT+6~, CHEKACCT+20*, CHEKACCT+23, CHEKACCT+24, CHEKACCT+26, CHEKACCT+29*, BILLBAL+7~, BILLBAL+10*, BILLBAL+26*, NEWTRANS+6~ , NEWTRANS+9*, NEWTRANS+31*, NEWTRANS+40*, EVENTBAL+7~, EVENTBAL+16* |
| BEGDATE | NEWTRANS~, NEWTRANS+13, NEWTRANS+20 |
| BILLDA | BILLBAL+7~, BILLBAL+14*, BILLBAL+15, BILLBAL+17, NEWTRANS+6~, NEWTRANS+14*, NEWTRANS+15, NEWTRANS+16, NEWTRANS+24*, NEWTRANS+31 , NEWTRANS+32 |
| DATA1 | CHEKACCT+6~, EVENTBAL+7~, EVENTBAL+8*, EVENTBAL+9, EVENTBAL+10, EVENTBAL+11, EVENTBAL+12, EVENTBAL+13 |
| DATA7 | BILLBAL+7~, BILLBAL+15*, BILLBAL+17, BILLBAL+19, BILLBAL+20, BILLBAL+21, BILLBAL+22, BILLBAL+23 |
| DATE | NEWTRANS+6~, NEWTRANS+13*, NEWTRANS+14, NEWTRANS+16, NEWTRANS+20*, NEWTRANS+21, NEWTRANS+32 |
| DEBTDA | BILLBAL~, BILLBAL+14, NEWTRANS~, NEWTRANS+10, NEWTRANS+13, NEWTRANS+14, NEWTRANS+16, NEWTRANS+20, NEWTRANS+21, NEWTRANS+32 , LASTEVNT~, LASTEVNT+4, LASTEVNT+7 |
| ENDDATE | NEWTRANS~, NEWTRANS+13, NEWTRANS+20 |
| EVENTDA | LASTEVNT+1~, LASTEVNT+7*, LASTEVNT+9, EVENTBAL~, EVENTBAL+8 |
| ORIGAMT | NEWTRANS+6~, NEWTRANS+15*, NEWTRANS+16, NEWTRANS+17 |
| OUTOFBAL | CHEKACCT+6~, CHEKACCT+19*, CHEKACCT+25*, CHEKACCT+31*, CHEKACCT+34 |
| >> RCBILBAL | BILLBAL+9*, BILLBAL+26* |
| >> RCBILBAL( | CHEKACCT+24, CHEKACCT+26, BILLBAL+10*, BILLBAL+26 |
| >> RCBILBAL("AD" | BILLBAL+21* |
| >> RCBILBAL("CC" | BILLBAL+23* |
| >> RCBILBAL("IN" | BILLBAL+20* |
| >> RCBILBAL("MF" | BILLBAL+22* |
| >> RCBILBAL("PB" | BILLBAL+17*, BILLBAL+19* |
| RCDEBTDA | CHEKACCT~, CHEKACCT+8, CHEKACCT+10, CHEKACCT+15 |
| >> RCEVENT | EVENTBAL+15*, EVENTBAL+16* |
| >> RCEVENT( | CHEKACCT+23, CHEKACCT+24, EVENTBAL+16 |
| >> RCEVENT("AD" | EVENTBAL+11* |
| >> RCEVENT("CC" | EVENTBAL+12* |
| >> RCEVENT("IN" | EVENTBAL+10* |
| >> RCEVENT("MF" | EVENTBAL+13* |
| >> RCEVENT("PB" | EVENTBAL+9* |
| >> RCLASTEV | CHEKACCT+10*, CHEKACCT+11, CHEKACCT+13, CHEKACCT+15, CHEKACCT+33 |
| >> RCNEWACT | NEWTRANS+8*, NEWTRANS+40* |
| >> RCNEWACT( | CHEKACCT+24, CHEKACCT+26, NEWTRANS+9*, NEWTRANS+40 |
| >> RCNEWACT("AD" | NEWTRANS+35* |
| >> RCNEWACT("CC" | NEWTRANS+37* |
| >> RCNEWACT("IN" | NEWTRANS+34* |
| >> RCNEWACT("MF" | NEWTRANS+36* |
| >> RCNEWACT("PB" | NEWTRANS+17*, NEWTRANS+33* |
| >> RCSTATE | CHEKACCT+28*, CHEKACCT+29* |
| >> RCSTATE( | CHEKACCT+23*, CHEKACCT+26*, CHEKACCT+29 |
| >> RCSTATE("AD" | CHEKACCT+31 |
| >> RCSTATE("CC" | CHEKACCT+31 |
| >> RCSTATE("IN" | CHEKACCT+31 |
| >> RCSTATE("MF" | CHEKACCT+31 |
| >> RCSTATE("PB" | CHEKACCT+31 |
| REVDATE | LASTEVNT+1~, LASTEVNT+4*, LASTEVNT+5, LASTEVNT+7, LASTEVNT+9 |
| STATUS | BILLBAL+7~, BILLBAL+14*, NEWTRANS+6~ |
| TRANDA | NEWTRANS+6~, NEWTRANS+21*, NEWTRANS+23, NEWTRANS+24, NEWTRANS+26, NEWTRANS+32 |
| TYPEDA | LASTEVNT+1~, LASTEVNT+3*, LASTEVNT+4, LASTEVNT+7 |
| VALUE | NEWTRANS+6~, NEWTRANS+26*, NEWTRANS+28, NEWTRANS+31*, NEWTRANS+32, NEWTRANS+33, NEWTRANS+34, NEWTRANS+35, NEWTRANS+36, NEWTRANS+37 |