Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: A1VSLPC

Package: VistA Package Sizing Utility

Routine: A1VSLPC


Information

A1VSLPC ;Albany FO/GTS - VistA Package Sizing Manager; 17-NOV-2016

Source Information

Source file <A1VSLPC.m>

Call Graph

Call Graph

Call Graph Total: 10

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
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

External References

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

Global Variables Directly Accessed

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

Label References

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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All