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