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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ESPUCFP

Package: Police and Security

Routine: ESPUCFP


Information

ESPUCFP ;DALISC/CKA -PRINT UNIFORM CRIME REPORT BY FACILITY- 3/99

Source Information

Source file <ESPUCFP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
DATE ;ASK BEGINNING DATE
ASK ;ASK FOR CRIME DATA DATE TO PRINT
DIV ;GET THE DIVISION
PRT ;PRINT REPORT
Q
START ; BEGINS THE PRINT OF THIS CRIME REPORT
EX
HDR ;PRINT HEADING

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Site # is not defined!"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"RECORD DOESN'T EXIST!"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"Done."
  • Line Location: START+10
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: HOF=1
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?25,"DEPARTMENT OF VETERANS AFFAIRS",?70,"PAGE ",$J(PAGE,3)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?35,"VA POLICE",!?33,"UNIFORM CRIME REPORT"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"VA Facility: ",ESPFACI
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?52,"BEGINNING DATE: ",$G(^UTILITY("DIQ1",$J,912.3,ESPIEN,.01,"E"))
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,"Date/Time Printed",?52,"ENDING DATE: ",$G(^UTILITY("DIQ1",$J,912.3,ESPIEN,.02,"E"))
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,$P(Y,":",1,2)
  • Line Location: HDR+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ESP(912.3 - [#912.3] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call