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 |