DGEN339 ;ALB/SCK - IVMB HEC CLEANUP - VETERAN MERGE EXTRACT ; 1/13/2001
Source file <DGEN339.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Income Verification Match | 1 | IVMB HEC DUPE VET MERGE |
| Kernel | 1 | ^DIC(19 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main entry point for veteran merged pair collection and transmission to the HEC
|
|
| QUE | ;
|
|
| TEST(MODE) | ; Test entry point for development testing. This entry point is not
; supported for user use. |
|
| COLLECT(DGEXTRCT,DGDATA) | ; Collect Merge From and Merge To pair from XDR Repointed Entry File
; Append ICN to end of merge pair using API call |
|
| BUILD(DGEXTRCT,DGDATA,MAX,DGDEST) | ; Build and send mailman messages of veteran pairs
|
|
| SEND(DGDATA,DGMSG,DGDEST) | ; Build and send individual mailman messages
|
|
| NOTIFY(DGDATA) | ; Send notification message to local mailgroup.
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^VA(15.3 - [#15.3] | EN+4, COLLECT+5, COLLECT+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COUNT | BUILD+1~, BUILD+14*, BUILD+15*, BUILD+16 |
| DFN1 | COLLECT+2~, COLLECT+8*, COLLECT+10 |
| DFN2 | COLLECT+2~, COLLECT+9*, COLLECT+10 |
| DGDATA | QUE+1~, QUE+8, QUE+9, QUE+10, TEST+3~, TEST+18, TEST+20, TEST+21, COLLECT~, BUILD~ , BUILD+20, BUILD+26, SEND~, NOTIFY~ |
| DGDATA("MSG" | BUILD+19*, BUILD+25*, SEND+10, NOTIFY+12, NOTIFY+13 |
| DGDATA("MSGNUM" | BUILD+13*, BUILD+19, BUILD+21*, BUILD+25, SEND+9, SEND+10, NOTIFY+7 |
| DGDATA("NUMREC" | TEST+16*, COLLECT+13*, BUILD+10, BUILD+11, SEND+10, NOTIFY+7 |
| DGDATA("SITE" | QUE+6*, TEST+11*, SEND+9, SEND+10 |
| DGDATA("TEST" | TEST+7* |
| DGDATA("TOSEND" | BUILD+10*, BUILD+11*, SEND+9, SEND+10 |
| DGDEST | EN+1~, EN+13*, QUE+9, BUILD~, BUILD+20, BUILD+26, SEND~, SEND+4 |
| DGEXTRCT | QUE+1~, QUE+3*, QUE+4, QUE+8, QUE+9, QUE+12, TEST+3~, TEST+8*, TEST+9, TEST+15 , TEST+18, TEST+20, TEST+23, COLLECT~, COLLECT+11, BUILD~, BUILD+15, BUILD+16 |
| DGMSG | BUILD+1~, BUILD+6*, BUILD+7, BUILD+16, BUILD+20, BUILD+22, BUILD+26, SEND~, SEND+10, SEND+12 |
| DGTXT | NOTIFY+1~ |
| DGTXT( | NOTIFY+7*, NOTIFY+8*, NOTIFY+9*, NOTIFY+13* |
| DGX | BUILD+1~ |
| DIR | EN+1~, EN+11! |
| DIR("?" | EN+9*, EN+10* |
| DIR("A" | EN+8* |
| DIR("B" | EN+8* |
| DIR(0 | EN+8* |
| DIRUT | EN+1~, EN+12 |
| IX | COLLECT+2~, COLLECT+4*, COLLECT+5*, COLLECT+6 |
| LINE | TEST+3~, TEST+14*, TEST+15, TEST+16, COLLECT+2~, COLLECT+4*, COLLECT+11, COLLECT+12*, COLLECT+13, BUILD+1~ , BUILD+14*, BUILD+16, BUILD+17*, BUILD+18, BUILD+19, BUILD+23*, BUILD+25 |
| MAX | BUILD~, BUILD+3*, BUILD+4*, BUILD+10, BUILD+11, BUILD+18 |
| MODE | TEST~, TEST+5*, TEST+13 |
| MSG | SEND+1~, SEND+12* |
| U | QUE+6, TEST+11, COLLECT+8, COLLECT+9, COLLECT+10, SEND+10 |
| >> X | NOTIFY+11*, NOTIFY+12*, NOTIFY+13 |
| XMDUZ | SEND+1~, SEND+3*, NOTIFY+1~, NOTIFY+3* |
| XMERR | SEND+1~, NOTIFY+1~ |
| XMSUB | SEND+1~, SEND+9*, NOTIFY+1~, NOTIFY+5* |
| XMTEXT | SEND+1~, SEND+11*, NOTIFY+1~, NOTIFY+14* |
| XMY | SEND+1~, NOTIFY+1~ |
| XMY( | SEND+7* |
| XMY("G.IVMB H | EC VSE NOTIFICATION" , SEND+8*, NOTIFY+4* |
| XMY("S.IVMB V | SE SERVER@IVM.DOMAIN.EXT" , SEND+4*, SE SERVER@PDQMGR.IVM.DOMAIN.EXT" , SEND+5* |
| XMZ | SEND+1~, NOTIFY+1~ |
| >> Y | EN+13 |
| ZTDESC | EN+1~, EN+17* |
| ZTDTH | EN+1~, EN+19* |
| ZTIO | EN+1~, EN+18* |
| ZTRTN | EN+1~, EN+16* |
| ZTSAVE | EN+1~ |
| ZTSAVE("DGDEST" | EN+15* |
| ZTSK | EN+1~, EN+22 |
| ZVALUE | COLLECT+2~, COLLECT+6*, COLLECT+8, COLLECT+9, COLLECT+10*, COLLECT+11 |
| Name | Field # of Occurrence |
|---|---|
| $T(GETICN^MPIF001 | COLLECT+7 |
