Routine: ABPAAGEQ

Package	Total	Call Graph
VA Fileman	3	^DIC YN^DICN ^DIR
Kernel	2	^%ZIS ^%ZTLOAD
Third Party Tracking	2	^ABPADATE (HEADER,PAUSE)^ABPAMAIN

Entry Points

Name	Comments	DBIA/ICR reference
HEAD	;PROCEDURE TO DRAW SCREEN HEADING
INSURER	;PROCEDURE TO SELECT INSURERS TO INCLUDE
ZTLOAD	;PROCEDURE TO LOAD BACKGROUND TASK MANAGER WITH JOB REQUEST
ZTLEND	;PROCEDURE TO KILL ALL LOCALLY USED TEMPORARY VARIABLES
DEVICE	;PROCEDURE TO SELECT PRINTER DEVICE TO USE FOR THE REPORT
MAIN	;ENTRY POINT - THE STARTING POINT FOR ENTERING THIS PROGRAM
TYPE

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"<<< SORRY, ACCESS DENIED!!! >>>",!! Line Location: ABPAAGEQ+2
Function Call: WRITE	Prompt: *7 Line Location: TYPE+4
Function Call: WRITE	Prompt: ! Line Location: INSURER+5
Function Call: WRITE	Prompt: !! Line Location: DEVICE+1
Function Call: WRITE	Prompt: *7 Line Location: DEVICE+3
Function Call: WRITE	Prompt: !!,"REQUEST QUEUED!! Task number: ",ZTSK Line Location: ZTLOAD+7
Function Call: WRITE	Prompt: *7 Line Location: MAIN+3
Function Call: WRITE	Prompt: *7 Line Location: MAIN+6
Routine Call	DIC Line Location: INSURER+5
Routine Call	DIR Line Location: TYPE+2
Routine Call	%ZIS Line Location: DEVICE+1 DEVICE+2 DEVICE+5

FileNo	Call Tags
^AUTNINS - [#9999999.18]	Classic Fileman Calls

Name	Line Occurrences
DEVICE	DEVICE+5, MAIN+8
HEAD	MAIN+1
INSURER	MAIN+5
TYPE	MAIN+1
ZTLEND	ABPAAGEQ+2, MAIN+1, MAIN+2, MAIN+5, MAIN+8, MAIN+9
ZTLOAD	MAIN+9

Name	Field # of Occurrence
%	INSURER+1, INSURER+2*, INSURER+3, ZTLEND+2!
%DT	ZTLEND+1!
%IS	DEVICE+1*, ZTLEND+1!
%ZIS	ZTLEND+1!
ABPA	ZTLEND+1!
ABPA("INS"	INSURER+1, INSURER+3, INSURER+6*, MAIN+5
ABPA("IO"	DEVICE+7*, MAIN+8
ABPA("RTYP"	TYPE!, TYPE+2*, ZTLOAD+1, ZTLOAD+3, MAIN+1
>> ABPAHD1	HEAD+1*
ABPAMESS	TYPE+4!, DEVICE+3!, MAIN+3!, MAIN+6!
ABPAMESS(2	TYPE+5, DEVICE+4, MAIN+4, MAIN+7
BDT	ZTLEND+1!, MAIN+2
DIC	INSURER+5!*, ZTLEND+2!
DIC(0	INSURER+5*
DIR	TYPE!, ZTLEND+2!
DIR("A"	TYPE+2*
DIR(0	TYPE+1*
EDT	ZTLEND+1!, MAIN+2
FAC	ZTLEND+1!
I	INSURER+1*, ZTLEND+2!
IO	DEVICE+7
IOP	DEVICE+1, DEVICE+2!, DEVICE+5*!, ZTLEND+2!
IOST	DEVICE+5
>> J	INSURER+4*
>> POP	DEVICE+2
X	ZTLEND+1!
Y	TYPE+2, INSURER+4, INSURER+5, INSURER+6, ZTLEND+1!
ZTDESC	ZTLOAD+2, ZTLOAD+4, ZTLEND+1!
ZTIO	ZTLOAD+5*, ZTLEND+1!
ZTRTN	ZTLOAD+1, ZTLOAD+3, ZTLEND+1!
ZTSAVE	ZTLEND+1!
ZTSAVE("ABPA("	ZTLOAD+6*
ZTSAVE("ABPAOPT("	ZTLOAD+6*
ZTSAVE("ABPATLE"	ZTLOAD+5*
ZTSAVE("BDT"	ZTLOAD+5*
ZTSAVE("EDT"	ZTLOAD+5*
ZTSK	ZTLOAD+7, ZTLEND+1!