Routine: BRNAGE2

Package	Total	Call Graph
VA Fileman	3	EN1^DIP $$GET1^DIQ ^DIR
IHS Release Of Information	1	ASKFAC^BRNU

Package	Total	Caller Graph
IHS Release Of Information	1	BRN GS AGING RPT

Name	Comments	DBIA/ICR reference
PRINT2	;PRINT report by purpose
END	;
ASK2	;EP - Restrict to a certain PURPOSE
DRIVER	;EP; entry point from new option ; driver calls all 3 aging reports
PRINT	;PRINT Report by staff assignment
PURPOSE	;ROI Staff Assignment
ASK	;EP - Restrict a Certain Staff Assignment
STAFF	;ROI Staff Assignment

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ROI AGING REPORTS" Line Location: DRIVER+3
Function Call: WRITE	Prompt: ! Line Location: ASK+2
Function Call: WRITE	Prompt: ! Line Location: ASK2+2
Routine Call	DIR Line Location: DRIVER+5 ASK+4 STAFF+2 ASK2+4 PURPOSE+2

FileNo	Call Tags
^BRNREC - [#90264]	Classic Fileman Calls
^BRNPARM - [#90264.2]	GET1^DIQ

Name	Field # of Occurrence
B	END+1!
BRNFAC	PRINT+3~, PRINT+8, PRINT2+3~, PRINT2+4, PRINT2+8
BRNFACN	PRINT2+3~, PRINT2+4*, PRINT2+9
BRNPURB	END+1!, ASK2+1, PURPOSE+4, PRINT2+8, PRINT2+9
BRNPURE	END+1!, ASK2+1, PURPOSE+4, PRINT2+8, PRINT2+9
BRNSTBD	ASK+1, STAFF+4, PRINT+7, END+1!
BRNSTED	ASK+1, STAFF+4, PRINT+7, END+1!
>> BY	PRINT2+7*
>> BY(0	PRINT+6*
DA	DRIVER+5!, STAFF+2!, PURPOSE+2!
DD0	END+1!
DHIT	PRINT+9!, PRINT2+10!
>> DIC	PRINT+6, PRINT2+7
DIOBEG	PRINT+9!, PRINT2+10!
DIOEND	PRINT+9!, PRINT2+10!
DIR	DRIVER+2~, DRIVER+5!, ASK+4!, STAFF+2!, ASK2+4!, PURPOSE+2!
DIR("?"	ASK+3, ASK2+3
DIR("A"	DRIVER+4, ASK+2, STAFF+1, ASK2+2, PURPOSE+1*
DIR("B"	ASK+2, ASK2+2
DIR(0	DRIVER+4, ASK+2, STAFF+1, ASK2+2, PURPOSE+1*
>> DIRUT	DRIVER+6, ASK+5, STAFF+3, ASK2+5, PURPOSE+3
>> DIS(0	PRINT+8*
>> FLDS	PRINT+6, PRINT2+7
>> FR	PRINT2+8, PRINT2+9
>> FR(0	PRINT+7*
>> L	PRINT+6, PRINT2+7
>> L(0	PRINT+6*
RPT	DRIVER+2~, DRIVER+7*
>> TO	PRINT2+8, PRINT2+9
>> TO(0	PRINT+7*
U	PURPOSE+4
X	END+1!
Y	DRIVER+2~, DRIVER+6, DRIVER+7, ASK+6, STAFF+4, ASK2+6, PURPOSE+4

Information