Routine: BAREDL02

Customize PDF page

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

Info
Source
Call Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

BAREDL02 ; IHS/SD/LSL - AR DOWNLOAD FILE LIST ;

Source Information

Source file <BAREDL02.m>

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZTLOAD $$REPEAT^XLFSTR DISP^XQORM1
Registration	4	EN^VALM TERM^VALM0 CLEAR^VALM1 EN^VALM2
Uncategorized	2	PRINT^AMCOHL1 ($$READ,$$VALMSG,MSG)^AMCOUT
VA Fileman	2	^DIC ^DIE
IHS Accounts Receivable	1	EN^BAREDL03
IHS VA Utilities	1	ENPM^XBDIQ1

Entry Points

Name	Comments	DBIA/ICR reference
RESET	;EP; -- code to rebuild array after action
EN	;EP -- main entry point list template
GATHER(SUBF)	; -- SUBRTN to set data into array
HDR	;EP -- header code
EDIT	;EP; -- called to edit document ; called by AMCO HELP EDIT (Add/Edit Help Text) protocol ; called by AMCO DEV HELP EDIT (Add/Edit Help Text) protocol
SP(N)	; -- SUBRTN to pad N number of spaces
EXPND	;EP -- expand code
BROWSE(FILE)	;EP; -- called to browse help on screen ; Called by AMCO HELP BROWSE (Browse Help Text) protocol
PAD(D,L)	; -- SUBRTN to pad length of data ; -- D=data L=length
INIT	;EP -- init variables and list array
EXIT	;EP -- exit code
GETITEM	; -- select item from list
PRINT	;EP; call to print help documents on paper ; Called by AMCO HELP PRINT (Print Help Text) protocol
NODATA	; No data to be reported
HELP	;EP -- help code

External References

Name	Field # of Occurrence
^%ZIS	PRINT+6
HOME^%ZIS	PRINT+15
^%ZTLOAD	PRINT+13
PRINT^AMCOHL1	PRINT+16
$$READ^AMCOUT	EDIT+4
$$VALMSG^AMCOUT	HDR+1
MSG^AMCOUT	HELP+2
EN^BAREDL03	BROWSE+7, BROWSE+10
^DIC	EDIT+8
^DIE	EDIT+13, EDIT+22
EN^VALM	EN+1
TERM^VALM0	RESET+2
CLEAR^VALM1	BAREDL02+4, EXIT+1, PRINT+16
EN^VALM2	GETITEM+4
ENPM^XBDIQ1	GATHER+26
$$REPEAT^XLFSTR	PAD+2
DISP^XQORM1	HELP+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BAREDI("1T" - [#90056.01]	HDR+2
^TMP($J	GATHER+22!, GATHER+27, GATHER+30, GATHER+32, GATHER+33, GATHER+36, GATHER+37, NODATA+2, NODATA+3, GETITEM+1! , GETITEM+3, GETITEM+11, GETITEM+12, GETITEM+13, GETITEM+14*, GETITEM+15, BROWSE+2!

Name	Line Occurrences
$$PAD	GATHER+35, SP+1
GATHER	GETITEM+9
GETITEM	BROWSE+3, EDIT+15, PRINT+3
HDR	RESET+4
INIT	RESET+4
NODATA	GATHER+9, GATHER+27
RESET	PRINT+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	PRINT+2~, PRINT+5*
AMCODR	EDIT+3~, EDIT+16, PRINT+2~, PRINT+4
AMCODR(	EDIT+18, EDIT+20
AMCON	EDIT+3~, EDIT+17, EDIT+18, EDIT+20
BARDR	GETITEM+1!, BROWSE+3, BROWSE+11!
BARDR(	GETITEM+13*, GETITEM+14
>> BAREDL("A"	GATHER+21*, GATHER+26
D	PAD~, PAD+2
>> D2	GATHER+18*
DA	EDIT+3~, EDIT+11, EDIT+20
>> DATA	GATHER+33, GATHER+34, GATHER+35
DIC	EDIT+3~, EDIT+6*
DIC(0	EDIT+7*
DIE	EDIT+3~, EDIT+10, EDIT+19
DLAYGO	EDIT+3~, EDIT+6*
DR	EDIT+3~, EDIT+12, EDIT+21
FILE	BROWSE~
>> FL	GATHER+8*, GATHER+9, GATHER+26, BROWSE+5, BROWSE+8
>> FL02	GATHER+7*, GATHER+8
>> FL06	GATHER+6*, GATHER+8
>> FLDNM	GATHER+31, GATHER+32, GATHER+33, GATHER+34, GATHER+35
>> FLNUM	HDR+2, GATHER+8
>> FLST	GATHER+5*, GATHER+26
>> HDR	GETITEM+15*, BROWSE+7, BROWSE+10
IO("Q"	PRINT+8, PRINT+12!
L	PAD~, PAD+2
>> LAB	GATHER+23*
LINE	GATHER+22!, GATHER+40!
LINE(	GATHER+31, GATHER+35, GATHER+36, GATHER+37
>> LN	GATHER+17*
>> LSTFILE	BROWSE+6, BROWSE+7, BROWSE+9, BROWSE+10
N	SP~, SP+1
>> PAD(	GATHER+10, GATHER+11, GATHER+12, GATHER+13, GATHER+14, GATHER+15, GATHER+16*, GATHER+35
POP	PRINT+2~, PRINT+7
>> RECN	GATHER+19, GATHER+30, GATHER+31, GATHER+32, GATHER+33, GATHER+35, GATHER+36, GATHER+37
SF	GETITEM+6~, GETITEM+7, GETITEM+8, GETITEM+9, GETITEM+11, GETITEM+12, GETITEM+13, GETITEM+15
>> SPACE	GATHER+20*, GATHER+34
SUBF	GATHER~, GATHER+36, GATHER+37, NODATA+2, NODATA+3
>> VALMBCK	RESET+1, RESET+3
>> VALMCNT	INIT+1*
>> VALMHDR(1	HDR+2*
>> VALMLST	GETITEM+2, GETITEM+3
>> VALMQUIT	RESET+1
>> VALMSG	HDR+1*
>> VALMY	GETITEM+5
>> VALMY(	GETITEM+8
>> X	HELP+1*
>> XQORNOD(0	GETITEM+4
>> Y	EDIT+4*, EDIT+5, EDIT+9, EDIT+11
Z	GETITEM+6~, GETITEM+10, GETITEM+11, GETITEM+12, GETITEM+13, GETITEM+14
>> ZTDESC	PRINT+10*
>> ZTRTN	PRINT+9*
>> ZTSAVE("AMCODR("	PRINT+11*
ZTSK	PRINT+14!

Customize PDF page

Package: IHS Accounts Receivable

Routine: BAREDL02

Call Graph Total: 14