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

Package: Police and Security

Routine: ESPUCP


Information

ESPUCP ;DALISC/CKA -PRINT UNIFORM CRIME REPORT- 3/93

Source Information

Source file <ESPUCP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
DATE ;ASK BEGINNING DATE
ASK ;ASK FOR CRIME DATA DATE TO PRINT
PRT ;PRINT REPORT
Q
START ; BEGINS THE PRINT OF THIS CRIME REPORT
BDT
EDT
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+2
Function Call: WRITE
  • Prompt: ?45,"BEGINNING DATE: ",$G(^UTILITY("DIQ1",$J,912.4,DA,.01,"E"))
  • Line Location: BDT+0
Function Call: WRITE
  • Prompt: !,"Date/Time Printed",?45,"ENDING DATE: ",$G(^UTILITY("DIQ1",$J,912.4,DA,.02,"E"))
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: !,$P(Y,":",1,2)
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !!,"Done."
  • Line Location: EDT+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF,!?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 ",$P(^ESP(912.4,ESPIEN,1,1,0),U)
  • Line Location: HDR+4

FileMan Files Accessed Via FileMan Db Call

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