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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: RARECOV

Package: Radiology Nuclear Medicine

Routine: RARECOV


Information

RARECOV ;HISC/SWM-Recover Purged Rad/NM Report/Exam only ;4/17/03 09:39

Source Information

Source file <RARECOV.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 (,DD)^%DT  (C,NOW)^%DTC  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
EXAM ;Copy backup exam/report data
INSTRC ;
NOTDONE
Q ;K CNT,I,J,RADD,RADT,RAGET70,RAGET74,RAI,RAIEN,RAPRMPT,RAPUR,RAX
TOTALS ;
ASKDT

External References

Name Field # of Occurrence
^%DT ASKDT+3, ASKDT+18
DD^%DT ASKDT+8
C^%DTC EXAM+1, ASKDT+8
NOW^%DTC EXAM+1
^DIR RARECOV+14, RARECOV+21, RARECOV+31

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"^XTMP(""RARECOV"") exists, you must delete this before",!,"you can run another recovery.",!!
  • Line Location: RARECOV+4
Function Call: WRITE
  • Prompt: !,$P($T(INSTRC+I),";;",2)
  • Line Location: RARECOV+6
Function Call: WRITE
  • Prompt: !!?12,"IMAGING TYPES",!?12,"-------------",!
  • Line Location: RARECOV+12
Function Call: WRITE
  • Prompt: !?3,CNT,") ",I
  • Line Location: RARECOV+13
Function Call: WRITE
  • Prompt: !
  • Line Location: RARECOV+14
Function Call: WRITE
  • Prompt: !
  • Line Location: RARECOV+29
Function Call: WRITE
  • Prompt: !!,"Recovering ",$S(RAGET70&RAGET74:"Exam and Report",RAGET70:"Exam",RAGET74:"Report",1:"?")," data from backup to ^XTMP(""RARECOV"".",!
  • Line Location: EXAM+3
Function Call: WRITE
  • Prompt: !!,"-- Nothing Done --"
  • Line Location: NOTDONE+0
Function Call: WRITE
  • Prompt: !!,"Imaging Type: ",$P($G(^RA(79.2,RAIEN,0)),"^"),!
  • Line Location: TOTALS+3
Function Call: WRITE
  • Prompt: !?5,"No. of exam records recovered : ",$P(RAPUR(RAIEN),"^",6)
  • Line Location: TOTALS+4
Function Call: WRITE
  • Prompt: !?5,"No. of reports recovered : ",$P(RAPUR(RAIEN),"^",7)
  • Line Location: TOTALS+5
Function Call: WRITE
  • Prompt: !!?7,"Cut-off Date Selection **** ",$P(^RA(79.2,RAIEN,0),"^")," ****"
  • Line Location: ASKDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKDT+2
Function Call: WRITE
  • Prompt: !?7,"The default value can be changed as needed."
  • Line Location: ASKDT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKDT+18
