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
Print Page as PDF
Routine: ESPUCP5

Package: Police and Security

Routine: ESPUCP5


Information

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

Source Information

Source file <ESPUCP5.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Motor Vehicles : ",$G(^UTILITY("DIQ1",$J,912.41,DA,142,"E"))
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !!,"Government Motor Vehicle : ",$G(^UTILITY("DIQ1",$J,912.41,DA,143,"E"))
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: !,"$ Loss : ",$G(^UTILITY("DIQ1",$J,912.41,DA,144,"E"))
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !,"$ Recovered : ",$G(^UTILITY("DIQ1",$J,912.41,DA,145,"E"))
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: !,"Gov't Vehicles Recovered : ",$G(^UTILITY("DIQ1",$J,912.41,DA,146,"E"))
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: !!,"Private Motor Vehicle : ",$G(^UTILITY("DIQ1",$J,912.41,DA,147,"E"))
  • Line Location: PRT+7
Function Call: WRITE
  • Prompt: !,"$ Loss : ",$G(^UTILITY("DIQ1",$J,912.41,DA,148,"E"))
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: !,"$ Recovered : ",$G(^UTILITY("DIQ1",$J,912.41,DA,149,"E"))
  • Line Location: PRT+9
Function Call: WRITE
  • Prompt: !,"Private Veh's Recovered : ",$G(^UTILITY("DIQ1",$J,912.41,DA,150,"E"))
  • Line Location: PRT+10
Function Call: WRITE
  • Prompt: !!?25,"VANDALISM"
  • Line Location: PRT+11
Function Call: WRITE
  • Prompt: !,"Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,152,"E"))
  • Line Location: PRT+12
Function Call: WRITE
  • Prompt: !,"Total $ : ",$G(^UTILITY("DIQ1",$J,912.41,DA,158,"E"))
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: !!,?10,"Offender"
  • Line Location: PRT+14
Function Call: WRITE
  • Prompt: !!,"Employee: ",$G(^UTILITY("DIQ1",$J,912.41,DA,153,"E"))
  • Line Location: PRT+15
Function Call: WRITE
  • Prompt: !,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.41,DA,154,"E"))
  • Line Location: PRT+16
Function Call: WRITE
  • Prompt: !,"Patient : ",$G(^UTILITY("DIQ1",$J,912.41,DA,155,"E"))
  • Line Location: PRT+17
Function Call: WRITE
  • Prompt: !,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.41,DA,156,"E"))
  • Line Location: PRT+18
Function Call: WRITE
  • Prompt: !,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.41,DA,157,"E"))
  • Line Location: PRT+19
Function Call: WRITE
  • Prompt: !!?25,"VICE SOLICITING Total # : ",$G(^UTILITY("DIQ1",$J,912.41,DA,159,"E"))
  • Line Location: PRT+20
Function Call: WRITE
  • Prompt: !!,"Bribery : ",$G(^UTILITY("DIQ1",$J,912.41,DA,160,"E"))
  • Line Location: PRT+21
Function Call: WRITE
  • Prompt: !,"Forgery : ",$G(^UTILITY("DIQ1",$J,912.41,DA,161,"E"))
  • Line Location: PRT+22
Function Call: WRITE
  • Prompt: !,"Fraud : ",$G(^UTILITY("DIQ1",$J,912.41,DA,162,"E"))
  • Line Location: PRT+23
Function Call: WRITE
  • Prompt: !,"Gambling : ",$G(^UTILITY("DIQ1",$J,912.41,DA,163,"E"))
  • Line Location: PRT+24
Function Call: WRITE
  • Prompt: !,"Solicitation/Prostitution : ",$G(^UTILITY("DIQ1",$J,912.41,DA,164,"E"))
  • Line Location: PRT+25
Function Call: WRITE
  • Prompt: !,"Sexual Misconduct : ",$G(^UTILITY("DIQ1",$J,912.41,DA,165,"E"))
  • Line Location: PRT+26
Function Call: WRITE
  • Prompt: !!,?10,"Offender"
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: !!,"Employee: ",$G(^UTILITY("DIQ1",$J,912.41,DA,166,"E"))
  • Line Location: PRT+28
Function Call: WRITE
  • Prompt: !,"Outsider: ",$G(^UTILITY("DIQ1",$J,912.41,DA,167,"E"))
  • Line Location: PRT+29
Function Call: WRITE
  • Prompt: !,"Patient : ",$G(^UTILITY("DIQ1",$J,912.41,DA,168,"E"))
  • Line Location: PRT+30
Function Call: WRITE
  • Prompt: !,"Unknown : ",$G(^UTILITY("DIQ1",$J,912.41,DA,169,"E"))
  • Line Location: PRT+31
Function Call: WRITE
  • Prompt: !,"Visitor : ",$G(^UTILITY("DIQ1",$J,912.41,DA,170,"E"))
  • Line Location: PRT+32
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",?(IOM-10),"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
Info |  Source |  Entry Points |  Interaction Calls