HLUCM003 ;CIOFO-O/LJA - HL7/Capacity Mgt API-II ;10/23/01 12:01
Source file <HLUCM003.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ADJTIME | ; Adjust ^TMP times on basis of unit...
|
|
ADJPAR(IENPAR) | ; Adjust times for one unit...
|
|
CORRECT(PAR,CHLDIEN,PCE,NEW) | ; Change CHILD data...
|
|
RECNM(PFX,IEN772,FULLNM,REPNM,SRCE) | ; Record where name found...
; PFX - [n] for namespace, and [p] for protocol ; IEN772 - IEN of 772 ; FULLNM - What is in entry itself, uninferred... ; REPNM - What is to be reported ; SRCE - Where it was inferred from |
|
MSHMAIL(IEN772) | ;
|
|
MSH772(IEN772) | ; Get PCKG from MSH segment in 772...
; Call here ONLY if can't get MSH segment from 773... |
|
MSH773(IEN772) | ; Get PCKG from MSH segment in 773...
|
|
INOUT(IEN772) | ;
|
|
PCKGMSH(MSH,INOUT) | ; Extract PCKG namespace from MSH segment
|
|
ERRCHK | ; Error checks...
|
|
SETMORE | ; More defaults...
; ; Check format of PNMSP... ; If not passed by reference... |
|
FIXNMSP(PCKG,I772) | ; First space piece, strip _
|
|
CTPCKG(PCKG) | ; Should entry be counted on basis of package?
; (Might be countable if protocol matches remember.) ; If list of packages passed by reference, is PCKG in array? ; IEN101,NMSPTYPE,PNMSP -- req |
|
CTPROT(PROT) | ; Should entry be counted on basis of protocol?
; (Might be countable if package matches remember.) ; IEN,PROTYPE -- req |
|
EOR | ; HLUCM003 - HL7/Capacity Mgt API-II ;10/23/01 12:01
|
Name | Field # of Occurrence |
---|---|
ERR^HLUCM | ERRCHK+4, ERRCHK+5, ERRCHK+9, ERRCHK+18, SETMORE+7, SETMORE+14, SETMORE+18 |
$$OKPAR101^HLUCM001 | SETMORE+15 |
$$REFPCKG^HLUCM001 | CTPCKG+10 |
$$REFPROT^HLUCM001 | CTPROT+10 |
$$OK0CALL^HLUCM002 | CTPCKG+13, CTPROT+14 |
$$OKPAR^HLUCM002 | SETMORE+6, SETMORE+13 |
$$FIXNMSP^HLUCM003 | PCKGMSH+4 |
$$NMSPCHG^HLUCM050 | FIXNMSP+11 |
$$FMDIFF^XLFDT | CORRECT+11 |
REC^XMS3 | MSHMAIL+8 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HL(772 - [#772] | MSHMAIL+2, MSHMAIL+3, MSH772+5, MSH772+7, INOUT+2, FIXNMSP+8 |
^HLMA - [#773] | MSH773+4, FIXNMSP+7 |
^HLMA("B" | MSH773+2, FIXNMSP+6 |
^TMP($J | ADJTIME+3, ADJPAR+4, ADJPAR+12, ADJPAR+13, ADJPAR+20, ADJPAR+22, ADJPAR+27, ADJPAR+28, CORRECT+4, CORRECT+15* , RECNM+7, RECNM+11*, RECNM+12*, RECNM+13*, RECNM+14* |
Name | Line Occurrences |
---|---|
$$INOUT | MSH772+4, MSH773+3 |
$$PCKGMSH | MSHMAIL+11, MSH772+10, MSH773+6, MSH773+11 |
ADJPAR | ADJTIME+4 |
CORRECT | ADJPAR+21, ADJPAR+23, ADJPAR+35, ADJPAR+39, ADJPAR+43 |
RECNM | MSHMAIL+12, MSH772+11, MSH773+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APPR | FIXNMSP+1~, FIXNMSP+9* |
APPS | FIXNMSP+1~, FIXNMSP+9* |
BEG | ADJPAR+1~, ADJPAR+17*, ADJPAR+21, CORRECT+1~, CORRECT+10*, CORRECT+11 |
CHILD | CORRECT+1~, CORRECT+7*, CORRECT+10, CORRECT+12* |
CHLDIEN | CORRECT~, CORRECT+4, CORRECT+15 |
>> COND | ERRCHK+13 |
CT | MSHMAIL+1~, MSHMAIL+5*, MSHMAIL+6, MSHMAIL+7*, MSH772+2~, MSH772+3*, MSH772+5, MSH772+6* |
CTPCKG | CTPCKG+4~ |
CTPROT | CTPROT+4~ |
DATA | ADJPAR+1~, ADJPAR+13*, ADJPAR+14, ADJPAR+15, ADJPAR+28*, ADJPAR+29 |
DEL | PCKGMSH+1~, PCKGMSH+2*, PCKGMSH+3 |
DIFF | CORRECT+1~, CORRECT+11*, CORRECT+12 |
END | ADJPAR+1~, ADJPAR+17*, ADJPAR+23, CORRECT+1~, CORRECT+10*, CORRECT+11, ERRCHK+3*, ERRCHK+5, ERRCHK+8 |
>> ERRINFO("INVA | LID END TIME" , ERRCHK+7, LID PROTOCOL PARAMETER" , SETMORE+16, LID START TIME" , ERRCHK+6 |
FACR | FIXNMSP+1~, FIXNMSP+9* |
FACS | FIXNMSP+1~, FIXNMSP+9* |
FULLNM | RECNM~, RECNM+14 |
>> HLCHILD | CORRECT+4*, CORRECT+15 |
I772 | FIXNMSP~, FIXNMSP+3*, FIXNMSP+6, FIXNMSP+8 |
I773 | FIXNMSP+1~, FIXNMSP+6*, FIXNMSP+7 |
>> IEN101 | ERRCHK+16, SETMORE+13, SETMORE+15*, SETMORE+17, CTPROT+7, CTPROT+14, CTPROT+17 |
IEN772 | ADJPAR+1~, ADJPAR+3*, ADJPAR+4*, ADJPAR+11*, ADJPAR+12*, ADJPAR+13, ADJPAR+20*, ADJPAR+21, ADJPAR+22*, ADJPAR+23 , ADJPAR+26*, ADJPAR+27*, ADJPAR+28, ADJPAR+35, ADJPAR+39, ADJPAR+43, RECNM~, RECNM+14, MSHMAIL~, MSHMAIL+2 , MSHMAIL+3, MSHMAIL+12, MSH772~, MSH772+4, MSH772+5, MSH772+7, MSH772+11, MSH773~, MSH773+2, MSH773+3 , MSH773+13, INOUT~, INOUT+2 |
IEN773 | MSH773+1~, MSH773+2*, MSH773+4 |
IENPAR | ADJTIME+1~, ADJTIME+2*, ADJTIME+3*, ADJTIME+4, ADJPAR~, ADJPAR+4, ADJPAR+12, ADJPAR+20, ADJPAR+21, ADJPAR+22 , ADJPAR+23, ADJPAR+27, ADJPAR+35, ADJPAR+39, ADJPAR+43 |
IN | MSH772+2~, MSH772+3*, MSH772+5*, MSH772+7 |
INOUT | MSHMAIL+1~, MSHMAIL+3*, MSHMAIL+4*, MSHMAIL+10, MSHMAIL+11, MSH772+2~, MSH772+4*, MSH772+9, MSH772+10, MSH773+1~ , MSH773+3*, MSH773+5, MSH773+6, MSH773+9*, MSH773+10, MSH773+11, INOUT+1~, INOUT+2*, INOUT+3*, INOUT+4 , PCKGMSH~, PCKGMSH+2*, PCKGMSH+3 |
MIEN | MSHMAIL+1~, MSHMAIL+2*, MSHMAIL+5 |
MSH | MSH773+1~, MSH773+4*, MSH773+5, MSH773+6, MSH773+10, MSH773+11, PCKGMSH~, PCKGMSH+2, PCKGMSH+3, FIXNMSP+1~ , FIXNMSP+7*, FIXNMSP+8*, FIXNMSP+9 |
NEW | CORRECT~, CORRECT+4, CORRECT+7 |
NIEN | MSHMAIL+1~ |
NMSP | MSH773+8~, MSH773+9*, MSH773+12 |
>> NMSPTYPE | SETMORE+4, CTPCKG+10 |
NUM | ADJPAR+1~, ADJPAR+3*, ADJPAR+5*, ADJPAR+8 |
P1 | ERRCHK+14~, ERRCHK+15*, ERRCHK+17 |
P2 | ERRCHK+14~, ERRCHK+16*, ERRCHK+17 |
P3 | ERRCHK+14~, ERRCHK+17* |
PAR | CORRECT~ |
PCE | CORRECT~, CORRECT+4, CORRECT+7 |
PCKG | MSHMAIL+1~, MSHMAIL+5*, MSHMAIL+6, MSHMAIL+11*, MSHMAIL+12, MSHMAIL+13, MSH772+2~, MSH772+3*, MSH772+5, MSH772+10* , MSH772+11, MSH772+12, MSH773+1~, MSH773+6*, MSH773+7, MSH773+9, MSH773+11*, MSH773+12*, MSH773+13, MSH773+14 , FIXNMSP~, FIXNMSP+11*, FIXNMSP+13, CTPCKG~, CTPCKG+10, CTPCKG+13, CTPCKG+14* |
PFROM | PCKGMSH+1~, PCKGMSH+3*, PCKGMSH+4 |
PFX | RECNM~, RECNM+9 |
>> PNMSP | ERRCHK+15, SETMORE+6, CTPCKG+7, CTPCKG+13, CTPCKG+14 |
PREVTM | ADJPAR+1~, ADJPAR+26*, ADJPAR+32, ADJPAR+33*, ADJPAR+36*, ADJPAR+38, ADJPAR+39, ADJPAR+40, ADJPAR+46* |
PROT | CTPROT~, CTPROT+10, CTPROT+14, CTPROT+16, CTPROT+18* |
>> PROTYPE | SETMORE+11, CTPROT+10 |
RECNM | MSHMAIL+1~, MSHMAIL+10*, MSHMAIL+12, MSH772+2~, MSH772+9*, MSH772+11, MSH773+1~, MSH773+5*, MSH773+10*, MSH773+13 |
REPNM | RECNM~, RECNM+9*, RECNM+12, RECNM+13, RECNM+14 |
SEC | CORRECT+1~ |
SRCE | RECNM~, RECNM+13, RECNM+14 |
>> START | ERRCHK+3*, ERRCHK+4, ERRCHK+8 |
STORE | CORRECT+1~ |
TIME | ADJPAR+1~ |
TIME( | ADJPAR+14*, ADJPAR+15* |
TIME(":" | ADJPAR+17 |
TIME(0 | ADJPAR+17 |
TIME(1 | ADJPAR+29*, ADJPAR+33, ADJPAR+35, ADJPAR+36, ADJPAR+38, ADJPAR+40*, ADJPAR+42, ADJPAR+43, ADJPAR+44 |
TIME(2 | ADJPAR+29*, ADJPAR+33, ADJPAR+42, ADJPAR+44*, ADJPAR+46 |
TXT | MSHMAIL+1~, MSHMAIL+6, MSHMAIL+9*, MSHMAIL+10, MSHMAIL+11, MSH772+2~, MSH772+7*, MSH772+8, MSH772+9, MSH772+10 |
U | ADJPAR+14, ADJPAR+15, ADJPAR+29, CORRECT+4, CORRECT+7, CORRECT+10, CORRECT+12, MSHMAIL+2, MSHMAIL+3, INOUT+2 , CTPCKG+14, CTPROT+17 |
VAL | CTPROT+15~, CTPROT+17*, CTPROT+18 |
X | ADJPAR+14*, ADJPAR+15*, MSHMAIL+1~, MSHMAIL+10*, MSH772+2~, MSH772+9*, MSH773+1~, MSH773+5*, MSH773+10*, FIXNMSP+8* , FIXNMSP+9* |
XMER | MSHMAIL+1~, MSHMAIL+5*, MSHMAIL+6 |
XMPOS | MSHMAIL+1~ |
XMRG | MSHMAIL+1~, MSHMAIL+9 |
XMZ | MSHMAIL+1~, MSHMAIL+5* |