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

Package: Police and Security

Routine: ESPORP2


Information

ESPORP2 ;DALISC/CKA - PRINT OFFENSE REPORT CONT. ;10/92

Source Information

Source file <ESPORP2.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;CONTINUED FROM ESPORP1
OFFE ;PRINT OFFENDER(S)
CONT
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "* "
  • Line Location: OFFE+5
Function Call: WRITE
  • Prompt: "OFFENDER DATA"
  • Line Location: OFFE+6
Function Call: WRITE
  • Prompt: " *"
  • Line Location: OFFE+7
Function Call: WRITE
  • Prompt: "OFFENDER NAME: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.02,"E"))
  • Line Location: OFFE+8
Function Call: WRITE
  • Prompt: "SSN: ",$E(SSN,1,3),"-",$E(SSN,4,5),"-",$E(SSN,6,9)
  • Line Location: OFFE+10
Function Call: WRITE
  • Prompt: ?24,"DOB: ",ESPDOBP," "
  • Line Location: OFFE+11
Function Call: WRITE
  • Prompt: ?62,"AGE: ",X
  • Line Location: OFFE+11
Function Call: WRITE
  • Prompt: "SEX: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.03,"E"))
  • Line Location: OFFE+12
Function Call: WRITE
  • Prompt: ?24,"RACE: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.04,"E"))
  • Line Location: OFFE+13
Function Call: WRITE
  • Prompt: ?62,"HEIGHT: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.05,"E"))
  • Line Location: OFFE+14
Function Call: WRITE
  • Prompt: "WEIGHT: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.06,"E"))
  • Line Location: OFFE+15
Function Call: WRITE
  • Prompt: ?24,"HAIR COLOR: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.07,"E"))
  • Line Location: OFFE+16
Function Call: WRITE
  • Prompt: ?62,"EYE COLOR: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.08,"E"))
  • Line Location: OFFE+17
Function Call: WRITE
  • Prompt: "SKIN TONE: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.09,"E")),?24,"SCARS/MARKS: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.1,"E"))
  • Line Location: OFFE+18
Function Call: WRITE
  • Prompt: "STATUS: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.11,"E"))
  • Line Location: OFFE+19
Function Call: WRITE
  • Prompt: "DRIVER'S LICENSE & STATE: ",$G(^UTILITY("DIQ1",$J,912.05,DA,.12,"E"))," ",$G(^UTILITY("DIQ1",$J,912.05,DA,.13,"E"))
  • Line Location: OFFE+20
Function Call: WRITE
  • Prompt: "PERSONAL DESCRIPTION: "
  • Line Location: OFFE+21
Function Call: WRITE
  • Prompt: $G(^UTILITY("DIQ1",$J,912.05,DA,3.01,"E"))
  • Line Location: OFFE+22
Function Call: WRITE
  • Prompt: "HOME ADDRESS: ",$G(^UTILITY("DIQ1",$J,912.05,DA,1.01,"E"))
  • Line Location: OFFE+23
Function Call: WRITE
  • Prompt: ?14,$G(^UTILITY("DIQ1",$J,912.05,DA,1.02,"E"))
  • Line Location: OFFE+24
Function Call: WRITE
  • Prompt: ?14,$G(^UTILITY("DIQ1",$J,912.05,DA,1.03,"E")),","
  • Line Location: OFFE+25
Function Call: WRITE
  • Prompt: $G(^UTILITY("DIQ1",$J,912.05,DA,1.04,"E"))," ",$G(^UTILITY("DIQ1",$J,912.05,DA,1.05,"E"))
  • Line Location: OFFE+26
Function Call: WRITE
  • Prompt: "HOME PHONE: ",$G(^UTILITY("DIQ1",$J,912.05,DA,1.06,"E"))
  • Line Location: OFFE+27
Function Call: WRITE
  • Prompt: "WORK ADDRESS: ",$G(^UTILITY("DIQ1",$J,912.05,DA,2.01,"E"))
  • Line Location: OFFE+28
Function Call: WRITE
  • Prompt: ?14,$G(^UTILITY("DIQ1",$J,912.05,DA,2.02,"E"))
  • Line Location: OFFE+29
Function Call: WRITE
  • Prompt: ?14,$G(^UTILITY("DIQ1",$J,912.05,DA,2.03,"E")),","
  • Line Location: OFFE+30
Function Call: WRITE
  • Prompt: $G(^UTILITY("DIQ1",$J,912.05,DA,2.04,"E"))," ",$G(^UTILITY("DIQ1",$J,912.05,DA,2.05,"E"))
  • Line Location: OFFE+31
Function Call: WRITE
  • Prompt: "WORK PHONE: ",$G(^UTILITY("DIQ1",$J,912.05,DA,2.06,"E"))
  • Line Location: OFFE+32
Function Call: WRITE
  • Prompt: "OFFENSE COMMITTED: ",$G(^UTILITY("DIQ1",$J,912.11,DA,.01,"E"))," ",$P($G(^ESP(915,+$G(^("I")),0)),U,3)," ",$P($G(^(0)),U,5)
  • Line Location: OFFE+36
Function Call: WRITE
  • Prompt: " CHARGING DOCUMENT: ",$G(^UTILITY("DIQ1",$J,912.11,DA,.04,"E"))
  • Line Location: OFFE+38
Info |  Source |  Entry Points |  Interaction Calls