SROQT ;BIR/ADM - QTRLY RPT MESSAGE TO SERVER ;07/18/07
Source file <SROQT.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| Q1 | ; transmit report for 1st quarter | |
| DATES | ; get start and end dates | |
| Q2 | ; transmit report for 2nd quarter | |
| TSK | ||
| RES | ||
| Q3 | ; transmit report for 3rd quarter | |
| MSG | ; create mail message to server | |
| HIP | ||
| MSG1 | ||
| TSK1 | ||
| AUTO | ; automatic transmission of report | |
| IX | ||
| EN | ; entry point when queued to generate mail report only | |
| DALERT | ; delete alert | |
| COMP | ||
| SITE | ; update site parameters file | |
| CURRENT | ; get current reporting quarter | |
| NIGHT | ; determine if current quarterly report has been transmitted | |
| VAR | ; set report variables for non-interactive calls | |
| SP | ||
| QUE | ; queue creation of report to central database | |
| PROC | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SRO(133 - [#133] | EN+2, SITE+2, NIGHT+1 | 
| ^TMP( | EN+8! | 
| ^TMP("SRATT" | SROQT+7!, RES+1*, RES+4*, RES+5, RES+6, RES+7, HIP+4 | 
| ^TMP("SRPROC" | PROC | 
| ^TMP("SRQTR" | SROQT+7!, SROQT+12*, SP+1*, SP+3*, SP+5*, IX+2*, COMP+1*, RES+8*, HIP+3*, HIP+5* , MSG+5! | 
| ^TMP("SRSS" | SP, SP+2, SP+4 | 
| ^XMB("NETNAME" | SROQT+6 | 
| Name | Line Occurrences | 
|---|---|
| AUTO | NIGHT+3 | 
| CURRENT | NIGHT+1, VAR+1 | 
| DATES | VAR+1 | 
| PROC | IX, IX+1, HIP | 
| Q1 | EN+10 | 
| Q2 | EN+11 | 
| Q3 | EN+12 | 
| SITE | MSG1+4 | 
| SROQT | EN+4, EN+7 | 
| TSK | QUE+2, AUTO+1 | 
| TSK1 | Q1+2, Q2+2, Q3+2 | 
| VAR | AUTO+1 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | SITE+2* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | AUTO+1, Q1+1, Q2+1, Q3+1 | 
| %DT | QUE+1!* | 
| %DT("A" | QUE+1* | 
| %DT("B" | QUE+1* | 
| %DT(0 | QUE+1* | 
| DT | SROQT+9, CURRENT+1 | 
| DUZ | MSG+1 | 
| I | SROQT+9*, COMP*, RES*, RES+3*, HIP+2*, MSG+5~, MSG1+3~, EN+8* | 
| >> ISC | SROQT+6*, MSG+3, MSG+4 | 
| >> J | IX*, IX+1*, HIP*, PROC | 
| >> K | RES+2*, RES+3, RES+4 | 
| >> SR60 | SROQT+9 | 
| >> SRADMT | SROQT+10 | 
| >> SRALERT | NIGHT+2*, NIGHT+3 | 
| >> SRASA( | SROQT+9 | 
| >> SRATT( | RES, RES+3 | 
| >> SRC( | COMP | 
| >> SRCASES | SROQT+9 | 
| >> SRCOMP | SROQT+9 | 
| >> SRCOUNT | EN+1*, EN+2*, EN+3 | 
| >> SRD | SROQT+6*, MSG+4, MSG1 | 
| >> SRDAY | NIGHT+2, CURRENT+1*, CURRENT+2 | 
| SRDIV | SROQT+7~*, SROQT+9, SP, SP+2, SP+4, IX, COMP, RES+5, HIP, HIP+4 | 
| SRDVSN | EN+1~* | 
| SRDVSN( | EN+2*, EN+5, EN+6 | 
| >> SRE | SITE+2*, NIGHT+1* | 
| >> SREMERG | SROQT+9 | 
| >> SREMO | DATES+1* | 
| >> SREND | DATES+1*, Q1+2*, Q2+2*, Q3+2* | 
| >> SRFLG | VAR+1*, Q1+1*, Q2+1*, Q3+1* | 
| >> SRFQ | SROQT+8*, SROQT+9, MSG1+1, NIGHT+1* | 
| >> SRFYR | SROQT+8* | 
| >> SRHAIR( | HIP+2 | 
| >> SRICNE | HIP+1 | 
| >> SRICNO | HIP+1 | 
| >> SRICNR | HIP+1 | 
| >> SRICY | HIP+1 | 
| SRIEN | SROQT+7, SROQT+11, MSG+6, EN+1~*, EN+5*, EN+6 | 
| >> SRIN | RES+6 | 
| >> SRINPAT | SROQT+9 | 
| >> SRINST | SROQT+11, EN+6* | 
| SRINSTP | EN+1!, EN+6* | 
| >> SRINV("I" | SROQT+10 | 
| >> SRINV("O" | SROQT+10 | 
| >> SRLATE | SITE+1*, SITE+2, DALERT+1 | 
| >> SRMAJOR | SROQT+9 | 
| >> SRMORT | SROQT+9 | 
| >> SRMSG(1 | MSG1+1* | 
| >> SRMSG(2 | MSG1+2* | 
| SRMULT | EN+1~*, EN+3*, EN+4 | 
| >> SRNODE | SROQT+9*, SROQT+10*, SROQT+11*, SROQT+12, SP*, SP+1, SP+2*, SP+3, SP+4*, SP+5 , IX*, IX+1*, IX+2, COMP*, COMP+1, RES+5*, RES+6*, RES+7*, RES+8, HIP* , HIP+1*, HIP+2*, HIP+3, HIP+4*, HIP+5, PROC* | 
| >> SRNOW | Q1+1*, Q2+1*, Q3+1*, TSK1 | 
| >> SROPD | SROQT+10 | 
| >> SRQTR | SROQT+8*, EN+10, EN+11, EN+12, NIGHT+1, CURRENT+1*, CURRENT+2, DATES+1 | 
| >> SRSCNE | HIP+1 | 
| >> SRSCNO | HIP+1 | 
| >> SRSCNR | HIP+1 | 
| >> SRSCY | HIP+1 | 
| >> SRSMO | SROQT+8*, DATES+1* | 
| >> SRSOUT | QUE+1*, AUTO+1* | 
| >> SRSS | SP*, SP+2*, SP+4* | 
| >> SRSTART | SROQT+8, SITE+1, DATES+1*, Q1+2*, Q2+2*, Q3+2* | 
| >> SRSTATN | SROQT+11, EN+6* | 
| >> SRT | AUTO+1*, Q1+1*, Q2+1*, Q3+1* | 
| >> SRTONE | HIP+1 | 
| >> SRTONO | HIP+1 | 
| >> SRTOV | HIP+1 | 
| >> SRWC | RES+5 | 
| >> SRYR | SITE+1, NIGHT+1*, CURRENT+1*, CURRENT+2*, DATES+1, Q1+2*, Q2+2*, Q3+2* | 
| >> X | RES*, RES+1, RES+2*, RES+3*, RES+4, MSG+1*, PROC*, EN+1*, EN+2*, SITE+1* | 
| >> XMDUZ | MSG+1* | 
| >> XMSUB | MSG+2*, MSG1* | 
| XMTEXT | MSG+5*!, MSG1+3*! | 
| XMY | MSG+3!, MSG+5!, MSG1+3! | 
| XMY("G.SR-QUARTERLY@" | MSG+4*, MSG1* | 
| XMY("G.SRCOSERV@FO-HINES.MED.VA.GOV" | MSG+3* | 
| XMY("S.SRCOSERV@FO-HINES.MED.VA.GOV" | MSG+3* | 
| >> XQAID | DALERT+1* | 
| >> XQAKILL | DALERT+1* | 
| >> Y | QUE+1, TSK, SITE+1*, AUTO+1* | 
| >> ZTDESC | TSK*, TSK1* | 
| >> ZTDTH | TSK*, TSK1* | 
| >> ZTIO | TSK*, TSK1* | 
| >> ZTREQ | EN+9* | 
| >> ZTRTN | TSK*, TSK1* | 
| >> ZTSAVE("SREND" | TSK*, TSK1* | 
| >> ZTSAVE("SRFLG" | TSK*, TSK1* | 
| >> ZTSAVE("SRSTART" | TSK*, TSK1* | 
| >> ZTSAVE("SRT" | TSK*, TSK1* |