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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACDDFAC

Package: Alcohol Chemical Dependency

Routine: ACDDFAC


Information

ACDDFAC ;IHS/ADC/EDE/KML - CLEAN OUT AREA/HQ DB OF FACILITY ENTRIES;

Source Information

Source file <ACDDFAC.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Alcohol Chemical Dependency 4 EN1^ACDCLN  $$DD^ACDFUNC  EN4^ACDV4MES  D^ACDWRQ  
VA Fileman 3 ^DIC  YN^DICN  ^DIK  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;
K ;
EN ;EP

External References

Name Field # of Occurrence
EN1^ACDCLN EN1+25
$$DD^ACDFUNC EN1+18
EN4^ACDV4MES EN+6
D^ACDWRQ EN1+16
^DIC EN1+13
YN^DICN EN1+8, EN1+22
^DIK EN1+24, EN1+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,*7,*7,*7,"WARNING..This utility will 'PERMANENTLY DELETE' CDMIS DATA."
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"This is not a data archive (the data cannot be retrieved)",!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"This utility should only be run on machines receiving data imports."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"This utility should 'NEVER' run at the facility or on an",!,"Area machine where facilities are dialing into the Area to access CDMIS."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,*7,*7,"Facilities may not delete data using this option."
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !!,"Answer yes to 'PERMANENTLY DELETE DATA' for 'ALL' programs."
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: !,"If you answer yes, I will show you a list of programs found."
  • Line Location: EN1+11
Function Call: WRITE
  • Prompt: !,"Answer no, and you may then select individual programs."
  • Line Location: EN1+12
Function Call: WRITE
  • Prompt: !,$P(^DIC(4,DA,0),U)
  • Line Location: EN1+18
Function Call: WRITE
  • Prompt: !!!,*7,*7,"Your last chance to quit without deleting data is NOW !!??"
  • Line Location: EN1+20
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN1+21
Function Call: WRITE
  • Prompt: !!,"OK to continue"
  • Line Location: EN1+22
Function Call: WRITE
  • Prompt: " Answer Yes or No"
  • Condition for execution: %=0
  • Line Location: EN1+22
Function Call: WRITE
  • Prompt: !!,"First let me break the Visit Links....."
  • Line Location: EN1+23
Routine Call
  • DIC
  • Line Location:
    • EN1+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACDPD - [#9002170.7] Classic Fileman Calls
^ACDVIS - [#9002172.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDPD - [#9002170.7] EN1+26
^ACDPD("B" EN1+26
^ACDPD("C" EN1+9
^ACDVIS - [#9002172.1] EN1+24
^ACDVIS("B" EN1+24
^ACDVIS("C" EN1+8
^DIC(4 - [#4] EN1+18

Label References

Name Line Occurrences
EN1 EN1+12
K EN1+2, EN1+14, EN1+16, EN1+22

Naked Globals

Name Field # of Occurrence
^("BWP" EN1+24
^(0 EN1+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+8*, EN1+9, EN1+10, EN1+11, EN1+12, EN1+13, EN1+22*
>> ACD6DIG EN1+2
ACDAT EN1+24*, EN1+26*, K+2!
>> ACDDA EN1+8*, EN1+9*
ACDFR EN1+18, EN1+24, EN1+26, K+1!
ACDPGM EN1+4!, K+1!
ACDPGM( EN1+8*, EN1+9*, EN1+13*, EN1+18, EN1+24, EN1+26
ACDPGM(0 EN1+14
ACDQUIT EN1+16!
ACDTO EN1+18, EN1+24, EN1+26, K+1!
DA EN1+18*, EN1+24*, EN1+26*, K+1!
DIC EN1+13*, K+1!
DIC("A" EN1+13*
DIC(0 EN1+13*
DIK EN1+24*, EN1+26*, K+1!
IOF EN+1
U EN1+18, EN1+26
Y EN1+13, K+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All