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! |