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

Package: Registration

Routine: DGRPCR


Information

DGRPCR ;ALB/MRL,BAJ - CONSISTENCY FLAGGER, REBUILD FILE ; NOV 16, 2005

Source Information

Source file <DGRPCR.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,J
  • Line Location: DGRPCR+2
Function Call: WRITE
  • Prompt: !!,"LAST RUN COMPLETED: ",Y
  • Line Location: DGRPCR+3
Function Call: WRITE
  • Prompt: !!,"Do you want to delete the existing entries and rebuild the file"
  • Line Location: K+0
Function Call: WRITE
  • Prompt: !!?4,"Y - If you want to remove all existing entries from the INCONSISTENT DATA",!?9,"file and rebuild from scratch.",!?5,"N - If you just want to add newly identified inconsistencies to the",!?9,"existing file."
  • Line Location: K+1
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 check all patients who were admitted or registered on or after "
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: !,Y," [Within the Past ",+DGDAY," day",$S(+DGDAY>1:"s",1:""),"]."
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: !,"I will ",$S(DGKILL:"DELETE all existing entries prior to rebuilding",1:"add any new inconsistent data elements to the existing file"),"."
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: !!?4,"Y - If this is what you want to do.",!?4,"N - If you wish to STOP processing and reconsider this action."
  • Line Location: OK+2
Info |  Source |  Entry Points |  Interaction Calls