Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Used in RPC
Print Page as PDF
Routine: MAGJLS2

Package: Imaging

Routine: MAGJLS2


Information

MAGJLS2 ;WIRMFO/JHC - Rad. Workstation RPC calls ; 10/17/2022

Source Information

Source file <MAGJLS2.m>

Entry Points

Name Comments DBIA/ICR reference
BKGERR
ERR1
ERR
ACTIVE(MAGGRY,DATA) ; EP--get Active (Unread/Recent/Pend) Exam Lists
; MAGGRY holds $NA ref to ^TMP where return msg is assembled
; all refs to MAGGRY use SS indirection
; If not use bkgnd, compile in foregnd
ACTIVEZ
FOREGND ; compile in foregnd
HISTORY ; compile History list
BKREQU ; UNREAD exams from bkgnd
BKREQR ; Recent Exams from bkgnd
BKOUT(LSTNM) ; output list from the bkgnd process
BKREQA(DATA) ; ALL Active from Bkgnd
; Copy compiles of Unread & Recent to a scratch global, & call lstout
BKGND ; EP for background compile of UNREAD exams
BKGND2 ; EP--bkgnd compile RECENT
BKGNDA
BKLOOP ; Loop & compile "master" UNREAD List only
BKGNDZ
NEWINT ; Add exams newly Interp since Recent Compile started to Recent List
; 1st, get list of candidates:
LSTCOMP(COMPFAIL) ; Compile new list; subrtn used by Active and Bkgnd tags
LSTCOMZ
CURLIST(LSTNAM,WAIT) ; return cur. list & age in secs
; RET = Current_List_Num ^ age ^ Problem_Current_List_Num
; Current_List_Num -- Nil means brand new; value means this is most current
; piece 3 populated if excessive time has elapsed, indicating potential problem
CURLISZ
DELTA(X,Y) ; calc # secs bet 2 $h values; dflt 2nd value = now
; useful limit is one day
END ;

Used in RPC

RPC Name Call Tags
MAGJ RADACTIVEEXAMS ACTIVE
Info |  Source |  Entry Points |  Used in RPC