ISIJUTL1 ; ISI/JHC - ISI Rad subroutines ; 10/17/2022
Source file <ISIJUTL1.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Imaging | 3 | MAGJEX1 MAGJLS2B MAGJLST1 |
| Vendor - ISI | 2 | ISIJ ASSIGN ENABLE ISIJ QUERY STATS INQUIRE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ERR | ;
|
|
| ASIGME(ASIGNEE,LIST,STATUS) | ; ISI calc truth value re assignment status vs user type
; Called by: Exam Open code to control locking of an exam, ; Exam List compile to control display of an exam ; Input: ; ASIGNEE--DUZ of assignee, required ; LIST--optional, = List # for List compile to filter appropriately for Lists ; STATUS--optional, exam Status code, used for List compile ... ; Returns: ; TRUE--ok for this user to lock an exam, or see exam list entry, acc to calling routine ; FALSE--otherwise; see logic below |
|
| ASSTATUS(STS) | ; return False if status is Waiting or Examined
; exams in these statuses are of interest regarding locks & list display |
|
| ASENA(MAGRY) | ; RPC: ISIJ ASSIGN ENABLE
; Deprecated functionality--reply will disable function in client ; RETURN: 0 ^ Menu ; Menu -- Hard code to nil |
|
| QRYSTAT | ; Inquire into ISIJ DYNAMIC QUERY STATS file entries
|
|
| QRYSLOOP | ||
| END |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| RPC Name | Call Tags |
|---|---|
| ISIJ ASSIGN ENABLE | ASENA |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("ERRTN" | ERR+2 |
| ^RA(72 - [#72] | ASSTATUS+5 |
| ^TMP($J | ASENA+9, QRYSLOOP!, QRYSLOOP+5* |
| ^VA(200 - [#200] | ASIGME+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ASIGMINE | ASIGME+10~, ASIGME+14*, ASIGME+15 |
| ASIGNEE | ASIGME~, ASIGME+13, ASIGME+14 |
| >> BY(0 | QRYSLOOP+8* |
| CT | ASENA+6~, ASENA+8*, ASENA+10 |
| DA | QRYSLOOP+5*, QRYSLOOP+7! |
| DIC | QRYSLOOP+2*, QRYSLOOP+7! |
| DIC(0 | QRYSLOOP+2* |
| >> DIQUIET | ASENA+7* |
| DR | QRYSLOOP+7! |
| DUZ | ASIGME+14, ASIGME+18 |
| >> FLDS | QRYSLOOP+9* |
| IENCT | QRYSTAT+1~, QRYSLOOP*, QRYSLOOP+5*, QRYSLOOP+7 |
| >> L(0 | QRYSLOOP+8* |
| LIST | ASIGME~, ASIGME+11*, ASIGME+16, ASIGME+21, ASIGME+22 |
| MAGIEN | QRYSTAT+1~ |
| >> MAGJOB("KEYS" | ASIGME+21 |
| >> MAGJOB("USER" | ASIGME+16, ASIGME+19, ASIGME+22 |
| MAGLST | ASENA+6~, ASENA+8*, ASENA+9 |
| MAGRY | ERR+1, ASENA~, ASENA+9!*, ASENA+11 |
| >> MENU | ASENA+8*, ASENA+10 |
| OK | ASSTATUS+2~, ASSTATUS+3*, ASSTATUS+6*, ASSTATUS+7*, ASSTATUS+8*, ASSTATUS+9 |
| RADTECH | ASIGME+10~, ASIGME+18*, ASIGME+19, ASIGME+22 |
| REPLY | ASENA+6~, ASENA+10*, ASENA+11 |
| RESULT | ASIGME+10~, ASIGME+12*, ASIGME+16*, ASIGME+23*, ASIGME+24 |
| STATUS | ASIGME~, ASIGME+11*, ASIGME+17 |
| STS | ASSTATUS~, ASSTATUS+4, ASSTATUS+5 |
| TEMP | QRYSTAT+1~, QRYSLOOP*, QRYSLOOP+5 |
| U | ASSTATUS+6, ASSTATUS+7, ASSTATUS+8, ASENA+10 |
| X | ASSTATUS+2~, ASSTATUS+5*, ASSTATUS+6, ASSTATUS+7, ASSTATUS+8 |
| >> Y | QRYSLOOP+3, QRYSLOOP+4, QRYSLOOP+5 |
