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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ESPJOU

Package: Police and Security

Routine: ESPJOU


Information

ESPJOU ;DALISC/RWW - ENHANCED PRINT DAILY OPERATIONS JOURNAL;3/99

Source Information

Source file <ESPJOU.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
JOU
Q
START ;BEGINS THE PRINT OF THE DAILY JOURNAL
SEC1
DFM
DTO
SEC2
WATC
SEC3
SEC4
EXIT
HDR ;PRINT HEADING
HDR1 ;PRINT CONSECUTIVE HEADERS
HDR4 ;SECTION 4 HEADING
HDR2
TIME ; print from time multiple of file 916

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"DATE not found. Please try again."
  • Line Location: JOU+3
Function Call: WRITE
  • Prompt: !,"RECORD DOESN'T EXIST!"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,?28,"SECTION I - PERIOD COVERED"
  • Line Location: SEC1+0
Function Call: WRITE
  • Prompt: !,?28
  • Line Location: SEC1+1
Function Call: WRITE
  • Prompt: "="
  • Line Location: SEC1+1
Function Call: WRITE
  • Prompt: !!,?19,"FROM: ",ESPF
  • Line Location: DFM+0
Function Call: WRITE
  • Prompt: ?43,"TO: ",ESPT
  • Line Location: DTO+0
Function Call: WRITE
  • Prompt: !!,?29,"SECTION II - ASSIGNMENTS"
  • Line Location: SEC2+1
Function Call: WRITE
  • Prompt: !,?29
  • Line Location: SEC2+2
Function Call: WRITE
  • Prompt: "="
  • Line Location: SEC2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SEC2+3
Function Call: WRITE
  • Prompt: !,?15,$G(^UTILITY("DIQ1",$J,916.03,DA,.01,"E"))
  • Line Location: WATC+2
Function Call: WRITE
  • Prompt: ?27,$G(^UTILITY("DIQ1",$J,916.31,DA,.01,"E")),?55,$G(^UTILITY("DIQ1",$J,916.31,DA,.03,"E")),!
  • Line Location: WATC+5
Function Call: WRITE
  • Prompt: !,?24,"SECTION III - SPECIAL INSTRUCTIONS"
  • Line Location: SEC3+2
Function Call: WRITE
  • Prompt: !,?24
  • Line Location: SEC3+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: SEC3+3
Function Call: WRITE
  • Prompt: !!!!!,?7,"REVIEW (Chief, Police Service)",!!
  • Line Location: SEC4+8
Function Call: WRITE
  • Prompt: ?7,"______________________________"
  • Line Location: SEC4+9
Function Call: WRITE
  • Prompt: ?45,"Date: _________________________"
  • Line Location: SEC4+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!!?22,"VA POLICE DAILY OPERATIONS JOURNAL",?70,"Page ",$J(PAGE,3)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?26,"(Automated VA Form 10-1433)"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?4,"VA Facility"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?61,"Date/Time Printed"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?4,$P($G(^DG(40.8,ESPFAC,0)),U,1)
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !?4,$S($D(^DIC(4,DUZ(2),0)):$P(^(0),U),1:"")
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: ?61,$$NOW^ESPUTIL()
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: @IOF,!!!?22,"VA POLICE DAILY OPERATIONS JOURNAL",?70,"Page ",$J(PAGE,3)
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: !?25,"(Automated VA Form 10-1433a)"
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: ?61,$$NOW^ESPUTIL()
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: !!?18,"FROM: ",ESPF
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: ?43,"TO: ",ESPT,!
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: !,?28,"SECTION IV - ENTRY SUMMARY"
  • Line Location: HDR4+2
Function Call: WRITE
  • Prompt: !,?28
  • Line Location: HDR4+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR4+3
Function Call: WRITE
  • Prompt: !!,?4,"TIME",?14,"OFFICER",?27,"ACTIVITY"
  • Line Location: HDR4+4
Function Call: WRITE
  • Prompt: !,?4
  • Line Location: HDR4+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR4+5
Function Call: WRITE
  • Prompt: !,?4,"TIME",?14,"OFFICER",?27,"ACTIVITY"
  • Line Location: HDR2+1
Function Call: WRITE
  • Prompt: !,?4
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: !,?4,$G(^UTILITY("DIQ1",$J,916.05,DA,.01,"E"))
  • Line Location: TIME+4
Function Call: WRITE
  • Prompt: ?14,$E($P(NM,","),1,5),",",$E($P(NM,",",2)),$J($E($P($P(NM,",",2)," ",2)),2)
  • Line Location: TIME+6
Function Call: WRITE
  • Prompt: ?27,$G(^UTILITY("DIQ1",$J,916.05,DA,2,"E"))
  • Line Location: TIME+7
Function Call: WRITE
  • Prompt: ?4
  • Line Location: TIME+14
Function Call: WRITE
  • Prompt: "-"
  • Line Location: TIME+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ESP(916 - [#916] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call