HLOSITE ;ALB/CJM/OAK/PIJ-HL7 - API for getting site parameters ;03/26/2012
Source file <HLOSITE.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 2 | ($$COUNT777,$$COUNT778)^HLOSITE $$PORT^HLOTLNK |
Kernel | 1 | $$NOW^XLFDT |
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 |
---|---|---|
SYSPARMS(SYSTEM) | ;Gets system parameters from file 779.1
|
|
SYSPURGE(PURGE) | ;returns system purge parameters
|
|
GETNODE() | ;
|
|
INC(VARIABLE,AMOUNT) | ;
|
|
COUNT778() | ;
|
|
COUNT777() | ;
|
|
UPDCNTS(WORK) | ;update the record counts for file 777,778
|
|
RCNT(ST) | ;This section sets or reads the recount flag.
|
|
OLDPURGE() | ;returns the retention time in days for unsent messages
|
Name | Field # of Occurrence |
---|---|
$$COUNT777^HLOSITE | UPDCNTS+2 |
$$COUNT778^HLOSITE | UPDCNTS+5 |
$$PORT^HLOTLNK | SYSPARMS+22 |
$$NOW^XLFDT | UPDCNTS+4, UPDCNTS+7 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZIS(14.7 - [#14.7] | SYSPARMS+25, GETNODE+3 |
^%ZOSF("OS" | SYSPARMS+11, INC+8 |
^HLA - [#777] | COUNT777+4 |
^HLA(0 | UPDCNTS+3* |
^HLB - [#778] | COUNT778+4 |
^HLB(0 | UPDCNTS+6* |
^HLD(779.1 - [#779.1] | SYSPARMS+5, SYSPURGE+4, GETNODE+2, RCNT+3*, RCNT+4*, RCNT+5, OLDPURGE+2 |
^HLTMP("FILE 777 RECORD COUNT" | UPDCNTS+4* |
^HLTMP("FILE 778 RECORD COUNT" | UPDCNTS+7* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMOUNT | INC~, INC+9*, INC+10, INC+12 |
COUNT | COUNT778+2~, COUNT778+3*, COUNT778+4*, COUNT778+5, COUNT777+2~, COUNT777+3*, COUNT777+4*, COUNT777+5, UPDCNTS+1~, UPDCNTS+2* , UPDCNTS+3, UPDCNTS+4, UPDCNTS+5*, UPDCNTS+6, UPDCNTS+7 |
>> HLCSTATE("SYSTEM" | INC+5, INC+6 |
IEN | COUNT778+2~, COUNT778+3*, COUNT778+4*, COUNT777+2~, COUNT777+3*, COUNT777+4* |
LINK | SYSPARMS+4~, SYSPARMS+21*, SYSPARMS+22 |
NODE | SYSPARMS+4~, SYSPARMS+5*, SYSPARMS+6, SYSPARMS+7, SYSPARMS+8, SYSPARMS+9, SYSPARMS+13, SYSPARMS+15, SYSPARMS+17, SYSPARMS+19 , SYSPARMS+21, SYSPARMS+24, SYSPURGE+3~, SYSPURGE+4*, SYSPURGE+5, SYSPURGE+7, GETNODE+1~, GETNODE+2*, GETNODE+3 |
OS | SYSPARMS+11~*, SYSPARMS+12, INC+3~, INC+6*, INC+8*, INC+10 |
PURGE | SYSPARMS+4~, SYSPURGE~ |
PURGE("ERROR" | SYSPURGE+7*, SYSPURGE+8* |
PURGE("NORMAL" | SYSPURGE+5*, SYSPURGE+6* |
ST | RCNT~, RCNT+3, RCNT+4 |
SYSTEM | SYSPARMS~ |
SYSTEM("DOMAIN" | SYSPARMS+6* |
SYSTEM("ERROR | PURGE" , SYSPARMS+19*, SYSPARMS+20* |
SYSTEM("HL7 B | UFFER" , SYSPARMS+13*, SYSPARMS+14* |
SYSTEM("MAXSTRING" | SYSPARMS+9*, SYSPARMS+10, SYSPARMS+12* |
SYSTEM("NODE" | SYSPARMS+24*, SYSPARMS+25* |
SYSTEM("NORMA | L PURGE" , SYSPARMS+17*, SYSPARMS+18* |
SYSTEM("PORT" | SYSPARMS+22*, SYSPARMS+23* |
SYSTEM("PROCE | SSING ID" , SYSPARMS+8*, SYSPARMS+23 |
SYSTEM("STATION" | SYSPARMS+7* |
SYSTEM("USER | BUFFER" , SYSPARMS+15*, SYSPARMS+16* |
TIME | OLDPURGE+1~, OLDPURGE+2*, OLDPURGE+3 |
VARIABLE | INC~, INC+10, INC+11, INC+12, INC+13, INC+14 |
WORK | UPDCNTS~ |