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 |
| 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 |