ISIJRPT ; ISI/JHC - ISIRAD Report Entry functions ; 10/17/2022
Source file <ISIJRPT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ERR | ;
|
|
RPTOPEN(MAGGRY,PARAMS) | ;
; PARAMS: TXID ^ CASEID [ | CASEID-2 | etc. ] -- (one or more Cases accepted for input) ; TXID: 0: View only; 1: EDIT report; 2: AMEND report ; CASEID: RADFN ^ RADTI ^ RACNI ^ RARPT ("normal" identifier for VistARad) ; Reply message: ; # Lines to follow (0-n) ^ Reply Code ~ Reply display text ; Reply Code- 0-Normal; 3-Abnormal; 4-Error ; Exams List: ; Text | Case ID | "Active" flag ^ DX Code flag ^ Required elements flag ^ Case # ^ CPT ^ Procedure ; Report data follows (for Amend pathway & Edit Draft pathways): ; *REPORT Start for REPORT ; (1:N lines of text follow) ; *REPORT_END End ; *IMPRESSION Start ; (1:N lines of text follow) ; *IMPRESSION_END end ; *DXCODE Start ; Code ^ Text (1:N lines of follow) ; *DXCODE_END end |
|
RPTOPENZ | ;
|
|
ONELINE(EXAM,REQFLAGS) | ; Format output lines--details at rpc entry point
|
|
RPTLOCK(MAGGRY,PARAMS) | ; Lock or UNlock exams
; Locks done here are solely for exams in status "I" or "C" ; PARAMS: TXID ^ CASEID [ | CASEID-2 | etc. ] -- (one or more Cases accepted for LOCK) ; TXID: 1: Lock (1 or more OK); 0: Unlock (UNLOCK only one at a time) ; 11: Lock (1 or more OK); 10: Unlock ( ditto ) ; * 11 & 10 apply only to Status Code "R" exams ; CASEID: RADFN ^ RADTI ^ RACNI ^ RARPT ("normal" identifier for VistARad) ; Reply message: ; Reply Code ~ Reply display text ; Reply Code: 0-Normal; 3-Abnormal; 4-Error ; Note re TXID=11--this locks exams of vistarad category "R", which normally ; have no images when initiating the report, and therefore no RARPT entry yet ; the pre-processing detects this state, and calls ^raric to create it |
|
RPTLOCKZ | ;
|
|
LOCKRPT(RARPT,LOCKED) | ; for input rarpt, return success/fail for lock attempt
|
|
LOCKEX(CASEID,RASTCAT,LOCKED) | ; for input caseid, return success/fail for lock attempt
; 1) Lock the Exam level--this will persist for the report entry session (protects Tech field update) ; Return: Lock successful 0/1 |
|
LOCKCHK(CASEID,RASTCAT,DAYCASE) | ; does current user have a lock?
; Return: 1=Locked by me; nil=not locked; INI[:R] or Text=Locked/Reserved by other |
|
READYINT(IMGTYP) | ; "Ready for Interpretation" feature enabled? -- P106 enhancement
; --> If is enabled for input Type of Imaging, returns field # & data value to stuff into Exam Record ; current (perhaps only) user is RTT: called by ISIRAD03 ; |
|
END | ;
|
RPC Name | Call Tags |
---|---|
ISIJ REPORT ENTER | RPTOPEN |
ISIJ LOCK REPORT | RPTLOCK |