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

Package: Police and Security

Routine: ESPUCFP1


Information

ESPUCFP1 ;DALISC/CKA -PRINT UNIFORM CRIME REPORT (CONT)- 3/99

Source Information

Source file <ESPUCFP1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 NOW^%DTC  EN^DIQ1  
Police and Security 1 PRT^ESPUCFP2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Police and Security 1 ESPUCFP  

Entry Points

Name Comments DBIA/ICR reference
EN
PRT ;PRINT REPORT CONTINUED- PRINTS FIRST PAGE
EX
HDR ;PRINT HEADING
BDT
EDT
HDR1

External References

Name Field # of Occurrence
NOW^%DTC EDT+1
EN^DIQ1 PRT+1
PRT^ESPUCFP2 PRT+54

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?25,"ASSAULTS Total # : ",$G(^UTILITY("DIQ1",$J,912.31,DA,1,"E"))
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !!,"Aggravated : ",$G(^UTILITY("DIQ1",$J,912.31,DA,2,"E"))
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: ?40,"Dangerous : ",$G(^UTILITY("DIQ1",$J,912.31,DA,3,"E"))
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !,"Kidnapping : ",$G(^UTILITY("DIQ1",$J,912.31,DA,4,"E"))
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: ?40,"No Weapon : ",$G(^UTILITY("DIQ1",$J,912.31,DA,5,"E"))
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: !,"Simple : ",$G(^UTILITY("DIQ1",$J,912.31,DA,6,"E"))
  • Line Location: PRT+7
Function Call: WRITE
  • Prompt: !!,?15,"Offender",?50,"Victim"
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: !!?10,"Employee: ",$G(^UTILITY("DIQ1",$J,912.31,DA,7,"E")),?45,"Employee : ",$G(^UTILITY("DIQ1",$J,912.31,DA,12,"E"))
  • Line Location: PRT+9
Function Call: WRITE
  • Prompt: !?10,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.31,DA,8,"E")),?45,"Police Officer : ",$G(^UTILITY("DIQ1",$J,912.31,DA,13,"E"))
  • Line Location: PRT+10
Function Call: WRITE
  • Prompt: !?10,"Patient : ",$G(^UTILITY("DIQ1",$J,912.31,DA,9,"E")),?45,"Outsider : ",$G(^UTILITY("DIQ1",$J,912.31,DA,14,"E"))
  • Line Location: PRT+11
Function Call: WRITE
  • Prompt: !?10,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.31,DA,10,"E")),?45,"Patient : ",$G(^UTILITY("DIQ1",$J,912.31,DA,15,"E"))
  • Line Location: PRT+12
Function Call: WRITE
  • Prompt: !?10,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.31,DA,11,"E")),?45,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.31,DA,16,"E"))
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: !,?45,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.31,DA,17,"E"))
  • Line Location: PRT+14
Function Call: WRITE
  • Prompt: !!!?25,"BURGLARIES Total # : ",$G(^UTILITY("DIQ1",$J,912.31,DA,18,"E"))
  • Line Location: PRT+16
Function Call: WRITE
  • Prompt: !!,"All Other Areas : ",$G(^UTILITY("DIQ1",$J,912.31,DA,19,"E"))
  • Line Location: PRT+17
Function Call: WRITE
  • Prompt: ?40,"Canteen : ",$G(^UTILITY("DIQ1",$J,912.31,DA,20,"E"))
  • Line Location: PRT+18
Function Call: WRITE
  • Prompt: !,"Agent Cashier : ",$G(^UTILITY("DIQ1",$J,912.31,DA,21,"E"))
  • Line Location: PRT+19
Function Call: WRITE
  • Prompt: ?40,"Locker Areas : ",$G(^UTILITY("DIQ1",$J,912.31,DA,22,"E"))
  • Line Location: PRT+20
Function Call: WRITE
  • Prompt: !,"Office : ",$G(^UTILITY("DIQ1",$J,912.31,DA,23,"E"))
  • Line Location: PRT+21
