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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: MCARENV1

Package: Medicine

Routine: MCARENV1


Information

MCARENV1 ;WISC/MLH-MEDICINE PACKAGE INSTALLATION-ENVIRONMENT CHECK ROUTINE #2 ;5/2/96 10:26

Source Information

Source file <MCARENV1.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
NOTIFY(X) ; alert user to cleanup, allow them to bail out
NOTIFY1(X) ; alert user to cleanup -- part 2

External References

Name Field # of Occurrence
^DIR NOTIFY+29, NOTIFY1+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"OK, stopping the installation here..nothing changed!"
  • Line Location: MCARENV1+13
Function Call: WRITE
  • Prompt: @IOF,"*********************************************************"
  • Line Location: NOTIFY+1
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY+2
Function Call: WRITE
  • Prompt: !,"* "
  • Line Location: NOTIFY+3
Function Call: WRITE
  • Prompt: *7,MCSCATT(5),MCSCATT(7),"C A U T I O N !",MCSCATT(0),*7
  • Line Location: NOTIFY+4
Function Call: WRITE
  • Prompt: " *",*7
  • Line Location: NOTIFY+5
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY+6
Function Call: WRITE
  • Prompt: !,"* This pre-initialization routine will "
  • Line Location: NOTIFY+7
Function Call: WRITE
  • Prompt: MCSCATT(4),"delete",MCSCATT(0)," the *"
  • Line Location: NOTIFY+8
Function Call: WRITE
  • Prompt: !,"* ",MCSCATT(1),"DATA DICTIONARIES",MCSCATT(0)
  • Line Location: NOTIFY+9
Function Call: WRITE
  • Prompt: " (but ",MCSCATT(4),"retain",MCSCATT(0)," the data) for the *"
  • Line Location: NOTIFY+10
Function Call: WRITE
  • Prompt: !,"* following files: *"
  • Line Location: NOTIFY+11
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY+12
Function Call: WRITE
  • Prompt: !,"* 690 (MEDICAL PATIENT) *"
  • Line Location: NOTIFY+13
Function Call: WRITE
  • Prompt: !,"* 691.1 (CARDIAC CATHETERIZATION) *"
  • Line Location: NOTIFY+14
Function Call: WRITE
  • Prompt: !,"* 697 (ANATOMY) *"
  • Line Location: NOTIFY+15
Function Call: WRITE
  • Prompt: !,"* 697.5 (MEDICAL DIAGNOSIS/ICD CODES) *"
  • Line Location: NOTIFY+16
Function Call: WRITE
  • Prompt: !,"* 699.6 (DIAG/THERAP INTERVENT) *"
  • Line Location: NOTIFY+17
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY+18
Function Call: WRITE
  • Prompt: !,"* You "
  • Line Location: NOTIFY+19
Function Call: WRITE
  • Prompt: MCSCATT(1),"MUST",MCSCATT(0)," save any local modifications to the *"
  • Line Location: NOTIFY+20
Function Call: WRITE
  • Prompt: !,"* data dictionaries for these files before *"
  • Line Location: NOTIFY+21
Function Call: WRITE
  • Prompt: !,"* proceeding with this routine. *"
  • Line Location: NOTIFY+22
Function Call: WRITE
  • Prompt: !,"* (See the Installation Guide for instructions.) *"
  • Line Location: NOTIFY+23
Function Call: WRITE
  • Prompt: !,"* Any changes not saved will be "
  • Line Location: NOTIFY+24
Function Call: WRITE
  • Prompt: MCSCATT(1),"LOST!",MCSCATT(0)," *"
  • Line Location: NOTIFY+25
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY+26
Function Call: WRITE
  • Prompt: !,"*********************************************************",!
  • Line Location: NOTIFY+27
Function Call: WRITE
  • Prompt: @IOF,"*********************************************************"
  • Line Location: NOTIFY1+1
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY1+2
Function Call: WRITE
  • Prompt: !,"* "
  • Line Location: NOTIFY1+3
