HLCSTCP ;SFIRMFO/TNV-ALB/JFP,PKE - (TCP/IP) MLLP ;09/13/2006
Source file <HLCSTCP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;vms ucx entry point, called from HLSEVEN.COM file,
|
|
| EXITM | ;Multiple service shutdown and clean up
|
|
| SDFLD | ; set Shutdown? field to yes
|
|
| UPDT(Y) | ;update job count for multiple servers,X=1 increment
|
|
| CACHEVMS(%) | ;Cache'/VMS tcpip/ucx entry point, called from HLSEVEN.COM file,
|
|
| EXITS(Y) | ; Single service shutdown and cleans up
|
|
| INIT() | ; Initialize Variables
; HLDP should be set to the IEN or name of Logical Link, file 870 |
|
| MSM | ;MSM entry point, called from User-Defined Services
|
|
| SERVER(HLDP) | ; single server using Taskman
|
|
| ST1 | ;record startup in 870 for single server
|
|
| DCOPEN(HLDP) | ;open direct connect - called from HLMA2
|
|
| LLCNT(DP,Y,Z) | ;update Logical Link counters
|
|
| MON(Y) | ;Display current state & check for shutdown
|
|
| STOP() | ;stop flag set
|
|
| SERVERS(HLDP) | ; Multi-threaded server using Taskman
|
|
| LISTEN | ;
|
| Name | Field # of Occurrence |
|---|---|
| CLOSE^%ZISTCP | SERVER+4 |
| LISTEN^%ZISTCP | HLCSTCP+27 |
| LISTEN^%ZISTCPS | HLCSTCP+33 |
| SETNM^%ZOSV | HLCSTCP+14, HLCSTCP+22, LISTEN+4 |
| ^%ZTER | CACHEVMS+2, EN+2, LISTEN+2 |
| DT^DICRW | INIT+5 |
| GETS^DIQ | INIT+9 |
| $$PARAM^HLCS2 | INIT+41 |
| ^HLCSTCP1 | SERVER+3, LISTEN+8 |
| ^HLCSTCP2 | HLCSTCP+16 |
| $$OPEN^HLCSTCP2 | DCOPEN+3 |
| FILE^HLDIE | ST1+11, UPDT+5, SDFLD+6, EXITS+7 |
| $$NOW^XLFDT | ST1+9, EXITS+6 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^HLCS(870 - [#870] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("OS" | HLCSTCP+32, INIT+2 |
| ^HLCS(870 - [#870] | INIT+6, ST1+4, ST1+12, MON+3, MON+4*, MON+5, MON+11*, UPDT+2, UPDT+3, UPDT+6 , STOP+2, STOP+3, STOP+4, LLCNT+4, LLCNT+7, LLCNT+8, LLCNT+9, SDFLD+3, SDFLD+7, EXITS+2 , EXITS+8 |
| Name | Line Occurrences |
|---|---|
| $$INIT | HLCSTCP+10, SERVER+2, SERVERS+1, LISTEN+2, DCOPEN+1 |
| $$STOP | HLCSTCP+16, SERVER+4, MON+9 |
| EXITM | LISTEN+8 |
| EXITS | HLCSTCP+10, HLCSTCP+18, HLCSTCP+19, HLCSTCP+29, SERVER+2, SERVER+4, SERVERS+1 |
| LISTEN | SERVERS+2, MSM+4, CACHEVMS+8 |
| MON | HLCSTCP+17, HLCSTCP+27, HLCSTCP+33, SERVER+6, CACHEVMS+6, EN+6 |
| ST1 | HLCSTCP+15, HLCSTCP+27, HLCSTCP+33 |
| UPDT | LISTEN+8, EXITM+1 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LLCNT+8* |
| ^(0 | UPDT+3* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CACHEVMS~, CACHEVMS+2, CACHEVMS+3, EN+2, EN+3 |
| DA | INIT+3~, INIT+7*, INIT+9, INIT+13, INIT+14, INIT+16, INIT+18, INIT+20, INIT+22, INIT+24 , INIT+26, INIT+28, INIT+30, INIT+32, INIT+34 |
| DIQUIET | INIT+3~, INIT+4* |
| DP | LLCNT~, LLCNT+4, LLCNT+7, LLCNT+8, LLCNT+9 |
| DR | INIT+3~, INIT+8*, INIT+9 |
| HLCSFAIL | HLCSTCP+8~, HLCSTCP+24*, HLCSTCP+29, SERVER+1*, LISTEN+1~ |
| HLCSOUT | HLCSTCP+8~, HLCSTCP+16, HLCSTCP+17, HLCSTCP+18, SERVER+5, LISTEN+1~, EXITS+6 |
| HLDBACK | HLCSTCP+8~, LISTEN+1~, INIT+22*, INIT+38* |
| HLDBSIZE | HLCSTCP+8~, LISTEN+1~, INIT+18*, INIT+39* |
| HLDP | HLCSTCP+7, HLCSTCP+14, HLCSTCP+22, HLCSTCP+27, HLCSTCP+33, SERVER~, SERVERS~, CACHEVMS+3*, EN+3*, LISTEN+4 , DCOPEN~, INIT+6*, INIT+7, ST1+4, ST1+5, ST1+12, MON+3, MON+4, MON+5, MON+11 , UPDT+2, UPDT+3, UPDT+5, UPDT+6, STOP+2, STOP+3, STOP+4, SDFLD+1, SDFLD+3, SDFLD+5 , SDFLD+7, EXITS+2, EXITS+4, EXITS+8 |
| HLDREAD | HLCSTCP+8~, LISTEN+1~, INIT+20*, INIT+37* |
| HLDRETR | HLCSTCP+8~, LISTEN+1~, INIT+13*, INIT+40* |
| HLDRETR("CLOSE" | INIT+14* |
| HLDWAIT | HLCSTCP+8~, LISTEN+1~, INIT+24* |
| HLJ | ST1+3~, UPDT+1~, SDFLD+2~, EXITS+1~ |
| HLJ(870 | UPDT+5*, SDFLD+5* |
| HLLSTN | LISTEN+1~, LISTEN+6*, MON+2 |
| HLOS | HLCSTCP+8~, LISTEN+1~, INIT+2* |
| HLRETRA | HLCSTCP+8~, LISTEN+1~, INIT+16* |
| HLTCPADD | HLCSTCP+8~, LISTEN+1~, DCOPEN+2, INIT+26* |
| HLTCPCS | HLCSTCP+8~, HLCSTCP+12, HLCSTCP+26, HLCSTCP+32, LISTEN+1~, INIT+30*, ST1+7, ST1+8 |
| HLTCPLNK | HLCSTCP+8~, LISTEN+1~, INIT+32*, ST1+7 |
| HLTCPORT | HLCSTCP+8~, HLCSTCP+27, HLCSTCP+33, LISTEN+1~, DCOPEN+2, INIT+28* |
| HLTCPRET | HLCSTCP+8~, LISTEN+1~, INIT+34*, INIT+41* |
| >> HLTRACE | MON+6 |
| IO | MSM+3*, CACHEVMS+3*, CACHEVMS+6, CACHEVMS+8, EN+3*, EN+6, MON+12 |
| IO("C" | SERVER+4* |
| IO(0 | MSM+3*, CACHEVMS+4*, EN+4*, MON+7 |
| P | LLCNT+5~, LLCNT+6*, LLCNT+7, LLCNT+8, LLCNT+9 |
| TMP | INIT+3~ |
| TMP("DIERR" | INIT+11 |
| TMP(870 | INIT+13, INIT+14, INIT+16, INIT+18, INIT+20, INIT+22, INIT+24, INIT+26, INIT+28, INIT+30 , INIT+32, INIT+34 |
| U | EN+3*, INIT+41, MON+4, MON+11, UPDT+3, STOP+3 |
| X | INIT+3~, INIT+41*, ST1+3~, ST1+5*, ST1+6*, ST1+7, ST1+8, ST1+9, ST1+10, MON+7~ , MON+10*, MON+11, UPDT+1~, UPDT+3*, UPDT+5, STOP+1~, STOP+3*, STOP+5, LLCNT+5~, LLCNT+8* , SDFLD+2~, EXITS+1~, EXITS+4*, EXITS+5, EXITS+6 |
| Y | INIT+3~, MON~, MON+4, MON+8, UPDT~, UPDT+3, LLCNT~, LLCNT+4, LLCNT+6, EXITS~ , EXITS+5 |
| Z | LLCNT~, LLCNT+8 |
| >> ZTQUEUED | EXITS+9, EXITM+2 |
| >> ZTREQ | EXITS+9*, EXITM+2* |
| >> ZTSK | ST1+10 |