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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4 - [#4] | EN4+19 |
| ^RA(72 - [#72] | EN3+57, EN3+75 |
| ^RA(79 - [#79] | EN4+19 |
| ^RA(79.1 - [#79.1] | EN4+11, EN4+12, EN4+13 |
| ^RA(79.2 - [#79.2] | EN4+10 |
| ^RADPT - [#70] | EN1+51, EN3+54, EN3+55, EN3+65, EN3+66, EN3+67, EN30+15 |
| ^RADPT("AO" | EN30+6, EN30+8, EN30+14, EN30+21 |
| ^RAO(75.1 - [#75.1] | EN30+5 |
| ^SC - [#44] | EN4+17 |
| ^TMP($J | EN1+43!, EN3+58!, EN3+63!, EN30+3! |
| Name | Line Occurrences |
|---|---|
| $$DEL | EN3+44 |
| EN3 | EN30+17, EN30+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| RAARY | EN4~, EN4+8, EN4+21 |
| RABBRV | EN4~, EN4+7, EN4+10 |
| RABDT | EN1~, EN1+37, EN1+42, EN1+44*, EN1+49 |
| RABNOR | EN1+45~ |
| RABNORMR | EN1+47~ |
| RACINC | EN1~, EN1+41* |
| RACNI | EN3+43~, EN3+52~, EN3+53*, EN3+54, EN3+55, EN3+59, EN3+64~*, EN3+65*, EN3+66, EN3+67 , EN3+76, EN3+77, EN30+7~, EN30+20*, EN30+21*, EN30+22 |
| RACNST | EN1+45~, EN1+48*, EN1+49 |
| RACNT | EN1+45~, EN1+50* |
| RACPT | EN1+45~ |
| RACSE | EN1+45~ |
| RADELIM | EN3+43~, EN3+44*, EN3+46, EN3+51, EN3+53 |
| RADFN | EN1~, EN1+37, EN1+51, EN2~, EN2+17, EN3+43~, EN3+46*, EN3+47, EN3+54, EN3+55 , EN3+59, EN3+65, EN3+66, EN3+67, EN3+77, EN30+7~, EN30+8*, EN30+14, EN30+15, EN30+17 , EN30+21, EN30+22 |
| RADIAG | EN1+45~ |
| RADIV | EN4+9~, EN4+19*, EN4+20*, EN4+21 |
| RADIV(4 | EN4+19*, EN4+20 |
| RADIV(79 | EN4+12*, EN4+19, EN4+21 |
| RADTI | EN3+43~, EN3+46*, EN3+47, EN3+54, EN3+55, EN3+58, EN3+59, EN3+65, EN3+66, EN3+67 , EN3+76, EN3+77, EN30+7~, EN30+14*, EN30+15, EN30+17, EN30+21, EN30+22 |
| RAEDT | EN1~, EN1+37, EN1+42, EN1+44*, EN1+49 |
| RAEXN | EN1~, EN1+38, EN1+43* |
| RAEXNP | EN1+38~* |
| RAIBDT | EN1+45~, EN1+49*, EN1+51* |
| RAIEDT | EN1+45~, EN1+49*, EN1+51 |
| RAILOC | EN1+45~ |
| RAINVXDT | EN3+43~, EN3+58*, EN3+76* |
| RAITY | EN1+45~, EN4+9~, EN4+10*, EN4+11 |
| RALOC | EN4+9~, EN4+17*, EN4+18*, EN4+21 |
| RALOC(0 | EN4+13*, EN4+14, EN4+17 |
| RANO | EN1+46~ |
| RAOIFN | EN30~, EN30+4, EN30+5, EN30+6, EN30+8, EN30+14, EN30+21, CASE~ |
| RAPRC | EN1+46~ |
| RAPSET | EN3+43~, EN3+48*, EN3+78* |
| RAQRYST | EN3+52~, EN3+57*, EN3+64~, EN3+75* |
| RAREX | EN1+46~ |
| RARPT | EN1+46~ |
| RARPTST | EN1+46~ |
| RARRAY | CASE~ |
| RASHOCAN | EN1+47~ |
| RASUP | EN4+9~, EN4+16* |
| RATTL | CASE+10~*, CASE+11 |
| RAX | EN4+9~, EN4+11*, EN4+12, EN4+13, EN4+16, EN4+21 |
| RAXAM | EN1+47~ |
| RAXID | EN1+47~ |
| RAXIT | EN1+47~, EN1+50*, EN1+51 |
| RAXSET | EN3+63, EN30+7~, EN30+15*, EN30+17 |
| RAXSTAT | EN1+47~ |
| RAY2 | EN30+7~, EN30+15* |
| RAY3 | EN3+52~, EN3+55*, EN3+57, EN3+64~, EN3+67*, EN3+75 |
| U | EN3+57, EN3+75, EN30+15, EN4+17, EN4+19, EN4+20, EN4+21 |
| X | EN3~, EN3+44, EN3+46, EN3+51, EN3+53, DEL~, DEL+4 |
| Y | DEL+3~, DEL+4*, DEL+5 |
| Z | DEL+3~, DEL+4*, DEL+5 |
