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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: RACMP

Package: Radiology Nuclear Medicine

Routine: RACMP


Information

RACMP ;HISC/GJC AISC/MJK-Complication Report (Part 1 of 3) ;4/16/96 09:47

Source Information

Source file <RACMP.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Radiology Nuclear Medicine 7 PRINT^RACMP1  (HEADER,SORT,SYNOP)^RACMP2  SETVARS^RAPSET1  (CLOSE,DATE,ZIS)^RAUTL  TIME^RAUTL1  $$EOS^RAUTL5  $$DIVLOC^RAUTL7  
Kernel 1 $$FMTE^XLFDT  
VA Fileman 1 NOW^%DTC  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Radiology Nuclear Medicine 4 RA COMPLICATION  RACMP2  RADLQ1  RADLY  

Entry Points

Name Comments DBIA/ICR reference
DIVTOT(Z) ; Check if more than one division is included in the report.
; Pass back '0' if just one division, '1' if more than one division.
ASKLOG ; Ask date range
SET ; Set data global
KILL ; Kill and quit
START ; Start processing data

External References

Name Field # of Occurrence
NOW^%DTC START+1
PRINT^RACMP1 START+21
HEADER^RACMP2 START+19, START+25
SORT^RACMP2 START+12
SYNOP^RACMP2 START+25
SETVARS^RAPSET1 RACMP+3
CLOSE^RAUTL START+15, START+28
DATE^RAUTL ASKLOG+2
ZIS^RAUTL ASKLOG+12
TIME^RAUTL1 SET+1
$$EOS^RAUTL5 START+24
$$DIVLOC^RAUTL7 RACMP+9
$$FMTE^XLFDT START+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You need to define 'NO COMPLICATION' in your Complication "
  • Line Location: RACMP+6
Function Call: WRITE
  • Prompt: "Types file",!,"in order to run this report!"
  • Line Location: RACMP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKLOG+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" ASKLOG+6, ASKLOG+7
^RA(78.1 - [#78.1] RACMP+4
^RADPT - [#70] SET+10
^RADPT("AR" START+10, START+11
^RAMIS(71 - [#71] SET+2
^TMP($J RACMP+11, RACMP+12, RACMP+13*, RACMP+15*, ASKLOG+1!, START+16, START+18, START+20, KILL+6!, KILL+7!
, KILL+8!, SET+12*, DIVTOT+3, DIVTOT+4
^VA(200 - [#200] SET+4, SET+6, SET+8

Label References

Name Line Occurrences
$$DIVTOT START+23
KILL RACMP+9, ASKLOG+2, ASKLOG+13, START+15, START+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+3, KILL+1!
%DT KILL+10!
%I KILL+1!
A RACMP+10*, RACMP+11, RACMP+12, RACMP+14, ASKLOG+1!
B RACMP+11*, RACMP+12*, RACMP+13, RACMP+15, ASKLOG+1!
BEGDATE ASKLOG+3, ASKLOG+4, ASKLOG+5!, KILL+10!
C RACMP+14*, RACMP+15, ASKLOG+1!
DUZ RACMP+3, RACMP+10, RACMP+14, KILL+1
ENDDATE ASKLOG+3, ASKLOG+4, ASKLOG+5!
I KILL+10!
IO START+1
IOM START+3, START+7, START+8, START+9
POP KILL+10!
RA0 KILL+1!
RA1 KILL+1!
RA10 KILL+1!
RA2 KILL+1!
RA3 KILL+1!
RA4 KILL+1!
RA5 KILL+1!
RA7 KILL+1!
RACCESS KILL+9!
RACCESS( RACMP+3, RACMP+10, RACMP+14, KILL+1!
RACMP RACMP+4~*, RACMP+5
RACMPTX KILL+1!, SET+10*, SET+11*, SET+12
RACNI KILL+2!, SET+10, SET+12
RACOMP KILL+2!, SET+12
RADFN START+11*, KILL+2!, SET+10, SET+12
RADIV START+19*, START+24*, KILL+2!, SET+12
RADIVNM START+23*, KILL+2!
RADTBEG ASKLOG+4*, START+10, KILL+2!
RADTBEGI ASKLOG+3*, ASKLOG+6, KILL+2!
RADTBEGX ASKLOG+6*, START+6, KILL+2!
RADTE START+10*, START+11, START+12, KILL+2!, SET+1, SET+12
RADTEND ASKLOG+4*, START+10, KILL+3!
RADTENDI ASKLOG+3*, ASKLOG+7, KILL+3!
RADTENDX ASKLOG+7*, START+6, KILL+3!
RADTI START+12*, KILL+3!, SET+10
RAERR START+4*, KILL+3!
RAEX KILL+3!
RAEX(0 SET+2, SET+4, SET+6, SET+8
RAFLG START+24*, KILL+3!
RAHDR KILL+3!
RAHDR(1 START+5*
RAHDR(2 START+6*
RAITYPE START+19*, START+24*, KILL+3!, SET+12
RALN START+3*, KILL+3!
RAMES KILL+10!
RANME KILL+4!, SET+12
RAPG START+1*, KILL+4!
RAPHY KILL+4!, SET+6*, SET+7*, SET+12
RAPOP ASKLOG+2, ASKLOG+13, KILL+4!
RAPRC KILL+4!, SET+2*, SET+3*, SET+12
RAPSTX RACMP+3*, KILL+9!
RAQUIT KILL+5!
RARE KILL+4!
RARES KILL+4!, SET+4*, SET+5*, SET+12
RASSN KILL+4!, SET+12
RASTF KILL+4!, SET+8*, SET+9*, SET+12
RATAB KILL+4!
RATAB(1 START+7*
RATAB(2 START+7*
RATAB(3 START+8*
RATAB(4 START+8*
RATAB(5 START+9*
RATAB(6 START+9*
RATDY START+3*, KILL+4!
RATME KILL+4!, SET+1*, SET+12
RAXIT START+1*, START+10, START+11, START+15, START+22, START+24*, START+25, KILL+5!
X RACMP+9*, START+16*, START+17, START+18, START+19, KILL+5!, SET+1*, DIVTOT+2~*, DIVTOT+3
Y ASKLOG+6*, ASKLOG+7*, START+17*, START+18*, START+19, KILL+5!
Y1 DIVTOT+2~, DIVTOT+3*, DIVTOT+4
Y2 DIVTOT+2~, DIVTOT+4*
Z DIVTOT~, DIVTOT+3, DIVTOT+4
ZTDESC ASKLOG+8*, KILL+5!
>> ZTQUEUED START+2
>> ZTREQ START+2*
ZTRTN ASKLOG+9*, KILL+5!
ZTSAVE KILL+5!
ZTSAVE("RACMP" ASKLOG+9*
ZTSAVE("RADT*" ASKLOG+10*
ZTSAVE("^TMP( $J, ""RA D-TYPE"", " , ASKLOG+11*, $J, ""RA I-TYPE"", " , ASKLOG+12*
ZTSAVE("^TMP($J,""RACMP""," ASKLOG+10*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All