Function Call: WRITE
  • Prompt: *7,MCSCATT(5),MCSCATT(7),"C A U T I O N !",MCSCATT(0),*7
  • Line Location: NOTIFY1+4
Function Call: WRITE
  • Prompt: " *",*7
  • Line Location: NOTIFY1+5
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY1+6
Function Call: WRITE
  • Prompt: !,"* This pre-initialization routine will "
  • Line Location: NOTIFY1+7
Function Call: WRITE
  • Prompt: MCSCATT(4),"delete",MCSCATT(0)," the *"
  • Line Location: NOTIFY1+8
Function Call: WRITE
  • Prompt: !,"* ",MCSCATT(1),"DATA DICTIONARIES ",MCSCATT(0)
  • Line Location: NOTIFY1+9
Function Call: WRITE
  • Prompt: MCSCATT(4),"and",MCSCATT(0),MCSCATT(1)," DATA",MCSCATT(0)
  • Line Location: NOTIFY1+10
Function Call: WRITE
  • Prompt: " for the following *"
  • Line Location: NOTIFY1+11
Function Call: WRITE
  • Prompt: !,"* file: *"
  • Line Location: NOTIFY1+12
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY1+13
Function Call: WRITE
  • Prompt: !,"* 697.3 (MEDICINE SCREEN) *"
  • Line Location: NOTIFY1+14
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY1+15
Function Call: WRITE
  • Prompt: !,"* You "
  • Line Location: NOTIFY1+16
Function Call: WRITE
  • Prompt: MCSCATT(1),"MUST",MCSCATT(0)," save any local modifications to the *"
  • Line Location: NOTIFY1+17
Function Call: WRITE
  • Prompt: !,"* data dictionaries and data for this file *"
  • Line Location: NOTIFY1+18
Function Call: WRITE
  • Prompt: !,"* before proceeding with this routine. *"
  • Line Location: NOTIFY1+19
Function Call: WRITE
  • Prompt: !,"* (See the Installation Guide for instructions.) *"
  • Line Location: NOTIFY1+20
Function Call: WRITE
  • Prompt: !,"* Any changes not saved will be "
  • Line Location: NOTIFY1+21
Function Call: WRITE
  • Prompt: MCSCATT(1),"LOST!",MCSCATT(0)," *"
  • Line Location: NOTIFY1+22
Function Call: WRITE
  • Prompt: !,"* *"
  • Line Location: NOTIFY1+23
Function Call: WRITE
  • Prompt: !,"*********************************************************",!
  • Line Location: NOTIFY1+24
Routine Call
  • DIR
  • Line Location:
    • NOTIFY+29
    • NOTIFY1+26

Label References

Name Line Occurrences
$$NOTIFY MCARENV1+9
$$NOTIFY1 MCARENV1+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIFQ MCARENV1+14!
>> DIR("A" NOTIFY+28*, NOTIFY1+25*
>> DIR(0 NOTIFY+28*, NOTIFY1+25*
>> I MCARENV1+5*, MCARENV1+6*
IOF NOTIFY+1, NOTIFY1+1
IOST MCARENV1+5
MCSCATT MCARENV1+4~
MCSCATT( MCARENV1+5*, MCARENV1+6*
MCSCATT(0 NOTIFY+4, NOTIFY+8, NOTIFY+9, NOTIFY+10, NOTIFY+20, NOTIFY+25, NOTIFY1+4, NOTIFY1+8, NOTIFY1+9, NOTIFY1+10
, NOTIFY1+17, NOTIFY1+22
MCSCATT(1 NOTIFY+9, NOTIFY+20, NOTIFY+25, NOTIFY1+9, NOTIFY1+10, NOTIFY1+17, NOTIFY1+22
MCSCATT(4 NOTIFY+8, NOTIFY+10, NOTIFY1+8, NOTIFY1+10
MCSCATT(5 NOTIFY+4, NOTIFY1+4
MCSCATT(7 NOTIFY+4, NOTIFY1+4
>> OKTOGO MCARENV1+9*, MCARENV1+10*, MCARENV1+12
X NOTIFY~, NOTIFY1~
>> Y NOTIFY+30, NOTIFY1+27
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All