©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
ORY216 ;SLC/MKB - Clean-up existing Allergy orders ;3/16/04 14:28
Source file <ORY216.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ; -- Send completion message to user who initiated conversion
|
||
| POST | ; -- postinit
|
|
| TASK | ; -- queue job to complete ART orders
|
|
| EN | ; -- main loop to complete ART orders on:
; ^OR(100,"ACT",ORVP,invORLOG,ORDG,ORIFN) |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | EN+7, EN+8, EN+9, EN+10, EN+11* |
| ^ORD(100.98 - [#100.98] | POST+1, POST+2*, EN+4 |
| ^XTMP("ORGMRA" | TASK+1, EN+5, EN+6*, EN+12*, EN+14* |
| Name | Line Occurrences |
|---|---|
| EN+14 | |
| TASK | POST+4 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | EN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIFROM | MAIL+1~ |
| DUZ | MAIL+2 |
| ORDG | POST+1~*, POST+2, EN+3~, EN+4*, EN+9 |
| ORIFN | EN+3~, EN+9*, EN+10, EN+11 |
| ORLOG | EN+3~, EN+8*, EN+9 |
| ORMSG | TASK+2~, TASK+4, TASK+6!, TASK+7*, TASK+8 |
| ORMSG(1 | TASK+3* |
| ORMSG(2 | TASK+4* |
| ORNOW | EN+3~, EN+5*, EN+6, EN+11 |
| ORTXT | MAIL+1~ |
| ORTXT(1 | MAIL+3* |
| ORTXT(2 | MAIL+4* |
| ORVP | EN+3~, EN+5*, EN+7*, EN+8, EN+9, EN+12 |
| ORX | POST+1~, POST+3 |
| ORX("GMRAOR A | LLERGY ENTER/EDIT" , POST+3* |
| U | POST+2, EN+6, EN+10, EN+11 |
| XMDUZ | MAIL+1~, MAIL+2* |
| XMMG | MAIL+1~ |
| XMSUB | MAIL+1~, MAIL+5* |
| XMTEXT | MAIL+1~, MAIL+5* |
| XMY | MAIL+1~ |
| XMY( | MAIL+2* |
| XMZ | MAIL+1~ |
| ZTDESC | TASK+2~, TASK+5* |
| ZTDTH | TASK+2~, TASK+6* |
| ZTIO | TASK+2~, TASK+6* |
| >> ZTQUEUED | EN+13 |
| ZTRTN | TASK+2~, TASK+5* |
| ZTSAVE | TASK+2~ |
| ZTSAVE("DUZ" | TASK+6* |
| ZTSK | TASK+2~, TASK+7, TASK+9, MAIL+3 |
| >> ZTSTOP | EN+7, EN+13*, EN+14 |