FHWOR ; HISC/NCA - Main Routine to Decode HL7 ;10/10/00 14:55
Source file <FHWOR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ERR | ; Send error MSG
|
|
EN(MSG) | ; Entry Point for OE/RR 3 and pass MSG in FHMSG
|
|
NA | ; Number Assign
|
|
CVT | ; Convert HL7 date to FM date
|
|
KIL | ; Kill Variables
|
|
CSEND | ; Send Canceled/Discontinued MSG to OERR
|
|
SEND | ; Send OK MSG to OERR
|
|
PURGE | ; Purge OE/RR Orders
|
|
CERR | ; Send unable MSG
|
|
CAN | ; Cancel Order From OE
|
|
MSH | ; Code MSH message
|
|
CANCEL | ; Cancel/Discontinue
|
|
EVSEND | ; Send Message to OE/RR
|
|
RMSH | ; Code MSH Return Message
|
|
GETOR | ; Call to Get FHORN
|
Name | Field # of Occurrence |
---|---|
SITE^FH | RMSH+1 |
ADD^FHOMDPA | EN+11 |
^FHOMWOR | EN+16 |
^FHWADM | EN+20 |
^FHWOR1 | EN+35 |
CAN^FHWOR1 | CAN+1 |
NA^FHWOR1 | NA+1 |
^FHWOR2 | EN+36 |
CAN^FHWOR2 | CAN+2 |
NA^FHWOR2 | NA+2 |
^FHWOR3 | EN+29 |
CAN^FHWOR3 | CAN+3 |
NA^FHWOR3 | NA+3 |
^FHWOR4 | EN+34 |
CAN^FHWOR4 | CAN+4 |
NA^FHWOR4 | NA+4 |
^FHWOR5 | EN+32 |
CAN^FHWOR5 | CAN+5 |
NA^FHWOR5 | NA+5 |
^FHWOR61 | EN+30 |
CAN^FHWOR61 | CAN+6 |
NA^FHWOR61 | NA+6 |
CHK^FHWORR | EN+17 |
GETOR^FHWORR | GETOR+1 |
MSH^FHWORR | MSH+1 |
OMSTAT^FHWORR | CANCEL+5 |
STATUS^FHWORR | CANCEL+9 |
PID^VADPT6 | EN+12 |
$$FMADD^XLFDT | CVT+2 |
$$HL7TFM^XLFDT | CVT+1 |
MSG^XQOR | EVSEND+1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | EN+19 |
^DPT - [#2] | EN+17, RMSH+4 |
^DPT("B" | EN+10 |
^DPT("CN" | EN+18 |
^FHPT - [#115] | EN+19, EN+20, PURGE+4*, PURGE+5*, PURGE+7, PURGE+8*, PURGE+11*, PURGE+12*, PURGE+13* |
Name | Line Occurrences |
---|---|
CANCEL | EN+17, EN+22 |
CERR | CANCEL+4 |
CSEND | CANCEL+6, CANCEL+8 |
ERR | EN+6, EN+8, EN+10, EN+11, EN+17, EN+18, EN+19, EN+22, EN+24, EN+25 , EN+28, EN+31 |
EVSEND | PURGE+15, ERR+6, SEND+2, CERR+2 |
GETOR | EN+6, EN+8, EN+10, EN+11, EN+17, EN+18, EN+19, EN+22, EN+24, EN+25 |
KIL | EN+29, EN+30, EN+32, EN+34, EN+35, EN+36, CANCEL+6, CANCEL+8, CANCEL+11, CAN+1 , CAN+2, CAN+3, CAN+4, CAN+5, CAN+6, CAN+7, PURGE+1, NA+1, NA+2, NA+3 , NA+4, NA+5, NA+6 |
NA | CANCEL+10 |
PURGE | EN+13 |
RMSH | ERR+1, SEND+1, CERR+1, CSEND+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACT | EN+1~, EN+25*, CANCEL+2*, CANCEL+4, CANCEL+6, CANCEL+8, CANCEL+9, CANCEL+10!, CANCEL+11, CERR+2 , CSEND+2, EVSEND+1!, KIL+1! |
ADM | EN+1~, EN+18*, EN+19, EN+20, PURGE+3*, PURGE+4, PURGE+5, PURGE+7, PURGE+8, PURGE+11 , PURGE+12, PURGE+13, KIL+1! |
BID | EN+1~, EN+12*, KIL+1! |
CHK | EN+1~, EN+17, KIL+1! |
COM | EN+1~, EN+33*, KIL+1! |
DA | EN+1~, EN+20*, KIL+1! |
DATA | EN+1~, CANCEL+1*, CANCEL+2, CANCEL+3, KIL+1! |
DATE | EN+1~, CVT+1*, CVT+2*, KIL+1! |
DFN | EN+1~, EN+9*, EN+10, EN+11, EN+17, EN+18, EN+20, RMSH+4, KIL+1! |
DIET | EN+1~, EN+33*, EN+34, EN+35, KIL+1! |
DUR | EN+1~, EN+26*, EN+27, KIL+1! |
EDT | EN+1~, EN+27*, PURGE+6*, PURGE+7, KIL+1! |
EL | PURGE+7*, PURGE+8, PURGE+14! |
FHC | EN+1~, KIL+1! |
FHD | EN+1~, KIL+1! |
FHD1 | EN+1~, KIL+1! |
FHD2 | EN+1~, KIL+1! |
FHDFN | EN+1~, EN+11, EN+19, EN+20, PURGE+4, PURGE+5, PURGE+7, PURGE+8, PURGE+11, PURGE+12 , PURGE+13, KIL+1! |
FHDR | PURGE+3*, PURGE+4, PURGE+5, PURGE+11, PURGE+12, PURGE+14! |
FHMSG | EN+1~, EN+4, KIL+1! |
FHMSG( | EN+3* |
FHMSG(1 | EN+6 |
FHMSG(2 | EN+8 |
FHMSG(3 | EN+13, EN+22, ERR+3, ERR+4, ERR+5 |
FHMSG(4 | EN+24, ERR+4, ERR+5 |
FHMSG(5 | EN+29 |
FHORN | EN+26*, CANCEL+3*, PURGE+2*, PURGE+4, PURGE+5, PURGE+8, PURGE+11, PURGE+12, PURGE+13, ERR+2 , SEND+2, CERR+2, CSEND+2, EVSEND+1! |
FHPV | EN+1~, EN+28*, KIL+1! |
FHWF | EN+1~, EN+2*, KIL+1! |
>> FHZ115 | EN+11* |
FILL | CANCEL+3*, PURGE+2*, PURGE+3, PURGE+6, SEND+2, CERR+2, CSEND+2, EVSEND+1! |
FOR | EN+1~, CANCEL+1*, CANCEL+7*, CANCEL+8, CAN+1, CAN+2, CAN+3, CAN+4, CAN+5, CAN+6 , NA+1, NA+2, NA+3, NA+4, NA+5, NA+6, KIL+1! |
FTYP | EN+1~, CANCEL+3*, CANCEL+5, CANCEL+6, CANCEL+7, PURGE+2*, PURGE+4, PURGE+5, PURGE+6, PURGE+11 , PURGE+12, PURGE+13, KIL+1! |
IEN | EN+1~, KIL+1! |
ITVL | EN+1~, EN+27*, KIL+1! |
>> L | EN+3* |
LP | EN+1~, KIL+1! |
MEAL | EN+1~, KIL+1! |
MSG | EN~, CANCEL+10!, CANCEL+11!, ERR+1!, SEND+1!, CERR+1!, CSEND+1!, EVSEND+1! |
MSG( | EN+3 |
MSG(1 | PURGE+15*, RMSH+2* |
MSG(2 | RMSH+4* |
MSG(3 | PURGE+15*, ERR+2*, ERR+3*, ERR+4*, ERR+5*, ERR+6*, SEND+2*, CERR+2*, CSEND+2* |
NAM | EN+1~, EN+9*, EN+10, KIL+1! |
NOW | EN+1~, EN+28*, KIL+1! |
PER | EN+1~, KIL+1! |
PID | EN+1~, EN+12*, KIL+1! |
SDT | EN+1~, EN+27*, PURGE+6*, PURGE+7, KIL+1! |
SERV | EN+1~, KIL+1! |
SITE | EVSEND+1! |
SITE(1 | RMSH+2 |
TIM | EN+1~, KIL+1! |
TIME | EN+1~, KIL+1! |
TM | EN+1~, KIL+1! |
TXT | EN+1~, EN+2*, EN+6*, EN+8*, EN+10*, EN+11*, EN+17*, EN+18*, EN+19*, EN+22* , EN+24*, EN+25*, EN+28*, EN+31*, CANCEL+4*, CANCEL+10!, ERR+6, CERR+2, EVSEND+1!, KIL+1! |
TYPC | EN+1~, EN+32*, KIL+1! |
VA | EN+12! |
VA("BID" | EN+12 |
VA("PID" | EN+12 |
WARD | EN+1~, EN+17*, EN+18, KIL+1! |
X | EN+1~, EN+6*, EN+8*, EN+9, EN+13*, EN+14, EN+16, EN+22*, EN+24*, EN+25 , EN+26, EN+28, EN+29*, EN+30, EN+31, EN+32, EN+33, CANCEL+1, PURGE+1, PURGE+2 , KIL+1! |
XX | EN+1~, KIL+1! |
YR | EN+1~, KIL+1! |