HLCSIN ;ALB/JRP - INCOMING FILER;01-MAY-95 ;03/07/2011
Source file <HLCSIN.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 11 | MONITOR^HLCSDR2 NOTIFY^HLCSIN $$DEQUEUE^HLCSQUE DELETE^HLCSQUE1 DEQUE^HLCSREP LLCNT^HLCSTCP HLDUZ2^HLCSTCP4 ($$CRTFLR,DELFLR,SETFLRDH)^HLCSUTL1 CHK4STOP^HLCSUTL2 RECEIVE^HLMA0 DEFACK^HLTP3 |
| Kernel | 4 | APPERROR^%ZTER $$PSET^%ZTLOAD ($$HDIFF,$$HTE)^XLFDT KILL^XUSCLEAN |
| MailMan | 1 | SENDMSG^XMXAPI |
| Registration | 1 | $$SITE^VASITE |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
|---|---|---|
| STARTIN | ;Main entry point for incoming background filer
|
|
| DEFACK(HLPTRFLR,HLFLG,HLEXIT) | ; Process TCP links with a deferred response
|
|
| CHECKAC(WAY,IEN870,IEN773) | ; If AC xref shouldn't exist, kill it...
|
|
| ACKNOW(HLPTRFLR,HLFLG,HLEXIT) | ; Process Logical Link's IN-queue for received message
|
|
| DELQUE(HLPTRFLR,HLEXIT) | ; Delete messages outside the 'queue size' window.
|
|
| CHKUPD(HLPTRFLR,HLEXIT) | ;
|
|
| NOTIFY() | ;
; If the Incoming Filer is started by POSTMASTER, send a notification message to the mail group defined in field 21 of file 869.3, HL COMMUNICATION SERVER PARAMETER file. ; If no mail group is defined, or mail group has been deleted, then do not attempt to send the notification. ; Returns the MailMan message number of the notification message that was sent, or 0 if no message was sent, or -1 if an unexpected error occurred. |
|
| ERR | ;
|
| Name | Field # of Occurrence |
|---|---|
| APPERROR^%ZTER | ERR+1 |
| $$PSET^%ZTLOAD | STARTIN+17 |
| $$GET1^DIQ | NOTIFY+9 |
| MONITOR^HLCSDR2 | ACKNOW+33, ACKNOW+35 |
| NOTIFY^HLCSIN | STARTIN+12 |
| $$DEQUEUE^HLCSQUE | ACKNOW+10 |
| DELETE^HLCSQUE1 | DELQUE+10 |
| DEQUE^HLCSREP | DEFACK+35, CHECKAC+4 |
| LLCNT^HLCSTCP | DEFACK+39 |
| HLDUZ2^HLCSTCP4 | DEFACK+26, ACKNOW+25 |
| $$CRTFLR^HLCSUTL1 | STARTIN+19 |
| DELFLR^HLCSUTL1 | STARTIN+39 |
| SETFLRDH^HLCSUTL1 | CHKUPD+2 |
| CHK4STOP^HLCSUTL2 | CHKUPD+4 |
| RECEIVE^HLMA0 | ACKNOW+34 |
| DEFACK^HLTP3 | DEFACK+34 |
| $$SITE^VASITE | NOTIFY+13 |
| $$HDIFF^XLFDT | STARTIN+31, DEFACK+20, CHKUPD+1 |
| $$HTE^XLFDT | NOTIFY+17 |
| SENDMSG^XMXAPI | NOTIFY+21 |
| KILL^XUSCLEAN | ACKNOW+20 |
| FileNo | Call Tags |
|---|---|
| ^HLCS(869.3 - [#869.3] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HLCS(870 - [#870] | DEFACK+5, ACKNOW+3, ACKNOW+5, ACKNOW+9, ACKNOW+32, ACKNOW+37, ACKNOW+39, ACKNOW+41!, ACKNOW+42, DELQUE+3 , DELQUE+7 |
| ^HLMA - [#773] | DEFACK+32, DEFACK+33, DEFACK+36, CHECKAC+3 |
| ^HLMA("AC" | DEFACK+3, DEFACK+21 |
| ^HLMA("IN-FILER" | DEFACK+12, DEFACK+20, DEFACK+46 |
| ^XTMP("HL7-AC" | DEFACK+20, DEFACK+42* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BODY | NOTIFY+4~, NOTIFY+15*, NOTIFY+21 |
| DUZ | STARTIN+9, NOTIFY+4~, NOTIFY+19*, NOTIFY+21 |
| HLD0 | DEFACK+1~, DEFACK+13*, DEFACK+21*, DEFACK+32, DEFACK+33, DEFACK+34, DEFACK+35, DEFACK+36, ACKNOW+1~, ACKNOW+10* , ACKNOW+19~, ACKNOW+30, ACKNOW+31*, ACKNOW+32, ACKNOW+33, ACKNOW+34, ACKNOW+35, ACKNOW+37 |
| HLD1 | ACKNOW+1~, ACKNOW+19~, ACKNOW+30*, ACKNOW+32, ACKNOW+33, ACKNOW+34, ACKNOW+35, ACKNOW+38*, ACKNOW+39*, ACKNOW+41 |
| HLDIR | DELQUE+1~, DELQUE+2*, DELQUE+10 |
| HLDUZ | STARTIN+8~, STARTIN+9*, STARTIN+11, DEFACK+28~, ACKNOW+17~, ACKNOW+27~ |
| HLEXIT | STARTIN+4~, STARTIN+21*, STARTIN+26, STARTIN+28, STARTIN+29, STARTIN+33, STARTIN+37, DEFACK~, DEFACK+3, DEFACK+6 , DEFACK+21, DEFACK+30, ACKNOW~, ACKNOW+3, ACKNOW+6, ACKNOW+10, ACKNOW+16~, DELQUE~, DELQUE+3, DELQUE+4 , CHKUPD~, CHKUPD+4 |
| HLFLG | STARTIN+4~, STARTIN+27*, STARTIN+28, STARTIN+29, STARTIN+30, DEFACK~, DEFACK+13*, ACKNOW~, ACKNOW+16~, ACKNOW+29* |
| HLFRONT | DELQUE+1~, DELQUE+7*, DELQUE+10 |
| HLPCT | DEFACK+1~, DEFACK+16*, DEFACK+29*, DEFACK+30 |
| HLPERS | STARTIN+15~, STARTIN+17* |
| HLPTRFLR | STARTIN+4~, STARTIN+19*, STARTIN+28, STARTIN+29, STARTIN+33, STARTIN+37, STARTIN+39, DEFACK~, DEFACK+6, DEFACK+30 , ACKNOW~, ACKNOW+6, ACKNOW+10, ACKNOW+16~, DELQUE~, DELQUE+4, CHKUPD~, CHKUPD+2, CHKUPD+4 |
| HLPTRFLR("$J" | STARTIN+25* |
| HLPTRFLR("LASTDEL" | STARTIN+31, STARTIN+32* |
| HLPTRFLR("LASTUP" | CHKUPD+1, CHKUPD+3* |
| HLXX | DEFACK+1~, DEFACK+2*, DEFACK+3*, DEFACK+5, DEFACK+12, DEFACK+20, DEFACK+21, DEFACK+33, DEFACK+34, DEFACK+35 , DEFACK+39, DEFACK+42, DEFACK+46, ACKNOW+1~, ACKNOW+2*, ACKNOW+3*, ACKNOW+5, ACKNOW+9, ACKNOW+10, ACKNOW+19~ , ACKNOW+37, ACKNOW+39, ACKNOW+41, ACKNOW+42, DELQUE+1~, DELQUE+2*, DELQUE+3*, DELQUE+7, DELQUE+10 |
| IEN773 | CHECKAC~, CHECKAC+3, CHECKAC+4 |
| IEN870 | CHECKAC~, CHECKAC+4 |
| MAILGROUP | NOTIFY+4~, NOTIFY+9*, NOTIFY+10, NOTIFY+11*, NOTIFY+21 |
| MSG | NOTIFY+4~ |
| MSG(1 | NOTIFY+16* |
| MSG(2 | NOTIFY+17* |
| MSG(3 | NOTIFY+18* |
| SITE | NOTIFY+4~, NOTIFY+13*, NOTIFY+18 |
| SUBJECT | NOTIFY+4~, NOTIFY+14*, NOTIFY+21 |
| U | CHECKAC+3, ACKNOW+41, NOTIFY+18 |
| WAY | CHECKAC~, CHECKAC+4 |
| XMZ | NOTIFY+4~, NOTIFY+21, NOTIFY+22 |
| >> ZTQUEUED | STARTIN+16, STARTIN+17 |
| >> ZTREQ | STARTIN+40* |
| >> ZTSK | STARTIN+19 |
| >> ZTSTOP | STARTIN+38* |