Function Call: WRITE
  • Prompt: ?40,"Pharmacy : ",$G(^UTILITY("DIQ1",$J,912.31,DA,24,"E"))
  • Line Location: PRT+22
Function Call: WRITE
  • Prompt: !,"Vehicles : ",$G(^UTILITY("DIQ1",$J,912.31,DA,25,"E"))
  • Line Location: PRT+23
Function Call: WRITE
  • Prompt: ?40,"Burglary Total $ Loss : ",$G(^UTILITY("DIQ1",$J,912.31,DA,26,"E"))
  • Line Location: PRT+24
Function Call: WRITE
  • Prompt: !?40,"Burglary Total $ Recovered : ",$G(^UTILITY("DIQ1",$J,912.31,DA,27,"E"))
  • Line Location: PRT+25
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRT+26
Function Call: WRITE
  • Prompt: !?25,"CONTRABAND Total # : ",$G(^UTILITY("DIQ1",$J,912.31,DA,28,"E"))
  • Line Location: PRT+28
Function Call: WRITE
  • Prompt: !!,"Drugs Total # : ",TOT
  • Line Location: PRT+30
Function Call: WRITE
  • Prompt: ?40,"Forged Prescriptions : ",$G(^UTILITY("DIQ1",$J,912.31,DA,29,"E"))
  • Line Location: PRT+31
Function Call: WRITE
  • Prompt: !?40,"Introduction : ",$G(^UTILITY("DIQ1",$J,912.31,DA,30,"E"))
  • Line Location: PRT+32
Function Call: WRITE
  • Prompt: !?40,"Possession : ",$G(^UTILITY("DIQ1",$J,912.31,DA,31,"E"))
  • Line Location: PRT+33
Function Call: WRITE
  • Prompt: !?40,"Sale : ",$G(^UTILITY("DIQ1",$J,912.31,DA,32,"E"))
  • Line Location: PRT+34
Function Call: WRITE
  • Prompt: !?40,"Under the Influence : ",$G(^UTILITY("DIQ1",$J,912.31,DA,33,"E"))
  • Line Location: PRT+35
Function Call: WRITE
  • Prompt: !!,"Alcohol Total # : ",TOT
  • Line Location: PRT+37
Function Call: WRITE
  • Prompt: ?40,"Introduction : ",$G(^UTILITY("DIQ1",$J,912.31,DA,34,"E"))
  • Line Location: PRT+38
Function Call: WRITE
  • Prompt: !?40,"Possession : ",$G(^UTILITY("DIQ1",$J,912.31,DA,35,"E"))
  • Line Location: PRT+39
Function Call: WRITE
  • Prompt: !?40,"Under the Influence : ",$G(^UTILITY("DIQ1",$J,912.31,DA,36,"E"))
  • Line Location: PRT+40
Function Call: WRITE
  • Prompt: !!,"Weapons Total # : ",TOT
  • Line Location: PRT+42
Function Call: WRITE
  • Prompt: ?40,"Firearms : ",$G(^UTILITY("DIQ1",$J,912.31,DA,37,"E"))
  • Line Location: PRT+43
Function Call: WRITE
  • Prompt: !?40,"Knives/Hatchets/Clubs : ",$G(^UTILITY("DIQ1",$J,912.31,DA,38,"E"))
  • Line Location: PRT+44
Function Call: WRITE
  • Prompt: !?40,"Explosives : ",$G(^UTILITY("DIQ1",$J,912.31,DA,39,"E"))
  • Line Location: PRT+45
Function Call: WRITE
  • Prompt: !?40,"Other : ",$G(^UTILITY("DIQ1",$J,912.31,DA,40,"E"))
  • Line Location: PRT+46
Function Call: WRITE
  • Prompt: !,?15,"Offender"
  • Line Location: PRT+48
