©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
RAORD5 ;HISC/CAH,FPT,GJC AISC/RMO-Print A Request ;8/4/97 14:47
Source file <RAORD5.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 7 | $$NAMCODE^RACPTMSC $$CMEDIA^RAO7UTL DPRC^RAORD2 $$NOSECNDS^RAORD3 ^RAORD6 $$SSN^RAUTL $$XTERNAL^RAUTL5 |
| Kernel | 2 | ($$FMDIFF,$$FMTE)^XLFDT $$LOW^XLFSTR |
| Registration | 2 | IN5^VADPT $$SITE^VASITE |
| Scheduling | 1 | $$OUTPTPR^SDUTL3 |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| Q | ||
| PHONE(X,Y) | ; Setup phone information for Resident Physicians, Attending
; Physicians, and Primary Physicians. ; 'X' -> $S('A':'Attending','OA':'Old Attending','OP':'Old Primary', ; ,'P':'Primary','R':'Resident') ; 'Y' -> ien for file 200 ; RA(X_"PHON")=Phone node <> RA(X_"OPHO")=Office phone ; RA(X_"VPGR")=Voice pager <> RA(X_"DPGR")=Digital pager ; RA(X_"PHOINFO")=office phone/voice pager/digital pager |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | RAORD5+31 |
| $$NAMCODE^RACPTMSC | RAORD5+22 |
| $$CMEDIA^RAO7UTL | RAORD5+63 |
| DPRC^RAORD2 | RAORD5+65 |
| $$NOSECNDS^RAORD3 | RAORD5+53, RAORD5+70, RAORD5+71, RAORD5+72, RAORD5+73 |
| ^RAORD6 | RAORD5+75 |
| $$SSN^RAUTL | RAORD5+12 |
| $$XTERNAL^RAUTL5 | RAORD5+19 |
| $$OUTPTPR^SDUTL3 | RAORD5+43 |
| IN5^VADPT | RAORD5+36, RAORD5+54 |
| $$SITE^VASITE | RAORD5+67 |
| $$FMDIFF^XLFDT | RAORD5+13 |
| $$FMTE^XLFDT | RAORD5+53, RAORD5+70, RAORD5+71, RAORD5+72, RAORD5+73 |
| $$LOW^XLFSTR | RAORD5+20 |
| FileNo | Call Tags |
|---|---|
| ^RAO(75.1 - [#75.1] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | RAORD5+42 |
| ^DD(71 | RAORD5+19 |
| ^DD(75.1 | RAORD5+29, RAORD5+60 |
| ^DPT - [#2] | RAORD5+10 |
| ^RA(79 - [#79] | RAORD5+68, RAORD5+69 |
| ^RA(79.1 - [#79.1] | RAORD5+74 |
| ^RA(79.2 - [#79.2] | RAORD5+24 |
| ^RADPT("AO" | RAORD5+65 |
| ^RAMIS(71 - [#71] | RAORD5+15, RAORD5+28 |
| ^RAMIS(71.2 - [#71.2] | RAORD5+30 |
| ^RAO(75.1 - [#75.1] | RAORD5+10, RAORD5+14, RAORD5+30 |
| ^SC - [#44] | RAORD5+51, RAORD5+66, RAORD5+74 |
| ^TMP($J | RAORD5+61!, Q+1! |
| ^UTILITY($J | RAORD5+11! |
| ^VA(200 - [#200] | RAORD5+32, RAORD5+60, PHONE+8 |
| Name | Line Occurrences |
|---|---|
| PHONE | RAORD5+34, RAORD5+47, RAORD5+49, RAORD5+56, RAORD5+58 |
| Q | RAORD5+10 |
| Name | Field # of Occurrence |
|---|---|
| ^( | RAORD5+69 |
| ^(0 | RAORD5+10, RAORD5+30, RAORD5+32, RAORD5+51, RAORD5+60, RAORD5+74 |
| ^(1 | RAORD5+11! |
| ^(99 | RAORD5+51 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | RAORD5+36*, RAORD5+54* |
| DIWF | RAORD5+11*, Q! |
| DIWL | RAORD5+11*, Q! |
| DIWR | RAORD5+11*, Q! |
| DT | RAORD5+22, RAORD5+67 |
| I | RAORD5+30*, Q! |
| RA | Q! |
| RA( | PHONE+8*, PHONE+9*, PHONE+10*, PHONE+11*, PHONE+12* |
| RA("AGE" | RAORD5+13* |
| RA("ATTEN" | RAORD5+46*, RAORD5+47 |
| RA("CNCAT" | RAORD5+25*, RAORD5+27! |
| RA("CPT" | RAORD5+21*, RAORD5+22*, RAORD5+25 |
| RA("DOB" | RAORD5+12*, RAORD5+13 |
| RA("HLC" | RAORD5+51* |
| RA("HPH" | RAORD5+51* |
| RA("ILC" | RAORD5+74* |
| RA("MOD" | RAORD5+30!* |
| RA("NME" | RAORD5+12* |
| RA("OATTEN" | RAORD5+55*, RAORD5+56 |
| RA("ODT" | RAORD5+53!* |
| RA("OPRIM" | RAORD5+57*, RAORD5+58 |
| RA("OST" | RAORD5+31* |
| RA("OUG" | RAORD5+29* |
| RA("PDT" | RAORD5+71!* |
| RA("PHY" | RAORD5+32*, RAORD5+34 |
| RA("PORTABLE" | RAORD5+30*, RAORD5+60* |
| RA("PRC INFO" | , RAORD5+26*, RAORD5+27* |
| RA("PRC MSG" | RAORD5+28* |
| RA("PRC NODE" | , RAORD5+15*, RAORD5+16, RAORD5+18, RAORD5+21, RAORD5+23, RAORD5+63 |
| RA("PRC" | RAORD5+16*, RAORD5+17*, RAORD5+26 |
| RA("PRCIT" | RAORD5+23*, RAORD5+24*, RAORD5+25 |
| RA("PRCTY" | RAORD5+18*, RAORD5+19*, RAORD5+20*, RAORD5+25 |
| RA("PRIM" | RAORD5+48*, RAORD5+49 |
| RA("RDT" | RAORD5+70!* |
| RA("ROOM-BED" | RAORD5+51* |
| RA("SDT" | RAORD5+73!* |
| RA("SEX" | RAORD5+12* |
| RA("ST" | RAORD5+61! |
| RA("STY_REA" | RAORD5+14* |
| RA("TRAN" | RAORD5+60* |
| RA("USR" | RAORD5+60* |
| RA("VDT" | RAORD5+72!* |
| RABARC | Q! |
| RABARC0 | Q! |
| RABARC1 | Q! |
| RACMFLG | Q+1! |
| RACMFLG("O" | RAORD5+63* |
| >> RADFN | RAORD5+10, RAORD5+36, RAORD5+43, RAORD5+54, RAORD5+65 |
| RADIV | RAORD5+67*, RAORD5+68*, RAORD5+69, Q! |
| RADIV(0 | RAORD5+66*, RAORD5+67 |
| RADIVPAR | RAORD5+69*, Q! |
| RADPT0 | RAORD5+10*, RAORD5+12, Q! |
| RALNE | RAORD5+11*, Q! |
| RALNE1 | RAORD5+11*, Q! |
| RALOC | Q+1! |
| >> RAOIFN | RAORD5+10, RAORD5+14, RAORD5+30, RAORD5+31, RAORD5+65 |
| RAORD0 | RAORD5+10*, RAORD5+13, RAORD5+15, RAORD5+28, RAORD5+29, RAORD5+31, RAORD5+32, RAORD5+34, RAORD5+51, RAORD5+53 , RAORD5+54, RAORD5+60, RAORD5+63, RAORD5+66, RAORD5+70, RAORD5+71, RAORD5+72, RAORD5+73, RAORD5+74, Q! |
| RAOSTSYM | RAORD5+11*, RAORD5+31, Q! |
| RASSN | RAORD5+12*, Q! |
| RATAB | Q! |
| RAV | Q! |
| RAXX | Q! |
| U | RAORD5+13, RAORD5+14, RAORD5+15, RAORD5+16, RAORD5+18, RAORD5+19, RAORD5+21, RAORD5+22, RAORD5+23, RAORD5+24 , RAORD5+30, RAORD5+63, PHONE+9, PHONE+10 |
| VA200 | RAORD5+36*!, RAORD5+54*!, Q! |
| VAERR | Q! |
| VAIP | RAORD5+54!, Q! |
| VAIP("D" | RAORD5+54* |
| VAIP(1 | RAORD5+51 |
| VAIP(18 | RAORD5+36*, RAORD5+46, RAORD5+47, RAORD5+55, RAORD5+56 |
| VAIP(6 | RAORD5+51 |
| VAIP(7 | RAORD5+37, RAORD5+43*, RAORD5+48, RAORD5+49, RAORD5+57, RAORD5+58 |
| X | RAORD5+42~*, Q!, PHONE~, PHONE+8, PHONE+9, PHONE+10, PHONE+11, PHONE+12 |
| X1 | Q! |
| X2 | Q! |
| X3 | Q! |
| Y | RAORD5+53*, RAORD5+70*, RAORD5+71*, RAORD5+72*, RAORD5+73*, Q!, PHONE~, PHONE+8 |
| >> ZTQUEUED | RAORD5+9 |
| >> ZTREQ | RAORD5+9* |
| ZZ | Q! |