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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ESPOFP

Package: Police and Security

Routine: ESPOFP


Information

ESPOFP ;DALISC/CKA - PRINT OFFENSE REPORT FOLLOW-UP NOTES ONLY;3/99

Source Information

Source file <ESPOFP.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 ^DIC  DT^DICRW  EN^DIQ1  ^DIWP  ^DIWW  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Police and Security 1 ($$EOP,$$NOW)^ESPUTIL  

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

Package Total Caller Graph
Police and Security 2 ESP FOLLOW-UP OFFICER PRINT  ESP FOLLOW-UP PRINT-ANY  

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point to print follow-up notes of only completed and nonsensitive reports.
OR
Q
START ; BEGINS THE PRINT OF THESE FOLLOW-UP NOTES
FOL ;PRINT FOLLOW-UP NOTES
EXIT
HDR ;PRINT HEADING
OR1

External References

Name Field # of Occurrence
^%ZIS Q
HOME^%ZIS Q+1
^%ZISC EXIT
^%ZTLOAD Q+1
^DIC OR+1, OR1+1
DT^DICRW EN+1
EN^DIQ1 FOL+11, FOL+13
^DIWP FOL+8
^DIWW FOL+10
$$EOP^ESPUTIL HDR+1
$$NOW^ESPUTIL HDR+10

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: !,"FOLLOW-UP NOTES:",!!
  • Line Location: FOL+4
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: FOL+14
Function Call: WRITE
  • Prompt: !,$G(^UTILITY("DIQ1",$J,200,DA,20.2,"E"))," # ",$G(^UTILITY("DIQ1",$J,200,DA,910.1,"E")),!,"FOLLOW-UP INVESTIGATOR",!!!!!
  • Line Location: FOL+16
Function Call: WRITE
  • Prompt: @IOF,!?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: !,$S($D(^DIC(4,$P(^(5),U),0)):$P(^(0),U),1:"")
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: ?61,$$NOW^ESPUTIL()
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,"Automated VA Form 10-1393"
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR+12
Routine Call
  • %ZIS
  • Line Location:
    • Q
Routine Call
  • %ZIS
  • Line Location:
    • Q+1
Routine Call
  • DIC
  • Line Location:
    • OR+1
    • OR1+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^ESP(912 - [#912] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] HDR+6
^DIC(4 - [#4] HDR+7
^ESP(912 - [#912] OR+4, FOL+1, FOL+2, FOL+6, HDR+6, HDR+7, OR1+1
^UTILITY("DIQ1" START+2!, FOL+12, FOL+16, EXIT+2!
^UTILITY($J FOL+5!

Label References

Name Line Occurrences
EXIT OR+2, QQ+1, START+2, FOL+1, OR1+1
HDR START+2, FOL+3, FOL+7, FOL+15
OR OR+3
OR1 OR1+1
Q OR1+2
START Q

Naked Globals

Name Field # of Occurrence
^( FOL+6
^(0 HDR+6, HDR+7
^(5 HDR+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS Q*, EXIT+1!
CL EXIT+1!
DA FOL+11*, FOL+12, FOL+13*, FOL+16, EXIT+1!
DIC OR*, FOL+11*, FOL+13*, EXIT+1!, OR1*
DIC("A" OR*, OR1*
DIC("S" OR*, OR1*
DIC(0 OR*, OR1*
DIQ EXIT+1!
DIQ(0 FOL+11*, FOL+13*
DIR EXIT+1!
DIRUT EXIT+1!
DIWF FOL+5*, EXIT+1!
DIWL FOL+5*, EXIT+1!
DIWR FOL+5*, EXIT+1!
DR FOL+11*, FOL+13*, EXIT+1!
>> DTOUT OR+2, OR1+1
>> DUOUT OR+2, OR1+1
END START+2*, FOL+3, FOL+6, FOL+7, FOL+9, FOL+15, EXIT+1!, HDR+1*
ESPDTR OR+4*, EXIT+1!, HDR+4, OR1+1*
ESPFACI START+1~, HDR+6*, HDR+7*, HDR+8
ESPID OR+4*, FOL+1, FOL+2, FOL+6, FOL+11, EXIT+1!, HDR+6, HDR+7, OR1+1*
ESPN FOL+2*, FOL+3, FOL+6, FOL+11, EXIT+1!
ESPN1 FOL+6*, EXIT+1!
>> ESPOFF FOL+12*, FOL+13
IEN FOL+5*, FOL+6*, EXIT+1!
IO Q
IO("Q" Q
IOF HDR+2
IOM HDR+2
IOSL FOL+3, FOL+7, FOL+15
IOST HDR+1
PAGE START+2*, EXIT+1!, HDR+1, HDR+2*
>> POP Q
U OR+4, HDR+6, HDR+7, OR1+1
X OR+2, FOL+6*, EXIT+1!, OR1+1
Y OR+3, OR+4, EXIT+1!, OR1+1
ZTDESC Q+1*, EXIT+1!
ZTRTN Q+1*, EXIT+1!
ZTSAVE EXIT+1!
ZTSAVE("ESP*" Q+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All