MAGJEX1A ;WIRMFO/JHC - VistARad RPCs, exam locking ; 10/17/2022
Source file <MAGJEX1A.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
ERR | ||
CASLOCK(MAGGRY,DATA) | ; RPC Call: MAGJ RADCASELOCKS
; MAGGRY holds $NA reference to ^TMP for rpc reply; all ref's to MAGGRY use ss indirection ; input in DATA: OPEN_FLAG^RADFN^RADTI^RACNI^RARPT ; OPEN_FLAG = 3: Reserve-to-Lock; 4: Lock-to-Reserve; 5: Lock/Take ; RADFN^, etc--exam id |
|
CASLOCKZ | ;
|
|
PNAM(X) | ; return pt name for input DFN
|
|
LOCKACT(RARPT,DAYCASE,REQUEST,RESULT,ACTREPLY,LOGDATA) | ; determine if desired lock action is feasible
; Input: RARPT, DAYCASE, REQUEST, LOGDATA ; REQUESTed Action: ; 1-Lock; 2-Reserve; 3-ResToLock; 4-LockToRes; 5-TakeLock; 100-Status; 101-UNLOCK ; Note: 100 & 101 are special for internal use only ; LOGDATA--pass through for Image Access Log ; Output: RESULT, ACTREPLY ; RESULT: ACTION "allowed" = LOCK^RESERVE^ResToInt^IntToRes^Take^_"|"_ImgLst ; these are truth values; Imglst true =~ return Image File list to client ; RESULT is ultimately used at tag LOCKOUT ; ACTREPLY --reply message for client logic/display |
|
LOCKACT1 | ||
LOCKACTZ | ||
LOCKOUT(RARPT,DAYCASE,LOCKLEV,MYLOCK,ACTION,RESULT,LOGDATA) | ; Record Locks and Clear Locks, as required
; Precursors are logic and data from tags LOCKIN^magjex1b and LOCKACT |
|
END |
RPC Name | Call Tags |
---|---|
MAGJ RADCASELOCKS | CASLOCK |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("ERRTN" | ERR+1 |
^DPT - [#2] | PNAM+1 |
^MAG(2006.69 - [#2006.69] | LOCKACT+14 |
^RA(72 - [#72] | CASLOCK+24, CASLOCK+28 |
^RADPT - [#70] | CASLOCK+18 |
^TMP($J | CASLOCK+11 |
^XTMP("MAGJ" | CASLOCK+36*, LOCKOUT+11!, LOCKOUT+13, LOCKOUT+17*, LOCKOUT+18*, LOCKOUT+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTION | LOCKACT+12~, LOCKACT+13*, LOCKACT+16*, LOCKACT+21*, LOCKACT+27*, LOCKACT+29*, LOCKACT+30*, LOCKACT+32*, LOCKACT+33*, LOCKACT+34* , LOCKACT+36*, LOCKACT+37*, LOCKACT+43*, LOCKACT+44*, LOCKACT+46*, LOCKACT+47*, LOCKACT+51*, LOCKACT+52*, LOCKACT+53*, LOCKACT+57* , LOCKACT+59*, LOCKACT1, LOCKOUT~, LOCKOUT+10, LOCKOUT+16, LOCKOUT+20 |
ACTREPLY | LOCKACT~, LOCKACT+13*, LOCKACT+19*, LOCKACT+21*, LOCKACT+22*, LOCKACT+27*, LOCKACT+29*, LOCKACT+30*, LOCKACT+32*, LOCKACT+33* , LOCKACT+34*, LOCKACT+36*, LOCKACT+37*, LOCKACT+38*, LOCKACT+43*, LOCKACT+44*, LOCKACT+46*, LOCKACT+47*, LOCKACT+51*, LOCKACT+52* , LOCKACT+53*, LOCKACT+54*, LOCKACT+57*, LOCKACT+59*, LOCKACT+60* |
CT | CASLOCK+7~, CASLOCK+10*, CASLOCKZ+1 |
CURCASE | CASLOCK+7~, CASLOCK+12*, CASLOCK+14, CASLOCK+29, CASLOCK+32, CASLOCK+34 |
DATA | CASLOCK~, CASLOCK+12, CASLOCK+13, CASLOCK+15, CASLOCK+17 |
DATAOUT | CASLOCK+7~, CASLOCK+10*, CASLOCK+37*, CASLOCKZ+1 |
DAYCASE | CASLOCK+8~, CASLOCK+10*, CASLOCK+21*, CASLOCK+22*, CASLOCK+26, CASLOCK+27, CASLOCK+28, CASLOCK+29, CASLOCK+31, CASLOCK+36 , LOCKACT~, LOCKACT+21, LOCKACT+32, LOCKACT+36, LOCKACT+37, LOCKACT+51, LOCKACT+52, LOCKACT+53, LOCKACT+57, LOCKACT+59 , LOCKACT1, LOCKOUT~, LOCKOUT+17, LOCKOUT+18 |
DIQUIET | CASLOCK+7~, CASLOCK+9* |
DUZ | LOCKOUT+17 |
ERR | ERR~* |
GOTLOCK | CASLOCK+8~, CASLOCK+30*, CASLOCK+32 |
ILOCK | LOCKOUT+4~, LOCKOUT+5*, LOCKOUT+6, LOCKOUT+7, LOCKOUT+9, LOCKOUT+10, LOCKOUT+11, LOCKOUT+12, LOCKOUT+13, LOCKOUT+16 , LOCKOUT+17, LOCKOUT+18, LOCKOUT+19, LOCKOUT+20 |
LOCKED | CASLOCK+8~ |
LOCKLEV | LOCKACT+12~, LOCKACT+15, LOCKACT+17, LOCKACT+20, LOCKACT+23, LOCKACT+39, LOCKACT+55, LOCKACT1, LOCKOUT~, LOCKOUT+3 , LOCKOUT+6, LOCKOUT+7 |
LOGDATA | CASLOCK+8~, CASLOCK+33*, CASLOCK+34*, CASLOCK+35, CASLOCK+36, LOCKACT~, LOCKACT+13*, LOCKACT1, LOCKOUT~, LOCKOUT+2* , LOCKOUT+17 |
LONGACN | CASLOCK+8~, CASLOCK+19*, CASLOCK+22 |
MAGGRY | ERR, CASLOCK~, CASLOCK+11!*, CASLOCKZ+1 |
>> MAGJOB("REMOTE" | CASLOCK+34 |
>> MAGJOB("USER" | LOCKACT+32, LOCKACT+36, LOCKACT+53, LOCKOUT+17 |
MAGLST | CASLOCK+7~, CASLOCK+10*, CASLOCK+11 |
MAGS | CASLOCK+8~ |
MYLOCK | CASLOCK+8~, CASLOCK+31, LOCKACT+12~, LOCKACT+17, LOCKACT+19, LOCKACT+48, LOCKACT+58, LOCKACT1, LOCKOUT~ |
MYLOCK( | LOCKOUT+9, LOCKOUT+16 |
MYLOCK(1 | CASLOCK+32, CASLOCK+37, LOCKACT+21, LOCKACT+24, LOCKACT+27, LOCKACT+40, LOCKACT+43, LOCKACT+44, LOCKACT+57, LOCKACT+59 |
MYLOCK(2 | CASLOCK+33, CASLOCK+37, LOCKACT+27, LOCKACT+30, LOCKACT+31, LOCKACT+33, LOCKACT+46, LOCKACT+51, LOCKACT+52, LOCKACT+56 |
RACN | CASLOCK+8~, CASLOCK+19*, CASLOCK+21 |
RACNI | CASLOCK+7~, CASLOCK+13*, CASLOCK+16, CASLOCK+18, CASLOCK+35, CASLOCKZ+1 |
RADFN | CASLOCK+7~, CASLOCK+13*, CASLOCK+16, CASLOCK+18, CASLOCK+35, CASLOCKZ+1, LOCKACT+32, LOCKACT+36, LOCKACT+53 |
RADTE | CASLOCK+8~, CASLOCK+20*, CASLOCK+21 |
RADTI | CASLOCK+7~, CASLOCK+13*, CASLOCK+16, CASLOCK+18, CASLOCK+20, CASLOCK+35, CASLOCKZ+1 |
RARPT | CASLOCK+7~, CASLOCK+13*, CASLOCK+16, CASLOCK+26, CASLOCK+27, CASLOCK+29, CASLOCK+31, CASLOCK+36, CASLOCKZ+1, LOCKACT~ , LOCKACT+15, LOCKACT+17, LOCKACT1, LOCKOUT~, LOCKOUT+11, LOCKOUT+13, LOCKOUT+17, LOCKOUT+18, LOCKOUT+20 |
REPLY | CASLOCK+7~, CASLOCK+15*, CASLOCK+17*, CASLOCK+28*, CASLOCK+29, CASLOCKZ+1 |
REQUEST | LOCKACT~, LOCKACT+15, LOCKACT+18, LOCKACT+21, LOCKACT+22, LOCKACT+25, LOCKACT+28, LOCKACT+30, LOCKACT+32, LOCKACT+33 , LOCKACT+34, LOCKACT+36, LOCKACT+37, LOCKACT+38, LOCKACT+41, LOCKACT+44, LOCKACT+46, LOCKACT+47, LOCKACT+49, LOCKACT+52 , LOCKACT+53, LOCKACT+54, LOCKACT+59, LOCKACT+60 |
RESULT | CASLOCK+8~, CASLOCK+26, CASLOCK+27, CASLOCK+29, CASLOCK+30, LOCKACT~, LOCKACT+13!*, LOCKACT+15, LOCKACT1, LOCKOUT~ , LOCKOUT+2*, LOCKOUT+12*, LOCKOUT+19* |
RESULT(1 | CASLOCK+27 |
RESULT(2 | CASLOCK+27 |
STS | CASLOCK+25~*, CASLOCK+28 |
U | CASLOCK+12, CASLOCK+13, CASLOCK+14, CASLOCK+19, CASLOCK+23, CASLOCK+28, CASLOCK+34, CASLOCKZ+1, PNAM+1, LOCKACT+14 , LOCKACT+21, LOCKACT+27, LOCKACT+29, LOCKACT+30, LOCKACT+32, LOCKACT+33, LOCKACT+34, LOCKACT+36, LOCKACT+37, LOCKACT+43 , LOCKACT+44, LOCKACT+46, LOCKACT+47, LOCKACT+51, LOCKACT+52, LOCKACT+53, LOCKACT+57, LOCKACT+59, LOCKOUT+10, LOCKOUT+12 , LOCKOUT+16, LOCKOUT+17, LOCKOUT+19, LOCKOUT+20 |
X | CASLOCK+23*, CASLOCK+24, CASLOCK+25, PNAM~, PNAM+1*, PNAM+2*, PNAM+3 |
XX | CASLOCK+7~, CASLOCK+18*, CASLOCK+19, CASLOCK+23 |