HLUCM ;CIOFO-O/LJA - HL7/Capacity Mgt API ;09/13/04 14:01
Source file <HLUCM.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 |
---|---|---|
Capacity Management | 2 | KMPDHU02 KMPDHUA |
Health Level Seven | 2 | HLUCM003 HLUCM050 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CM(START,END,PNMSP,IEN101,TOTALS,COND,ERRINFO) | ; Capacity management totals
|
|
CMF(START,END,PNMSP,IEN101,TOTALS,COND,ERRINFO) | ; Collect Remote Facility data - SYNC
|
|
CM2(START,END,PNMSP,IEN101,TOTALS,COND,ERRINFO) | ; Capacity management totals
|
|
CM2F(START,END,PNMSP,IEN101,TOTALS,COND,ERRINFO) | ; Collect Remote Facility data - SYNC
|
|
LOOP() | ; Loop thru 772's .01... (Called from LOOP^HLUCM)
|
|
CMDBD | ; Create $$CM debug data...
; HLAPI,START,END -- req |
|
UPTOT | ; Up the totals...
; TOT,TOT(SUB) -- req |
|
PP(IEN772) | ; Get store value for NMSP and PROT...
|
|
LOAD | ; Load data (Called by $$CM, $$CM2, and all other APIs)
; START,END -- req |
|
TOTALCM | ; Loop, total for $$CM...
; HLAPI -- req |
|
COLLSYNC(IEN772,START,END) | ; Does entry fall in START/END range?
|
|
OK772(IEN772) | ; Valid entry?
|
|
COLLECT(PAR,IEN772) | ; Collect 772 data and associated 773 data...
|
|
TOT772C(IEN772) | ; Total number of characters in message...
|
|
TOT772T(IEN772) | ; Processing time...
; No totals here. Just set times in DATA() array for later use... |
|
TOT773C(IEN773) | ; Total number of characters...
; DATA() -- passed in (See COLLECT) |
|
MSGSIZE(IEN773) | ; Number characters in 773 entry...
|
|
TOT773T(IEN773) | ; Set TIMEs...
; DATA() -- passed in (See COLLECT) |
|
ERR(REA) | ; Record error...
|
|
SEC(FMDT) | ;
|
|
TMDIFF | ; DATA("TIME",...) -- req --> DATA("DIFF")
|
|
XTMP | ; Store in ^XTMP...
; API Parameters -- req |
|
EOR | ; HLUCM - HL7/Capacity Mgt API ;2/27/01 10:15
|
Name | Field # of Occurrence |
---|---|
$$PREPARE^HLUCM001 | CM+3, CM2+3 |
ADDTMP^HLUCM001 | COLLECT+18 |
$$PROTNMSP^HLUCM002 | PP+2 |
ADJTIME^HLUCM003 | LOOP+7 |
$$LOAD772S^HLUCM009 | LOAD+8 |
KILLS^HLUCM009 | CM+4, CM+7, CM2+4, CM2+7 |
$$DT^XLFDT | XTMP+6, XTMP+7 |
$$FMADD^XLFDT | XTMP+7 |
$$FMTH^XLFDT | SEC+1 |
$$NOW^XLFDT | XTMP+7, XTMP+11 |
$$SEC^XLFDT | SEC+2 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HL(772 - [#772] | LOAD+4, LOAD+6, OK772+2, TOT772C+4, TOT772C+11, TOT772C+12, TOT772T+5, TOT772T+9 |
^HLMA - [#773] | MSGSIZE+3, MSGSIZE+4, TOT773T+7 |
^TMP( | LOOP+10, XTMP+15 |
^TMP($J | CMDBD+7, CMDBD+8, CMDBD+11*, CMDBD+13, CMDBD+14*, CMDBD+19, CMDBD+24*, CMDBD+26, CMDBD+28*, CMDBD+38* , CMDBD+40, CMDBD+42*, CMDBD+44*, CMDBD+46, CMDBD+48*, CMDBD+50!, TOTALCM+4, TOTALCM+6, TOTALCM+8, COLLSYNC+2 , COLLECT+4, COLLECT+10 |
^XTMP( | XTMP+7*, XTMP+9, XTMP+10, XTMP+11*, XTMP+12*, XTMP+13!, XTMP+15* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ANS | LOOP+1~ |
API | LOOP+1~, CMDBD+4* |
CHAR | LOOP+1~, TOT773C+2~, TOT773C+3*, TOT773C+4, TOT773C+5, TOT773C+6 |
COND | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3, XTMP+9, XTMP+11, XTMP+12 |
COUNTED | LOOP+1~ |
CT | COLLECT+1~ |
CTDBG | LOOP+1~ |
CTPCKG | LOOP+1~, COLLECT+1~ |
D | OK772+1~, OK772+2*, OK772+3, OK772+4 |
D0 | LOOP+1~ |
DATA | LOOP+1~, CMDBD+2~, CMDBD+8*, CMDBD+9, CMDBD+11, CMDBD+19*, CMDBD+21, CMDBD+22*, CMDBD+23*, CMDBD+24 , CMDBD+25, CMDBD+26*, CMDBD+27*, CMDBD+28, COLLSYNC+1~, COLLSYNC+2*, COLLSYNC+3, COLLECT+1~, COLLECT+4*, COLLECT+5 , COLLECT+6, COLLECT+7, COLLECT+10*, COLLECT+11, COLLECT+12, COLLECT+13 |
DATA("CHAR" | COLLECT+5*, TOT772C+6*, TOT772C+7*, TOT772C+13*, TOT772C+14*, TOT773C+4*, TOT773C+5* |
DATA("DIFF" | COLLECT+5*, TMDIFF+1*, TMDIFF+4* |
DATA("END" | COLLECT+6*, TMDIFF+1*, TMDIFF+3*, TMDIFF+4 |
DATA("FAC" | COLLECT+7* |
DATA("HR" | COLLECT+11* |
DATA("IO" | COLLECT+11* |
DATA("LR" | COLLECT+11* |
DATA("PCKG" | COLLECT+13* |
DATA("PROT" | COLLECT+12* |
DATA("START" | COLLECT+6*, TMDIFF+1*, TMDIFF+2*, TMDIFF+4 |
DATA("TIME" | TOT772T+6*, TOT772T+10*, TOT773T+8*, TMDIFF+2, TMDIFF+3 |
DBGBL | COLLECT+1~, COLLECT+15* |
DEF | LOOP+1~ |
END | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3, CMDBD+17, LOAD+4, COLLSYNC~, COLLSYNC+3 , XTMP+9, XTMP+11, XTMP+12 |
ERR | LOOP+1~ |
ERRINFO | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3 |
ERRINFO( | ERR+3* |
FAC | LOOP+1~ |
FAIL | LOOP+1~ |
FMDT | SEC~, SEC+1*, SEC+2 |
HL | LOOP+1~ |
HLAPI | CM+2~*, CM+8!, CMF+1~, CMF+2*, CM2+2~*, CM2+8!, CM2F+1~, CM2F+2*, TOTALCM+11, XTMP+12 |
HLASTNM | LOOP+1~ |
HLUCMADD | LOOP+2~, TOTALCM+7*, TOTALCM+11* |
>> I | CMDBD+25* |
IEN101 | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3, XTMP+4 |
IEN772 | LOOP+2~, CMDBD+2~, CMDBD+12*, CMDBD+13*, CMDBD+14, CMDBD+15, CMDBD+17, CMDBD+19, CMDBD+24, CMDBD+26 , CMDBD+28, PP~, PP+2, LOAD+2~, LOAD+5*, LOAD+6*, LOAD+7, LOAD+8, TOTALCM+2~, TOTALCM+7* , TOTALCM+8*, TOTALCM+10, COLLSYNC~, COLLSYNC+2, OK772~, OK772+2, COLLECT~, COLLECT+4, COLLECT+10, TOT772C~ , TOT772C+4, TOT772C+11, TOT772C+12, TOT772T~, TOT772T+5, TOT772T+9 |
IEN773 | LOOP+2~, COLLECT+1~, TOT773C~, TOT773C+3, TOT773C+4, TOT773C+6, MSGSIZE~, MSGSIZE+3, MSGSIZE+4, TOT773T~ , TOT773T+7 |
IENPAR | CMDBD+2~, CMDBD+6*, CMDBD+7*, CMDBD+8, CMDBD+11, CMDBD+13, CMDBD+14, CMDBD+24, CMDBD+26, CMDBD+28 , CMDBD+38, CMDBD+44, TOTALCM+2~, TOTALCM+3*, TOTALCM+4*, TOTALCM+6, TOTALCM+8, TOTALCM+10 |
LEN | LOOP+2~, TOT772C+1~, TOT772C+4*, TOT772C+5, TOT772C+6, TOT772C+7 |
LNO | TOT772C+1~, TOT772C+10*, TOT772C+11*, TOT772C+12 |
LOOP772 | LOOP+2~ |
LOOPDT | LOOP+2~, LOAD+2~, LOAD+3*, LOAD+4*, LOAD+6 |
NCH | MSGSIZE+1~, MSGSIZE+2*, MSGSIZE+4*, MSGSIZE+5 |
NMSP | LOOP+2~ |
NMSPTYPE | CM+1~, CM2+1~ |
NO | MSGSIZE+1~, MSGSIZE+2*, MSGSIZE+3*, MSGSIZE+4 |
>> NOERR | ERR+1* |
NUM | LOOP+2~ |
OK | LOOP+2~, CMDBD+17*, CMDBD+18 |
OKPP | CMDBD+2~, CMDBD+15*, CMDBD+16*, CMDBD+21 |
OKPP(1 | CMDBD+15*, CMDBD+27 |
ORIGETM | LOOP+3~ |
ORIGSTM | LOOP+3~ |
PAR | COLLECT~, COLLECT+4, COLLECT+10 |
PCKG | LOOP+3~, PP+1~, PP+5*, PP+6, COLLECT+13* |
PNMSP | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3, XTMP+4 |
PP | PP+1~, PP+2*, PP+3, PP+4, PP+5, COLLECT+1~ |
PROT | LOOP+3~, PP+1~, PP+4*, PP+6, COLLECT+12* |
PROTOCOL | LOOP+3~ |
PROTYPE | CM+1~, CM2+1~ |
QUES | LOOP+3~ |
REA | ERR~, ERR+2*, ERR+3 |
RESULTS | CM+1~, CM+5*, CM+9, CM2+1~, CM2+5*, CM2+9, LOOP+10*, LOOP+12 |
S1 | CMDBD+2~, CMDBD+10*, CMDBD+36* |
S2 | CMDBD+2~, CMDBD+10*, CMDBD+36* |
S3 | CMDBD+2~, CMDBD+10*, CMDBD+36* |
SEC | LOOP+3~ |
SITENM | CM+1~, CM2+1~ |
SP | LOOP+4~ |
START | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3, CMDBD+17, LOAD+3, COLLSYNC~, COLLSYNC+3 , XTMP+9, XTMP+11, XTMP+12 |
SUB | LOOP+4~, CMDBD+2~, CMDBD+18*, CMDBD+21*, CMDBD+24, CMDBD+25, CMDBD+28, CMDBD+36*, CMDBD+37, CMDBD+38 , CMDBD+40, CMDBD+42, CMDBD+44, UPTOT+2, UPTOT+3, UPTOT+4 |
SVNO | LOOP+4~, XTMP+9*, XTMP+10*, XTMP+11, XTMP+12, XTMP+13, XTMP+15 |
TIME | TOT772T+2~, TOT772T+5*, TOT772T+6, TOT772T+9*, TOT772T+10, TOT773T+2~, TOT773T+7*, TOT773T+8 |
TIMEP | LOOP+4~ |
TM772 | LOOP+4~ |
TOT | LOOP+4~, CMDBD+2~, CMDBD+40*, CMDBD+42, CMDBD+46*, CMDBD+48, UPTOT+2*, UPTOT+3*, UPTOT+4* |
TOT( | CMDBD+10*, CMDBD+25*, CMDBD+37, CMDBD+38, CMDBD+44, UPTOT+2, UPTOT+3, UPTOT+4 |
TOT772 | COLLECT+1~ |
TOT772T | COLLECT+1~ |
>> TOT773( | TOT773C+6* |
TOTALS | CM~, CMF~, CMF+3, CM2~, CM2F~, CM2F+3, LOOP+10, XTMP+15 |
TXT | TOT772C+1~, TOT772C+12*, TOT772C+13, TOT772C+14 |
TYPEHR | COLLECT+1~ |
TYPEIO | COLLECT+1~ |
TYPELR | COLLECT+1~ |
U | CM+5, CM2+5, CMDBD+9, CMDBD+16, CMDBD+21, CMDBD+22, CMDBD+23, CMDBD+25, CMDBD+27, UPTOT+2 , UPTOT+3, UPTOT+4, PP+3, PP+4, PP+5, PP+6, COLLSYNC+3, OK772+3, OK772+4, COLLECT+5 , COLLECT+6, COLLECT+7, COLLECT+11, COLLECT+12, COLLECT+13, TOT772C+4, TOT772T+9, XTMP+7, XTMP+11, XTMP+12 |
V1 | LOOP+4~ |
V2 | LOOP+4~ |
VAL | LOOP+4~ |
VALNMSP | CMDBD+2~, CMDBD+9*, CMDBD+23 |
VALPROT | CMDBD+2~, CMDBD+9*, CMDBD+22 |
VALUE | LOOP+4~ |
X | LOOP+4~, CMDBD+27*, PP+1~, PP+4*, PP+5*, LOAD+2~, LOAD+8*, COLLSYNC+1~, COLLSYNC+3* |
XTMP | XTMP+2~, XTMP+6*, XTMP+7, XTMP+9, XTMP+10, XTMP+11, XTMP+12, XTMP+13, XTMP+15 |
Y | LOOP+4~ |