ANRVAM1 ;MUSK/GLD,MFW,HCIOFO/NDH - VIST AMIS CALC ; 11 Apr 89 / 9:20 AM
Source file <ANRVAM1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INTRO | ||
| BDATE | ||
| EDATE | ||
| ASKMAIL | ; Check to see if user wants to email this report
|
|
| DEVICE | ||
| DQ | ||
| LOOP2 | ||
| CALC | ;
|
|
| CALC2 | ||
| CALC3 | ||
| CALC4 | ||
| CALC5 | ||
| CALC6 | ||
| CALC16 | ||
| CLOSE | ; Check if user wanted to send mail to DC
; and complete report. |
|
| CLEAN | ; Clean
|
|
| BADDAT | ;
|
|
| SEND(ANQMAIL,ANQSUBJ) | ; Send mail from ^TMP("ANRV","EMAIL",$J)
; Send mail to defined recipient(s) in ANQMAIL |
|
| SENDCONF(ANQMAIL,ANQSUBJ,ANRVIMN) | ; Send Confirmation to User
|
|
| BUILD | ; Build AMIS Report to ^TMP("ANRV","EMAIL",$J) to send as email
; Build the Excel portion of the email |
|
| GETADDR() | ; Get addresses for AMIS report from VIST Site Parameters
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|