RCBMILLD ;WISC/RFJ-millennium bill (calculations internal set tmp) ; 27 Jun 2001 11:10 AM
Source file <RCBMILLD.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 |
|---|---|---|
| SETTEMP(TYPE,PRINCPAL,AMTOMCCF,AMTOHSIF,PAIDMCCF,PAIDHSIF) | ; build the temp global
; called internally by the routine rcbmillc |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | SETTEMP+34* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AMTOHSIF | SETTEMP~, SETTEMP+13, SETTEMP+18, SETTEMP+21, SETTEMP+34 |
| AMTOMCCF | SETTEMP~ |
| AMTOMCCF("AFT | ER EFF DATE" , SETTEMP+12, SETTEMP+17, SETTEMP+25, SETTEMP+34 |
| AMTOMCCF("BEF | ORE EFF DATE" , SETTEMP+12, SETTEMP+17, SETTEMP+24, SETTEMP+34 |
| PAIDHSIF | SETTEMP~, SETTEMP+34 |
| PAIDMCCF | SETTEMP~, SETTEMP+34 |
| PRINCPAL | SETTEMP~, SETTEMP+34 |
| >> RCBALANC("HSIF" | SETTEMP+21* |
| >> RCBALANC("MCC | F AFTER EFF DATE" , SETTEMP+25*, F BEFORE EFF DATE" , SETTEMP+24* |
| >> RCBILLDA | SETTEMP+34 |
| >> RCTOTAL("OWED | TO HSIF" , SETTEMP+13*, TO MCCF" , SETTEMP+12* |
| >> RCTOTAL("PAID | TO HSIF" , SETTEMP+18*, TO MCCF" , SETTEMP+17* |
| >> RCTRANDA | SETTEMP+34 |
| TYPE | SETTEMP~, SETTEMP+11, SETTEMP+16, SETTEMP+34 |