Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: MAGJLS2B

Package: Imaging

Routine: MAGJLS2B


Information

MAGJLS2B ;WIRMFO/JHC VistARad RPC calls ; 29 Jul 2003 9:59 AM

Source Information

Source file <MAGJLS2B.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Imaging 2 LOCKACT^MAGJEX1A  ($$CURLIST,LSTCOMP)^MAGJLS2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Imaging 3 MAGJLS2  MAGJLS4  MAGJLST1  

Entry Points

Name Comments DBIA/ICR reference
PARAMS(X) ; Init some vars used for Exam Lists
SETVARS(LSTID) ;output control variables
LSTVAR(LSTID) ; build output columns string
SRTVAR(LSTID) ; build sort-vars string in SORTSS
; indirection used to ref string at list output (see LSTOUT)
SELVAR(LSTID) ; build selection logic executes in DIS array
CHKLOCK(RARPT,DAYCASE) ; return ini of locking user & truth flag for locking user = logon user
SHOWPLAC(X) ; return list of places to show: all defined places NOT equal to user's logon place
LSTOUT(MAGGRY,LSTID,MAGLST,LSTAGE,WRNMSG) ; Build output list, w/ sort & selection
; Input: LSTID=List def'n
; MAGLST=Indirect global ref for input records; all reads use subscript indirection
; the nodes in @MAGLST contain:
;
; Node 1 corresponds to IENs 1:17 from Data Elements dic:
; Acn# ^ Ex LOCK ^ PtName ^ Pt_ID ^ Priority ^ Proc ^ Img Date/Time ^ Status ^ # Images ^ Online?
; Img Loc'n ^ Remote Ind. ^ Images Exist? ^ Img Date/Time-sortable ^ Mdl ^ Status/Internal ^ ImgTypABB
; Node 2-- IEN's 18:28 from Data Elements dic:
; REQLOCAbb ^ REQLOCNm ^ Interp Rad'ists ^ Last4 SSN ^ Division ^ Site ^ Rist Is Me? ^ ProcMod ^ REQLOCTyp ^ CPT
; WARD
; Node 2 then appends 3 pipe-delim pieces that are passed through from list compiler (See svmag2a^magjls3)
LSTOUTZ
RISTISME(X) ; calculate truth value for Interpreting Rist = Logon Rist
; input zero to 2 DUZ values Rist1~Rist2
; output Y or N for truth value
UPDR ; Add Newly Interp exams to Recent; called from magjls2
UPDRZ
END ;

External References