Routine Call
  • DIR
  • Line Location:
    • RARECOV+14
    • RARECOV+21
    • RARECOV+31

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(79.2 - [#79.2] RARECOV+13, TOTALS+3, ASKDT+1
^RADPT - [#70] EXAM+5, EXAM+14, EXAM+15, EXAM+16, EXAM+17
^RADPT("AR" EXAM+4
^RAMIS(71 - [#71] EXAM+6
^RARPT - [#74] EXAM+7, EXAM+8, EXAM+9, EXAM+10, EXAM+11, EXAM+12
^XTMP("RARECOV" RARECOV+4, EXAM+2*, EXAM+9*, EXAM+10*, EXAM+11*, EXAM+12*, EXAM+14*, EXAM+15*, EXAM+16*, EXAM+17*
, TOTALS+6*, ASKDT+7*

Label References

Name Line Occurrences
ASKDT RARECOV+27
NOTDONE RARECOV+4, RARECOV+28, RARECOV+32
Q RARECOV+8, RARECOV+14, RARECOV+16, EXAM+19, ASKDT+4, ASKDT+6, ASKDT+19
TOTALS EXAM+19

Naked Globals

Name Field # of Occurrence
^( EXAM+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EXAM+1
%DT ASKDT+2!*
%DT("A" ASKDT+3*, ASKDT+18*
%DT("B" ASKDT+8*
>> CNT RARECOV+11*, RARECOV+13*, RARECOV+14, RARECOV+27, RARECOV+28, ASKDT*, ASKDT+17*, ASKDT+18, ASKDT+19
DIR RARECOV+14!, RARECOV+21!
DIR("?" RARECOV+14*, RARECOV+19*
DIR("A" RARECOV+14*, RARECOV+20*, RARECOV+30*
DIR("B" RARECOV+20*, RARECOV+31*
DIR(0 RARECOV+14*, RARECOV+19*, RARECOV+30*
>> DIRUT RARECOV+14
DTIME RARECOV+3*, RARECOV+7, ASKDT+5
>> I RARECOV+6*, RARECOV+11*, RARECOV+13*, RARECOV+15*
IOST RARECOV+5
>> J RARECOV+11*, RARECOV+13*, RARECOV+15*
>> RA0 EXAM+5*, EXAM+6
>> RACN EXAM+5*
>> RACNI EXAM+5*, EXAM+14, EXAM+15, EXAM+16, EXAM+17
>> RACRT RARECOV+5*, EXAM+6
RACUTDT ASKDT+1!
RADD ASKDT+10!
RADD( ASKDT+13*, ASKDT+14*, ASKDT+15*, ASKDT+16*, ASKDT+18
>> RADFN EXAM+4*, EXAM+5, EXAM+14, EXAM+15, EXAM+16, EXAM+17
>> RADT RARECOV+26*, EXAM+4, ASKDT+18*
>> RADTDONE ASKDT+4*, ASKDT+7, ASKDT+8
>> RADTE EXAM+4*, EXAM+9, EXAM+10, EXAM+11, EXAM+14, EXAM+15, EXAM+16
>> RADTI EXAM+4*, EXAM+5, EXAM+14, EXAM+15, EXAM+16, EXAM+17
RAEX EXAM+13!, EXAM+14*, EXAM+15*, EXAM+16*, EXAM+17
>> RAGET70 RARECOV+23*, EXAM+3, EXAM+13
>> RAGET74 RARECOV+24*, EXAM+3, EXAM+7
>> RAI ASKDT+17*, ASKDT+18
>> RAIEN RARECOV+26*, RARECOV+27*, TOTALS+1*, TOTALS+2*, TOTALS+3, TOTALS+4, TOTALS+5, TOTALS+6, ASKDT+1, ASKDT+7
, ASKDT+20
>> RAIMAG EXAM+6*, EXAM+9, EXAM+10, EXAM+11, EXAM+12, EXAM+14, EXAM+15, EXAM+16, EXAM+17
>> RANOW EXAM+1*, EXAM+2
>> RANUM ASKDT+5*, ASKDT+6, ASKDT+7, ASKDT+8
>> RAPRMPT ASKDT+11*, ASKDT+18
RAPUR RARECOV+11!
RAPUR( RARECOV+15*, RARECOV+27, EXAM+6, EXAM+9, EXAM+10, EXAM+11, EXAM+12*, EXAM+14, EXAM+15, EXAM+16
, EXAM+17*, TOTALS+2, TOTALS+4, TOTALS+5, TOTALS+6, ASKDT+20*
RAPUR(0 RARECOV+16
RARP EXAM+7!, EXAM+9*, EXAM+10*, EXAM+11*, EXAM+12
>> RARPT EXAM+5*, EXAM+7, EXAM+8, EXAM+9, EXAM+10, EXAM+11, EXAM+12
>> RARPTNP EXAM+7*
>> RAX RARECOV+27, RARECOV+28, ASKDT*, ASKDT+18*, ASKDT+19, ASKDT+20
>> RAX( RARECOV+13*, RARECOV+15
X RARECOV+7*, RARECOV+8, EXAM+2, ASKDT+2!, ASKDT+8
>> X1 EXAM+1*, ASKDT+8*
>> X2 EXAM+1*, ASKDT+8*
>> Y RARECOV+15, RARECOV+23, RARECOV+24, RARECOV+32, ASKDT+4, ASKDT+8*, ASKDT+17, ASKDT+18

Marked Items

Name Field # of Occurrence
$T(INSTRC+I RARECOV+6
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All