XTVSLPC ;ALBANY FO/GTS - VistA Package Sizing Manager; 17-NOV-2016
Source file <XTVSLPC.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Toolkit | 3 | XTVS PKG MGR PARAM COMPARE XTVS PKG MGR PARAM COMPR MAIL ACTION XTVSLP |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(CMPRFNME) | ; -- main entry point for XTVS PKG MGR PARAM COMPARE
; Input: CMPRFNME - File to compare Selected XTMPSIZE.DAT file ; XTVPSPRM - Selected/Displayed Parameter file [Partition variable set by INIT^XTVSLP] |
|
HDR | ; -- header code
|
|
INIT | ; - Build Selected and Comparison XTMPSIZE parameter arrays
|
|
COMPARE(CPRNDNM,NODECUR,VALMCNT,PKGDEL,PKGRPTD) | ; Compare Selected & Comparison parameter files, report diff's and cleanup ^TMP globals
|
|
CHNGCHK(NODECUR,NODECPR,VALMCNT) | ; Check selected parameter file (SEL) against a comparison parameter file (CPR)
|
|
ADDDELRP(EXTRCT,VALMCNT) | ;Report packages Added/Deleted to/from Selected extract
|
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
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 - Selected 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^XTVSLPC
|
|
DELPKG(CURNDNM,CPRNDNM) | ; Delete Package from Selected and Compare parameter files
|
|
MAILRPT | ; Email ^TMP("XTVS PKG MGR PARAM ERROR DISP") comparison report
; -- Protocol: XTVS 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 |
EN^VALM | EN+7 |
CLEAR^VALM1 | HELP+5, HELP+11 |
FULL^VALM1 | HELP+6, MAILRPT+3 |
PAUSE^VALM1 | HELP+11 |
CLEAN^VALM10 | KILL+1 |
KILL^VALM10 | KILL+2 |
^XMD | MAILRPT+20 |
TOWHOM^XMXAPIU | MAILRPT+8 |
$$GET^XPAR | HDR+3, INIT+3 |
DISP^XQORM1 | HELP+3, HELP+15 |
^XTVSHLP1 | HELP+10 |
ADD^XTVSLAPI | 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+18, LISTDIF+24, EVENSPLT+17, EVENSPLT+20 |
JUSTPAWS^XTVSLAPI | EN+5, MAILRPT+21, MAILRPT+22 |
$$BLDNUM^XTVSLM | HDR+5 |
$$VERNUM^XTVSLM | HDR+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("XMY" | MAILRPT+12 |
^TMP("XTVS " | ADDDELRP+10 |
^TMP("XTVS CPR PARAM" | INIT+22*, INIT+34, INIT+35, INIT+37, COMPARE+3, CLNTMPGB+1!, DELPKG+1! |
^TMP("XTVS CUR PARAM" | INIT+12*, INIT+32, CLNTMPGB+1!, DELPKG+1! |
^TMP("XTVS PKG MAN CMPR MSG" | MAILRPT+15*, MAILRPT+18*, MAILRPT+23! |
^TMP("XTVS PKG MAN PARM COMPARE" | KILL+4!, MAILRPT+17, MAILRPT+18 |
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+17 , LISTDIF+23, LISTDIF+26 |
HDROUT | CHNGCHK+23, CHNGCHK+30, CHNGCHK+37, CHNGCHK+44, CHNGCHK+51, CHNGCHK+58, CHNGCHK+65, CHNGCHK+72, ADDDELRP+12 |
KILL | INIT+2, EXIT+1 |
LISTDIF | CHNGCHK+45, CHNGCHK+52, CHNGCHK+59, CHNGCHK+66 |
MSG | INIT+44, HELP+20, MAILRPT+25 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CHKELMT | LISTDIF+1~, LISTDIF+16*, LISTDIF+17, LISTDIF+22*, LISTDIF+23 |
CMPRFNME | EN~, EN+4, 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+23 |
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+17, LISTDIF+21, LISTDIF+26 |
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+17, LISTDIF+21*, LISTDIF+22, LISTDIF+23 |
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+8, MAILRPT+13 |
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+18, LISTDIF+21*, LISTDIF+24, 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+1~, CHNGCHK+17*, CHNGCHK+77 |
SUBSCPT | MAILRPT+2~, MAILRPT+16*, MAILRPT+17*, MAILRPT+18 |
TEXT | MSG~, MSG+1, MSG+2 |
>> TXTCT | HELP+10* |
>> VALMBCK | MAILRPT+26* |
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+17, LISTDIF+18 , LISTDIF+23, LISTDIF+24, LISTDIF+26, EVENSPLT~, EVENSPLT+17, EVENSPLT+20 |
>> VALMHDR(1 | HDR+4*, MAILRPT+14, MAILRPT+21, MAILRPT+22 |
>> VALMHDR(2 | HDR+5* |
>> VALMHDR(3 | HDR+8* |
>> VALMHDR(4 | HDR+12*, MAILRPT+14, MAILRPT+15 |
>> VALMHDR(5 | HDR+15*, MAILRPT+15 |
>> VALMSG | MSG+1*, MSG+2* |
X | HELP+1, HELP+2*, HELP+4, KILL+5! |
XMDUZ | MAILRPT+10~, MAILRPT+13* |
XMERR | MAILRPT+2~, MAILRPT+5!, MAILRPT+9 |
XMSUB | MAILRPT+10~, MAILRPT+14* |
XMTEXT | MAILRPT+10~, MAILRPT+19* |
XMY | MAILRPT+10~ |
XMY( | MAILRPT+12* |
XMZ | MAILRPT+2~, MAILRPT+21, MAILRPT+22 |
XTINSTMM | MAILRPT+2~, MAILRPT+8 |
XTINSTMM("ADD | R FLAGS" , MAILRPT+6* |
XTLPCNT | MAILRPT+10~, MAILRPT+11*, MAILRPT+12* |
>> XTQVAR | HELP+7*, HELP+8, HELP+9*, HELP+10, HELP+11*, HELP+13 |
XTTOMM | MAILRPT+2~ |
XTTYPE | MAILRPT+2~, MAILRPT+7*, MAILRPT+8 |
>> XTVPSPRM | HDR+10, INIT+6 |
>> XTX | HELP+10*, HELP+11, HELP+12 |
Y | HELP+7, HELP+11, KILL+5! |
Name | Field # of Occurrence |
---|---|
$T(LPCTXT+TXTCT^XTVSHLP1 | HELP+10 |