Routine: A1VSLPC

Package	Total	Call Graph
List Manager	3	EN^VALM FULL^VALM1 (CLEAN,KILL)^VALM10
Kernel	2	($$STATUS,CLOSE,OPEN)^%ZISH DISP^XQORM1
MailMan	2	^XMD TOWHOM^XMXAPIU
VistA Package Sizing Utility	2	(ADD,JUSTPAWS)^A1VSLAPI ($$BLDNUM,$$VERNUM)^A1VSLM
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Kernel	1	^ORD(101
VistA Package Sizing Utility	1	A1VSLP

Entry Points

Name	Comments	DBIA/ICR reference
EN(CMPRFNME)	; -- main entry point for A1VS PKG MGR PARAM COMPARE ; Input: CMPRFNME - File to compare current XTMPSIZE.DAT file
HDR	; -- header code
INIT	; - Build Current and Comparison XTMPSIZE parameter arrays
COMPARE(CPRNDNM,NODECUR,VALMCNT,PKGDEL,PKGRPTD)	; Compare current & selected parameter files, report diff's and cleanup ^TMP globals
CHNGCHK(NODECUR,NODECPR,VALMCNT)	; Check latest extract (CUR) against a comparison extract (CPR)
ADDDELRP(EXTRCT,VALMCNT)	;Report packages Added/Deleted to/from current extract
HELP	; -- help code
EXIT	; -- exit code
EXPND	; -- expand code
REFRESH	; -- refresh display
MSG(TEXT)	; -- set default message
KILL	; - Cleanup local and global display arrays
CLNTMPGB	;Kill temporary globals
HDROUT(PKGNAME,PKGHDRPT,VALMCNT)	; Output package header
LISTDIF(ELMTNME,CURDAT,CPRDAT,VALMCNT)	; Output differences in parameter lists
EVENSPLT(VALMCNT,MSG,DTANODE)	; Add line to build display split on piece ; VALMCNT - Current array node number ; MSG - Message to add to ListMan Display ; DTANODE - Indicates raw data node or data element changed ; 1 : Raw data node ; 0 : data element changed
DELIMEND(MSGPCE)	; Return ending delimiter for LINEOUT in EVENSPLT^A1VSLPC
DELPKG(CURNDNM,CPRNDNM)	; Delete Package from Current and Compare parameter files
MAILRPT	; Email ^TMP("A1VS PKG MGR PARAM ERROR DISP") comparison report ; -- Protocol: A1VS PKG MGR PARAM COMPR MAIL ACTION

Name	Field # of Occurrence
$$STATUS^%ZISH	INIT+9, INIT+19
CLOSE^%ZISH	INIT+13, INIT+23
OPEN^%ZISH	INIT+6, INIT+16
ADD^A1VSLAPI	INIT+28, INIT+29, INIT+39, CHNGCHK+24, CHNGCHK+31, CHNGCHK+38, CHNGCHK+73, CHNGCHK+74, CHNGCHK+75, ADDDELRP+4 , ADDDELRP+5, ADDDELRP+6, ADDDELRP+15, ADDDELRP+18, ADDDELRP+21, ADDDELRP+23, ADDDELRP+27, ADDDELRP+31, ADDDELRP+35, ADDDELRP+40 , ADDDELRP+42, HDROUT+2, HDROUT+3, LISTDIF+2, LISTDIF+17, LISTDIF+22, EVENSPLT+17, EVENSPLT+20
JUSTPAWS^A1VSLAPI	EN+4, MAILRPT+21, MAILRPT+22
$$BLDNUM^A1VSLM	HDR+5
$$VERNUM^A1VSLM	HDR+5
EN^VALM	EN+6
FULL^VALM1	MAILRPT+3
CLEAN^VALM10	KILL+1
KILL^VALM10	KILL+2
^XMD	MAILRPT+20
TOWHOM^XMXAPIU	MAILRPT+7
$$GET^XPAR	HDR+3, INIT+3
DISP^XQORM1	HELP+1

Name	Line Occurrences (* Changed, ! Killed)
^TMP("A1VS "	ADDDELRP+10
^TMP("A1VS CPR PARAM"	INIT+22*, INIT+34, INIT+35, INIT+37, COMPARE+3, CLNTMPGB+1!, DELPKG+1!
^TMP("A1VS CUR PARAM"	INIT+12*, INIT+32, CLNTMPGB+1!, DELPKG+1!
^TMP("A1VS PKG MAN CMPR MSG"	MAILRPT+15, MAILRPT+18, MAILRPT+23!
^TMP("A1VS PKG MAN PARM COMPARE"	KILL+4!, MAILRPT+17, MAILRPT+18
^TMP("XMY"	MAILRPT+11

Name	Line Occurrences
$$CHNGCHK	COMPARE+15
$$DELIMEND	EVENSPLT+12
ADDDELRP	INIT+41, INIT+42
CLNTMPGB	KILL+3
COMPARE	INIT+37
DELPKG	INIT+34, COMPARE+13, COMPARE+16
EVENSPLT	ADDDELRP+25, ADDDELRP+29, ADDDELRP+33, ADDDELRP+37, LISTDIF+5, LISTDIF+6, LISTDIF+8, LISTDIF+9, LISTDIF+12, LISTDIF+16 , LISTDIF+21, LISTDIF+24
HDROUT	CHNGCHK+23, CHNGCHK+30, CHNGCHK+37, CHNGCHK+44, CHNGCHK+51, CHNGCHK+58, CHNGCHK+65, CHNGCHK+72, ADDDELRP+12
INIT	REFRESH+1
KILL	INIT+2, EXIT+1
LISTDIF	CHNGCHK+45, CHNGCHK+52, CHNGCHK+59, CHNGCHK+66

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A1INSTMM	MAILRPT+2~, MAILRPT+7
A1INSTMM("ADD	R FLAGS" , MAILRPT+5*
A1LPCNT	MAILRPT+9~, MAILRPT+10, MAILRPT+11
A1TOMM	MAILRPT+2~
A1TYPE	MAILRPT+2~, MAILRPT+6*, MAILRPT+7
>> A1VPSPRM	HDR+10, INIT+6
CMPRFNME	EN~, EN+3, HDR+13, INIT+16
CPRADPFX	CHNGCHK+2~, CHNGCHK+42*, CHNGCHK+43, CHNGCHK+45
CPRDAT	LISTDIF~, LISTDIF+4, LISTDIF+7, LISTDIF+9, LISTDIF+11, LISTDIF+12, LISTDIF+15, LISTDIF+21
CPREXPFX	CHNGCHK+2~, CHNGCHK+49*, CHNGCHK+50, CHNGCHK+52
CPRFL	CHNGCHK+2~, CHNGCHK+56*, CHNGCHK+57, CHNGCHK+59
CPRFRL	CHNGCHK+2~, CHNGCHK+63*, CHNGCHK+64, CHNGCHK+66
CPRHF	CHNGCHK+2~, CHNGCHK+35*, CHNGCHK+36, CHNGCHK+38
CPRLF	CHNGCHK+2~, CHNGCHK+28*, CHNGCHK+29, CHNGCHK+31
CPRNDNM	INIT+1~, INIT+36, INIT+37, COMPARE~, COMPARE+3, COMPARE+13, COMPARE+16, DELPKG~, DELPKG+1
CPRPCS	COMPARE+1~, COMPARE+8, COMPARE+10, COMPARE+13, COMPARE+14
CPRPKG	COMPARE+1~, COMPARE+4*, COMPARE+14
CPRPP	CHNGCHK+2~, CHNGCHK+70*, CHNGCHK+71, CHNGCHK+75
CPRPPFX	CHNGCHK+2~, CHNGCHK+21*, CHNGCHK+22, CHNGCHK+24
CURADPFX	CHNGCHK+2~, CHNGCHK+41*, CHNGCHK+43, CHNGCHK+45
CURDAT	LISTDIF~, LISTDIF+4, LISTDIF+6, LISTDIF+7, LISTDIF+11, LISTDIF+16, LISTDIF+20, LISTDIF+24
CUREXPFX	CHNGCHK+2~, CHNGCHK+48*, CHNGCHK+50, CHNGCHK+52
CURFL	CHNGCHK+2~, CHNGCHK+55*, CHNGCHK+57, CHNGCHK+59
CURFRL	CHNGCHK+2~, CHNGCHK+62*, CHNGCHK+64, CHNGCHK+66
CURHF	CHNGCHK+2~, CHNGCHK+34*, CHNGCHK+36, CHNGCHK+38
CURLF	CHNGCHK+2~, CHNGCHK+27*, CHNGCHK+29, CHNGCHK+31
CURNDNM	INIT+1~, INIT+31, INIT+32, INIT+34, INIT+35, COMPARE+13, COMPARE+16, DELPKG~, DELPKG+1
CURPCS	COMPARE+1~, COMPARE+9, COMPARE+11, COMPARE+13, COMPARE+14
CURPKG	COMPARE+1~, COMPARE+2*, COMPARE+14
CURPP	CHNGCHK+2~, CHNGCHK+69*, CHNGCHK+71, CHNGCHK+74
CURPPFX	CHNGCHK+2~, CHNGCHK+20*, CHNGCHK+22, CHNGCHK+24
DATAELMT	ADDDELRP+1~, ADDDELRP+14, ADDDELRP+15, ADDDELRP+17, ADDDELRP+18, ADDDELRP+20, ADDDELRP+21, ADDDELRP+24, ADDDELRP+25, ADDDELRP+28* , ADDDELRP+29, ADDDELRP+32, ADDDELRP+33, ADDDELRP+36, ADDDELRP+37, ADDDELRP+39, ADDDELRP+40, LISTDIF+1~, LISTDIF+15, LISTDIF+16 , LISTDIF+20*, LISTDIF+21
DEFDIR	HDR+1~, HDR+3, HDR+6, INIT+1~, INIT+3, INIT+6, INIT+16
DELSTATE	INIT+1~, INIT+33, INIT+34, INIT+35
DIR	KILL+5!
DIRHEAD	HDR+1~, HDR+6, HDR+7, HDR+8, HDR+10, HDR+11, HDR+12, HDR+13*, HDR+14, HDR+15
DIRUT	KILL+5!
DTANODE	EVENSPLT~, EVENSPLT+8*, EVENSPLT+13, EVENSPLT+14, EVENSPLT+17, EVENSPLT+20
DTOUT	KILL+5!
DUOUT	KILL+5!
DUZ	MAILRPT+7, MAILRPT+12
ELMTNME	LISTDIF~, LISTDIF+2
EXTRCT	ADDDELRP~, ADDDELRP+3, ADDDELRP+10, ADDDELRP+42
FNDCHG	COMPARE+1~, COMPARE+15*
FNDCHNG	CHNGCHK+1~, CHNGCHK+15, CHNGCHK+77, CHNGCHK+78
HDRTXT	ADDDELRP+1~, ADDDELRP+3*, ADDDELRP+6
IO	INIT+7, INIT+17
>> LINEITEM	INIT+9, INIT+10, INIT+12, INIT+19, INIT+20, INIT+22
LINEOUT	EVENSPLT+7~, EVENSPLT+9, EVENSPLT+12, EVENSPLT+13, EVENSPLT+14, EVENSPLT+16, EVENSPLT+17, EVENSPLT+18, EVENSPLT+20
MSG	EVENSPLT~, EVENSPLT+12, EVENSPLT+16
MSGPCE	EVENSPLT+7~, EVENSPLT+12*, DELIMEND~, DELIMEND+2
NODECPR	COMPARE+1~, COMPARE+3*, COMPARE+4, COMPARE+8, COMPARE+10, COMPARE+13, COMPARE+14, COMPARE+15, CHNGCHK~, CHNGCHK+21 , CHNGCHK+28, CHNGCHK+35, CHNGCHK+42, CHNGCHK+49, CHNGCHK+56, CHNGCHK+63, CHNGCHK+70
NODECUR	INIT+1~, INIT+32*, INIT+34, INIT+35, INIT+37, COMPARE~, COMPARE+2, COMPARE+9, COMPARE+11, COMPARE+13 , COMPARE+14, COMPARE+15, CHNGCHK~, CHNGCHK+16, CHNGCHK+20, CHNGCHK+27, CHNGCHK+34, CHNGCHK+41, CHNGCHK+48, CHNGCHK+55 , CHNGCHK+62, CHNGCHK+69
NODENM	ADDDELRP+1~, ADDDELRP+9, ADDDELRP+10
NODENUM	INIT+1~, INIT+8, INIT+11, INIT+12, INIT+18, INIT+21, INIT+22
NODEVAL	ADDDELRP+1~, ADDDELRP+10*, ADDDELRP+12, ADDDELRP+14, ADDDELRP+17, ADDDELRP+20, ADDDELRP+24, ADDDELRP+28, ADDDELRP+32, ADDDELRP+36 , ADDDELRP+39
PCENUM	LISTDIF+1~, LISTDIF+15, LISTDIF+17, LISTDIF+20, LISTDIF+22, EVENSPLT+7~, EVENSPLT+12, EVENSPLT+15, EVENSPLT+16, EVENSPLT+19
PKGDEL	INIT+1~, INIT+36, INIT+37, COMPARE~, COMPARE+13, COMPARE+18*
PKGFND	ADDDELRP+1~, ADDDELRP+8, ADDDELRP+11, ADDDELRP+42
PKGHDRPT	CHNGCHK+1~, CHNGCHK+15, CHNGCHK+23, CHNGCHK+30, CHNGCHK+37, CHNGCHK+44, CHNGCHK+51, CHNGCHK+58, CHNGCHK+65, CHNGCHK+72 , ADDDELRP+12, HDROUT~, HDROUT+1
PKGNAME	CHNGCHK+1~, CHNGCHK+16*, CHNGCHK+23, CHNGCHK+30, CHNGCHK+37, CHNGCHK+44, CHNGCHK+51, CHNGCHK+58, CHNGCHK+65, CHNGCHK+72 , HDROUT~, HDROUT+3
PKGRPTD	INIT+1~, INIT+26, INIT+37, INIT+38, INIT+43, COMPARE~, COMPARE+17*
RESULT	DELIMEND+1~, DELIMEND+2*, DELIMEND+3
SPCPAD	HDR+1~, HDR+2, HDR+7, HDR+8, HDR+9, HDR+11, HDR+12, HDR+14*, HDR+15
START	EVENSPLT+7~, EVENSPLT+10, EVENSPLT+16, EVENSPLT+19
>> STRVLMCT	CHNGCHK+17*, CHNGCHK+77
SUBSCPT	MAILRPT+2~, MAILRPT+16, MAILRPT+17, MAILRPT+18
TEXT	MSG~
>> VALMBCK	REFRESH+2, MAILRPT+25
VALMCNT	INIT+26*, INIT+28, INIT+29, INIT+37, INIT+39, INIT+41, INIT+42, COMPARE~, COMPARE+15, CHNGCHK~ , CHNGCHK+17, CHNGCHK+23, CHNGCHK+24, CHNGCHK+30, CHNGCHK+31, CHNGCHK+37, CHNGCHK+38, CHNGCHK+44, CHNGCHK+45, CHNGCHK+51 , CHNGCHK+52, CHNGCHK+58, CHNGCHK+59, CHNGCHK+65, CHNGCHK+66, CHNGCHK+72, CHNGCHK+73, CHNGCHK+74, CHNGCHK+75, CHNGCHK+77 , ADDDELRP~, ADDDELRP+4, ADDDELRP+5, ADDDELRP+6, ADDDELRP+12, ADDDELRP+15, ADDDELRP+18, ADDDELRP+21, ADDDELRP+23, ADDDELRP+25 , ADDDELRP+27, ADDDELRP+29, ADDDELRP+31, ADDDELRP+33, ADDDELRP+35, ADDDELRP+37, ADDDELRP+40, ADDDELRP+42, HDROUT~, HDROUT+2 , HDROUT+3, LISTDIF~, LISTDIF+2, LISTDIF+5, LISTDIF+6, LISTDIF+8, LISTDIF+9, LISTDIF+12, LISTDIF+16, LISTDIF+17 , LISTDIF+21, LISTDIF+22, LISTDIF+24, EVENSPLT~, EVENSPLT+17, EVENSPLT+20
>> VALMHDR(1	HDR+4*, MAILRPT+13, MAILRPT+21, MAILRPT+22
>> VALMHDR(2	HDR+5*
>> VALMHDR(3	HDR+8*
>> VALMHDR(4	HDR+12*, MAILRPT+13, MAILRPT+15
>> VALMHDR(5	HDR+15*, MAILRPT+15
X	HELP+1*, KILL+5!
XMDUZ	MAILRPT+9~, MAILRPT+12*
XMERR	MAILRPT+2~, MAILRPT+4!, MAILRPT+8
XMSUB	MAILRPT+9~, MAILRPT+13*
XMTEXT	MAILRPT+9~, MAILRPT+19*
XMY	MAILRPT+9~
XMY(	MAILRPT+11*
XMZ	MAILRPT+2~, MAILRPT+21, MAILRPT+22
Y	KILL+5!

Customize PDF page

Package: VistA Package Sizing Utility

Routine: A1VSLPC

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: