©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
INHUT ; FRW ; 7 May 99 11:24; HL7 utilities
Source file <INHUT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PARSEG(INSRCTL,INSEGNM) | ; Parse an HL7 segment (from GETSEG.)
|
|
| CE(INTCE,FILE,CODE,INDELIMS,INENC,INDIR) | ;Entry point to transform to coded entry data type
|
|
| HDATE(X,TS,VA) | ;EP - Transform HL7 date/time format to internal fileman format
|
|
| LOG(INFN,INIEN,INSRMC,INUIF,INLOG) | ; Log error message in UIF or IEF
|
|
| BPSTAT(INBKGNM,INSRVR) | ;-determine status of GIS background process, given name
|
|
| CL(X,INDELIMS,INENC,INDIR) | ;Transform hospital location to coded location data type
|
|
| CC(X,INDELIMS,INENC,INDIR) | ;Transform MEPRS to charge code data type
|
|
| ESC() | ;EP - Escape Character
|
|
| SUBESC(INREC,INDEL,INB) | ;Substitute escape delimeters to and from HL7
; spec |
|
| CNVDLM(INREC) | ;Convert delimeters to HL7 specifications if in record
; Input: INREC - Portion of HL7 MSG to check ; Returns - Record with replace values |
|
| RCVSCRN(INSRCTL,INSRDATA,INA,INDA) | ; Default Inbound Receiver screen.
; Called by: Receiver SRMC code for inbound BPC, Dest or TT entries. ; D RCVSCRN^INHUT(.INSRCTL,.INSRDATA,.INA,.INDA) ; See called routine for comments. |
|
| REP() | ;EP - Repetition separator
|
|
| CM(INTCE,FILE,CODE,INDELIMS,INENC,INDIR) | ;Entry point to transform to composite data type
|
|
| TIMEIO(X,INP,INCV,IN24,INOUT) | ;Convert time to input or output
|
|
| COMP() | ;EP - Return HL7 component separator
|
|
| PN(NAME,INDELIMS,INENC,INDIR) | ;Transform person name to HL7 formatted person name
|
|
| HLPN(NAME,COMP,INDELIMS,INENC,INDIR) | ;EP - Transform HL7 formatted person name to person name
|
|
| FIELD() | ;EP - Return HL7 field separator
|
|
| TASKNUM(INSEQ) | ; return task number for a given seq. #
|
|
| CRB(X,INDELIMS,INENC,INDIR) | ;Transform room-bed & location code room-bed data type
|
|
| DATE(X,TS) | ;Transform fileman date/time to HL7 date/time stamp
|
|
| GETDEST(INACKTT,INA,INACKDST,INACKUIF) | ; $$function
; Called by: SCRIPT GENERATOR MESSAGE file, Outgoing Initial MUMPS ; Code field, S INDEST=$$GETDEST^INHUT(INTT,.INA,INDEST) ; See called routine for comments. |
|
| SUBCOMP() | ;EP - Subcomponent separator
|
|
| CN(INTCE,FILE,CODE,INDELIMS,INENC,INDIR) | ;Entry point to transform to composite person name data type
|
|
| APPACK(INUIF,INAKMES,INASTAT,INERMSG) | ;User API to ACKLOG^INHU
|
|
| MRGINA(INOA,INA) | ;Merge INOA array into INA array
; Used by Query Response capability ; Input: INA = Application team INA array ; INOA = Values used by GIS for processing responses ; Output: Consolidated INA array used for processing responses |
|
| GETSEG(INUIF,INSEGNM,INSTANCE) | ; Get an HL7 Segment
|
| Name | Field # of Occurrence |
|---|---|
| $$CC^INHUT1 | CC+9 |
| $$CE^INHUT1 | CE+12 |
| $$CL^INHUT1 | CL+9 |
| $$CM^INHUT1 | CM+5 |
| $$CN^INHUT1 | CN+5 |
| $$CRB^INHUT1 | CRB+10 |
| $$DT^INHUT1 | DATE+8 |
| $$HDT^INHUT1 | HDATE+13 |
| $$HLPN^INHUT1 | HLPN+10 |
| $$PN^INHUT1 | PN+9 |
| $$TS^INHUT1 | DATE+7 |
| $$TIMEIO^INHUT10 | TIMEIO+25 |
| $$BPSTAT^INHUT2 | BPSTAT+5 |
| $$GETSEG^INHUT2 | GETSEG+1 |
| PARSEG^INHUT2 | PARSEG+1 |
| RCVSCRN^INHUT5 | RCVSCRN+4 |
| LOG^INHUT6 | LOG+1 |
| $$CNVDLM^INHUT7 | CNVDLM+4 |
| $$GETDEST^INHUT7 | GETDEST+4 |
| $$SUBESC^INHUT7 | SUBESC+15 |
| APPACK^INHUT7 | APPACK+2 |
| $$TASKNUM^INTQRY | TASKNUM+2 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INTHL7M - [#4011] | COMP+4, FIELD+4, SUBCOMP+3, REP+2, ESC+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BHLMIEN | COMP+4, FIELD+4, SUBCOMP+3, REP+2, ESC+2 |
| CODE | CE~, CE+12, CM~, CM+5, CN~, CN+5 |
| COMP | HLPN~, HLPN+10 |
| >> DELIM | FIELD+2 |
| FILE | CE~, CE+12, CM~, CM+5, CN~, CN+5 |
| IN24 | TIMEIO~, TIMEIO+25 |
| INA | RCVSCRN~, RCVSCRN+4, GETDEST~, GETDEST+4, MRGINA~, MRGINA+5* |
| INACKDST | GETDEST~, GETDEST+4 |
| INACKTT | GETDEST~, GETDEST+4 |
| INACKUIF | GETDEST~, GETDEST+4 |
| INAKMES | APPACK~, APPACK+2 |
| INASTAT | APPACK~, APPACK+2 |
| INB | SUBESC~, SUBESC+15 |
| INBKGNM | BPSTAT~, BPSTAT+5 |
| INCV | TIMEIO~, TIMEIO+25 |
| INDA | RCVSCRN~, RCVSCRN+4 |
| INDEL | SUBESC~, SUBESC+15 |
| >> INDELIM | FIELD+1 |
| INDELIMS | CE~, CE+12, CM~, CM+5, CN~, CN+5, PN~, PN+9, HLPN~, HLPN+10 , CL~, CL+9, CC~, CC+9, CRB~, CRB+10 |
| INDIR | CE~, CE+12, CM~, CM+5, CN~, CN+5, PN~, PN+9, HLPN~, HLPN+10 , CL~, CL+9, CC~, CC+9, CRB~, CRB+10 |
| INENC | CE~, CE+12, CM~, CM+5, CN~, CN+5, PN~, PN+9, HLPN~, HLPN+10 , CL~, CL+9, CC~, CC+9, CRB~, CRB+10 |
| INERMSG | APPACK~, APPACK+2 |
| INFN | LOG~, LOG+1 |
| INIEN | LOG~, LOG+1 |
| INLOG | LOG~, LOG+1 |
| INOA | MRGINA~, MRGINA+5 |
| INOUT | TIMEIO~, TIMEIO+25 |
| INP | TIMEIO~, TIMEIO+25 |
| INREC | SUBESC~, SUBESC+15, CNVDLM~, CNVDLM+4 |
| INSEGNM | GETSEG~, GETSEG+1, PARSEG~, PARSEG+1 |
| INSEQ | TASKNUM~, TASKNUM+2 |
| INSRCTL | RCVSCRN~, RCVSCRN+4, PARSEG~, PARSEG+1 |
| INSRDATA | RCVSCRN~, RCVSCRN+4 |
| INSRMC | LOG~, LOG+1 |
| INSRVR | BPSTAT~, BPSTAT+5 |
| INSTANCE | GETSEG~, GETSEG+1 |
| >> INSUBCOM | SUBCOMP+1 |
| >> INSUBDEL | COMP+1 |
| INTCE | CE~, CE+12, CM~, CM+5, CN~, CN+5 |
| INUIF | LOG~, LOG+1, GETSEG~, GETSEG+1, APPACK~, APPACK+2 |
| NAME | PN~, PN+9, HLPN~, HLPN+10 |
| >> SUBDELIM | COMP+2 |
| TS | DATE~, DATE+7, HDATE~, HDATE+13 |
| VA | HDATE~, HDATE+13 |
| X | DATE~, DATE+7, DATE+8, HDATE~, HDATE+13, CL~, CL+9, CC~, CC+9, CRB~ , CRB+10, TIMEIO~, TIMEIO+25 |