Routine: A1VSLPDC

Package	Total	Call Graph
Kernel	3	($$DEL,$$MV,CLOSE,OPEN)^%ZISH ($$FMTE,$$NOW)^XLFDT DISP^XQORM1
List Manager	3	EN^VALM FULL^VALM1 (CLEAN,KILL)^VALM10
VistA Package Sizing Utility	3	($$YNCHK,ADD,JUSTPAWS,LISTOUT,SPLITADD)^A1VSLAPI ($$BLDNUM,$$VERNUM)^A1VSLM ($$SETSTR,EDITFNUM,EDITFRNG,EDITPRFX,SPLITOUT,UPDTNODE)^A1VSLPD1
Toolkit	1	$$GET^XPAR
VA FileMan	1	^DIR

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

Name	Comments	DBIA/ICR reference
EN	; -- main entry point for A1VS PKG MGR PARAM CAPTN DISP
HDR	; -- header code
INIT	; -- init variables and list array
HELP	; -- help code
EXIT	; -- exit code
EXPND	; -- expand code
KILL	; - Cleanup local and global display arrays
SELPKG(ADPKG)	; Select Package to Edit from ^TMP("A1VS PKG MGR PARAM CAP",$J) ; INPUT: ; ADPKG : 0 - Do not allow add new package [Default] ; : 1 - Allow add new package
DATACHK(PKG)	; Check for existence of entered package in ^TMP("A1VS PKG MGR PARAM CAP",$J)
EDPKGPRM(PKGNME)	; Edit Package Parameters
CHKX(XADD)	;Check for Package ; INPUT: ; XADD : 0 - Do not allow add new package ; : 1 - Allow add new package
PKGLIST(X,LASTSPKG)	;List packages from user entry [to support 'XADD' mod in CHKX]
PKGHLP	; Package selection help
EDITPRM	; Edit parameters for a package ; -- Protocol: A1VS PKG MGR EDIT PACKAGE PARM ACTION
DELPMPKG	; Delete parameters from a package ; -- Protocol: A1VS PKG MGR DEL PACKAGE PARM ACTION
SAVPMPKG	; Save Package Parameters file ; -- Protocol: A1VS PKG MGR SAVE PACKAGE PARM ACTION

Name	Field # of Occurrence
$$DEL^%ZISH	SAVPMPKG+29, SAVPMPKG+31
$$MV^%ZISH	SAVPMPKG+30
CLOSE^%ZISH	SAVPMPKG+42
OPEN^%ZISH	SAVPMPKG+36
$$YNCHK^A1VSLAPI	CHKX+15, PKGHLP+2, DELPMPKG+12, SAVPMPKG+17, SAVPMPKG+18
ADD^A1VSLAPI	INIT+8, INIT+9
JUSTPAWS^A1VSLAPI	PKGLIST+12, EDITPRM+22, DELPMPKG+15, SAVPMPKG+4
LISTOUT^A1VSLAPI	PKGLIST+8, PKGLIST+13, PKGHLP+9
SPLITADD^A1VSLAPI	INIT+13
$$BLDNUM^A1VSLM	HDR+5
$$VERNUM^A1VSLM	HDR+5
$$SETSTR^A1VSLPD1	EDITPRM+19
EDITFNUM^A1VSLPD1	EDPKGPRM+65
EDITFRNG^A1VSLPD1	EDPKGPRM+83
EDITPRFX^A1VSLPD1	EDPKGPRM+47
SPLITOUT^A1VSLPD1	EDPKGPRM+38, EDPKGPRM+56, EDPKGPRM+74
UPDTNODE^A1VSLPD1	EDPKGPRM+18, EDPKGPRM+28, EDPKGPRM+94
^DIR	SELPKG+14, EDPKGPRM+16, EDPKGPRM+26, EDPKGPRM+44, EDPKGPRM+62, EDPKGPRM+80, EDPKGPRM+92
EN^VALM	EN+3
FULL^VALM1	EDITPRM+13, DELPMPKG+4, SAVPMPKG+3
CLEAN^VALM10	KILL+1
KILL^VALM10	KILL+2
$$FMTE^XLFDT	SAVPMPKG+8
$$NOW^XLFDT	SAVPMPKG+8
$$GET^XPAR	HDR+3, SAVPMPKG+14
DISP^XQORM1	HELP+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: X Line Location: CHKX+10
Function Call: WRITE	Prompt: !,"Select a package. [Number 1 - "_ITEMNUM_"]" Line Location: PKGLIST+10
Function Call: WRITE	Prompt: !,"??" Line Location: PKGLIST+11
Function Call: WRITE	Prompt: " ",X Line Location: PKGLIST+16
Routine Call	DIR Line Location: SELPKG+14 EDPKGPRM+16 EDPKGPRM+26 EDPKGPRM+44 EDPKGPRM+62 EDPKGPRM+80 EDPKGPRM+92
Routine Call	VALM Line Location: EN+3

