Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: RAO7PC1A

Package: Radiology Nuclear Medicine

Routine: RAO7PC1A


Information

RAO7PC1A ;HISC/GJC-Procedure Call utilities (cont) ;1/22/03 12:41

Source Information

Source file <RAO7PC1A.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ($$DT,$$FMADD)^XLFDT  ($$LOW,$$UP)^XLFSTR  
Radiology Nuclear Medicine 1 ($$BASICMOD,$$NAMCODE)^RACPTMSC  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Radiology Nuclear Medicine 6 RAO7PC1  RAO7PC2  RAO7PC3  RAPROD  RAPXRM  RARTR1  

Entry Points

Name Comments DBIA/ICR reference
CASE ; Return the case numbers and the total number of case numbers
; associated with a particular order. Called from CASE^RAO7PC1.
; Sets RARRAY(case #)="" for all cases associated with an order.
; Sets first piece of RATTL to the number of cases found for an
; order, and the second piece is PRINTSET if the report covers
; multiple cases. See CASE^RAO7PC1 for more information.
RSTAT() ; Get report status name from GET1^DIQ
; RARPT is IEN of file 74
UL(R) ;Upper and Lower case
EN2 ; IA: 2012, Return last 7 days of non-cancelled exams
; Required: RADFN (valid patient ien) called from EN2^RAO7PC1
; Output:
; ^TMP($J,"RAE7",Patient IEN,Exam ID)=procedure name^case number^
; report status^imaging location IEN^imaging location name^
; contrast medium or media used
; Note: Single characters in parenthesis indicate contrast
; involvement: (I)=Iodinated ionic; (N)=Iodinated non-ionic;
; (L)=Gadolinium; (C)=Oral Cholecystographic; (G)=Gastrografin;
; (B)=Barium; (M)=unspecified contrast media
SETDATA ; Called from within the EN1 subroutine of RAO7PC1
; Sets the ^TMP($J,"RAE1",patient ien,Exam ID) node.
; See EN1^RAO7PC1 for further explanation.
UPQ
CPTMOD ;extract cpt modifiers if any

External References

Name Field # of Occurrence
$$GET1^DIQ RSTAT+3
$$BASICMOD^RACPTMSC CPTMOD+6
$$NAMCODE^RACPTMSC SETDATA+25
$$DT^XLFDT EN2+16
$$FMADD^XLFDT EN2+17
$$LOW^XLFSTR UL+4
$$UP^XLFSTR SETDATA+39, SETDATA+41, UL+6, UL+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RARPT - [#74] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(72 - [#72] SETDATA+18, SETDATA+20, SETDATA+29, SETDATA+35, CASE+17, EN2+29
^RA(78.3 - [#78.3] SETDATA+39, SETDATA+41
^RA(79 - [#79] SETDATA+37
^RA(79.1 - [#79.1] SETDATA+10, EN2+21
^RA(79.2 - [#79.2] SETDATA+11
^RADPT - [#70] SETDATA+8, SETDATA+12, SETDATA+13, SETDATA+54, SETDATA+64, CASE+16, EN2+19, EN2+20, EN2+23, EN2+24
, EN2+30, CPTMOD+2, CPTMOD+4, CPTMOD+5
^RADPT("AO" CASE+7, CASE+11, CASE+13, CASE+15
^RAMIS(71 - [#71] SETDATA+23, SETDATA+56, EN2+27
^RAO(75.1 - [#75.1] SETDATA+18, SETDATA+19, SETDATA+56, CASE+6
^RARPT - [#74] SETDATA+45
^SC - [#44] SETDATA+10, EN2+22
^TMP($J SETDATA+44*, SETDATA+45*, SETDATA+58*, EN2+13!, EN2+33*, CPTMOD+7*

Label References

Name Line Occurrences
$$RSTAT SETDATA+43, EN2+32
$$UL SETDATA+43, EN2+32
CPTMOD SETDATA+46
UPQ UL+6

Naked Globals

Name Field # of Occurrence
^( EN2+30, CPTMOD+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIERR RSTAT+2~
DT SETDATA+25, EN2+16
I EN2+14~, EN2+30*
L UL+3~, UL+5*, UL+6, UL+7*, UL+8
R RSTAT+2~, RSTAT+3*, RSTAT+4*, RSTAT+5, UL~, UL+4
R2 UL+3~, UL+4*, UL+5, UL+6*, UL+7, UL+8*, UPQ
RA SETDATA+7~, CPTMOD+3*, CPTMOD+4*, CPTMOD+5
RA1 SETDATA+7~, CPTMOD+3*, CPTMOD+7*
RA2 SETDATA+7~, CPTMOD+5*, CPTMOD+6*, CPTMOD+7
RA3 SETDATA+7~, SETDATA+56*, SETDATA+57*, SETDATA+58
RABDT EN2+14~, EN2+17*, EN2+18
>> RABNOR SETDATA+39*, SETDATA+40*, SETDATA+44
>> RABNORMR SETDATA+41*, SETDATA+42*, SETDATA+44
>> RACINC SETDATA+29, SETDATA+35
RACMEDIA EN2+14~, EN2+30*, EN2+33
RACNI CASE+10~, CASE+14*, CASE+15*, CASE+16
RACNST EN2+14~, EN2+16*, EN2+18
>> RACNT SETDATA+47*, SETDATA+54*, SETDATA+61
>> RACPT SETDATA+24*, SETDATA+25*, SETDATA+26*, SETDATA+44
RACSE SETDATA+22*, SETDATA+44, EN2+14~, EN2+26*, EN2+33
RADFN SETDATA+8, SETDATA+12, SETDATA+13, SETDATA+44, SETDATA+45, SETDATA+54, SETDATA+58, SETDATA+64, CASE+10~*, CASE+11*
, CASE+13, CASE+15, CASE+16, EN2+13, EN2+19, EN2+20, EN2+23, EN2+24, EN2+30, EN2+33
, CPTMOD+2, CPTMOD+4, CPTMOD+5, CPTMOD+7
>> RADIAG SETDATA+30*, SETDATA+39, SETDATA+41
RADT EN2+14~, EN2+16*, EN2+17
RADTI CASE+10~, CASE+12*, CASE+13*, CASE+15, CASE+16
RAEDT EN2+14~, EN2+17*, EN2+18
RAEXAM CASE+10~, CASE+16*, CASE+17, CASE+18, CASE+23
>> RAEXN SETDATA+61
>> RAEXNP SETDATA+53, SETDATA+64
RAIBDT SETDATA+8, SETDATA+12, SETDATA+13, SETDATA+21, SETDATA+54, SETDATA+64, EN2+14~, EN2+18*, EN2+19*, EN2+20
, EN2+23, EN2+24, EN2+25, EN2+30, CPTMOD+2, CPTMOD+4, CPTMOD+5
RAIEDT EN2+14~, EN2+18*, EN2+19
RAILOC SETDATA+9*, SETDATA+10*, SETDATA+44, SETDATA+67!
RAITY SETDATA+9*, SETDATA+11, SETDATA+67!
RAITY(0 SETDATA+11*, SETDATA+44
RALOC EN2+14~, EN2+21*, EN2+22*, EN2+33
RALOC(0 EN2+21*, EN2+22, EN2+33
RANO SETDATA+8*, SETDATA+12*, SETDATA+13, SETDATA+21, SETDATA+54, SETDATA+64, EN2+14~, EN2+20*, EN2+23*, EN2+24
, EN2+25, EN2+30, CPTMOD+2, CPTMOD+4, CPTMOD+5
>> RAOIFN CASE+6, CASE+7, CASE+11, CASE+13, CASE+15
RAORDER SETDATA+15*, SETDATA+18, SETDATA+19, SETDATA+56, SETDATA+65!
RAORDER(7 SETDATA+19*, SETDATA+44
RAPRC SETDATA+23*, SETDATA+24, SETDATA+27*, SETDATA+44, EN2+15~, EN2+27*, EN2+28*, EN2+33
RAREX EN2+15~
RAREX(0 SETDATA+8*, SETDATA+9, SETDATA+37, EN2+20*, EN2+21, CPTMOD+6
RARPT SETDATA+30*, SETDATA+37, SETDATA+44, SETDATA+45, EN2+15~, EN2+31*, RSTAT+3
RARPTST SETDATA+43*, SETDATA+44, EN2+15~, EN2+32*, EN2+33
>> RARRAY CASE+18
>> RASHOCAN SETDATA+35, SETDATA+36*, SETDATA+37*
>> RATTL CASE+6*, CASE+8*, CASE+18*, CASE+22*, CASE+23*
RAXAM EN2+15~
RAXAM(0 SETDATA+13*, SETDATA+14, SETDATA+15, SETDATA+18, SETDATA+20, SETDATA+22, SETDATA+23, SETDATA+29, SETDATA+30, SETDATA+35
, SETDATA+54, SETDATA+55, SETDATA+58, EN2+24*, EN2+26, EN2+27, EN2+29, EN2+31
RAXID SETDATA+21*, SETDATA+44, SETDATA+45, SETDATA+58, EN2+15~, EN2+25*, EN2+33, CPTMOD+7
>> RAXIT SETDATA+12, SETDATA+61*, SETDATA+64*
RAXSTAT SETDATA+20*, SETDATA+65!, EN2+15~
RAXSTAT(0 SETDATA+20*, SETDATA+44
U SETDATA+18, SETDATA+22, SETDATA+23, SETDATA+27, SETDATA+30, SETDATA+39, SETDATA+41, SETDATA+44, SETDATA+45, SETDATA+54
, SETDATA+55, SETDATA+56, SETDATA+58, EN2+21, EN2+26, EN2+27, EN2+28, EN2+30, EN2+31, EN2+33
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All