©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
RAHLQ ;HISC/CAH,GJC AISC/SAW-Process Query Message (QRY) Type ;10/2/97 13:32
Source file <RAHLQ.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | $$DT^XLFDT |
| Radiology Nuclear Medicine | 1 | EN1^RAHLQ1 |
| Registration | 1 | DEM^VADPT |
| Package | Total | Caller Graph |
|---|---|---|
| Radiology Nuclear Medicine | 2 | RAHLBKVQ RAHLO |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QRD | ;Analyze data from the 'QRY' Message from Non-DHCP System
|
|
| EXAM | ;Look Up Query Subject by Exam/Case Number
|
|
| CHKPRV | ;Check for active interpreting staff/resident
; Examine the following two (2) conditions ; 1) Does this person have a resident or staff classification? ; 2) Is this person an active Rad/Nuc Med user? ; If 'No' to any of the above questions, set the variable RAERR to ; the appropriate error message. |
|
| EN1 | ||
| SSN | ||
| EDTCHK | ; is user permitted to edit report of a cancelled case ?
; Sets RARPT to indicate if report is allowed ; RARPT=1 if case cancelled, no report allowed ; RARPT=2 if cancelled printset, no report allowed ; RARPT=0 if case not cancelled, or user has key, or div params ; allow rpt on cancelled cases, report entry allowed |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | SSN+1, SSN+2 |
| ^RA(72 - [#72] | EDTCHK+8 |
| ^RA(79 - [#79] | EDTCHK+12 |
| ^RADPT - [#70] | SSN+3, SSN+7, SSN+9, SSN+10, EXAM+2, EXAM+3, EXAM+4, EXAM+5, EXAM+6, EDTCHK+7 , EDTCHK+10, EDTCHK+12 |
| ^RARPT - [#74] | SSN+12, EXAM+9 |
| ^TMP("RARPT-QRY" | EN1 |
| ^VA(200 - [#200] | CHKPRV+6, CHKPRV+10 |
| ^XUSEC("RA MGR" | EDTCHK+11 |
| ^XUSEC("RA VERIFY" | CHKPRV+14 |
| Name | Line Occurrences |
|---|---|
| EDTCHK | SSN+11, EXAM+7 |
| EXAM | QRD+4 |
| SSN | QRD+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN1, EDTCHK+12 |
| ^("RA" | CHKPRV+10 |
| ^(0 | SSN+10, EXAM+6, EDTCHK+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | SSN+4*, EXAM+10* |
| >> I | EN1* |
| >> RACN0 | SSN+10*, SSN+12, EXAM+6*, EXAM+9 |
| >> RACNI | SSN+8*, SSN+9*, SSN+10, EXAM+5*, EXAM+6, EDTCHK+7, EDTCHK+10 |
| >> RADFN | SSN+1*, SSN+2, SSN+3, SSN+4, SSN+7, SSN+9, SSN+10, EXAM+2*, EXAM+3, EXAM+4 , EXAM+5, EXAM+6, EXAM+10, EDTCHK+7, EDTCHK+10, EDTCHK+12 |
| >> RADTI | SSN+6*, SSN+7*, SSN+9, SSN+10, EXAM+4*, EXAM+5, EXAM+6, EDTCHK+7, EDTCHK+10, EDTCHK+12 |
| >> RAERR | EN1+2*, QRD+1*, QRD+2*, QRD+3*, SSN+1*, SSN+2*, SSN+3*, SSN+5*, SSN+16*, EXAM+2* , EXAM+3*, EXAM+4*, EXAM+5*, EXAM+6*, EXAM+7*, EXAM+8*, EXAM+9*, EXAM+10*, CHKPRV+8*, CHKPRV+12* , CHKPRV+14* |
| RAESIG | CHKPRV+12! |
| >> RAEXAM | QRD+1, QRD+3, QRD+4, EXAM+1, EXAM+2, EXAM+3, EXAM+4, EXAM+5 |
| >> RAI | SSN*, SSN+1, SSN+2, EXAM+1*, EXAM+2, EXAM+3, EXAM+4, EXAM+5 |
| >> RAMDIV | EDTCHK+12* |
| >> RAMDV | EDTCHK+12*, EDTCHK+13 |
| >> RAMLC | EDTCHK+12* |
| >> RANUMREC | SSN+7, SSN+9, SSN+13 |
| >> RARECNT | SSN+6*, SSN+7, SSN+9, SSN+13*, SSN+16, EXAM+11* |
| RARPT | QRD+5!, SSN+11, SSN+12*, SSN+13, EXAM+7, EXAM+8, EXAM+9*, EDTCHK+6*, EDTCHK+10*, EDTCHK+14* |
| >> RASSN | QRD+1, QRD+2, QRD+4, SSN*, SSN+1, SSN+2 |
| RASTATUS | EDTCHK+7*, EDTCHK+8!, EDTCHK+9! |
| >> RASUB | EN1 |
| >> RAVERF | EN1+2, CHKPRV+6, CHKPRV+10, CHKPRV+14, EDTCHK+11 |
| VA | EXAM+10! |
| VADM | SSN+4!, EXAM+10! |
| VADM(1 | SSN+5, EXAM+10 |
| VAERR | SSN+4!, EXAM+10! |