Name	Line Occurrences (* Changed, ! Killed)
^TMP("A1VS PKG MGR PARAM CAP"	KILL+3!
^TMP("A1VS-PARAM-CAP"	INIT+5, INIT+10, INIT+11, INIT+12, DATACHK+3, CHKX+11, CHKX+19, CHKX+20, CHKX+21, CHKX+22 , CHKX+23, CHKX+24, CHKX+25, CHKX+26, CHKX+27, CHKX+28, PKGLIST+3, PKGHLP+6, SAVPMPKG+41
^VA(200 - [#200]	SAVPMPKG+12

Name	Line Occurrences
$$EDPKGPRM	EDITPRM+17
$$SELPKG	EDITPRM+14, DELPMPKG+5
HDR	EDITPRM+20, DELPMPKG+13, SAVPMPKG+45
INIT	EDITPRM+20, DELPMPKG+13, SAVPMPKG+45
KILL	INIT+2
PKGLIST	CHKX+12, CHKX+16, CHKX+17, CHKX+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A1VPSPRM	HDR+10, DELPMPKG+9, SAVPMPKG+26, SAVPMPKG+30, SAVPMPKG+31, SAVPMPKG+32, SAVPMPKG+43*
ADPKG	SELPKG~, SELPKG+6*, SELPKG+12
CAPARY	EDITPRM+12~, EDITPRM+16, EDITPRM+19, DELPMPKG+3~, DELPMPKG+7, DELPMPKG+13
CAPDAT	INIT+1~, INIT+7, INIT+11, INIT+12, INIT+13
CHNGMADE	EN+1~, EN+2, HDR+10, EDPKGPRM+1~, EDPKGPRM+4, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+48* , EDPKGPRM+66, EDPKGPRM+84, EDPKGPRM+94, EDPKGPRM+95, EDPKGPRM+100, EDITPRM+17, EDITPRM+18, DELPMPKG+12, DELPMPKG+13, SAVPMPKG+4 , SAVPMPKG+5, SAVPMPKG+44
DATAITEM	INIT+1~, INIT+12*, INIT+13
DATANAME	EDPKGPRM+1~, EDPKGPRM+6*, EDPKGPRM+8, EDPKGPRM+9, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+37, EDPKGPRM+38 , EDPKGPRM+48, EDPKGPRM+55, EDPKGPRM+56, EDPKGPRM+66, EDPKGPRM+73, EDPKGPRM+74, EDPKGPRM+84, EDPKGPRM+94, EDPKGPRM+95
DATANUM	EDPKGPRM+1~, EDPKGPRM+4, EDPKGPRM+5, EDPKGPRM+6, EDPKGPRM+9, EDPKGPRM+12, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+23, EDPKGPRM+28 , EDPKGPRM+29, EDPKGPRM+33, EDPKGPRM+37, EDPKGPRM+39, EDPKGPRM+48, EDPKGPRM+51, EDPKGPRM+55, EDPKGPRM+66, EDPKGPRM+69, EDPKGPRM+73 , EDPKGPRM+84, EDPKGPRM+87, EDPKGPRM+94, EDPKGPRM+95
DEFDIR	HDR+1~, HDR+3, HDR+6, SAVPMPKG+6~, SAVPMPKG+14, SAVPMPKG+29, SAVPMPKG+30, SAVPMPKG+31, SAVPMPKG+36
DELFLE	SAVPMPKG+25~, SAVPMPKG+29, SAVPMPKG+31
DELFLE(	SAVPMPKG+29!, SAVPMPKG+31
DELRSLT	SAVPMPKG+20~, SAVPMPKG+23, SAVPMPKG+29, SAVPMPKG+30, SAVPMPKG+31, SAVPMPKG+35
DIR	SELPKG+5~, EDPKGPRM+7~, EDPKGPRM+97!, EDPKGPRM+99!
DIR("?"	SELPKG+13, EDPKGPRM+13, EDPKGPRM+14, EDPKGPRM+24, EDPKGPRM+42, EDPKGPRM+59, EDPKGPRM+60, EDPKGPRM+77, EDPKGPRM+78, EDPKGPRM+90
DIR("A"	SELPKG+8, EDPKGPRM+8, EDPKGPRM+40, EDPKGPRM+57, EDPKGPRM+75, EDPKGPRM+88
DIR("B"	EDPKGPRM+9*, EDPKGPRM+41!, EDPKGPRM+58!, EDPKGPRM+76!
DIR("PRE"	SELPKG+12, EDPKGPRM+89
DIR(0	SELPKG+11, EDPKGPRM+15, EDPKGPRM+25, EDPKGPRM+43, EDPKGPRM+61, EDPKGPRM+79, EDPKGPRM+91*
DIRHEAD	HDR+1~, HDR+6, HDR+7, HDR+8, HDR+10, HDR+11, HDR+12
DIRUT	SELPKG+5~, SELPKG+16, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+20!, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+30!, EDPKGPRM+94, EDPKGPRM+95 , EDPKGPRM+99!
DOADD	CHKX+7~, CHKX+8, CHKX+15, CHKX+16, CHKX+18
DTIME	PKGLIST+9
DTOUT	SELPKG+5~, EDPKGPRM+5, EDPKGPRM+17, EDPKGPRM+27, EDPKGPRM+45, EDPKGPRM+63, EDPKGPRM+81, EDPKGPRM+93, EDPKGPRM+99!
DUOUT	SELPKG+5~, EDPKGPRM+5, EDPKGPRM+17, EDPKGPRM+27, EDPKGPRM+45, EDPKGPRM+63, EDPKGPRM+81, EDPKGPRM+93, EDPKGPRM+99!
DUZ	SAVPMPKG+12
EDITARY	EDPKGPRM+1~, EDPKGPRM+3*, EDPKGPRM+5, EDPKGPRM+6, EDPKGPRM+9, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+37 , EDPKGPRM+48, EDPKGPRM+55, EDPKGPRM+66, EDPKGPRM+73, EDPKGPRM+84, EDPKGPRM+94, EDPKGPRM+95, EDITPRM+12~
FILENME	SAVPMPKG+6~, SAVPMPKG+21, SAVPMPKG+26, SAVPMPKG+27, SAVPMPKG+28, SAVPMPKG+32, SAVPMPKG+36, SAVPMPKG+43
GETOUT	EDPKGPRM+1~, EDPKGPRM+35, EDPKGPRM+36, EDPKGPRM+45, EDPKGPRM+47, EDPKGPRM+53, EDPKGPRM+54, EDPKGPRM+63, EDPKGPRM+65, EDPKGPRM+71* , EDPKGPRM+72, EDPKGPRM+81*, EDPKGPRM+83
INITIAL	SAVPMPKG+6~, SAVPMPKG+12, SAVPMPKG+13, SAVPMPKG+21
IO	SAVPMPKG+39
ITEMNUM	CHKX+7~, PKGLIST+1, PKGLIST+4, PKGLIST+5, PKGLIST+6, PKGLIST+9, PKGLIST+10, PKGLIST+15, PKGLIST+16, PKGHLP+3~ , PKGHLP+4, PKGHLP+7, PKGHLP+8
LASTPKG	INIT+1~
LASTSPKG	HDR+1~, SELPKG+15, CHKX+10, CHKX+12, CHKX+16, CHKX+17, CHKX+29, PKGLIST~, PKGLIST+16
LISTDATA	EDPKGPRM+34~, EDPKGPRM+37, EDPKGPRM+38, EDPKGPRM+47, EDPKGPRM+48, EDPKGPRM+52~, EDPKGPRM+55, EDPKGPRM+56, EDPKGPRM+65, EDPKGPRM+66 , EDPKGPRM+70~, EDPKGPRM+73*, EDPKGPRM+74, EDPKGPRM+83, EDPKGPRM+84
LNENUM	INIT+1~, INIT+6, INIT+10, INIT+11, INIT+12
LPNM	INIT+1~
NOWDT	SAVPMPKG+6~, SAVPMPKG+8, SAVPMPKG+9, SAVPMPKG+10, SAVPMPKG+11, SAVPMPKG+21
OLDFNME	SAVPMPKG+25~, SAVPMPKG+28*, SAVPMPKG+29, SAVPMPKG+30
PKG	INIT+1~, INIT+3, INIT+5, INIT+10, INIT+11, INIT+12, DATACHK~, DATACHK+3
PKGLP	CHKX+7~, PKGLIST+2, PKGLIST+3, PKGLIST+5, PKGHLP+3~, PKGHLP+5, PKGHLP+6, PKGHLP+8
PKGNME	SELPKG+5~, SELPKG+7, SELPKG+16, SELPKG+17, EDPKGPRM~, EDPKGPRM+3, EDITPRM+12~, EDITPRM+14, EDITPRM+15, EDITPRM+16 , EDITPRM+17, EDITPRM+22, DELPMPKG+3~, DELPMPKG+5, DELPMPKG+6, DELPMPKG+7, DELPMPKG+8, DELPMPKG+10, DELPMPKG+15, SAVPMPKG+6~ , SAVPMPKG+40, SAVPMPKG+41
>> POP	SAVPMPKG+37
POPERR	SAVPMPKG+6~, SAVPMPKG+7, SAVPMPKG+37, SAVPMPKG+38
>> PPRMT	EDPKGPRM+39*, EDPKGPRM+40
PRMLNLP	INIT+1~
RESULT	DATACHK+1~, DATACHK+2, DATACHK+3, DATACHK+4
SELARY	CHKX+7~, PKGLIST+8, PKGLIST+13, PKGHLP+3~, PKGHLP+9
SELARY(	PKGLIST+5, PKGLIST+16, PKGHLP+8
SPCPAD	HDR+1~, HDR+2, HDR+7, HDR+8, HDR+9, HDR+11, HDR+12
UPDATLST	EDPKGPRM+1~, EDPKGPRM+46, EDPKGPRM+47, EDPKGPRM+48, EDPKGPRM+64, EDPKGPRM+65, EDPKGPRM+66, EDPKGPRM+82*, EDPKGPRM+83, EDPKGPRM+84
>> VALMBCK	EDITPRM+24, DELPMPKG+17, SAVPMPKG+47*
>> VALMCNT	INIT+4*, INIT+8, INIT+9, INIT+13
>> VALMHDR(1	HDR+4*
>> VALMHDR(2	HDR+5*
>> VALMHDR(3	HDR+8*
>> VALMHDR(4	HDR+12*
WNFILE	SAVPMPKG+6~, SAVPMPKG+16, SAVPMPKG+17, SAVPMPKG+18, SAVPMPKG+19, SAVPMPKG+21
WOFILE	SAVPMPKG+6~, SAVPMPKG+16, SAVPMPKG+18, SAVPMPKG+19, SAVPMPKG+24
X	HELP+1, SELPKG+5~, SELPKG+15, EDPKGPRM+7~, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+94, EDPKGPRM+95 , EDPKGPRM+97!, EDPKGPRM+99!, CHKX+5, CHKX+10, CHKX+11, CHKX+12, CHKX+13, CHKX+14, CHKX+16, CHKX+17 , CHKX+19, CHKX+20, CHKX+21, CHKX+22, CHKX+23, CHKX+24, CHKX+25, CHKX+26, CHKX+27, CHKX+28 , CHKX+29, PKGLIST~, PKGLIST+2, PKGLIST+3, PKGLIST+15!, PKGLIST+16*
XADD	CHKX~, CHKX+9*, CHKX+12, CHKX+13, CHKX+29
XVAL	CHKX+7~, PKGLIST+7, PKGLIST+9, PKGLIST+10, PKGLIST+11, PKGLIST+15, PKGLIST+16
Y	SELPKG+5~, SELPKG+16, EDPKGPRM+7~, EDPKGPRM+19, EDPKGPRM+29, EDPKGPRM+45, EDPKGPRM+47, EDPKGPRM+63, EDPKGPRM+65, EDPKGPRM+81 , EDPKGPRM+83, EDPKGPRM+95, EDPKGPRM+97!, EDPKGPRM+99!

Customize PDF page

Package: VistA Package Sizing Utility

Routine: A1VSLPDC

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: