©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
ORY39 ;SLC/JFR - POST-INSTALL OR*3*39 11/24/98 13:15
Source file <ORY39.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NKA(ORDER) | ||
| POST | ; task AWID linetag in post-install
|
|
| COMMENT(ORDER) | ; replace COMMENT prompt with ITEM
|
|
| AWID | ; loop whole order file
; set "AW" x-ref on NKA allergy orders ; add ID's to existing orders |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | AWID+9, AWID+10, NKA+3, NKA+4, NKA+7*, NKA+8*, COMMENT+2, COMMENT+3!, COMMENT+4*, COMMENT+5* |
| Name | Line Occurrences |
|---|---|
| $$NKA | AWID+10 |
| COMMENT | AWID+13 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | COMMENT+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | AWID+11~, AWID+12* |
| NKA | NKA+1~, NKA+2*, NKA+3, NKA+6*, NKA+10 |
| NKADLG | AWID+4~, AWID+6*, NKA+4 |
| ORDER | NKA~, NKA+3, NKA+4, NKA+7, NKA+8, COMMENT~, COMMENT+2, COMMENT+3, COMMENT+4, COMMENT+5 |
| ORDLG | AWID+4~, AWID+5*, AWID+10 |
| ORFTOI | AWID+4~, AWID+8*, COMMENT+4 |
| ORFTXT | AWID+4~, AWID+7*, COMMENT+2 |
| ORIFN | AWID+4~, AWID+9*, AWID+10, AWID+12, AWID+13 |
| ORX | COMMENT+1~, COMMENT+2*, COMMENT+4* |
| RESP | NKA+1~, NKA+3*, NKA+4, NKA+7, NKA+8, COMMENT+1~*, COMMENT+2*, COMMENT+3, COMMENT+4, COMMENT+5 |
| U | COMMENT+2, COMMENT+4 |
| ZTDESC | POST+1*, POST+4! |
| ZTDTH | POST+1*, POST+4! |
| ZTIO | POST+2*, POST+4! |
| ZTRTN | POST+1*, POST+4! |
| ZTSK | POST+3, POST+4! |