ISIJLS2 ; ISI/JHC - ISIRAD exam list functions ; 10/17/2022
Source file <ISIJLS2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ERR | ||
| QRYCOMP(REPLY) | ; Compile dynamic query lists
|
|
| QRSCAN | ; scan the db--Full scan
|
|
| QRSCAN1 | ;
|
|
| QRSCANP | ; Scan thru prior result records
|
|
| QREXAMS | ; process all exams this pt/dt
; "high-level" filtering performed below, for efficiency of DB scan ; any tested condition that fails sets NOGO to 1 --> skip record ; otherwise call normal list processing to check any other ; criteria and process for output |
|
| QREXAMS2(RACNI) | ; process one exam
|
|
| SETVARS(DIS,MDCVAR,LSTHDR,MDLVAR) | ; selection logic & column data modify
; *** called from magjls2b *** ; define search terms stuff for use in list selection logic (magjls2b) |
|
| QRYGET(FULLSCAN,QUERY) | ; Dynamic query find & return query specs
; Returns: ; -- fullscan TRUE if no scan results exist in this session ; -- query TRUE if query specs are defined for this session |
|
| QRYLOG | ; Log queries run; * * * called by magjls2 * * *
; --> possible future enh--create index(es) optimized for the types ; of queries that are often run, based on evaluating this log |
|
| QRYLOG2(STATREC,ISCAN) | ; init &/or return statistics record references
|
|
| NEWLOG(SESSION) | ; Create new entry in Stats file; only called if not yet defined
|
|
| AGECALC(DT1,DT2) | ; return age given 2 dates; up to 2 yrs returns decimal rsl
|
|
| NAMEFMT(X) | ; normalize name text
|
|
| STRIP(X) | ; remove up-carets, extraneous spaces
|
|
| UPCASE(X) | ; cx to uppercase
|
|
| TDELTA(T1,T2,SCALE) | ; calc time delta in $s(scale="SEC": seconds, 1: days)
|
|
| QRYRPC(MAGGRY,PARAMS,DATA) | ; ISIJ DYNAMIC QUERY -- RPC ep
; 1 = Create/Edit query (populate gui form: either new in session, or edit existing query) ; 3 = Clear session query (populate gui form) ; 2 = Validate query--validate, translate & store the specs (only if OK); else error msg |
|
| SX70SIT(X,DA) | ;Set Query Site index for RAD/NUC MED PATIENT file
|
|
| KX70SIT(X,DA) | ;Delete Query Site index for RAD/NUC MED PATIENT file
|
| RPC Name | Call Tags |
|---|---|
| ISIJ DYNAMIC QUERY | QRYRPC |