Function Call: WRITE
  • Prompt: !!?10,"Employee: ",$G(^UTILITY("DIQ1",$J,912.31,DA,41,"E"))
  • Line Location: PRT+49
Function Call: WRITE
  • Prompt: !?10,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.31,DA,42,"E"))
  • Line Location: PRT+50
Function Call: WRITE
  • Prompt: !?10,"Patient : ",$G(^UTILITY("DIQ1",$J,912.31,DA,43,"E"))
  • Line Location: PRT+51
Function Call: WRITE
  • Prompt: !?10,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.31,DA,44,"E"))
  • Line Location: PRT+52
Function Call: WRITE
  • Prompt: !?10,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.31,DA,45,"E"))
  • Line Location: PRT+53
Function Call: WRITE
  • Prompt: !!,"Done."
  • Line Location: EX+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF,!?25,"UNIFORM CRIME REPORT",?70,"Page ",$J(PAGE,3)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"VA Facility ",ESPFACI
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?45,"BEGINNING DATE: ",$G(^UTILITY("DIQ1",$J,912.3,ESPIEN,.01,"E"))
  • Line Location: BDT+0
Function Call: WRITE
  • Prompt: !,"Date/Time Printed",?45,"ENDING DATE: ",$G(^UTILITY("DIQ1",$J,912.3,ESPIEN,.02,"E"))
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: !,$P(Y,":",1,2)
  • Line Location: EDT+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: @IOF,!?25,"UNIFORM CRIME REPORT",?70,"PAGE ",$J(PAGE,3)
  • Line Location: HDR1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EDT+1
^DG(40.8 - [#40.8] HDR+4
^ESP(912.3 - [#912.3] HDR+3
^UTILITY("DIQ1" PRT+1, PRT+2, PRT+3, PRT+4, PRT+5, PRT+6, PRT+7, PRT+9, PRT+10, PRT+11
, PRT+12, PRT+13, PRT+14, PRT+16, PRT+17, PRT+18, PRT+19, PRT+20, PRT+21, PRT+22
, PRT+23, PRT+24, PRT+25, PRT+28, PRT+29, PRT+31, PRT+32, PRT+33, PRT+34, PRT+35
, PRT+36, PRT+38, PRT+39, PRT+40, PRT+41, PRT+43, PRT+44, PRT+45, PRT+46, PRT+49
, PRT+50, PRT+51, PRT+52, PRT+53, BDT, EDT

Label References

Name Line Occurrences
HDR1 PRT+15, PRT+27, PRT+47

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EDT+1
>> DA PRT+1*, PRT+2, PRT+3, PRT+4, PRT+5, PRT+6, PRT+7, PRT+9, PRT+10, PRT+11
, PRT+12, PRT+13, PRT+14, PRT+16, PRT+17, PRT+18, PRT+19, PRT+20, PRT+21, PRT+22
, PRT+23, PRT+24, PRT+25, PRT+28, PRT+29, PRT+31, PRT+32, PRT+33, PRT+34, PRT+35
, PRT+36, PRT+38, PRT+39, PRT+40, PRT+41, PRT+43, PRT+44, PRT+45, PRT+46, PRT+49
, PRT+50, PRT+51, PRT+52, PRT+53
>> DIC PRT+1*
>> DIQ(0 PRT+1*
>> DR PRT+1*
DTIME HDR+1, HDR1
>> END PRT+15, PRT+27, PRT+47, HDR+1*, HDR1*
>> ESPFACI HDR+3*, HDR+4*, HDR+5
>> ESPIEN PRT+1, HDR+3, BDT, EDT
>> ESPN PRT+1, HDR+3
IOF HDR+2, HDR1+1
IOSL PRT+15, PRT+27, PRT+47
IOST HDR+1, HDR1
>> PAGE HDR+2*, HDR1+1*
>> TOT PRT+29*, PRT+30, PRT+36*, PRT+37, PRT+41*, PRT+42
U HDR+3, HDR+4
>> X HDR+1*, HDR1*
>> Y EDT+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All