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

Package: Police and Security

Routine: ESPORP


Information

ESPORP ;DALISC/CKA - PRINT OFFENSE REPORT;3/99

Source Information

Source file <ESPORP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point to print only completed and nonsensitive reports.
OR
Q
START ; BEGINS THE PRINT OF THIS OFFENSE REPORT
DTR
DTO
EDTO
LOC
WEAP
PO
MO
CL ;PRINT CLASSIFICATION CODES, TYPES, AND SUBTYPES
EXIT
HDR ;PRINT HEADING
OR1
LINES(COUNT) ;
MIN(COUNT) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"UOR# not found. Please try again."
  • Line Location: OR+3
Function Call: WRITE
  • Prompt: !,"RECORD DOESN'T EXIST!"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,"DATE/TIME RECEIVED: ",$G(^UTILITY("DIQ1",$J,912,DA,.02,"E"))
  • Line Location: DTR+0
Function Call: WRITE
  • Prompt: !,"DATE/TIME OF OFFENSE: ",$G(^UTILITY("DIQ1",$J,912,DA,.03,"E"))
  • Line Location: DTO+0
Function Call: WRITE
  • Prompt: !,"ENDING DATE/TIME OF OFFENSE: ",$G(^UTILITY("DIQ1",$J,912,DA,.09,"E"))
  • Line Location: EDTO+0
Function Call: WRITE
  • Prompt: !,"LOCATION: ",$G(^UTILITY("DIQ1",$J,912,DA,.04,"E"))
  • Line Location: LOC+0
Function Call: WRITE
  • Prompt: !,"WEAPON USED: ",$G(^UTILITY("DIQ1",$J,912,DA,.05,"E"))
  • Line Location: WEAP+0
Function Call: WRITE
  • Prompt: !,"INVESTIGATING OFFICER: ",$G(^UTILITY("DIQ1",$J,912,DA,.06,"E"))
  • Line Location: PO+0
Function Call: WRITE
  • Prompt: !,"METHOD OF OPERATION: ",!
  • Line Location: MO+1
Function Call: WRITE
  • Prompt: "CLASSIFICATION CODE: ",$G(^UTILITY("DIQ1",$J,912.01,DA,.01,"E"))
  • Line Location: CL+4
Function Call: WRITE
  • Prompt: "/",^("E")
  • Line Location: CL+5
Function Call: WRITE
  • Prompt: "/",^("E")
  • Line Location: CL+6
Function Call: WRITE
  • Prompt: !?25,"DEPARTMENT OF VETERANS AFFAIRS",?(IOM-10),"Page ",$J(PAGE,3)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?35,"VA POLICE",!?28,"UNIFORM OFFENSE REPORT"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?30,"UOR# ",$E(ESPDTR,2,3),"-",$E(ESPDTR,4,5),"-",$E(ESPDTR,6,7),"-",$TR($E($P(ESPDTR,".",2)_"ZZZZ",1,4),"Z",0)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,"VA Facility"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?61,"Date/Time Printed"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,ESPFACI
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: ?61,$$NOW^ESPUTIL()
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !,"Automated VA Form 10-1393"
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR+11

FileMan Files Accessed Via FileMan Db Call

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