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 |  All
Print Page as PDF
Routine: ACDPSAVE

Package: Alcohol Chemical Dependency

Routine: ACDPSAVE


Information

ACDPSAVE ;IHS/ADC/EDE/KML - EXTRACT PROGRAM DATA TO A HOST FILE OR MAIL SERVER;

Source Information

Source file <ACDPSAVE.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Alcohol Chemical Dependency 3 EN^ACDGX5  ^ACDPSRV0  EN5^ACDV4MES  
VA Fileman 2 %XY^%RCR  YN^DICN  

Entry Points

Name Comments DBIA/ICR reference
K ;
EN ;EP

External References

Name Field # of Occurrence
%XY^%RCR EN+27
EN^ACDGX5 EN+32
^ACDPSRV0 EN+34
EN5^ACDV4MES EN+3
YN^DICN EN+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,*7,"A data import still exists in the ^ACDPTMP global due to a",!,"CORRUPT LOCATION FILE ** I MUST STOP **"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,*7,*7,"It seems an extract is presently running."
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,*7,*7,"You must set domains to send extracted data to."
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !!,*7,*7,"No domains are defined to send the extraction data to.",!,"I cannot continue because of this."
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !!,"OK to continue"
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: " Answer Yes or No"
  • Condition for execution: %=0
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !!,"No new data found."
  • Line Location: EN+31
Function Call: WRITE
  • Prompt: !!,"Now deleting the ^ACDPTMP global....."
  • Line Location: EN+36
Function Call: WRITE
  • Prompt: !,"CDMIS data extraction successfully completed."
  • Line Location: EN+38

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDP1TMP EN+6
^ACDPTMP EN+9, EN+10!, EN+31, EN+37!
^ACDPTMP(0 EN+32*
^ACDQAN - [#9002173.8] EN+20
^AUTTLOC - [#9999999.06] EN+22, EN+23
^AUTTSITE(1 EN+23

Label References

Name Line Occurrences
K EN+6, EN+9, EN+19, EN+31

Naked Globals

Name Field # of Occurrence
^(0 EN+32*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+19*
>> %X EN+24*
>> %Y EN+25*
ACD K+1!
ACD6PGM EN+22*, EN+23, K+1!
ACDA EN+20*, EN+22, EN+24, K+1!
ACDBWP K+1!
ACDDA K+1!
ACDDRUG K+1!
ACDFR EN+34*, K+1!
>> ACDMAIL EN+32, EN+34
ACDPOINT K+1!
ACDRUG K+1!
ACDTIME K+1!
ACDTO EN+34*, K+1!
ACDUSER EN+23*, EN+25, K+1!
ACDV K+1!
DIC K+1!
DIE K+1!
DIK K+1!
DIR K+1!
U EN+22, EN+23, EN+32
X K+1!
>> XBGL EN+32*
Y K+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All