Routine: BGP2DSL

Package	Total	Call Graph
Registration	3	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
IHS GPRA Information System	1	$$GETDEDIR^BGP2UTL2
Kernel	1	DISP^XQORM1
VA Fileman	1	^DIR

Package	Total	Caller Graph
IHS GPRA Information System	18	BGP2DADB BGP2DAP BGP2DAR BGP2DAR9 BGP2DARO BGP2DCL BGP2DGPA BGP2DGPU BGP2DL BGP2DNDB BGP2DNG BGP2DNG9 BGP2DNGP BGP2DNGS BGP2DON BGP2DPP BGP2DSTM BGP2NPL

Entry Points

Name	Comments	DBIA/ICR reference
RT	;EP
REMX	;
EN	;EP -- main entry point for GPRA LIST DISPLAY
ADDALL	;
HDR	; -- header code
PT	;EP
EOJ1	;EP
EXPND	; -- expand code
BACK	;go back to listman
INIT	; -- init variables and list array
EXIT	; -- exit code
REM	;
ADDX	;
ADD	;EP - add an item to the selected list - called from a protocol
EP	;EP - CALLED FROM OPTION
PT1
HELP	; -- help code

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: ! Line Location: ADD+1
Function Call: WRITE	Prompt: !,"No items selected." Line Location: ADD+2
Function Call: WRITE	Prompt: !,"No items selected." Line Location: ADD+3
Function Call: WRITE	Prompt: ! Line Location: REM+1
Function Call: WRITE	Prompt: !,"No items selected." Line Location: REM+2
Function Call: WRITE	Prompt: !,"No items selected." Line Location: REM+3
Function Call: WRITE	Prompt: !!,"Please choose an output type. For an explanation of the delimited",!,"file please see the user manual.",! Line Location: PT+2
Function Call: WRITE	Prompt: !!,"You have selected to create a delimited output file. You can have this",!,"output file created as a text file in the pub directory, ",!,"OR you can have the delimited output display on your screen so that" Line Location: PT+8
Function Call: WRITE	Prompt: !,"you can do a file capture. Keep in mind that if you choose to",!,"do a screen capture you CANNOT Queue your report to run in the background!!",!! Line Location: PT+9
Function Call: WRITE	Prompt: !!!,"Your filename cannot contain a '/'." Line Location: PT1+2
Function Call: WRITE	Prompt: !!,"When the report is finished your delimited output will be found in the",!,$$GETDEDIR^BGP2UTL2()," directory. The filename will be ",BGPDELF,".txt",! Line Location: PT1+4
Routine Call	VALM Line Location: EN+1
Routine Call	DIR Line Location: RT+3 RT+9 ADD+1 REM+1 PT+3 PT+10 PT1

Name	Line Occurrences (* Changed, ! Killed)
^BGPINDW - [#90548.01]	INIT+3, INIT+4, INIT+5, INIT+6
^BGPINDW("AOI"	INIT+2

Name	Field # of Occurrence
BGPANS	EOJ1+1!
BGPC	EOJ1+1!
>> BGPDELF	PT+1, PT+7, PT1+3*, PT1+4
>> BGPDELT	PT+1, PT+7, PT+12*, PT+13
BGPGANS	EOJ1+1!, ADD+5, REM+5
BGPGC	EOJ1+1!, ADD+5, REM+5
BGPGI	EOJ1+1!, ADD+5, REM+5
BGPGLIST	EOJ1+1!, INIT+1!
BGPGLIST(	INIT+4, INIT+6
BGPGLIST("IDX"	INIT+4, INIT+6, ADD+5, ADDALL+1, REM+5
BGPHIGH	EOJ1+1!, INIT+1, INIT+7, ADD+1, ADDALL+1, REM+1
BGPI	EOJ1+1!, ADD+5*
>> BGPIND	ADD+5*
>> BGPIND(	INIT+2, ADD+5, ADDALL+1
BGPLIST	RT+4!, RT+5*, RT+6, RT+7
BGPLIST(	INIT+4, INIT+6, ADD+5, ADDALL+1, REM+5!
>> BGPLPROV	RT+7, RT+8, RT+12
>> BGPLPRV	RT+8, RT+12
BGPNOLI	INIT+1!
BGPNOLI(	INIT+6*, ADD+5, ADDALL+1
>> BGPQUIT	RT+4*
>> BGPROT	PT+1, PT+5, PT+6
BGPTIND	EOJ1+1!
BGPX	EOJ1+1!
>> BGPYNPLT	RT+2
>> C	INIT+2, INIT+3, INIT+4, INIT+5*, INIT+6, INIT+7
DA	RT+3!, RT+9!, PT+3!, PT+10!, PT1!
DIR	RT+3!, RT+9!, BACK+5!, ADD+1!, REM+1!, PT+3!, PT+10!, PT1!
DIR("A"	RT+3, RT+9, ADD+1, REM+1, PT+3, PT+10, PT1*
DIR("B"	RT+3, PT+3, PT+10*
DIR(0	RT+3, RT+9, ADD+1, REM+1, PT+3, PT+10, PT1*
>> DIRUT	RT+4, RT+10, ADD+1, ADD+3, REM+1, REM+3, PT+4, PT+11, PT1+1
>> DUOUT	ADD+1, REM+1
I	INIT+2, BACK+6!, ADDALL+1, REM+5*
IOF	EN+4, ADD+4, REM+4
>> O	INIT+2*
U	INIT+3, INIT+4, INIT+5, INIT+6
>> VALMBCK	BACK+2*
>> VALMCNT	INIT+7*
>> VALMHDR(1	HDR+1*
>> VALMHDR(2	HDR+2*
X	INIT+2, INIT+3, INIT+4, INIT+5, INIT+6, HELP+1, BACK+6!, ADDALL+1*
Y	RT+5, RT+11, RT+12, BACK+6!, ADD+2, ADD+5, REM+2, REM+5, PT+5, PT+12 , PT1+2, PT1+3
Y(0	RT+12
Z	BACK+6!