Routine: A1VSRFL

Package	Total	Call Graph
VistA Package Sizing Utility	4	(ADD,HANGCHAR)^A1VSLAPI SCAPARY^A1VSLP $$SELPKG^A1VSLPDC ($$COUNTFLS,$$MULTX,$$OPTION,$$PROTOCOL,$$ROUTINE,CNTR,KIDSIDX,ONERPT)^A1VSRFL1
Kernel	1	($$STATUS,CLOSE,OPEN)^%ZISH
Toolkit	1	$$GET^XPAR
VA FileMan	1	^DIR

Package

Total

Call Graph

(ADD,HANGCHAR)^A1VSLAPI SCAPARY^A1VSLP $$SELPKG^A1VSLPDC ($$COUNTFLS,$$MULTX,$$OPTION,$$PROTOCOL,$$ROUTINE,CNTR,KIDSIDX,ONERPT)^A1VSRFL1

Kernel

($$STATUS,CLOSE,OPEN)^%ZISH

Toolkit

$$GET^XPAR

VA FileMan

^DIR

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
VistA Package Sizing Utility	1	A1VSLR

Entry Points

Name	Comments	DBIA/ICR reference
INIT(VALMCNT,A1VPSPRM)	;;
ALL	;
SORT	;
LOOP(VALMCNT)	; Loop through all entries in the Package parameters file
DISALL	; ; display option 4 & 5 have no formatting, and are used for creating spreadsheets, ; for which the following heading lines are not needed
DAD	;
KWIT	; QUIT Report
PDAD(DISSORT,DATA,D1,D2,D3,VALMCNT)	; print actual data (finally)
ONEPKG	; Select a package to report

Name	Field # of Occurrence
$$STATUS^%ZISH	LOOP+12, ONEPKG+6
CLOSE^%ZISH	LOOP+16, ONEPKG+8
OPEN^%ZISH	LOOP+7, ONEPKG+3
ADD^A1VSLAPI	DISALL+4, DISALL+5, DISALL+6, DISALL+7, DISALL+8, DISALL+9, DAD+8, DAD+14, PDAD+11, PDAD+19 , PDAD+24, PDAD+25
HANGCHAR^A1VSLAPI	LOOP+40
SCAPARY^A1VSLP	ONEPKG+7
$$SELPKG^A1VSLPDC	ONEPKG+10
$$COUNTFLS^A1VSRFL1	LOOP+48
$$MULTX^A1VSRFL1	LOOP+61
$$OPTION^A1VSRFL1	LOOP+65, LOOP+67
$$PROTOCOL^A1VSRFL1	LOOP+69
$$ROUTINE^A1VSRFL1	LOOP+63
CNTR^A1VSRFL1	LOOP+70, LOOP+71, LOOP+72, LOOP+73
KIDSIDX^A1VSRFL1	LOOP+18
ONERPT^A1VSRFL1	ONEPKG+11
^DIR	ALL+12, SORT+13
$$GET^XPAR	ALL+2

Name

Field # of Occurrence

LOOP+12, ONEPKG+6

LOOP+16, ONEPKG+8

LOOP+7, ONEPKG+3

DISALL+4, DISALL+5, DISALL+6, DISALL+7, DISALL+8, DISALL+9, DAD+8, DAD+14, PDAD+11, PDAD+19
, PDAD+24, PDAD+25

LOOP+40

ONEPKG+7

ONEPKG+10

LOOP+48

LOOP+61

LOOP+65, LOOP+67

LOOP+69

LOOP+63

LOOP+70, LOOP+71, LOOP+72, LOOP+73

KIDSIDX^A1VSRFL1

LOOP+18

ONERPT^A1VSRFL1

ONEPKG+11

^DIR

ALL+12, SORT+13

$$GET^XPAR

ALL+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"DUZ must be defined." Line Location: INIT+19
Function Call: WRITE	Prompt: !!,"VistA Package Sizing Report",! Line Location: ALL+1
Routine Call	DIR Line Location: ALL+12 SORT+13

Name

Line Occurrences

Function Call: WRITE

Prompt: !!,"DUZ must be defined."
Line Location: INIT+19

Function Call: WRITE

Prompt: !!,"VistA Package Sizing Report",!
Line Location: ALL+1

Routine Call

DIR
Line Location:

