HLCSTCP ;SFIRMFO/TNV-ALB/JFP,PKE - (TCP/IP) MLLP ;08/08/2011 14:29
Source file <HLCSTCP.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SERVER(HLDP) | ; single server using Taskman
 | 
|
| SERVERS(HLDP) | ; Multi-threaded server using Taskman
 | 
|
| MSM | ;MSM entry point, called from User-Defined Services
 | 
|
| LISTEN | ;
 | 
|
| DCOPEN(HLDP) | ;open direct connect - called from HLMA2
 | 
|
| INIT() | ; Initialize Variables
 ; HLDP should be set to the IEN or name of Logical Link, file 870 ; patch HL*1.6*157 ; S HLOS=$P($G(^%ZOSF("OS")),"^")  | 
|
| ST1 | ;record startup in 870 for single server
 | 
|
| MON(Y) | ;Display current state & check for shutdown
 | 
|
| UPDT(Y) | ;update job count for multiple servers,X=1 increment
 | 
|
| STOP() | ;stop flag set
 | 
|
| LLCNT(DP,Y,Z) | ;update Logical Link counters
 | 
|
| SDFLD | ; set Shutdown? field to yes
 | 
|
| EXITS(Y) | ; shutdown and clean up the listener process for either
 ; single-threaded or multi-threaded  | 
|
| EXITM | ;Multiple service shutdown and clean up
 ; shutdown and clean up a connection spawned by the listener ; process for a multi-threaded listener  | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^HLCS(870 - [#870] | GETS^DIQ |