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

Package: Police and Security

Routine: ESPUCP4


Information

ESPUCP4 ;DALISC/CKA -PRINT UNIFORM CRIME REPORT (CONT)- 3/93

Source Information

Source file <ESPUCP4.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 NOW^%DTC  

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 ESPUCP3  

Entry Points

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

External References

Name Field # of Occurrence
NOW^%DTC EDT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?25,"VANDALISM"
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !!,"Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,152,"E"))
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: !,"Total $ : ",$G(^UTILITY("DIQ1",$J,912.41,DA,158,"E"))
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !!,?15,"Offender"
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: !!?10,"Employee: ",$G(^UTILITY("DIQ1",$J,912.41,DA,153,"E"))
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: ?30,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.41,DA,154,"E"))
  • Line Location: PRT+7
Function Call: WRITE
  • Prompt: !?10,"Patient : ",$G(^UTILITY("DIQ1",$J,912.41,DA,155,"E"))
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: ?30,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.41,DA,156,"E"))
  • Line Location: PRT+9
Function Call: WRITE
  • Prompt: !?10,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.41,DA,157,"E"))
  • Line Location: PRT+10
Function Call: WRITE
  • Prompt: !!!?25,"VICE SOLICITING Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,159,"E"))
  • Line Location: PRT+11
Function Call: WRITE
  • Prompt: !!,"Bribery : ",$G(^UTILITY("DIQ1",$J,912.41,DA,160,"E"))
  • Line Location: PRT+12
Function Call: WRITE
  • Prompt: ?40,"Forgery : ",$G(^UTILITY("DIQ1",$J,912.41,DA,161,"E"))
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: !,"Fraud : ",$G(^UTILITY("DIQ1",$J,912.41,DA,162,"E"))
  • Line Location: PRT+14
Function Call: WRITE
  • Prompt: ?40,"Gambling : ",$G(^UTILITY("DIQ1",$J,912.41,DA,163,"E"))
  • Line Location: PRT+15
Function Call: WRITE
  • Prompt: !,"Solicitation/Prostitution : ",$G(^UTILITY("DIQ1",$J,912.41,DA,164,"E"))
  • Line Location: PRT+16
Function Call: WRITE
  • Prompt: ?40,"Sexual Misconduct : ",$G(^UTILITY("DIQ1",$J,912.41,DA,165,"E"))
  • Line Location: PRT+17
Function Call: WRITE
  • Prompt: !!,?15,"Offender"
  • Line Location: PRT+18
Function Call: WRITE
  • Prompt: !!?10,"Employee: ",$G(^UTILITY("DIQ1",$J,912.41,DA,166,"E"))
  • Line Location: PRT+19
Function Call: WRITE
  • Prompt: ?30,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.41,DA,167,"E"))
  • Line Location: PRT+20
Function Call: WRITE
  • Prompt: !?10,"Patient : ",$G(^UTILITY("DIQ1",$J,912.41,DA,168,"E"))
  • Line Location: PRT+21
Function Call: WRITE
  • Prompt: ?30,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.41,DA,169,"E"))
  • Line Location: PRT+22
Function Call: WRITE
  • Prompt: !?10,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.41,DA,170,"E"))
  • Line Location: PRT+23
Function Call: WRITE
  • Prompt: !!!?25,"VIOLATION CHARGES Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,171,"E"))
  • Line Location: PRT+25
Function Call: WRITE
  • Prompt: !!,"Courtesy Warnings Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,172,"E"))
  • Line Location: PRT+26
Function Call: WRITE
  • Prompt: !!,"Non-Traffic : ",$G(^UTILITY("DIQ1",$J,912.41,DA,173,"E"))
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: !,"Moving : ",$G(^UTILITY("DIQ1",$J,912.41,DA,174,"E"))
  • Line Location: PRT+28
Function Call: WRITE
  • Prompt: !,"Parking : ",$G(^UTILITY("DIQ1",$J,912.41,DA,175,"E"))
  • Line Location: PRT+29
Function Call: WRITE
  • Prompt: !!,?15,"Offender"
  • Line Location: PRT+30
