Call Graph
Call Graph Total: 3
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 2 | (EN1,EN3,EN30)^RAO7PC1 EN3^RAO7PC3 |
| VA FileMan | 1 | $$GET1^DIQ |
VPRSDAR ;SLC/MKB -- SDA Radiology utilities ;8/6/18 12:21
Source file <VPRSDAR.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 2 | (EN1,EN3,EN30)^RAO7PC1 EN3^RAO7PC3 |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
|---|---|---|
| PRE | ; -- PreProcessing for VPR RAD ORDER
; Expects DFN, DSTRT, DSTOP, DMAX from EN^DDEGET |
|
| POST | ; -- PostProcessing for VPR RAD ORDER
|
|
| ONE(RAID) | ; -- ID Processing for each VPR RAD RESULT (RAID = #75.1 ien)
; Returns VPRAE1 = ^TMP($J,"RAE1",DFN,Exam ID) ; VPRAE2 = $NA(^TMP($J,"RAE2",DFN,caseIEN,procedureName)) ; RARPT = Report #74 IEN ; RAPROC = Procedure name ; RAID = #70.03 IEN string |
|
| ABN() | ; -- return "A" if any report for exam(s) is abnormal, else null
|
|
| RPTS | ; -- find patient's radiology reports
|
|
| RPT1 | ; -- ID Processing for each VPR RAD REPORT
; Returns VPRXID = Exam-Case ID ; VPRAE2 = $NA(^TMP($J,"RAE2",DFN,caseIEN,procedureName)) ; VPRAE3 = $NA(^TMP($J,"RAE3",DFN,caseIEN,procedureName)) ; RAPROC = Procedure name |
|
| VNUM(DFN,EXAMID) | ; -- return Visit# for patient, examID
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | PRE+5 |
| ^RADPT - [#70] | RPT1+11 |
| ^RADPT("AO" | PRE+6, ONE+8 |
| ^RARPT - [#74] | RPT1+8 |
| ^TMP($J | PRE+8!, POST+1!, ONE+12, ONE+16!, ONE+17, ONE+18, ONE+20, ONE+25, ONE+27, ABN+4 , ABN+5, RPTS+3!, RPTS+5, RPTS+6, RPTS+11!, RPT1+15!, RPT1+17, RPT1+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BEG | PRE+2~, PRE+3*, PRE+7*, PRE+8 |
| CASE | ONE+7~, ONE+8*, ONE+9, ONE+10, ONE+17, ONE+18, ONE+24, ONE+25*, ONE+26, ONE+29 , ABN+1~, ABN+4*, ABN+5 |
| >> DDEOUT | ONE+9*, ONE+13*, ONE+14*, ONE+17*, RPT1+12* |
| DFN | PRE+5*, PRE+6, PRE+8, POST+1, ONE+8, ONE+12, ONE+17, ONE+18, ONE+20, ONE+25 , ONE+27, ABN+4, ABN+5, RPTS+2*, RPTS+3, RPTS+5, RPTS+6, RPT1+8*, RPT1+11, RPT1+13 , RPT1+14~, RPT1+17, RPT1+19, VNUM~, VNUM+2 |
| >> DIEN | RPT1+7*, RPT1+8, RPT1+11 |
| >> DLIST( | RPTS+9* |
| >> DMAX | PRE+3, RPTS+3 |
| >> DSTOP | PRE+3, RPTS+3 |
| >> DSTRT | PRE+3, RPTS+3 |
| END | PRE+2~, PRE+3*, PRE+7*, PRE+8 |
| EXAM | ONE+7~, ONE+10*, ONE+12, ONE+20, ONE+26*, ONE+27 |
| EXAMID | VNUM~, VNUM+2 |
| I | RPT1+10~*, RPT1+11*, VNUM+1~, VNUM+2* |
| >> ID | PRE+4, PRE+5 |
| IDT | PRE+6*, PRE+7, ONE+7~, ONE+8*, ONE+10, ONE+18, ONE+26, VNUM+1~, VNUM+2* |
| IENS | VNUM+1~, VNUM+2*, VNUM+3 |
| MAX | PRE+2~, PRE+3*, PRE+8 |
| ORPK | POST+2! |
| RA0 | RPT1+6~, RPT1+8*, RPT1+10 |
| RACNT | RPT1+14~ |
| RAE1 | ONE+24~, ONE+27*, ONE+29 |
| RAID | ONE~, ONE+8, ONE+16, ONE+18* |
| RAMDIV | RPT1+14~ |
| RAORD | PRE+2~, PRE+5*, PRE+6 |
| RAPROC | POST+2!, ONE+21*, ONE+22*, ONE+23*, RPT1+19*, RPT1+20* |
| RAPRTSET | RPT1+14~ |
| RARPT | POST+2!, ONE+10!, ONE+14*, ONE+24, ABN+2, RPTS+1~, RPTS+6*, RPTS+8, RPTS+9, RPTS+10 |
| RARPT( | ONE+24*, ONE+29*, RPTS+8, RPTS+10* |
| RAWHOVER | RPT1+14~ |
| RPT | ONE+24~, ONE+29* |
| STS | ONE+12*, ONE+13, ONE+27*, ONE+28, RPTS+1~, RPTS+6*, RPTS+7 |
| TYPE | ONE+7~, ONE+20*, ONE+21, ONE+22, ONE+23 |
| U | PRE+5, ONE+12, ONE+14, ONE+21, ONE+22, ONE+23, ONE+27, ONE+29, ABN+3, ABN+6 , RPTS+6, RPT1+8, RPT1+10, RPT1+11, RPT1+13 |
| VPRAE1 | POST+2!, ONE+12*, ONE+14, ONE+21, ABN+3 |
| VPRAE2 | POST+2!, ONE+18*, RPT1+17* |
| >> VPRAE3 | RPT1+17*, RPT1+20 |
| VPRN | RPTS+1~, RPTS+4*, RPTS+9* |
| VPRXID | RPTS+1~, RPTS+5*, RPTS+6, RPTS+9, RPT1+7*, RPT1+9, RPT1+10*, RPT1+11*, RPT1+12, RPT1+13 |
| X | ABN+1~, ABN+5*, ABN+6, RPT1+6~, RPT1+13*, RPT1+16 |
| Y | ABN+1~*, ABN+2, ABN+3*, ABN+4, ABN+6*, ABN+7, VNUM+1~, VNUM+3*, VNUM+4 |
