ORX2 ;SLC/DCM,AJB - OE/RR PATIENT LOCK ENTRY POINT ;Jun 23, 2022@07:59:29
Source file <ORX2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PT1 | ;;Entry point to unlock patient when done adding orders - NO LONGER USED
|
|
| LK | ;;Entry point for locking patient when updating orders
|
|
| ULK | ;;Entry point to unlock patient
|
|
| LOCK(DFN) | ; -- Lock patient chart (silent)
; Returns 1 if successful, or 0^Message if could not get lock |
|
| UNLOCK(DFN) | ; -- Unlock patient chart (silent)
|
|
| INC(IFN) | ;Increment zero node on file 100.2
|
|
| LOCK1(ORDER) | ; -- Lock ORDER in file #100
; Returns 1 if successful or 0^Message if could not get lock |
|
| UNLK1(ORDER) | ; -- Unlock ORDER in file #100
|
|
| READ | ; -- instead of READ^ORUTL
|
|
| LCKEVT(EVT) | ;Function atttempts to lock event, added w/patch 194
|
|
| UNLEVT(EVT) | ;Unlocks global, added w/patch 195
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | LOCK1+6, LOCK1+7, LOCK1+8, LOCK1+9, 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] | LOCK1+6 |
| ^XTMP("ORLK-" | LOCK1+5, LOCK1+6, LOCK1+11*, UNLK1+3, UNLK1+4, UNLK1+5!, UNLK1+9! |
| ^XTMP("ORPTLK-" | LOCK+3, LOCK+4, LOCK+6, LOCK+8*, UNLOCK+1, UNLOCK+2! |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | INC+4*, LOCK1+5, UNLK1+3 |
| ^(1 | LOCK+8*, LOCK1+11* |
| ^(3 | LOCK1+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | LOCK~, LOCK+2, LOCK+3, LOCK+4, LOCK+6, LOCK+8, UNLOCK~, UNLOCK+1, UNLOCK+2 |
| >> DILOCKTM | LOCK+4, LOCK1+6, UNLK1+6 |
| DIR | READ+1~ |
| DIR("A" | READ+2* |
| DIR(0 | READ+2* |
| DUZ | LOCK+3, LOCK+6, LOCK+8, UNLOCK+2, LOCK1+11 |
| EVT | LCKEVT~, LCKEVT+2, UNLEVT~, UNLEVT+1 |
| IFN | INC~, INC+2, INC+5 |
| J | LCKEVT+1~, LCKEVT+2* |
| NOW | LOCK+2~, LOCK+7*, LOCK+8, LOCK1+3~, LOCK1+10*, LOCK1+11 |
| NOW1 | LOCK+2~, LOCK+7*, LOCK+8, LOCK1+3~, LOCK1+10*, LOCK1+11 |
| ORDER | LOCK1~, LOCK1+3, LOCK1+5, LOCK1+6, LOCK1+7, LOCK1+9, LOCK1+11, UNLK1~, UNLK1+2*, UNLK1+3 , UNLK1+4, UNLK1+5, UNLK1+6, UNLK1+8, UNLK1+9 |
| ORELK | PT1+3! |
| ORLK | LOCK+2~, LOCK+3*, LOCK+6 |
| ORPTLK | PT1+3! |
| >> ORVP | PT1+2, PT1+3 |
| U | LK+4, LOCK+3, LOCK+6, LOCK+8, UNLOCK+2, INC+5, INC+6, LOCK1+6, LOCK1+7, LOCK1+8 , LOCK1+11, UNLK1+4 |
| X | LK+2, LK+3, LK+5!, ULK+2, ULK+3, INC+1~, INC+4*, INC+5, LOCK1+3~, LOCK1+6* , LOCK1+8*, LOCK1+9, READ+1~ |
| X3 | INC+1~, INC+5*, INC+6 |
| X4 | INC+1~, INC+5*, INC+6 |
| Y | LK+3*, LK+4, LK+5*, LOCK+2~, LOCK+4, LOCK+6*, LOCK1+3~, LOCK1+6*, LOCK1+7*, LOCK1+8 , LOCK1+9*, READ+1~ |