HLOCLNT ;ALB/CJM- Client for sending messages - 10/4/94 1pm ;02/29/2012
Source file <HLOCLNT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GETWORK(QUE) | ;
|
|
TRY | ||
FAILING(LINK) | ;
|
|
LINKDOWN(HLCSTATE) | ;
|
|
ERROR | ;error trap
|
|
ZB3 | ;
|
|
DOWORK(QUEUE) | ;sends the messages on the queue
|
|
ZB0 | ;
|
|
ZB4 | ||
ZB5 | ;
|
|
END | ;
|
|
CNNCTD(LINK) | ;
|
|
DEQUE(UPDATE) | ;
|
|
ZB25 | ;
|
|
TRANSMIT(HLCSTATE,MSGIEN,UPDATE) | ;
|
|
ZB20 | ||
RETRY | ||
ZB21 | ||
ZB22 | ||
ZB23 |