IVMUCHK ;ALB/MLI - Filter routine to validate MT transmission before filing ; August 31,1994
Source file <IVMUCHK.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 |
|---|---|---|
| EN() | ; entry point to create temp array and begin filter checks
|
|
| CHECK() | ; check validity of transmission data
|
|
| CHECKQ | ||
| ORDER(HLDA,IEN) | ; get next node
|
|
| CLEAR(NODE) | ; convert HLQ to null
|
|
| TOTAL(STRING,INCR,DEP) | ; append total on the end
|
|
| INC | ; income
|
|
| DEBT | ; debts
|
|
| NET | ; net worth
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HL(772 - [#772] | EN+6, EN+8, EN+11, EN+13, EN+19, ORDER+1, ORDER+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN+6, EN+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | EN+4~, EN+7! |
| ARRAY( | EN+13*, EN+14*, EN+15*, EN+16, EN+17!, EN+18*, CHECK+8, CHECK+9, CHECK+10, CHECK+11 |
| ARRAY("PID" | EN+8* |
| ARRAY("ZIC" | EN+9*, CHECK+5 |
| ARRAY("ZIR" | EN+10*, CHECK+6 |
| ARRAY("ZMT" | EN+19*, CHECK+7 |
| D | TOTAL+1~ |
| DEB | TOTAL+1~*, DEBT+1*, NET+3 |
| DEP | EN+4~, EN+7*, EN+12*, EN+13, EN+14, EN+15, EN+16, EN+17*, EN+18, TOTAL~ , INC+1 |
| ERROR | EN+4~, EN+5*, EN+6, EN+20*, EN+21, CHECK+4~, CHECK+5*, CHECK+6*, CHECK+7*, CHECK+8 , CHECK+9*, CHECK+10*, CHECK+11*, CHECKQ |
| HLDA | EN+6, EN+8, EN+9, EN+10, EN+11, EN+13, EN+14, EN+15, EN+19, ORDER~ , ORDER+1, ORDER+2 |
| >> HLFS | EN+8, EN+9, EN+13, EN+16, EN+17, EN+18, EN+19, ORDER+2, CLEAR+2, INC+1 , INC+2, DEBT+1, NET+1, NET+2, NET+3 |
| >> HLQ | CLEAR+2 |
| I | EN+4~, CLEAR+1~, CLEAR+2*, TOTAL+1~, INC+2*, DEBT+1*, NET+1* |
| IEN | EN+4~, EN+6*, EN+8, EN+9, EN+10, EN+11*, EN+13, EN+14, EN+15, EN+19 , CHECK+4~, CHECK+8*, CHECK+9, CHECK+10, CHECK+11, ORDER~, ORDER+1*, ORDER+2 |
| INC | TOTAL+1~*, INC+1*, INC+2*, NET+3 |
| INCR | TOTAL~, INC+1 |
| N | TOTAL+1~ |
| NET | TOTAL+1~*, NET+1*, NET+2*, NET+3 |
| NODE | CLEAR~, CLEAR+2*, CLEAR+3 |
| >> SPOUSE | EN+7*, EN+16* |
| STRING | EN+4~, TOTAL~, INC+2, DEBT+1, NET+1, NET+2 |
| TYPE | EN+4~ |
| X | EN+4~ |