ISIJLS2C ; ISI/JHC - ISIRAD exam list functions ; 10/17/2022
Source file <ISIJLS2C.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 1 | $$EC^%ZOSV |
VA FileMan | 1 | ^%DT |
Vendor - ISI | 1 | ($$NAMEFMT,$$STRIP)^ISIJLS2 |
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 |
---|---|---|
Vendor - ISI | 1 | ISIJLS2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ERR | ||
QRSPECS(SCAN,ERRMSG,DATA) | ; * * * CALLed from isijls2 * * *
; this is used for the list Compile, and for the Query validate rpc ; SCAN -- True if this call is for the Query Compile; false for Validate Query specs ; ERRMSG -- return reason for error if detected ; DATA -- input for Validate only, contains specs values defined by user in Client ; for the Compile only (SCAN=1), initializes all "special" vars=0, ; then traverses input array & sets values per input in DATA ; remaining input vals are configured for List Sys search logic in QRMD... |
|
QRSPECS2(X) | ; X = Field_IEN ^ Value ^ Operator
; process input either indirect Tag call, or "generic" qrmdset call |
|
QRMDSET(ISPEC,IMD,VALUE,OPERATOR) | ; Create "If" logic statements for input fields
; Operator "STUFF"--pass in just the argument ; otherwise, pass in components to build the full statement |
|
QRSNN | ; process input selection fields for data validation or scan
; --> variables NOT newed inside the codelets are global to qrspecs ep; ; --> codelets for 3, 7, 8, 17, 24, 201, 207 & 208 set the "special" ; variables used in the query scanning subroutines (qrscan...) |
|
QRS3 | ; Pt Name
|
|
QRS5 | ; Priority
|
|
QRS7 | ; From/To Dates
|
|
QRS8 | ; exam status * --> structure allows multiple values
|
|
QRS9 | ; # Images (range)
|
|
QRS11 | ; imaging loc * --> structure allows multiple values
|
|
QRS15 | ; Modality
|
|
QRS17 | ; imaging type * --> structure allows multiple values
|
|
QRS24 | ; interp rist
|
|
QRS201 | ; assigned to
|
|
QRS207 | ; Pt age (range)
|
|
QRS208 | ; Pt sex
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("ERRTN" | ERR+2 |
^TMP($J | ERR*, ERR+1 |
^XTMP("MAGJ2" | QRSPECS+19, QRSPECS+44!, QRSPECS+46*, QRSPECS+47*, QRSPECS+48* |
Name | Field # of Occurrence |
---|---|
^( | QRSPECS+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AGE1 | QRSPECS+13~, QRSPECS+26*, QRSPECS+27, QRSPECS+28, QRS207+1* |
AGE2 | QRSPECS+13~, QRSPECS+26*, QRSPECS+27, QRSPECS+28, QRSPECS+29*, QRS207+1* |
ASSNCHK | QRSPECS+13~, QRS201+2* |
DATA | QRSPECS~, QRSPECS+46 |
DATA( | QRSPECS+21, QRSPECS+48 |
DUZ | QRSPECS+19, QRSPECS+44, QRSPECS+46, QRSPECS+47, QRSPECS+48 |
ERR | ERR~* |
ERRMSG | QRSPECS~, QRSPECS+18*, QRSPECS+24*, QRSPECS+28*, QRSPECS+32*, QRSPECS+34*, QRSPECS+42, QRSPECS2+8* |
ERROR | QRSPECS+8~, QRSPECS2+2*, QRSPECS2+7*, QRSPECS2+8, QRS3+3*, QRS3+4, QRS5+1*, QRS9+4*, QRS207+4* |
EXP | QRSPECS+35~, QRSPECS+38*, QRSPECS+39*, QRSPECS+40 |
I | QRSPECS+44*, QRSPECS+48*, QRS15+1~, QRS15+4* |
IMD | QRSPECS+8~, QRSPECS2+2*, QRSPECS2+3*, QRSPECS2+4, QRSPECS2+6, QRSPECS2+7, QRMDSET~, QRMDSET+8, QRMDSET+10, QRMDSET+12 , QRMDSET+13, QRS5+2, QRS15+4 |
IMD2 | QRSPECS+8~, QRSPECS2+2*, QRSPECS2+3*, QRS7+1, QRS7+5, QRS9+2, QRS207+2, QRS207+4 |
ISPEC | QRSPECS+8~, QRSPECS+18*, QRSPECS+19*, QRSPECS+21*, QRSPECS2+6, QRMDSET~, QRMDSET+12, QRMDSET+13, QRS5+2, QRS9+3 , QRS15+4 |
ISPECPRV | QRMDSET+3~, QRMDSET+8*, QRMDSET+9, QRMDSET+10 |
>> MAGGRY | ERR+1* |
>> MAGJOB("SESSION" | QRSPECS+9 |
NIMG1 | QRSPECS+13~, QRSPECS+31, QRSPECS+33, QRSPECS+34, QRSPECS+36, QRS9+1* |
NIMG2 | QRSPECS+13~, QRSPECS+31, QRSPECS+33, QRSPECS+34, QRSPECS+36, QRS9+1* |
NIMGSPEC | QRSPECS+13~, QRSPECS+40, QRS9+1*, QRS9+3* |
OPERATOR | QRSPECS+8~, QRSPECS2+2*, QRSPECS2+6, QRMDSET~, QRMDSET+6, QRMDSET+7*, QRMDSET+9, QRMDSET+10, QRMDSET+12, QRMDSET+13 |
PTNAME | QRSPECS+13~ |
PTNAME( | QRS3+4* |
PTNAME(0 | QRS3+4* |
QAGE | QRSPECS+12~, QRSPECS+16*, QRSPECS+25, QRSPECS+27*, QRSPECS+28*, QRS207+3*, QRS207+4* |
QASSN | QRSPECS+12~, QRSPECS+16*, QRS201+1*, QRS201+2*, QRS201+3* |
QDATFR | QRSPECS+12~, QRSPECS+16*, QRSPECS+23 |
QDATTO | QRSPECS+12~, QRSPECS+16*, QRSPECS+23 |
QIMGLOC | QRSPECS+14~, QRSPECS+17*, QRS11+1*, QRS11+2*, QRS11+3* |
QIMGLOC( | QRS11+2* |
QIMGTYP | QRSPECS+12~, QRSPECS+16*, QRS17+1*, QRS17+2*, QRS17+3* |
QIMGTYP( | QRS17+2* |
QNIMG | QRSPECS+12~, QRSPECS+16*, QRSPECS+30, QRSPECS+32*, QRSPECS+33, QRSPECS+34*, QRSPECS+37*, QRS9+3*, QRS9+4* |
QPTNAME | QRSPECS+12~, QRSPECS+16*, QRS3+4* |
QRIST | QRSPECS+12~, QRSPECS+16*, QRS24+1*, QRS24+2*, QRS24+3* |
QRMD | QRSPECS+8~, QRSPECS+47 |
QRMD( | QRMDSET+9*, QRMDSET+10*, QRMDSET+12*, QRMDSET+13* |
QRMDCHK | QRSPECS+8~ |
QRMDCHK( | QRMDSET+8, QRMDSET+12*, QRMDSET+13* |
QSEX | QRSPECS+12~, QRSPECS+16*, QRS208+1*, QRS208+2*, QRS208+3* |
QSTATUS | QRSPECS+12~, QRSPECS+16*, QRS8+1*, QRS8+2*, QRS8+3* |
RISTCHK | QRSPECS+13~, QRS24+2* |
SCAN | QRSPECS~, QRSPECS+12, QRSPECS+13, QRSPECS+14, QRSPECS+19, QRSPECS+20, QRSPECS+42 |
SESSION | QRSPECS+8~, QRSPECS+9*, QRSPECS+19, QRSPECS+44, QRSPECS+46, QRSPECS+47, QRSPECS+48 |
SEX | QRSPECS+13~, QRS208+2* |
STATTEST | QRSPECS+13~ |
STATTEST( | QRS8+2* |
T1 | QRSPECS+35~*, QRSPECS+36*, QRSPECS+37, QRSPECS+38 |
T2 | QRSPECS+35~*, QRSPECS+36*, QRSPECS+37, QRSPECS+38, QRSPECS+39 |
U | QRSPECS2+2, QRSPECS2+6, QRMDSET+12, QRMDSET+13 |
VALUE | QRSPECS+8~, QRSPECS2+2*, QRSPECS2+6, QRMDSET~, QRMDSET+4, QRMDSET+5*, QRMDSET+9, QRMDSET+10, QRMDSET+12, QRMDSET+13 , QRS3+1, QRS3+2*, QRS3+3, QRS3+4, QRS5+1, QRS5+2, QRS7+2, QRS8+1, QRS9+3, QRS11+1 , QRS11+2, QRS15+2, QRS15+3, QRS15+4*, QRS17+1, QRS17+2, QRS24+1, QRS201+1, QRS207+3, QRS208+1 |
VALUESTR | QRS15+1~, QRS15+3*, QRS15+4 |
VALUINT | QRS7+1~, QRS7+2*, QRS7+3*, QRS7+4, QRS7+5*, QRS7+6*, QRS7+7 |
VAR | QRS7+1~*, QRS7+7, QRS9+2~*, QRS9+3, QRS207+2~*, QRS207+3 |
X | QRSPECS+19*, QRSPECS+21*, QRSPECS+48*, QRSPECS2~, QRSPECS2+2, QRS7+3* |
>> Y | QRS7+3 |
Name | Field # of Occurrence |
---|---|
$T(@(3) | QRSPECS2+4 |