DG53293B ;AR/BP - ALS EXTRACT; ; 7/25/00 10:38am
Source file <DG53293B.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| INITMAIL(FLAG) | ;-- This function will initialize mail variables | |
| LINECALC(DGFIELD,DGLINE) | ; ; return length that would be set | |
| FMAIL(DATA) | ;- This function will generate a summary mail message. | |
| SETMAIL(DGTATION,DGDFN) | ; | |
| SMAIL(DGLINE) | ;-- Send Mail Message containing records so far | |
| SETLINE | ;set mailmsg from xtmp array ; $g will preserve piece position if field returned error | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | SETMAIL+7 | 
| ^XMB(3.9 - [#3.9] | SETMAIL+7*, SETMAIL+15*, SETMAIL+22*, SETMAIL+25*, LINECALC+2, SETLINE+2*, SMAIL+4*, FMAIL+7*, FMAIL+8*, FMAIL+9* , FMAIL+10*, FMAIL+11*, FMAIL+15*, FMAIL+21*, FMAIL+24*, FMAIL+26*, FMAIL+30* | 
| ^XTMP("DGALS" | SETMAIL+11, LINECALC+2, SETLINE+2, FMAIL+18 | 
| Name | Line Occurrences | 
|---|---|
| $$LINECALC | SETMAIL+13 | 
| INITMAIL | SETMAIL+1 | 
| SETLINE | SETMAIL+18 | 
| SMAIL | FMAIL+16, FMAIL+22, FMAIL+34 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DATA | FMAIL~, FMAIL+4, FMAIL+14 | 
| DGDFN | SETMAIL~, SETMAIL+7, SETMAIL+11, LINECALC+2, SETLINE+2 | 
| DGFIELD | SETMAIL+10*, SETMAIL+11*, SETMAIL+13, LINECALC~, LINECALC+2, SETLINE+2 | 
| DGLINE | SETMAIL+1, SETMAIL+3*, SETMAIL+7, SETMAIL+8*, SETMAIL+13, SETMAIL+15, SETMAIL+16*, SETMAIL+22, SETMAIL+23*, SETMAIL+25 , LINECALC~, LINECALC+2, SETLINE+2, SMAIL~, SMAIL+4, FMAIL+13*, FMAIL+15, FMAIL+16, FMAIL+21, FMAIL+22 , FMAIL+24, FMAIL+25*, FMAIL+26, FMAIL+29*, FMAIL+30, FMAIL+33, FMAIL+34 | 
| >> DGPECE | SETMAIL+4*, SETMAIL+15, SETMAIL+17*, SETMAIL+19*, SETMAIL+22, SETLINE+2 | 
| >> DGSTART | FMAIL+9 | 
| DGTATION | SETMAIL~, SETMAIL+7 | 
| >> DGZ | FMAIL+18*, FMAIL+19, FMAIL+26, FMAIL+28*, FMAIL+30, FMAIL+33* | 
| DT | SMAIL+4 | 
| DUZ | INITMAIL+3, FMAIL+3 | 
| FLAG | INITMAIL~, INITMAIL+4 | 
| U | SMAIL+4 | 
| >> XMDUZ | INITMAIL+3*, FMAIL+3* | 
| >> XMSUB | INITMAIL+2*, FMAIL+2* | 
| >> XMY( | INITMAIL+3*, FMAIL+3* | 
| >> XMY("S.DG ALS | SERVER@MNTVBB.ISC-ALBANY.VA.GOV" , INITMAIL+5* | 
| >> XMY("YORTY.M_ROBERT@FORUM.VA.GOV" | INITMAIL+6*, FMAIL+4* | 
| >> XMZ | SETMAIL+7, SETMAIL+15, SETMAIL+22, SETMAIL+25, LINECALC+2, SETLINE+2, SMAIL+4, FMAIL+7, FMAIL+8, FMAIL+9 , FMAIL+10, FMAIL+11, FMAIL+15, FMAIL+21, FMAIL+24, FMAIL+26, FMAIL+30 |