RARTR0 ;HISC/GJC - Queue/Print Radiology Rpts utility routine. ; Feb 27, 2025@12:26:22
Source file <RARTR0.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 8 | HD^RARTR $$TITLE^RARTR0 (SECRES,SECSTF)^RARTR1 ($$AMENRPT,HANG)^RARTR2 $$PTLOC^RAUTL12 $$INCR^RAUTL4 ($$ATND,$$PRIM,$$XTERNAL)^RAUTL5 $$PTSEX^RAUTL8 |
| Kernel | 3 | $$FMTE^XLFDT $$UP^XLFSTR ($$MADD,$$NAME,$$PADD)^XUAF4 |
| VA FileMan | 3 | DT^DILF ($$GET1,GETS)^DIQ ^DIWP |
| 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 |
| 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...
|
|
| 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 |
|
| 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 |
|
| HDRFAC(RADIVDA) | ;p210/KLM - Add Facility Contact Data for FDA mammography requirement
|
| Name | Field # of Occurrence |
|---|---|
| DT^DILF | HEAD+5 |
| $$GET1^DIQ | HDRFAC+3 |
| GETS^DIQ | EN1+10, EN1+11 |
| ^DIWP | HEAD+45 |
| HD^RARTR | EN1+26, EN1+65 |
| $$TITLE^RARTR0 | EN1+23, EN1+62 |
| SECRES^RARTR1 | EN1+91 |
| SECSTF^RARTR1 | EN1+53 |
| $$AMENRPT^RARTR2 | HEAD+48 |
| HANG^RARTR2 | EN1+25, EN1+64 |
| $$PTLOC^RAUTL12 | HEAD+12 |
| $$INCR^RAUTL4 | EN1+33, EN1+34, EN1+44, EN1+45, EN1+71, EN1+72, EN1+82, EN1+83, HEAD+35, HEAD+36 , HEAD+37, HEAD+38, HEAD+43, HEAD+46, HEAD+48, HEAD+49, HDRFAC+9, HDRFAC+10, HDRFAC+11 |
| $$ATND^RAUTL5 | HEAD+14 |
| $$PRIM^RAUTL5 | HEAD+14 |
| $$XTERNAL^RAUTL5 | HEAD+11, HEAD+13, HEAD+15 |
| $$PTSEX^RAUTL8 | HEAD+40 |
| $$FMTE^XLFDT | HEAD+9 |
| $$UP^XLFSTR | HEAD+8 |
| $$MADD^XUAF4 | HDRFAC+5 |
| $$NAME^XUAF4 | HDRFAC+4 |
| $$PADD^XUAF4 | HDRFAC+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GETS^DIQ |
| ^RA(79 - [#79] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(70.02 | HEAD+15 |
| ^DD(70.03 | HEAD+11, HEAD+13 |
| ^RA(79.1 - [#79.1] | HEAD+51 |
| ^RADPT - [#70] | HEAD+42, HEAD+51 |
| ^RARPT - [#74] | EN1+1, HEAD+9 |
| ^TMP($J | EN1+33*, EN1+34*, EN1+35, EN1+36*, EN1+44*, EN1+45*, EN1+48*, EN1+51*, EN1+71*, EN1+72* , EN1+73, EN1+74*, EN1+82*, EN1+83*, EN1+86*, EN1+89*, HEAD+35*, HEAD+36*, HEAD+37*, HEAD+38* , HEAD+43*, HEAD+46*, HEAD+48*, HEAD+49*, HDRFAC+9*, HDRFAC+10*, HDRFAC+11* |
| ^UTILITY($J | HEAD+45!, HEAD+46, HEAD+47! |
| ^VA(200 - [#200] | TITLE+4 |
| Name | Line Occurrences |
|---|---|
| HDRFAC | HEAD+52 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIWF | HEAD+42~, HEAD+45* |
| DIWL | HEAD+42~, HEAD+45* |
| DIWR | HEAD+42~, HEAD+45* |
| DT | HEAD+14 |
| IOM | EN1+29, EN1+68 |
| IOSL | EN1+25, EN1+26, EN1+64, EN1+65 |
| RA32PSC | HEAD+42~, HEAD+46* |
| >> RAACNT | EN1+33, EN1+34, EN1+35, EN1+36, EN1+44, EN1+45, EN1+48, EN1+51, EN1+71, EN1+72 , EN1+73, EN1+74, EN1+82, EN1+83, EN1+86, EN1+89, HEAD+3*, HEAD+35, HEAD+36, HEAD+37 , HEAD+38, HEAD+43, HEAD+46, HEAD+48, HEAD+49, HDRFAC+9, HDRFAC+10, HDRFAC+11 |
| >> RACNI | HEAD+42 |
| RACNTR | HDRFAC+2~*, HDRFAC+8*, HDRFAC+9, HDRFAC+10, HDRFAC+11, HDRFAC+13, HDRFAC+14, HDRFAC+15 |
| RACOL | HDRFAC+2~, HDRFAC+13*, HDRFAC+14*, HDRFAC+15* |
| RACRM | HEAD+51~*, HEAD+52 |
| RACSE | HEAD+2~, HEAD+9*, HEAD+22*, HEAD+35 |
| RACSZ | HDRFAC+2~, HDRFAC+6*, HDRFAC+10, HDRFAC+14 |
| >> RADFN | HEAD+14, HEAD+40, HEAD+42, HEAD+51 |
| RADIVDA | HEAD+51~*, HEAD+52, HDRFAC~, HDRFAC+1, HDRFAC+3, HDRFAC+4, HDRFAC+5 |
| RADOB | HEAD+2~, HEAD+5 |
| RADOB(0 | HEAD+20 |
| >> RADTI | HEAD+42, HEAD+51 |
| >> RAERRFLG | HEAD+48 |
| RAFACN | HDRFAC+2~, HDRFAC+4*, HDRFAC+9, HDRFAC+13 |
| >> RAFOOT | EN1+25, EN1+26, EN1+64, EN1+65 |
| RAGE | HEAD+2~, HEAD+20*, HEAD+21, HEAD+22*, HEAD+35 |
| RAIENDIV | HDRFAC+2~ |
| RAILOC | HEAD+2~, HEAD+15*, HEAD+16*, HEAD+30*, HEAD+37 |
| >> RALB | EN1+4 |
| >> RALBR | EN1+57*, EN1+58*, EN1+67, EN1+72, EN1+79, EN1+83 |
| >> RALBRT | EN1+61*, EN1+62*, EN1+68, EN1+73, EN1+74 |
| >> RALBS | EN1+18*, EN1+19*, EN1+28, EN1+34, EN1+41, EN1+45 |
| >> RALBST | EN1+22*, EN1+23*, EN1+29, EN1+35, EN1+36 |
| RALEN | EN1+35~*, EN1+36, EN1+73~*, EN1+74 |
| RAMADDR | HDRFAC+2~, HDRFAC+4*, HDRFAC+5*, HDRFAC+6 |
| RANME | HEAD+2~, HEAD+7*, HEAD+17*, HEAD+35 |
| >> RAOOUT | EN1+16, EN1+25, EN1+53, EN1+55, EN1+64 |
| RAPCOMM | HEAD+42~*, HEAD+44, HEAD+45 |
| RAPHONE | HDRFAC+2~, HDRFAC+3*, HDRFAC+11, HDRFAC+15 |
| RAPIR | EN1+4!*, EN1+10, EN1+13, EN1+55, EN1+62, EN1+76, EN1+78, EN1+79, EN1+82, EN1+83 , EN1+88, EN1+89, EN1+92! |
| RAPIR("IENS" | EN1+10*, EN1+57, EN1+58, EN1+61 |
| RAPIR(200 | EN1+57, EN1+58, EN1+61 |
| RAPIS | EN1+4!*, EN1+11, EN1+13, EN1+16, EN1+23, EN1+38, EN1+40, EN1+41, EN1+44, EN1+45 , EN1+50, EN1+51, EN1+92! |
| 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+31*, HEAD+32, HEAD+33*, HEAD+38 |
| RAPTLOC | HEAD+2~, HEAD+12*, HEAD+26*, HEAD+36 |
| >> RAPVERF | EN1+3*, EN1+50, EN1+51, EN1+88, EN1+89 |
| RAREQPHY | HEAD+2~, HEAD+11*, HEAD+12*, HEAD+23*, HEAD+24, HEAD+25*, HEAD+36 |
| >> RARPT | EN1+1, HEAD+9 |
| >> RARPT(0 | EN1+1*, EN1+2, EN1+3, EN1+12 |
| >> RARPT(10 | EN1+2*, EN1+39, EN1+43, EN1+77, EN1+81 |
| RASERV | HEAD+2~, HEAD+13*, HEAD+16*, HEAD+34*, HEAD+38 |
| RASEX | HEAD+2~, HEAD+8*, HEAD+20 |
| RASPACE | HEAD+3~, HEAD+21*, HEAD+22, HEAD+24*, HEAD+25, HEAD+28*, HEAD+29, HEAD+32*, HEAD+33, HDRFAC+8* , HDRFAC+9*, HDRFAC+10*, HDRFAC+11* |
| RASSN | HEAD+3~, HEAD+7*, HEAD+18*, HEAD+35 |
| >> RAST | HEAD+52 |
| RATPHY | HEAD+2~, HEAD+14*, HEAD+27*, HEAD+28, HEAD+29*, HEAD+37 |
| >> RAUTOE | EN1+25, EN1+26, EN1+27, EN1+39, EN1+43, EN1+47, EN1+48, EN1+50, EN1+51, EN1+64 , EN1+65, EN1+66, EN1+70, EN1+77, EN1+81, EN1+85, EN1+86, EN1+88, EN1+89, HDRFAC+7 |
| >> RAVERF | EN1+3*, EN1+13, EN1+38, EN1+76 |
| >> RAVERFND | EN1+14*, EN1+38, EN1+76 |
| >> RAWHOVER | EN1+12*, EN1+40, EN1+41, EN1+44, EN1+45, EN1+78, EN1+79, EN1+82, EN1+83 |
| >> RAY0 | HEAD+5, HEAD+7, HEAD+8 |
| >> RAY2 | HEAD+9, HEAD+15 |
| >> RAY3 | HEAD+11, HEAD+13, HEAD+40, HEAD+41, HEAD+43, HEAD+44 |
| U | EN1+3, HEAD+43, HEAD+44, HEAD+51, HDRFAC+4, HDRFAC+5, HDRFAC+6 |
| X | TITLE~, TITLE+4, HEAD+42~, HEAD+45* |
| X1 | HEAD+3~ |
| X2 | HEAD+3~ |