ALL+12
SORT+13

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	LOOP+43
^TMP("A1VA-KIDSPFX-IDX"	LOOP+28
^TMP("A1VS-FORUM-PFXS"	LOOP+1!, LOOP+27, LOOP+34, DAD+21!
^TMP("A1VS-FORUM2TMP"	DAD+22!
^TMP("A1VS-FORUMPKG"	LOOP+1!, LOOP+15*, LOOP+22, LOOP+23, LOOP+40, LOOP+41, DAD+21!
^TMP("A1VS-IDX-PKG"	LOOP+2!, LOOP+28, LOOP+35, DAD+22!
^TMP("A1VS-KIDSPFX-IDX"	LOOP+2!, DAD+22!
^TMP("A1VS-PARAM-CAP"	ONEPKG+2!, ONEPKG+13!
^TMP("A1VS-PREFIX-IDX"	LOOP+1!, LOOP+26, LOOP+33, DAD+21!
^TMP("ZZVPS"	LOOP+1!, LOOP+75, LOOP+78, LOOP+80, LOOP+81, DAD+9, DAD+10, DAD+16, DAD+17, DAD+18 , DAD+21!
^TMP("ZZVPS0"	LOOP+2!, LOOP+80, LOOP+81, DAD+2, DAD+22!

Name

Line Occurrences (* Changed, ! Killed)

^DIC(9.4 - [#9.4]

LOOP+43

^TMP("A1VA-KIDSPFX-IDX"

LOOP+28

^TMP("A1VS-FORUM-PFXS"

LOOP+1!, LOOP+27*, LOOP+34*, DAD+21!

^TMP("A1VS-FORUM2TMP"

DAD+22!

^TMP("A1VS-FORUMPKG"

LOOP+1!, LOOP+15*, LOOP+22, LOOP+23, LOOP+40, LOOP+41, DAD+21!

^TMP("A1VS-IDX-PKG"

LOOP+2!, LOOP+28*, LOOP+35*, DAD+22!

^TMP("A1VS-KIDSPFX-IDX"

LOOP+2!, DAD+22!

^TMP("A1VS-PARAM-CAP"

ONEPKG+2!, ONEPKG+13!

^TMP("A1VS-PREFIX-IDX"

LOOP+1!, LOOP+26*, LOOP+33*, DAD+21!

^TMP("ZZVPS"

LOOP+1!, LOOP+75*, LOOP+78*, LOOP+80, LOOP+81, DAD+9, DAD+10, DAD+16, DAD+17, DAD+18
, DAD+21!

^TMP("ZZVPS0"

LOOP+2!, LOOP+80*, LOOP+81*, DAD+2, DAD+22!

Name	Line Occurrences
KWIT	ALL+12, SORT+13
LOOP	SORT+15
ONEPKG	ALL+13
PDAD	DAD+2, DAD+11, DAD+19

Name

Line Occurrences

KWIT

ALL+12, SORT+13

LOOP

SORT+15

ONEPKG

ALL+13

PDAD

DAD+2, DAD+11, DAD+19

Name	Field # of Occurrence
^(	LOOP+80, LOOP+81, DAD+2, DAD+11, DAD+19

Name

Field # of Occurrence

LOOP+80, LOOP+81, DAD+2, DAD+11, DAD+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A1CHAR	LOOP+3~, LOOP+39*, LOOP+40
A1VPSPRM	INIT~, ALL+5, ALL+7, LOOP+7, ONEPKG+3
ADDPRFX	LOOP+4~, LOOP+30, LOOP+32, LOOP+66, LOOP+67*
ADP	LOOP+51!, LOOP+58, LOOP+61, LOOP+63, LOOP+69, LOOP+70, LOOP+71, LOOP+72, LOOP+73, DAD+23!
ADP(	LOOP+61*, LOOP+67
APFX	LOOP+4~, LOOP+61*
APFXLST	LOOP+3~, LOOP+57*, LOOP+61
CAPNODE	ONEPKG+1~, ONEPKG+5*, ONEPKG+7
D1	LOOP+3~, LOOP+5, LOOP+80, LOOP+81, DAD+2, DAD+4, DAD+9, DAD+10, DAD+11, DAD+16* , DAD+17*, DAD+18, DAD+19, PDAD~, PDAD+10, PDAD+19
D10	PDAD+1~, PDAD+5, PDAD+10, PDAD+15, PDAD+23
D2	LOOP+3~, LOOP+5, LOOP+80, LOOP+81, DAD+2, DAD+9, DAD+10, DAD+11, DAD+17, DAD+18 , DAD+19, PDAD~, PDAD+10, PDAD+21
D3	LOOP+3~, LOOP+5, DAD+2, PDAD~, PDAD+5, PDAD+10, PDAD+17, PDAD+23
D4	PDAD+1~, PDAD+5, PDAD+10, PDAD+16, PDAD+17*, PDAD+23
D5	PDAD+1~, PDAD+5, PDAD+10, PDAD+15, PDAD+23
D6	PDAD+1~, PDAD+2*, PDAD+10, PDAD+23
D7	PDAD+1~, PDAD+5, PDAD+10, PDAD+15, PDAD+23
D8	PDAD+1~, PDAD+5, PDAD+10, PDAD+15, PDAD+23
D9	PDAD+1~, PDAD+5, PDAD+10, PDAD+15, PDAD+23
DATA	PDAD~, PDAD+5, PDAD+10, PDAD+15, PDAD+16, PDAD+17
DATANDE	PDAD+1~, PDAD+9, PDAD+10, PDAD+11, PDAD+20, PDAD+21, PDAD+22, PDAD+23, PDAD+24
DIR	ALL+3~, SORT+1~
DIR("?"	ALL+5, ALL+6, ALL+7, ALL+8, ALL+9, ALL+10, ALL+11*
DIR("A"	ALL+4, SORT+1
DIR("B"	ALL+3*
DIR("L"	SORT+6, SORT+7, SORT+8, SORT+9, SORT+10, SORT+11, SORT+12*
DIR(0	ALL+3, SORT+2, SORT+3, SORT+4, SORT+5*
DISSORT	INIT+21~, SORT+13*, LOOP+75, LOOP+76, LOOP+80, LOOP+81, DISALL+3, DISALL+4, DAD+2, DAD+3 , DAD+6, DAD+7, DAD+11, DAD+13, DAD+19, PDAD~, PDAD+3, PDAD+8, PDAD+14, PDAD+16 , PDAD+17
DUZ	INIT+19
EXTDIR	INIT+21~, ALL+2*, ALL+6, LOOP+7, ONEPKG+3
FLDTOT	LOOP+4~, LOOP+45*
FTOT	LOOP+4~, LOOP+45, LOOP+48, LOOP+75, LOOP+78
IO	LOOP+10, ONEPKG+4
LINEITEM	LOOP+3~, LOOP+12, LOOP+13, LOOP+15, LOOP+23, LOOP+24, LOOP+25, LOOP+28, LOOP+30, LOOP+33 , LOOP+35, LOOP+41, LOOP+42, LOOP+44, LOOP+48, LOOP+52, LOOP+57, LOOP+77, LOOP+78, ONEPKG+6 , ONEPKG+7
LNNUM	LOOP+3~, LOOP+11, LOOP+14, LOOP+15
>> LPCNT	LOOP+31*
OTOT	LOOP+4~, LOOP+45, LOOP+65, LOOP+67*, LOOP+75, LOOP+78
PCENUM	LOOP+3~, LOOP+32, LOOP+53, LOOP+54, LOOP+58, LOOP+61*
PKGIEN	LOOP+4~, LOOP+43*, LOOP+69
PKGNAME	LOOP+3~, LOOP+24, LOOP+26, LOOP+42, LOOP+43, LOOP+61, LOOP+65, LOOP+67, LOOP+70, LOOP+71 , LOOP+72, LOOP+73, LOOP+75, LOOP+78, ONEPKG+1~, ONEPKG+10*, ONEPKG+11
PKGPFX	LOOP+3~, LOOP+25, LOOP+26, LOOP+27, LOOP+44, LOOP+48, LOOP+63, LOOP+65, LOOP+69, LOOP+70 , LOOP+71, LOOP+72, LOOP+73, LOOP+75, LOOP+78
>> POP	LOOP+8
POPERR	LOOP+3~, LOOP+6, LOOP+8, LOOP+9
PREFIX	LOOP+4~, LOOP+32*, LOOP+33, LOOP+34, LOOP+35
PRNTPKG	LOOP+4~, LOOP+77*, LOOP+78
PTOT	LOOP+4~, LOOP+45, LOOP+69, LOOP+75, LOOP+78
RDP	LOOP+51!, LOOP+53, LOOP+55, LOOP+63, LOOP+65, LOOP+67, LOOP+69, LOOP+70, LOOP+71, LOOP+72 , LOOP+73, DAD+23!
RDP(	LOOP+55*
RPFX	LOOP+4~, LOOP+54*, LOOP+55
RPFXLST	LOOP+3~, LOOP+52*, LOOP+54
RPTOT	LOOP+4~, LOOP+45*, LOOP+70, LOOP+75, LOOP+78
RTOT	LOOP+4~, LOOP+45, LOOP+63, LOOP+75, LOOP+78
S3	DAD+1~, DAD+2*
SPCT	PDAD+1~, PDAD+22*
TLCNT	LOOP+4~, LOOP+45*, LOOP+63, LOOP+75, LOOP+78
TMPSUB	LOOP+3~, LOOP+21, LOOP+22, LOOP+23, LOOP+39, LOOP+40, LOOP+41, LOOP+78, DAD+15, DAD+16 , DAD+17, DAD+18
TPLTTOT	LOOP+4~, LOOP+45*, LOOP+71, LOOP+72, LOOP+73, LOOP+75, LOOP+78
VALMCNT	INIT~, SORT+15, LOOP~, DISALL+4, DISALL+5, DISALL+6, DISALL+7, DISALL+8, DISALL+9, DAD+2 , DAD+8, DAD+11, DAD+14, DAD+19, PDAD~, PDAD+11, PDAD+19, PDAD+24, PDAD+25, ONEPKG+5* , ONEPKG+11
X	INIT+21~, LOOP+80, LOOP+81
Y	INIT+21~, ALL+12, ALL+13, SORT+13

Customize PDF page

Package: VistA Package Sizing Utility

Routine: A1VSRFL

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: