RAO7PC1 ;HISC/GJC,SS-Procedure Call utilities. ; Jan 12, 2021@08:36:20
Source file <RAO7PC1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1(RADFN,RABDT,RAEDT,RAEXN,RACINC) | ;
|
|
| EN2(RADFN) | ;
|
|
| EN3(X) | ; DBIA#2265 - Return narrative text for exam(s)
; Input: ; X-> Exam id in one of two forms: ; 1) Pat. DFN^inv. exam date^Case IEN ; Retrieves a single report for a single exam ; 2) Pat. DFN^inv. exam date^ ; Retrieves all reports for a set of exams ordered on one order |
|
| EN30(RAOIFN) | ; DBIA#2266 - Return narrative text for exam(s). To be used
; with the EN3 entry point above. ; Input: RAOIFN -> the ien of Rad/Nuc Med Order |
|
| EN4(RABBRV,RAARY) | ; Return Imaging Locations
; Input: RABBRV-> Abbreviation for I-Type RAARY-> data storage array |
|
| CASE(RAOIFN,RARRAY) | ; Return the case numbers and the total number of
; case numbers associated with a particular order. ; Input: RAOIFN-order ien (75.1) ; RARRAY-data storage (local array) ; Return: RATTL-n^x where n is the number of cases in the array ; x=PRINTSET if a single report covers many cases. ; -1 if error (invalid order ien) ; -2 no registered case to date -OR- case(s) cancelled ; If -1 or -2, second piece of RATTL gives the reason ; RARRAY-local data array, array_name(case #) |
|
| DEL(X) | ; Determine the delimiter used to seperate the data
; Input: 'X'-> data seperated by a delimiter (first & second pieces ; will follow null) |
| FileNo | Call Tags |
|---|---|
| ^RA(79.1 - [#79.1] | GET1^DIQ |
