GECSSTTR ;WISC/RFJ-stacker file transmission utilities ;08 Dec 93
Source file <GECSSTTR.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | DD^%DT NOW^%DTC %XY^%RCR |
Generic Code Sheet | 1 | $$FORMTIME^GECSUFM1 |
MailMan | 1 | ^XMD |
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 |
---|---|---|
ERROR(DA,ERRORMSG) | ||
RECUSER(SEGMENT,GROUP) | ||
MAILMSG(SEGMENT,SEQUENCE,TOTAL) | ; create mail message with code sheets
; segment = entry in file 2101.2 ; sequence = sequence number ; total = total sequences ; returns xmz message number |
|
MESSAGE(DA,NODE,XMZ) | ; add message (XMZ) to node in stack file for DA
|
|
HOLDDATE(DATA) | ; return the hold date from the tt2 segment
; if hold date is not greater than today, return null |
|
CTLDATE(CTLSEG) | ; put transmission date and time on ctl segment
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4.2 - [#4.2] | RECUSER+7 |
^GECS(2100.1 - [#2100.1] | ERROR+2, ERROR+3, ERROR+5*, ERROR+6, MESSAGE+2, MESSAGE+3, MESSAGE+4, MESSAGE+5*, MESSAGE+6*, MESSAGE+7 , MESSAGE+8 |
^GECS(2101.1 - [#2101.1] | RECUSER+6, RECUSER+11 |
^GECS(2101.2 - [#2101.2] | RECUSER+5 |
Name | Line Occurrences |
---|---|
RECUSER | MAILMSG+8 |
Name | Field # of Occurrence |
---|---|
^( | RECUSER+6 |
^(0 | MESSAGE+4*, MESSAGE+7* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | RECUSER+4~, RECUSER+6*, MAILMSG+5~, MESSAGE+1~, MESSAGE+7*, CTLDATE+1~, CTLDATE+4 |
%H | CTLDATE+1~ |
%I | CTLDATE+1~ |
%X | MAILMSG+5~, MAILMSG+10* |
%Y | MAILMSG+5~, MAILMSG+10* |
CTLSEG | CTLDATE~, CTLDATE+3*, CTLDATE+5*, CTLDATE+6 |
D | RECUSER+4~, RECUSER+6*, RECUSER+7, RECUSER+8 |
DA | ERROR~, ERROR+2, ERROR+3, ERROR+5, ERROR+6, RECUSER+4~, RECUSER+5*, RECUSER+6, RECUSER+11, MESSAGE~ , MESSAGE+2, MESSAGE+3, MESSAGE+4, MESSAGE+5, MESSAGE+6, MESSAGE+7, MESSAGE+8 |
DATA | HOLDDATE~, HOLDDATE+3, HOLDDATE+5, HOLDDATE+6 |
DOMAIN | RECUSER+4~, RECUSER+7*, RECUSER+8 |
DT | HOLDDATE+9 |
DUZ | MAILMSG+12 |
ERRORMSG | ERROR~, ERROR+4*, ERROR+5 |
>> GECSFQUE | MAILMSG+12 |
GECSXMY | RECUSER+3!, MAILMSG+5~, MAILMSG+9 |
GECSXMY( | RECUSER+8* |
GECSXMY("G." | RECUSER+11* |
GROUP | RECUSER~, RECUSER+11 |
HOLDDATE | HOLDDATE+2~, HOLDDATE+3*, HOLDDATE+5*, HOLDDATE+6*, HOLDDATE+7, HOLDDATE+8*, HOLDDATE+9, HOLDDATE+10 |
NODE | MESSAGE~, MESSAGE+2, MESSAGE+3, MESSAGE+4, MESSAGE+5, MESSAGE+7, MESSAGE+8 |
SEGMENT | RECUSER~, RECUSER+5, MAILMSG~, MAILMSG+8, MAILMSG+12 |
SEQUENCE | MAILMSG~, MAILMSG+12 |
SYSID | RECUSER+4~, RECUSER+11* |
TOTAL | MAILMSG~, MAILMSG+12 |
X | CTLDATE+1~, CTLDATE+3 |
XCNP | MAILMSG+5~ |
XMDISPI | MAILMSG+5~ |
XMDUZ | MAILMSG+5~, MAILMSG+12* |
XMMG | MAILMSG+5~, MAILMSG+14 |
XMSUB | MAILMSG+5~, MAILMSG+12* |
XMTEXT | MAILMSG+5~, MAILMSG+12* |
XMY | MAILMSG+5~ |
XMZ | MAILMSG+5~, MAILMSG+14*, MAILMSG+15, MESSAGE~, MESSAGE+3, MESSAGE+5, MESSAGE+6, MESSAGE+7 |
Y | CTLDATE+1~, CTLDATE+4*, CTLDATE+5 |
>> ZTQUEUED | MAILMSG+12 |
ZTSK | MAILMSG+5~ |