©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
ORX2 ; slc/dcm - OE/RR Patient lock entry points ;17-May-2010 08:35;PLS
Source file <ORX2.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | ($$FMADD,$$NOW)^XLFDT |
| VA Fileman | 1 | ^DIR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LCKEVT(EVT) | ;Function atttempts to lock event, added w/patch 194
|
|
| LOCK1(ORDER) | ; -- Lock ORDER in file #100
; Returns 1 if successful or 0^Message if could not get lock |
|
| READ | ; -- instead of READ^ORUTL
|
|
| LOCK(DFN) | ; -- Lock patient chart (silent)
; Returns 1 if successful, or 0^Message if could not get lock |
|
| LK | ;;Entry point for locking patient when updating orders
|
|
| UNLOCK(DFN) | ; -- Unlock patient chart (silent)
|
|
| UNLK1(ORDER) | ; -- Unlock ORDER in file #100
|
|
| ULK | ;;Entry point to unlock patient
|
|
| INC(IFN) | ;Increment zero node on file 100.2
|
|
| UNLEVT(EVT) | ;Unlocks global, added w/patch 195
|
|
| PT1 | ;;Entry point to unlock patient when done adding orders - NO LONGER USED
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | LOCK1+7, LOCK1+8, LOCK1+9, LOCK1+10, UNLK1+5, UNLK1+6, UNLK1+8, UNLK1+9 |
| ^OR(100.2 | INC+2, INC+3, INC+4, INC+6*, INC+7 |
| ^ORE(100.2 - [#100.2] | LCKEVT+2, UNLEVT+1 |
| ^VA(200 - [#200] | LOCK+5, LOCK1+7 |
| ^XTMP("ORLK-" | LOCK1+5, LOCK1+6, LOCK1+7, LOCK1+12*, UNLK1+3, UNLK1+4, UNLK1+5!, UNLK1+9! |
| ^XTMP("ORPTLK-" | LOCK+4, LOCK+5, LOCK+7*, UNLOCK+1, UNLOCK+2! |
| Name | Line Occurrences |
|---|---|
| $$LOCK | LK+3 |
| READ | LK+4 |
| UNLOCK | PT1+3, ULK+3 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | INC+4*, LOCK1+5, UNLK1+3 |
| ^(1 | LOCK+7*, LOCK1+12* |
| ^(3 | LOCK1+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | LOCK~, LOCK+3, LOCK+4, LOCK+5, LOCK+7, UNLOCK~, UNLOCK+1, UNLOCK+2 |
| >> DILOCKTM | LOCK+5, LOCK1+7, UNLK1+6 |
| DIR | READ+1~ |
| DIR("A" | READ+2* |
| DIR(0 | READ+2* |
| DUZ | LOCK+4, LOCK+7, UNLOCK+2, LOCK1+12 |
| EVT | LCKEVT~, LCKEVT+2, UNLEVT~, UNLEVT+1 |
| IFN | INC~, INC+2, INC+5 |
| J | LCKEVT+1~, LCKEVT+2* |
| NOW | LOCK+3~, LOCK+6*, LOCK+7, LOCK1+3~, LOCK1+11*, LOCK1+12 |
| NOW1 | LOCK+3~, LOCK+6*, LOCK+7, LOCK1+3~, LOCK1+11*, LOCK1+12 |
| ORDER | LOCK1~, LOCK1+3, LOCK1+5, LOCK1+6, LOCK1+7, LOCK1+8, LOCK1+10, LOCK1+12, UNLK1~, UNLK1+2* , UNLK1+3, UNLK1+4, UNLK1+5, UNLK1+6, UNLK1+8, UNLK1+9 |
| ORELK | PT1+3! |
| ORLK | LOCK+3~, LOCK+4*, LOCK+5 |
| ORPTLK | PT1+3! |
| >> ORVP | PT1+2, PT1+3 |
| U | LK+4, LOCK+4, LOCK+5, LOCK+7, UNLOCK+2, INC+5, INC+6, LOCK1+6, LOCK1+7, LOCK1+8 , LOCK1+9, LOCK1+12, UNLK1+4 |
| X | LK+2, LK+3, LK+5!, ULK+2, ULK+3, INC+1~, INC+4*, INC+5, LOCK1+3~, LOCK1+7* , LOCK1+9*, LOCK1+10, READ+1~ |
| X3 | INC+1~, INC+5*, INC+6 |
| X4 | INC+1~, INC+5*, INC+6 |
| Y | LK+3*, LK+4, LK+5*, LOCK+3~, LOCK+5*, LOCK1+3~, LOCK1+7*, LOCK1+8*, LOCK1+9, LOCK1+10* , READ+1~ |