HLCSTCP1 ;SFIRMFO/RSD - BI-DIRECTIONAL TCP ;07/08/2009 15:27
Source file <HLCSTCP1.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Health Level Seven | 3 | HLCSTCP HLCSTCP2 HLCSTCP4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PROCESS | ;check message and reply
|
|
READ() | ;read 1 message, returns ien in 773^ien in 772 for message
|
|
RDBLK | ;
; initialize |
|
RDBLK2 | ;data stream: <sb>dddd<cr><eb><cr>
; HL*1.6*122 end ; look for segment= <CR> |
|
SAVE(SRC,DEST) | ;save into global & set top node
|
|
DELMSG(HLMAMT) | ;delete message from Message Administration/Message Text files.
|
|
PING | ;process PING message
|
|
CLEAN | ;reset var. for next message
|
|
ERROR | ; Error trap for disconnect error and return back to the read loop.
; patch HL*1.6*122 ; move to routine HLCSTCP4 (splitted-size over 10000) |
|
CC(X) | ;cleanup and close
|
|
RESET | ;reset info as a result of no end block
|
Name | Field # of Occurrence |
---|---|
^DIK | DELMSG+3, DELMSG+5 |
$$STOP^HLCSTCP | HLCSTCP1+29 |
LLCNT^HLCSTCP | PROCESS+17, PROCESS+26, PROCESS+27 |
MON^HLCSTCP | HLCSTCP1+21, HLCSTCP1+29, READ+1, CC+1 |
CLEANVAR^HLCSTCP4 | HLCSTCP1+31 |
ERROR1^HLCSTCP4 | ERROR+3 |
HLDUZ2^HLCSTCP4 | HLCSTCP1+40 |
MIEN^HLCSTCP4 | RDBLK2+24 |
NEW^HLTP3 | PROCESS+18 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^HL(772 - [#772] | Classic Fileman Calls |
^HLMA - [#773] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("OS" | RDBLK+24 |
^HL(772 - [#772] | RDBLK2+72*, SAVE+7, SAVE+13 |
^HLMA - [#773] | SAVE+5, SAVE+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | RESET+1~, RESET+3* |
DA | DELMSG+1~, DELMSG+2*, DELMSG+4* |
DEST | SAVE~, SAVE+4, SAVE+9, SAVE+10, SAVE+12 |
DIK | DELMSG+1~, DELMSG+2*, DELMSG+4* |
DT | SAVE+10 |
DUZ | HLCSTCP1+19 |
HLACKWT | READ+2~, READ+9*, READ+12 |
HLASTMSG | HLCSTCP1+8~, HLCSTCP1+23* |
HLBUFF | READ+10~, RDBLK+2*, RDBLK+14*, RDBLK+16, RDBLK+17, RDBLK+19*, RDBLK+22, RDBLK+30, RDBLK+41, RDBLK+56 , RDBLK+58, RDBLK+59*, RDBLK+71, RDBLK+77, RDBLK+78* |
HLBUFF("END" | READ+19*, READ+24*, RDBLK+22* |
HLBUFF("HLIND1" | RDBLK2+44* |
HLBUFF("START" | READ+18*, READ+22*, RDBLK+17, RDBLK+20* |
HLDB | READ+2~, RDBLK+57*, RDBLK+58, RDBLK+59 |
HLDB(1 | RDBLK+6*, RDBLK+14 |
HLDB(2 | RDBLK+47*, RDBLK+50, RDBLK+51 |
>> HLDBACK | READ+9 |
>> HLDBSIZE | RDBLK+14, RDBLK+47, RDBLK+57, RDBLK+65, RDBLK2+51 |
HLDEND | READ+2~, READ+4*, READ+23, RDBLK+22, RDBLK+65, RDBLK2+28, RDBLK2+34, RDBLK2+36, RDBLK2+51, RDBLK2+69 , PING+6 |
>> HLDP | PROCESS+3, PROCESS+17, PROCESS+27 |
>> HLDP("HLLINK" | PROCESS+12*, PROCESS+26 |
>> HLDP("SETINQUE" | PROCESS+13*, PROCESS+24 |
>> HLDREAD | READ+12 |
HLDSTRT | READ+2~, READ+4*, READ+21, RDBLK+17, RDBLK+19, RDBLK2+7, RDBLK2+9, RDBLK2+10, RDBLK2+11, RDBLK2+12 , RDBLK2+51, RDBLK2+54, RDBLK2+56, RDBLK2+60 |
HLDT | READ+2~ |
HLDUZ | HLCSTCP1+18~, HLCSTCP1+19*, HLCSTCP1+42~ |
HLHDR | READ+2~, READ+9*, RDBLK+31, RDBLK2+7, RDBLK2+17, RDBLK2+26*, RDBLK2+60*, RDBLK2+62 |
HLIND1 | READ+2~, READ+9*, READ+33*, READ+34, RDBLK+31, RDBLK2+32, RDBLK2+40, RDBLK2+43*, RDBLK2+44, RDBLK2+66 , RDBLK2+69, RDBLK2+72, SAVE+5, SAVE+7, SAVE+12, SAVE+13 |
HLINE | READ+2~, READ+9*, RDBLK2+5*, RDBLK2+7, RDBLK2+9, RDBLK2+10, RDBLK2+11, RDBLK2+12, RDBLK2+13, RDBLK2+26* , RDBLK2+28, RDBLK2+34, RDBLK2+35*, RDBLK2+36, RDBLK2+48*, RDBLK2+52*, RDBLK2+60*, RDBLK2+62, RDBLK2+71, SAVE+10 , CLEAN+2*, RESET+2, RESET+3, RESET+4* |
HLMAMT | DELMSG~, DELMSG+2, DELMSG+4 |
HLMIEN | HLCSTCP1+8~, HLCSTCP1+23*, HLCSTCP1+29, HLCSTCP1+34*, HLCSTCP1+35, PROCESS+3, PROCESS+18 |
HLMSG | READ+2~, RDBLK2+25!, RDBLK2+40, RDBLK2+72, RDBLK2+74!, CLEAN+1! |
HLMSG( | RDBLK2+5*, RDBLK2+7, RDBLK2+9, RDBLK2+10, RDBLK2+11*, RDBLK2+12*, RDBLK2+28, RDBLK2+34, RDBLK2+35!, RDBLK2+36* , RDBLK2+48*, RDBLK2+52*, RDBLK2+60*, RESET+2, RESET+3! |
HLMSG(0 | RDBLK2+71 |
HLMSG(1 | RDBLK2+17, RDBLK2+18*, RDBLK2+22, PING+1, RESET+2* |
HLMSG(2 | RDBLK2+17, RDBLK2+18, RDBLK2+19* |
HLRDOUT | READ+2~, READ+9*, READ+25, RDBLK+41, RDBLK2+3, RDBLK2+49, CLEAN+2* |
HLRS | READ+2~, READ+4*, RDBLK+65, RDBLK2+3, RDBLK2+5, RDBLK2+51 |
HLRS("START-FLAG" | READ+13*, RDBLK2+8*, RDBLK2+66 |
HLTCP | PROCESS+2~, PROCESS+3* |
HLTCPI | PROCESS+2~, PROCESS+3* |
>> HLTCPLNK("IOF" | PING+6 |
HLTCPO | PROCESS+2~, PROCESS+3* |
>> HLTCPORT("IO" | HLCSTCP1+11*, HLCSTCP1+33 |
HLTMBUF | HLCSTCP1+14~ |
HLTMBUF(0 | READ+9, READ+14*, READ+31* |
HLTMBUF(1 | READ+16, READ+17*, READ+32* |
HLX | READ+2~, READ+9*, READ+20, READ+21, READ+23, READ+31, RDBLK+6, RDBLK+30, RDBLK+47, RDBLK+52* , RDBLK+57, RDBLK+60*, RDBLK+62, RDBLK+65, RDBLK2+3, RDBLK2+5*, RDBLK2+51, RDBLK2+52*, RDBLK2+54, RDBLK2+56* , RDBLK2+60*, RDBLK2+69 |
HLX(1 | READ+16*, READ+20, READ+21, READ+23, READ+32, RDBLK+6, RDBLK+30, RDBLK+41, RDBLK+44, RDBLK+50 , RDBLK+51*, RDBLK+56, RDBLK+77* |
HLX(2 | RDBLK+50*, RDBLK+52 |
HLXX | READ+10~, RDBLK+58*, RDBLK+60 |
IO | HLCSTCP1+11, HLCSTCP1+33*, READ+28, RDBLK+13, PING+6, PING+8 |
IO(0 | READ+28, PING+8 |
MAXWAIT | READ+10~, READ+12*, RDBLK+14 |
SRC | SAVE~, SAVE+9 |
U | READ+33, RDBLK2+40, RDBLK2+43, RDBLK2+72, SAVE+7, SAVE+13, DELMSG+4 |
X | READ+2~, RDBLK2+10*, RDBLK2+11, RDBLK2+56*, PING+1*, PING+6, CC~, CC+1 |