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: DGRPCK

Package: Registration

Routine: DGRPCK


Information

DGRPCK ;ALB/MRL - CONSISTENCY PURGE ; 11 FEB 1987

Source Information

Source file <DGRPCK.m>

Entry Points

Name Comments DBIA/ICR reference
OK
D
OK1
Q
S
C
T ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,J
  • Line Location: DGRPCK+2
Function Call: WRITE
  • Prompt: !!,"LAST RUN COMPLETED: ",Y
  • Line Location: DGRPCK+3
Function Call: WRITE
  • Prompt: !!?4,"Y - If you want to purge data.",!?4,"N - If you don't wish to purge data."
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: !!?4,"SELECT A DATE IN THE PAST PLEASE!!",*7
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !!,"I'm going to purge all patients from the INCONSISTENT DATA file who haven't been",!,"admitted or registered since "
  • Line Location: OK1+0
Function Call: WRITE
  • Prompt: Y," [",DGDAY," DAY",$S(DGDAY>1:"S",1:"")," AGO]."
  • Line Location: OK1+0
Function Call: WRITE
  • Prompt: !!?4,"Y - To start the purge process.",!?4,"N - To QUIT."
  • Line Location: OK1+1
Info |  Source |  Entry Points |  Interaction Calls