Name Field # of Occurrence
LOCKACT^MAGJEX1A CHKLOCK+5
$$CURLIST^MAGJLS2 UPDR+3
LSTCOMP^MAGJLS2 UPDR+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MAG(2005.2 - [#2005.2] LSTOUT+76
^MAG(2006.1 - [#2006.1] SHOWPLAC+2
^MAG(2006.631 - [#2006.631] PARAMS+2, PARAMS+4, LSTVAR+1, SRTVAR+2, SELVAR+2, SELVAR+3
^MAG(2006.69 - [#2006.69] PARAMS+9, LSTOUT+24
^RADPT("AS" LSTOUT+45
^TMP($J LSTOUT+30!, LSTOUT+31!*, LSTOUT+33*, LSTOUT+34*, LSTOUT+56*, LSTOUT+66*, LSTOUT+90*, LSTOUT+91*, LSTOUT+92*, LSTOUTZ!
^XTMP("MAGJ" CHKLOCK+4

Label References

Name Line Occurrences
$$CHKLOCK LSTOUT+70
$$RISTISME LSTOUT+38, LSTOUT+68
$$SHOWPLAC LSTOUT+22
LSTOUTZ LSTOUT+32
LSTVAR SETVARS+1
PARAMS UPDR+1
SELVAR SETVARS+1
SETVARS LSTOUT+28
SRTVAR SETVARS+1

Naked Globals

Name Field # of Occurrence
^( LSTVAR+1, SELVAR+2, SELVAR+3, SHOWPLAC+2, LSTOUT+36
^(2 LSTOUT+36, LSTOUT+61

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BKGND PARAMS+9*, PARAMS+10, PARAMS+12
CX SELVAR+1~, SELVAR+7*, SELVAR+9
DAYCASE CHKLOCK~, CHKLOCK+3, CHKLOCK+5, LSTOUT+18~, LSTOUT+69*, LSTOUT+70
DC SELVAR+1~
DC( SELVAR+2*, SELVAR+7
DCX SELVAR+1~, SELVAR+7*, SELVAR+8, SELVAR+11
>> DELTA PARAMS+9*, PARAMS+10*
DIS SELVAR+5!, LSTOUT+17~
DIS( SELVAR+6*, SELVAR+10*, LSTOUT+41
DIS(0 SELVAR+5*, SELVAR+6*, SELVAR+10, LSTOUT+41
DL SELVAR+1~
DL( SELVAR+3*, SELVAR+6
DLX SELVAR+1~, SELVAR+6*, SELVAR+7
DUZ RISTISME+5
EXP SELVAR+1~, SELVAR+8*, SELVAR+9*, SELVAR+10
HAVEONE SRTVAR+3~, SRTVAR+4*, SRTVAR+8*, SRTVAR+12
I LSTVAR+2~, LSTVAR+4*, LSTVAR+8, SRTVAR+3~, SRTVAR+5*, SELVAR+1~, SELVAR+3*, SELVAR+7*, LSTOUT+41*, LSTOUT+50*
, LSTOUT+52*, LSTOUT+76~*, RISTISME+5~*
IDL SELVAR+1~, SELVAR+6*
IEN SHOWPLAC+1~, SHOWPLAC+2*
ILST LSTOUT+17~, LSTOUT+35*, LSTOUT+36*, LSTOUT+53, LSTOUT+54, LSTOUT+61*, LSTOUT+62, LSTOUT+90
IMD LSTOUT+17~, LSTOUT+73*, LSTOUT+84, LSTOUT+85
LASTEDIT PARAMS+1~, PARAMS+6*
LSTAGE LSTOUT~, LSTOUT+21*, LSTOUT+63, UPDR+3*
LSTHDR LSTVAR+1*, LSTVAR+8, LSTVAR+9*, LSTOUT+19~, LSTOUT+91
LSTID PARAMS+2*, PARAMS+3*, PARAMS+4, PARAMS+5*, PARAMS+11, SETVARS~, SETVARS+1, LSTVAR~, LSTVAR+1, SRTVAR~
, SRTVAR+2, SELVAR~, SELVAR+2, SELVAR+3, LSTOUT~, LSTOUT+28, UPDR+2
>> LSTNAM PARAMS+11*, PARAMS+12*, UPDR+3
>> LSTNUM UPDR+3*
>> LSTPARAM PARAMS+6*, PARAMS+8*
>> LSTREQ PARAMS+6*, PARAMS+7, PARAMS+9, PARAMS+12, LSTOUT+27, LSTOUT+45, LSTOUT+46, LSTOUT+53, LSTOUT+82
>> LSTTL PARAMS+6*, PARAMS+7*, LSTOUT+65
MAGGRY LSTOUT~, LSTOUTZ!*
>> MAGJOB("CONSOLIDATED" LSTOUT+46, LSTOUT+80
>> MAGJOB("DIVSCRN" LSTOUT+46, LSTOUT+81
>> MAGJOB("LOC" LSTOUT+50
>> MAGJOB("P32" LSTOUT+26
>> MAGJOB("REMOTE" LSTOUT+25
>> MAGJOB("REMOTESCREEN" LSTOUT+27
>> MAGJOB("SITEP" SHOWPLAC+2
MAGLST LSTOUT~, LSTOUT+32, LSTOUT+36, LSTOUT+61
MAGRACNT LSTOUT+17~, LSTOUT+29*, LSTOUT+55*, LSTOUT+56, LSTOUT+92
MD LSTOUT+19~, LSTOUT+36!, LSTOUT+73*, LSTOUT+74, LSTOUT+76, LSTOUT+77*, LSTOUT+78, LSTOUT+79*, LSTOUT+80, LSTOUT+81*
, LSTOUT+82, LSTOUT+83*, LSTOUT+84
MD( LSTOUT+40*, LSTOUT+52*
MDCVAR SELVAR+5!, LSTOUT+17~
MDCVAR( SELVAR+11*, LSTOUT+40
MDLVAR LSTVAR+1*, LSTVAR+4, LSTVAR+9*, LSTOUT+19~, LSTOUT+73
MDSVAR SRTVAR+2*, SRTVAR+5, SRTVAR+14*, LSTOUT+19~, LSTOUT+52
MODALITY LSTOUT+18~, LSTOUT+72*
MYLOCK CHKLOCK+1~, CHKLOCK+2*, CHKLOCK+8*, CHKLOCK+11*, CHKLOCK+12, LSTOUT+18~, LSTOUT+70*, LSTOUT+87
OUT LSTOUT+19~, LSTOUT+61*, LSTOUT+84*, LSTOUT+85*, LSTOUT+86*, LSTOUT+90
QX LSTOUT+19~, LSTOUT+58*, LSTOUT+61*, LSTOUT+69
RACNI LSTOUT+18~, LSTOUT+44*, LSTOUT+45
RADFN LSTOUT+18~, LSTOUT+44*, LSTOUT+45
>> RADIV LSTOUT+46*
RADTI LSTOUT+18~, LSTOUT+44*, LSTOUT+45
RARPT CHKLOCK~, CHKLOCK+3, CHKLOCK+4, CHKLOCK+5, LSTOUT+18~, LSTOUT+44*, LSTOUT+53, LSTOUT+54, LSTOUT+69*, LSTOUT+70
RAST LSTOUT+18~, LSTOUT+43*, LSTOUT+45
REMONLY LSTOUT+19~, LSTOUT+23*, LSTOUT+26*, LSTOUT+27*, LSTOUT+48, LSTOUT+49
REMOTCAS LSTOUT+19~, LSTOUT+47*, LSTOUT+48, LSTOUT+49, LSTOUT+50
RESULT CHKLOCK+1~, CHKLOCK+5, CHKLOCK+6
RESULT(1 CHKLOCK+7
RESULT(2 CHKLOCK+10
SC LSTVAR+2~, LSTVAR+3*
SELVAR SELVAR+1~
SELVAR2 SELVAR+1~
SHOWPLAC LSTVAR+6, SRTVAR+7, SHOWPLAC+1~*, SHOWPLAC+2*, SHOWPLAC+3*, SHOWPLAC+4, LSTOUT+20~, LSTOUT+22*, LSTOUT+78, LSTOUT+79
SNDREMOT LSTVAR+5, SRTVAR+6, LSTOUT+17~, LSTOUT+24*, LSTOUT+74
SORT LSTOUT+19~, LSTOUT+30*, LSTOUT+53, LSTOUT+54, LSTOUT+58, LSTOUT+61
SORTLEN LSTOUT+20~, LSTOUT+30*, LSTOUT+61
SORTSS SRTVAR+4*, SRTVAR+11*, SRTVAR+12*, SRTVAR+13*, LSTOUT+19~, LSTOUT+53, LSTOUT+54
SS SELVAR+1~, SELVAR+2*, SELVAR+3*
STATPRIORITY LSTOUT+20~, LSTOUT+72*, LSTOUT+82*, LSTOUT+88
T LSTOUT+18~, LSTOUT+44*, LSTOUT+49, LSTOUT+50*, LSTOUT+63*, LSTOUT+64*, LSTOUT+65, LSTOUT+70*, LSTOUT+76~*, LSTOUT+77
, LSTOUT+83*, LSTOUT+86*, LSTOUT+87*, LSTOUT+88*
U PARAMS+5, PARAMS+6, PARAMS+8, PARAMS+9, LSTVAR+4, LSTVAR+7, LSTVAR+8, SRTVAR+5, SRTVAR+9, SRTVAR+12
, SELVAR+7, SELVAR+8, CHKLOCK+7, CHKLOCK+10, CHKLOCK+12, SHOWPLAC+2, SHOWPLAC+3, LSTOUT+24, LSTOUT+26, LSTOUT+37
, LSTOUT+38, LSTOUT+40, LSTOUT+43, LSTOUT+44, LSTOUT+46, LSTOUT+47, LSTOUT+52, LSTOUT+53, LSTOUT+54, LSTOUT+65
, LSTOUT+67, LSTOUT+68, LSTOUT+69, LSTOUT+70, LSTOUT+71, LSTOUT+72, LSTOUT+73, LSTOUT+76, LSTOUT+84, LSTOUT+85
, LSTOUT+87, LSTOUT+88, LSTOUT+91, LSTOUT+92, UPDR+3
WHO CHKLOCK+1~, CHKLOCK+2*, CHKLOCK+7*, CHKLOCK+8, CHKLOCK+10*, CHKLOCK+11*, CHKLOCK+12
WHOLOCK LSTOUT+18~, LSTOUT+70*, LSTOUT+71, LSTOUT+87
WRNMSG LSTOUT~, LSTOUT+21*, LSTOUT+64
X PARAMS~, PARAMS+2, PARAMS+4*, PARAMS+5, PARAMS+6, PARAMS+9*, CHKLOCK+1~, CHKLOCK+7*, CHKLOCK+8, CHKLOCK+10*
, CHKLOCK+11, SHOWPLAC~, SHOWPLAC+2*, LSTOUT+32*, LSTOUT+33, LSTOUT+34, LSTOUT+40*, LSTOUT+52*, LSTOUT+73*, LSTOUT+74
, LSTOUT+78, LSTOUT+80, LSTOUT+82, LSTOUT+83, RISTISME~, RISTISME+4, RISTISME+5, UPDR+3*
XOUT LSTVAR+2~, LSTVAR+3*, LSTVAR+7*, LSTVAR+9, SRTVAR+3~, SRTVAR+4*, SRTVAR+9*, SRTVAR+12*, SRTVAR+14
XOUT2 LSTVAR+2~, LSTVAR+3*, LSTVAR+8*, LSTVAR+9
XX LSTVAR+2~, LSTVAR+4*, LSTVAR+5, LSTVAR+6, LSTVAR+7, SRTVAR+3~, SRTVAR+5*, SRTVAR+6, SRTVAR+7, SRTVAR+8
, SRTVAR+9, SRTVAR+10*, SRTVAR+11, CHKLOCK+1~, CHKLOCK+12*, CHKLOCK+13, LSTOUT+18~, LSTOUT+24*, LSTOUT+26, LSTOUT+36*
, LSTOUT+37*, LSTOUT+38*, LSTOUT+40, LSTOUT+43, LSTOUT+46, LSTOUT+47, LSTOUT+52, LSTOUT+61*, LSTOUT+65*, LSTOUT+66
, LSTOUT+67*, LSTOUT+68*, LSTOUT+69, LSTOUT+71*, LSTOUT+72, LSTOUT+73
>> XX2 LSTOUT+36*, LSTOUT+37*, LSTOUT+44, LSTOUT+61*, LSTOUT+67*, LSTOUT+85
Y RISTISME+3~*, RISTISME+5*, RISTISME+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All