©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
RARTR0 ;HISC/GJC-Queue/Print Radiology Rpts utility routine. ; 06 Oct 2013 11:06 AM
Source file <RARTR0.m>
| Package | Total | Caller Graph |
|---|---|---|
| Radiology Nuclear Medicine | 4 | RART1 RARTR RARTR0 RARTR1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ; Called from RARTR ;P84 GETS^DIQ added...
|
|
| HEAD | ; Set up header info for e-mail message (called from INIT^RARTR)
; 06/28/2006 BAY/KAM Remedy Call 146291 Change Patient Age to DOB |
|
| TITLE(X) | ;Return the radiology classification in lieu of the signature block title
; 'X' is the IEN of the Primary Interpreting Resident i.e, ^DD(70.03,12 ; -OR- ; 'X' is the IEN of the Primary Interpreting Staff i.e, ^DD(70.03,15 |
| Name | Field # of Occurrence |
|---|---|
| DT^DILF | HEAD+5 |
| $$GET1^DIQ | EN1+44, EN1+52, EN1+90, EN1+98 |
| GETS^DIQ | EN1+10, EN1+11 |
| ^DIWP | HEAD+53 |
| HD^RARTR | EN1+26, EN1+73 |
| $$TITLE^RARTR0 | EN1+23, EN1+70 |
| SECRES^RARTR1 | EN1+107 |
| SECSTF^RARTR1 | EN1+61 |
| $$AMENRPT^RARTR2 | HEAD+56 |
| HANG^RARTR2 | EN1+25, EN1+72 |
| $$SSN^RAUTL | HEAD+21 |
| $$PTLOC^RAUTL12 | HEAD+12 |
| $$INCR^RAUTL4 | EN1+33, EN1+34, EN1+48, EN1+52, EN1+79, EN1+80, EN1+94, EN1+98, HEAD+39, HEAD+40 , HEAD+41, HEAD+42, HEAD+51, HEAD+54, HEAD+56, HEAD+57 |
| $$ATND^RAUTL5 | HEAD+14 |
| $$PRIM^RAUTL5 | HEAD+14 |
| $$XTERNAL^RAUTL5 | HEAD+11, HEAD+13, HEAD+15 |
| $$PTSEX^RAUTL8 | HEAD+47 |
| $$FMTE^XLFDT | HEAD+9 |
| $$UP^XLFSTR | HEAD+8 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ, GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(70.02 | HEAD+15 |
| ^DD(70.03 | HEAD+11, HEAD+13 |
| ^RADPT - [#70] | HEAD+50 |
| ^RARPT - [#74] | EN1+1, HEAD+9 |
| ^TMP($J | EN1+33*, EN1+34*, EN1+35, EN1+36*, EN1+48*, EN1+52*, EN1+56*, EN1+59*, EN1+79*, EN1+80* , EN1+81, EN1+82*, EN1+94*, EN1+98*, EN1+102*, EN1+105*, HEAD+39*, HEAD+40*, HEAD+41*, HEAD+42* , HEAD+51*, HEAD+54*, HEAD+56*, HEAD+57* |
| ^UTILITY($J | HEAD+53!, HEAD+54, HEAD+55! |
| ^VA(200 - [#200] | TITLE+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIWF | HEAD+50~, HEAD+53* |
| DIWL | HEAD+50~, HEAD+53* |
| DIWR | HEAD+50~, HEAD+53* |
| DT | HEAD+14 |
| IOM | EN1+29, EN1+76 |
| IOSL | EN1+25, EN1+26, EN1+72, EN1+73 |
| RA32PSC | HEAD+50~, HEAD+54* |
| >> RAACNT | EN1+33, EN1+34, EN1+35, EN1+36, EN1+48, EN1+52, EN1+56, EN1+59, EN1+79, EN1+80 , EN1+81, EN1+82, EN1+94, EN1+98, EN1+102, EN1+105, HEAD+3*, HEAD+39, HEAD+40, HEAD+41 , HEAD+42, HEAD+51, HEAD+54, HEAD+56, HEAD+57 |
| >> RACNI | HEAD+50 |
| RACSE | HEAD+2~, HEAD+9*, HEAD+26*, HEAD+39 |
| >> RADFN | HEAD+14, HEAD+47, HEAD+50 |
| RADOB | HEAD+2~, HEAD+5 |
| RADOB(0 | HEAD+24 |
| >> RADTI | HEAD+50 |
| >> RAERRFLG | HEAD+56 |
| >> RAFOOT | EN1+25, EN1+26, EN1+72, EN1+73 |
| RAGE | HEAD+2~, HEAD+24*, HEAD+25, HEAD+26*, HEAD+39 |
| RAILOC | HEAD+2~, HEAD+15*, HEAD+16*, HEAD+34*, HEAD+41 |
| >> RALB | EN1+4 |
| >> RALBR | EN1+65*, EN1+66*, EN1+75, EN1+80, EN1+90, EN1+98 |
| >> RALBRT | EN1+69*, EN1+70*, EN1+76, EN1+81, EN1+82 |
| >> RALBS | EN1+18*, EN1+19*, EN1+28, EN1+34, EN1+44, EN1+52 |
| >> RALBST | EN1+22*, EN1+23*, EN1+29, EN1+35, EN1+36 |
| RALEN | EN1+35~*, EN1+36, EN1+81~*, EN1+82 |
| RANME | HEAD+2~, HEAD+7*, HEAD+17*, HEAD+39 |
| >> RAOOUT | EN1+16, EN1+25, EN1+61, EN1+63, EN1+72 |
| RAPCOMM | HEAD+50~*, HEAD+52, HEAD+53 |
| RAPIR | EN1+4!*, EN1+10, EN1+13, EN1+63, EN1+70, EN1+84, EN1+86, EN1+90, EN1+94, EN1+98 , EN1+104, EN1+105, EN1+108! |
| RAPIR("IENS" | EN1+10*, EN1+65, EN1+66, EN1+69 |
| RAPIR(200 | EN1+65, EN1+66, EN1+69 |
| RAPIS | EN1+4!*, EN1+11, EN1+13, EN1+16, EN1+23, EN1+38, EN1+40, EN1+44, EN1+48, EN1+52 , EN1+58, EN1+59, EN1+108! |
| RAPIS("IENS" | EN1+11*, EN1+18, EN1+19, EN1+22, EN1+38 |
| RAPIS(200 | EN1+18, EN1+19, EN1+22, EN1+38 |
| RAPRIPHY | HEAD+2~, HEAD+14*, HEAD+35*, HEAD+36, HEAD+37*, HEAD+42 |
| RAPTLOC | HEAD+2~, HEAD+12*, HEAD+30*, HEAD+40 |
| >> RAPVERF | EN1+3*, EN1+58, EN1+59, EN1+104, EN1+105 |
| RAREQPHY | HEAD+2~, HEAD+11*, HEAD+12*, HEAD+27*, HEAD+28, HEAD+29*, HEAD+40 |
| >> RARPT | EN1+1, HEAD+9 |
| >> RARPT(0 | EN1+1*, EN1+2, EN1+3, EN1+12 |
| >> RARPT(10 | EN1+2*, EN1+39, EN1+47, EN1+85, EN1+93 |
| RASERV | HEAD+2~, HEAD+13*, HEAD+16*, HEAD+38*, HEAD+42 |
| RASEX | HEAD+2~, HEAD+8*, HEAD+24 |
| RASPACE | HEAD+3~, HEAD+25*, HEAD+26, HEAD+28*, HEAD+29, HEAD+32*, HEAD+33, HEAD+36*, HEAD+37 |
| RASSN | HEAD+3~, HEAD+7*, HEAD+21*, HEAD+39 |
| RATPHY | HEAD+2~, HEAD+14*, HEAD+31*, HEAD+32, HEAD+33*, HEAD+41 |
| >> RAUTOE | EN1+25, EN1+26, EN1+27, EN1+39, EN1+47, EN1+55, EN1+56, EN1+58, EN1+59, EN1+72 , EN1+73, EN1+74, EN1+78, EN1+85, EN1+93, EN1+101, EN1+102, EN1+104, EN1+105 |
| >> RAVERF | EN1+3*, EN1+13, EN1+38, EN1+84 |
| >> RAVERFND | EN1+14*, EN1+38, EN1+84 |
| >> RAWHOVER | EN1+12*, EN1+40, EN1+44, EN1+48, EN1+52, EN1+86, EN1+90, EN1+94, EN1+98 |
| >> RAY0 | HEAD+5, HEAD+7, HEAD+8 |
| >> RAY2 | HEAD+9, HEAD+15 |
| >> RAY3 | HEAD+11, HEAD+13, HEAD+47, HEAD+49, HEAD+51, HEAD+52 |
| U | EN1+3, HEAD+51, HEAD+52 |
| X | TITLE~, TITLE+4, HEAD+50~, HEAD+53* |
| X1 | HEAD+3~ |
| X2 | HEAD+3~ |