Routine: ESPUCD

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

ESPUCD ;DALISC/CKA - DELETE CRIME STATISTICS- 3/93

Source Information

Source file <ESPUCD.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
VA FileMan	5	^DIC DT^DICRW ^DIK EN^DIQ1 ^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Police and Security	1	ESP DELETE CRIME STATISTICS

Entry Points

Name	Comments	DBIA/ICR reference
START	;
DATE	;ASK BEGINNING DATE
BEG	;ASK FOR CRIME DATA DATE TO DELETE
PRT	;PRINT BEGINNING AND ENDING DATE
BDT
EDT
ASK
DEL	;DIK CALL TO DELETE
EX

External References

Name	Field # of Occurrence
^DIC	BEG+1
DT^DICRW	DATE+1
^DIK	DEL+1
EN^DIQ1	PRT+1
^DIR	ASK

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Site # is not defined!" Line Location: START+1
Function Call: WRITE	Prompt: !,"RECORD DOESN'T EXIST!" Line Location: PRT+1
Function Call: WRITE	Prompt: !!,"BEGINNING DATE: ",$G(^UTILITY("DIQ1",$J,912.4,DA,.01,"E")) Line Location: BDT+0
Function Call: WRITE	Prompt: !,"ENDING DATE: ",$G(^UTILITY("DIQ1",$J,912.4,DA,.02,"E")),!! Line Location: EDT+0
Function Call: WRITE	Prompt: !! Line Location: ASK+0
Function Call: WRITE	Prompt: !,"Deleted" Line Location: DEL+1
Routine Call	DIC Line Location: BEG+1
Routine Call	DIR Line Location: ASK

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ESP(912.4 - [#912.4]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY("DIQ1"	PRT+1, BDT, EDT, EX+1!

Label References

Name	Line Occurrences
EX	START+1, BEG+2, PRT+1, ASK+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BEGDATE	DATE+1!, EX+1!
DA	PRT+1, BDT, EDT, DEL+1, EX+1!
DIC	BEG+1, PRT+1, EX+1!
DIC("A"	BEG+1*
DIC(0	BEG+1*
DIK	DEL+1*, EX+1!
DIQ	EX+1!
DIQ(0	PRT+1*
DIR	ASK!, EX+1!
DIR("A"	ASK*
DIR("B"	ASK*
DIR(0	ASK*
DR	PRT+1*, EX+1!
DTOUT	EX, EX+1!
DUZ(2	START+1
ESPIEN	BEG+3*, PRT+1, DEL+1, EX+1!
Y	BEG+2, BEG+3, ASK+1, EX+1!