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

Package: Registration

Routine: DGPREP3


Information

DGPREP3 ;ALB/SCK - Pre-Registration calling statistics ; 1/2/97

Source Information

Source file <DGPREP3.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point for pre-registration calling statistics
AGN
RPT ; Build report data array
EXIT ;
PRNT ; Print report to selected device
HDR ;
HDRQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The ending date for this report cannot be earlier then the beginning date"
  • Line Location: AGN+5
Function Call: WRITE
  • Prompt: !!?10,"No data available"
  • Line Location: PRNT+7
Function Call: WRITE
  • Prompt: !?10," BUSY: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"B")),5)
  • Line Location: PRNT+12
Function Call: WRITE
  • Prompt: !?10," CONNECTED: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"C")),5)
  • Line Location: PRNT+13
Function Call: WRITE
  • Prompt: !?10," DEATH: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"D")),5)
  • Line Location: PRNT+14
Function Call: WRITE
  • Prompt: !?10," DON'T CALL: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"T")),5)
  • Line Location: PRNT+15
Function Call: WRITE
  • Prompt: !?10," NO ANSWER: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"N")),5)
  • Line Location: PRNT+16
Function Call: WRITE
  • Prompt: !?10," NO PHONE: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"P")),5)
  • Line Location: PRNT+17
Function Call: WRITE
  • Prompt: !?10," UNCOOPERATIVE: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"U")),5)
  • Line Location: PRNT+18
Function Call: WRITE
  • Prompt: !?10," WRONG NUMBER: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"W")),5)
  • Line Location: PRNT+19
Function Call: WRITE
  • Prompt: !?10,"LEFT A CALLBACK MSG: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"M")),5)
  • Line Location: PRNT+20
Function Call: WRITE
  • Prompt: !?10," CHANGE INFORMATION: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"X")),5)
  • Line Location: PRNT+21
Function Call: WRITE
  • Prompt: !?10," PREVIOUSLY UPDATED: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"V")),5)
  • Line Location: PRNT+22
Function Call: WRITE
  • Prompt: !?10," CALL BACK: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"K")),5)
  • Line Location: PRNT+23
Function Call: WRITE
  • Prompt: !?10," NO STATUS: ",$J(+$G(^TMP("DGPRERPT",$J,DGPDV,"NONE")),5)
  • Line Location: PRNT+24
Function Call: WRITE
  • Prompt: !?10," -------"
  • Line Location: PRNT+25
Function Call: WRITE
  • Prompt: !?10," Total for Division: ",$J(SBTOT,5)
  • Line Location: PRNT+28
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!?5,"PRE-REGISTRATION CALL STATISTICS"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: $S(DGPDV="NO DIV":"NO DIVISION SPECIFIED",+DGPDV>0:$P($G(^DG(40.8,DGPDV,0)),U),1:"")
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !?5,"FOR PERIOD COVERING "_$$FMTE^XLFDT(DGPBEG,"2D")_" TO "_$$FMTE^XLFDT(DGPEND,"2D")
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !!?5,DGPDSH
  • Line Location: HDR+10
Info |  Source |  Entry Points |  Interaction Calls