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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
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>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  
VA Fileman 2 WAIT^DICD  ^DIR  
Registration 1 DIVISION^VAUTOMA  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGPRE CALL STATS  

Entry Points

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

External References

Name Field # of Occurrence
^%ZIS AGN+15
HOME^%ZIS AGN+21
^%ZISC EXIT+1
^%ZTLOAD AGN+20
WAIT^DICD AGN+24
^DIR EN+10, AGN+1, HDR+1
DIVISION^VAUTOMA AGN+10
$$FMTE^XLFDT EN+8, HDR+9
$$NOW^XLFDT EN+5

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
Routine Call
  • %ZIS
  • Line Location:
    • AGN+21
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • AGN+1
    • HDR+1
Routine Call
  • %ZIS
  • Line Location:
    • AGN+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] RPT+11, HDR+7
^DG(43 - [#43] AGN+9
^DGS(41.43 - [#41.43] RPT+7, RPT+8, RPT+9
^TMP("DGPERPT" EXIT+2!
^TMP("DGPRERPT" EN+3!, RPT+15*, RPT+16*, PRNT+4, PRNT+9, PRNT+12, PRNT+13, PRNT+14, PRNT+15, PRNT+16
, PRNT+17, PRNT+18, PRNT+19, PRNT+20, PRNT+21, PRNT+22, PRNT+23, PRNT+24, PRNT+26, PRNT+27
^TMP($J RPT+2!

Label References

Name Line Occurrences
AGN AGN+4
EXIT EN+11, AGN+2, AGN+15, AGN+16, PRNT+4, PRNT+9
HDR PRNT+6, PRNT+10
HDRQ HDR+2
PRNT RPT+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS AGN+15*
DGPABRT EN+1~, PRNT+9, PRNT+10, HDR+1*, HDR+2
DGPBEG EN+1~, EN+12*, AGN+4, RPT+7, HDR+9
DGPDATA EN+1~, RPT+9*, RPT+10, RPT+11*, RPT+12*, RPT+13, RPT+15, RPT+16
DGPDSH EN+1~, RPT+3*, HDR+10
DGPDV PRNT+1~, PRNT+5*, PRNT+9*, PRNT+12, PRNT+13, PRNT+14, PRNT+15, PRNT+16, PRNT+17, PRNT+18
, PRNT+19, PRNT+20, PRNT+21, PRNT+22, PRNT+23, PRNT+24, PRNT+26, PRNT+27, HDR+6, HDR+7
DGPE EN+1~, RPT+6*, RPT+7
DGPEND EN+1~, AGN+3*, AGN+4, RPT+6, HDR+9
DGPN1 EN+1~, RPT+7*, RPT+8
DGPN2 EN+1~, RPT+8*, RPT+9
DGPTOT EN+1~, RPT+4*, RPT+14*
DGSNGLDV EN+1~, AGN+12*, RPT+11, HDR+6
DIR EN+1~, AGN+6!
DIR("?" EN+6*, EN+7*
DIR("A" EN+9*, AGN*
DIR("B" EN+8*
DIR(0 EN+4*, HDR+1*
DIRUT EN+3!, EN+11, AGN+2
DUOUT EN+3!
IO RPT+1
IO("Q" AGN+16, AGN+22!
IOF HDR+3
IOST HDR+1
PAGE PRNT+1~, PRNT+3*, HDR+1, HDR+4*
POP AGN+15, EXIT+2!
SB1 PRNT+1~, PRNT+26*, PRNT+27
SBTOT PRNT+1~, PRNT+11*, PRNT+27*, PRNT+28
U AGN+9, RPT+10, RPT+11, RPT+12, RPT+13, RPT+15, RPT+16, HDR+7
VAUTD EN+1~, AGN+13*, RPT+13
VAUTD( RPT+13
X1 EN+1~, EN+5*, EN+8
>> Y EN+12, AGN+3, HDR+1
ZTDESC AGN+17*, AGN+22!
ZTQUEUED EXIT+1, EXIT+2!
ZTRTN AGN+17*, AGN+22!
ZTSAVE AGN+22!
ZTSAVE( AGN+19*
ZTSK AGN+20, AGN+22!
ZTX AGN+18~, AGN+19*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All