Function Call: WRITE
  • Prompt: !!?10,"Employee: ",$G(^UTILITY("DIQ1",$J,912.41,DA,176,"E"))
  • Line Location: PRT+31
Function Call: WRITE
  • Prompt: ?30,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.41,DA,177,"E"))
  • Line Location: PRT+32
Function Call: WRITE
  • Prompt: !?10,"Patient : ",$G(^UTILITY("DIQ1",$J,912.41,DA,178,"E"))
  • Line Location: PRT+33
Function Call: WRITE
  • Prompt: ?30,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.41,DA,179,"E"))
  • Line Location: PRT+34
Function Call: WRITE
  • Prompt: !!,"USDC Notice Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,180,"E"))
  • Line Location: PRT+36
Function Call: WRITE
  • Prompt: !!,"Non-Traffic : ",$G(^UTILITY("DIQ1",$J,912.41,DA,181,"E"))
  • Line Location: PRT+37
Function Call: WRITE
  • Prompt: !,"Moving : ",$G(^UTILITY("DIQ1",$J,912.41,DA,182,"E"))
  • Line Location: PRT+38
Function Call: WRITE
  • Prompt: !,"Parking : ",$G(^UTILITY("DIQ1",$J,912.41,DA,183,"E"))
  • Line Location: PRT+39
Function Call: WRITE
  • Prompt: !!,?15,"Offender"
  • Line Location: PRT+40
Function Call: WRITE
  • Prompt: !!?10,"Employee: ",$G(^UTILITY("DIQ1",$J,912.41,DA,184,"E"))
  • Line Location: PRT+41
Function Call: WRITE
  • Prompt: ?30,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.41,DA,185,"E"))
  • Line Location: PRT+42
Function Call: WRITE
  • Prompt: !?10,"Patient : ",$G(^UTILITY("DIQ1",$J,912.41,DA,186,"E"))
  • Line Location: PRT+43
Function Call: WRITE
  • Prompt: ?30,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.41,DA,187,"E"))
  • Line Location: PRT+44
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 ",$P(^ESP(912.4,ESPIEN,1,1,0),U)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?45,"BEGINNING DATE: ",$G(^UTILITY("DIQ1",$J,912.4,ESPIEN,.01,"E"))
  • Line Location: BDT+0
Function Call: WRITE
  • Prompt: !,"Date/Time Printed",?45,"ENDING DATE: ",$G(^UTILITY("DIQ1",$J,912.4,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,!?70,"PAGE ",$J(PAGE,3)
  • Line Location: HDR1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EDT+1
^ESP(912.4 - [#912.4] HDR+3
^UTILITY("DIQ1" PRT+3, PRT+4, PRT+6, PRT+7, PRT+8, PRT+9, PRT+10, PRT+11, PRT+12, PRT+13
, PRT+14, PRT+15, PRT+16, PRT+17, PRT+19, PRT+20, PRT+21, PRT+22, PRT+23, PRT+25
, PRT+26, PRT+27, PRT+28, PRT+29, PRT+31, PRT+32, PRT+33, PRT+34, PRT+36, PRT+37
, PRT+38, PRT+39, PRT+41, PRT+42, PRT+43, PRT+44, BDT, EDT

Label References

Name Line Occurrences
HDR PRT+1
HDR1 PRT+24, PRT+35

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EDT+1
>> DA PRT+3, PRT+4, PRT+6, PRT+7, PRT+8, PRT+9, PRT+10, PRT+11, PRT+12, PRT+13
, PRT+14, PRT+15, PRT+16, PRT+17, PRT+19, PRT+20, PRT+21, PRT+22, PRT+23, PRT+25
, PRT+26, PRT+27, PRT+28, PRT+29, PRT+31, PRT+32, PRT+33, PRT+34, PRT+36, PRT+37
, PRT+38, PRT+39, PRT+41, PRT+42, PRT+43, PRT+44
DTIME HDR+1, HDR1
>> END PRT+1, PRT+24, PRT+35, HDR+1*, HDR1*
>> ESPIEN HDR+3, BDT, EDT
IOF HDR+2, HDR1+1
IOSL PRT+24, PRT+35
IOST HDR+1, HDR1
>> PAGE HDR+2*, HDR1+1*
U HDR+3
>> 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