Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: QAMARCH0

Package: Clinical Monitoring System

Routine: QAMARCH0


Information

QAMARCH0 ;HISC/DAD-SELECTIVELY PURGE FILES 743.1, 743.2, 743.6 ;7/17/92 09:39

Source Information

Source file <QAMARCH0.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ; *** MONITOR HISTORY FILE (#743.2)
ENTSK1 ; *** TASKED ENTRY POINT
EN2 ; *** FALL OUT FILE (#743.1)
ENTSK2 ; *** TASKED ENTRY POINT
EN3 ; *** AUTO ENROLL RUN DATES FILE (#743.6)
ENTSK3 ; *** TASKED ENTRY POINT
EXIT ; *** COMMON EXIT POINT
ASKCONT ; *** CONTINUE?
ASKREADY ; *** READY TO DELETE?
AR
GETMON ; *** MONITORS TO DELETE
GETDATE ; *** DATE RANGE TO DELETE
QUEUE(X) ; *** QUEUE THE DELETION

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"*********************************************************************",*7
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !?5,"* This option DELETES selected data from the Monitor History file *"
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !?5,"* Once the data has been deleted it CANNOT BE RECOVERED *"
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !?5,"*********************************************************************",*7
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !!,"Nothing deleted."
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !!?5,"********************************************************************",*7
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: !?5,"* This option DELETES selected data from the Fall Out file *"
  • Line Location: EN2+2
Function Call: WRITE
  • Prompt: !?5,"* Once the data has been deleted it CANNOT BE RECOVERED *"
  • Line Location: EN2+3
Function Call: WRITE
  • Prompt: !?5,"********************************************************************",*7
  • Line Location: EN2+4
Function Call: WRITE
  • Prompt: !!,"Nothing deleted."
  • Line Location: EN2+8
Function Call: WRITE
  • Prompt: !!?2,"***************************************************************************",*7
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: !?2,"* This option DELETES selected data from the Auto Enroll Run Dates file *"
  • Line Location: EN3+2
Function Call: WRITE
  • Prompt: !?2,"* Once the data has been deleted it CANNOT BE RECOVERED *"
  • Line Location: EN3+3
Function Call: WRITE
  • Prompt: !?2,"***************************************************************************",*7
  • Line Location: EN3+4
Function Call: WRITE
  • Prompt: !!,"Nothing deleted."
  • Line Location: EN3+8
Function Call: WRITE
  • Prompt: !!?5,"Please answer Y(es) or N(o)"
  • Line Location: ASKCONT+1
Function Call: WRITE
  • Prompt: *7
  • Line Location: ASKREADY+1
Function Call: WRITE
  • Prompt: !!?5,"Enter Y(es) to delete the selected data, or",!?5,"Enter N(o) to exit without deleting the data"
  • Line Location: AR+0
Function Call: WRITE
  • Prompt: !!,"Select the monitors to delete."
  • Line Location: GETMON+1
Function Call: WRITE
  • Prompt: !!,"Select the date range to delete."
  • Line Location: GETDATE+1
Function Call: WRITE
  • Prompt: !!,"Deletion request queued."
  • Line Location: QUEUE+3
Info |  Source |  Entry Points |  Interaction Calls