Routine: ABSVDDE

Customize PDF page

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

Information

ABSVDDE ;VAMC ALTOONA/CTB - DELETE DAILY ENTRYS IN FILE 503331 ;4/13/94 11:42 AM

Source Information

Source file <ABSVDDE.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Voluntary Timekeeping	3	(,D,MSG,NOW)^ABSVQ ^ABSVSITE ^ABSVYN
VA FileMan	2	^%DT ^DIK
Kernel	1	KILL^%ZTLOAD

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
Voluntary Timekeeping	1	ABSVTED2

Entry Points

Name	Comments	DBIA/ICR reference
V	;;4.0;VOLUNTARY TIMEKEEPING;;JULY 6, 1994
OUT
DQ	;ENTRY POINT FROM TASK MANAGER FOR DAILY RECORD DELETION
DEL	;DELETE SINGLE ENTRY IN FILE 503331

External References

Name	Field # of Occurrence
^%DT	V+5
KILL^%ZTLOAD	DQ+4
^ABSVQ	V+10
D^ABSVQ	V+8
MSG^ABSVQ	V+4, V+6, V+9
NOW^ABSVQ	V+2, DQ+1, DQ+3
^ABSVSITE	V+1
^ABSVYN	V+4, V+9
^DIK	DEL+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7," ??" Line Location: V+5
Function Call: WRITE	Prompt: !,"You may not delete entries for: Last month, the current month or",!,"any future months using this option.",*7 Line Location: V+7
Function Call: WRITE	Prompt: "Beginning Deletion on ",ABSVXX Line Location: DQ+1
Function Call: WRITE	Prompt: "." Line Location: DQ+2
Function Call: WRITE	Prompt: !!,"FINISHED DELETION PASS TO ",FULLMON,", ",COUNT," ENTRIES DELETED." Line Location: DQ+3
Function Call: WRITE	Prompt: !,"Deletion completed on ",ABSVXX Line Location: DQ+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABS(503331 - [#503331]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABS(503331 - [#503331]	DQ+2

Label References

Name	Line Occurrences
DEL	DQ+2
OUT	V+1, V+4, V+6, V+7, V+9

Naked Globals

Name	Field # of Occurrence
^(0	DQ+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	V+1, V+4, V+9, OUT!
%DT	V+5*, OUT!
%DT("A"	V+5*
>> ABSV("SITE"	DQ+2
>> ABSVXA	V+4, V+9
>> ABSVXA(1	V+4*
>> ABSVXB	V+4, V+9
ABSVXX	DQ+1, DQ+3, DQ+5!
COUNT	OUT!, DQ+2*, DQ+3
DA	OUT!, DQ+2*
>> DIK	DEL+1*
FULLMON	V+8*, V+10, OUT!, DQ+3
I	OUT!
MO	V+3*, OUT!
MONTH	V+8*, OUT!, DQ+2
POP	OUT!
X	V+2, V+3, V+4, V+6, V+9*, OUT!
XDATE	V+2, V+3, V+7, OUT!
Y	V+5, V+6, V+7*, V+8, V+9, OUT!
>> ZTDESC	V+10*
>> ZTQUEUED	DQ+4
>> ZTRTN	V+10*
>> ZTSAVE("ABSV*"	V+10*
>> ZTSAVE("FULLMON"	V+10*
>> ZTSAVE("MONTH"	V+10*
ZZ	V+5*, V+6!