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

Package: Case Management System

Routine: ACMDELPT


Information

ACMDELPT ; IHS/TUCSON/TMJ - DELETE PATIENTS FROM AN ENTIRE REGISTER ;

Source Information

Source file <ACMDELPT.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIK  ^DIR  
Case Management System 1 ^ACMGTP  

Entry Points

Name Comments DBIA/ICR reference
DELREG
EN
EXIT

External References

Name Field # of Occurrence
^ACMGTP DELREG+8
^DIK DELREG+16
^DIR DELREG+6, DELREG+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING",*7,*7,*7,!!,"The next procedure will allow you to COMPLETELY delete ALL PATIENTS from"
  • Line Location: DELREG+1
Function Call: WRITE
  • Prompt: !,"the Case Management System. The register, including all patients and all",!,"information on all patients will be deleted WITH NO POSSIBILITY of recovering"
  • Line Location: DELREG+2
Function Call: WRITE
  • Prompt: !,"any of the data. Be absolutely certain this is what you want before proceding."
  • Line Location: DELREG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DELREG+5
Function Call: WRITE
  • Prompt: !!,"NO ACTION TAKEN",*7,*7
  • Line Location: DELREG+9
Function Call: WRITE
  • Prompt: !!,"Are you certain you want to delete"
  • Line Location: DELREG+10
Function Call: WRITE
  • Prompt: !!,"...DELETING ALL PATIENTS FROM THE REGISTER..."
  • Line Location: DELREG+14
Function Call: WRITE
  • Prompt: "."
  • Line Location: DELREG+16
Function Call: WRITE
  • Prompt: !!,"The ",ACMRGNA," PATIENTS have been deleted."
  • Line Location: DELREG+18
Routine Call
  • DIR
  • Line Location:
    • DELREG+6
    • DELREG+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACM(41 - [#9002241] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41 - [#9002241] DELREG+16

Label References

Name Line Occurrences
DELREG EN

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACMCTRL EXIT!
ACMCTRLE EXIT!
ACMCTRLP EXIT!
ACMCTRLS EXIT!
ACMCTRLX EXIT!
ACMDELRG EXIT!, DELREG+8*
ACMGREF EXIT!
ACMI EXIT!
ACMRG EXIT!, DELREG+9, DELREG+16
ACMRGNA EXIT!, DELREG+11, DELREG+18
ACMRGTP EXIT!, DELREG+8*
DA DELREG+15*, DELREG+16*, DELREG+17!
DIC DELREG+17!
DIK DELREG+15*, DELREG+17!
DIR DELREG+6!, DELREG+12!
DIR("A" DELREG+4*, DELREG+11*
DIR("B" DELREG+4*, DELREG+11*
DIR(0 DELREG+4*, DELREG+11*
IOF DELREG
>> Y DELREG+7, DELREG+13
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All