XTVSSVR ;ALB/GTS - VistA Package Sizing Manager; 26-FEB-2020
Source file <XTVSSVR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SRVREXT | ; Entry point - Server Package File extract
; -- Server Option: XTVS PKG EXTRACT SERVER |
|
EXTPKG(XTVSSNDR,XTVSRPTP) | ; Extract Package File
|
|
EEXT(XTVSSNDR,XTVSSIZE) | ; Email ^XTMP("XTSIZE") extract global
|
|
WRERR(HDRTEXT,ERRTEXT,XTVSSNDR,PKGNAME) | ; Write Server Mail extract send error to Error Trap & return msg to requester
|
|
SIZERPT(XTVSSNDR) | ; Create Size Report and return to user
; Requires ^XTMP("XTSIZE") |
|
RPTSIZE(XTVSSNDR) | ; Create message with report
|
|
PDAD(DATA,PKGNAME,PKGPFX,LINECNT) | ; Add data to message global
|
|
ADDLNE(TMPARY,LINECNT,MSG) | ; Add line to global
|
|
ONEPKGSZ(XTVSSNDR,SELPKGPM) | ; Report Package
|
|
ONERPT(XTVSSNDR,SELPKGPM,PKGNAME,PKGPFX) | ; Report a single package
|
Name | Field # of Occurrence |
---|---|
DD^%DT | RPTSIZE+6, ONERPT+68 |
NOW^%DTC | RPTSIZE+6, ONERPT+68 |
APPERROR^%ZTER | WRERR+1, WRERR+20 |
$$FMADD^XLFDT | EXTPKG+9 |
$$FMTE^XLFDT | EEXT+14, RPTSIZE+27, ONERPT+88 |
$$NOW^XLFDT | EXTPKG+9, RPTSIZE+27, ONERPT+88 |
^XMD | WRERR+17, RPTSIZE+28, ONERPT+89 |
ENT^XMPG | EEXT+16 |
$$NETNAME^XMXUTIL | RPTSIZE+5, ONERPT+67 |
NOTCE^XTVSLAPI | EXTPKG+16 |
SETXTMP^XTVSLNA1 | EXTPKG+17 |
XTMPORD^XTVSLNA1 | SIZERPT+3 |
TALLYRPT^XTVSRFL | SIZERPT+7, ONEPKGSZ+20 |
$$COUNTFLS^XTVSRFL1 | ONERPT+30 |
$$MULTX^XTVSRFL1 | ONERPT+19 |
$$PROTOCOL^XTVSRFL1 | ONERPT+45, ONERPT+46 |
$$ROUTINE^XTVSRFL1 | ONERPT+36, ONERPT+37 |
CNTR^XTVSRFL1 | ONERPT+41, ONERPT+42, ONERPT+50, ONERPT+51, ONERPT+55, ONERPT+56, ONERPT+58, ONERPT+59, ONERPT+61, ONERPT+62 |
KIDSIDX^XTVSRFL1 | SIZERPT+5, ONEPKGSZ+18 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("PROD" | EXTPKG+9, WRERR+7, WRERR+11, WRERR+16, RPTSIZE+27, ONERPT+88 |
^DIC(9.4 - [#9.4] | EXTPKG+12, EXTPKG+13, ONERPT+11, ONERPT+12, ONERPT+13 |
^TMP("XTSIZE" | SIZERPT+13!, ONEPKGSZ+26! |
^TMP("XTVS-FILERPT" | SIZERPT+13!, ONEPKGSZ+26! |
^TMP("XTVS-FORUM-PFXS" | SIZERPT+11!, ONEPKGSZ+7!, ONEPKGSZ+24! |
^TMP("XTVS-FORUM2TMP" | SIZERPT+12! |
^TMP("XTVS-FORUMPKG" | SRVREXT+24*, SRVREXT+35!, SIZERPT+11! |
^TMP("XTVS-IDX-PKG" | SIZERPT+12!, ONEPKGSZ+7!, ONEPKGSZ+25! |
^TMP("XTVS-KIDSPFX-IDX" | SIZERPT+12!, ONEPKGSZ+25! |
^TMP("XTVS-PREFIX-IDX" | SIZERPT+11!, ONEPKGSZ+7!, ONEPKGSZ+24! |
^TMP("XTVS-REMOTE-ERROR" | WRERR+5!, WRERR+7*, WRERR+8*, WRERR+9*, WRERR+11*, WRERR+12*, WRERR+21! |
^TMP("XTVS-REMOTE-SIZE" | SIZERPT+13!, ONEPKGSZ+26! |
^TMP("XTVS-VPS" | SIZERPT+11!, RPTSIZE+18, RPTSIZE+19, ONEPKGSZ+24! |
^TMP("XTVS-VPS0" | SIZERPT+12!, ONEPKGSZ+25! |
^XTMP("XTSIZE" | EXTPKG+7!, EXTPKG+9*, EEXT+7, EEXT+8, EEXT+13, EEXT+15, EEXT+19!, SIZERPT+10! |
Name | Line Occurrences |
---|---|
ADDLNE | RPTSIZE+4, RPTSIZE+5, RPTSIZE+8, RPTSIZE+9, RPTSIZE+10, RPTSIZE+11, RPTSIZE+12, RPTSIZE+13, PDAD+11, PDAD+16 , PDAD+17, ONERPT+64, ONERPT+65, ONERPT+66, ONERPT+67, ONERPT+70, ONERPT+71, ONERPT+72, ONERPT+73, ONERPT+74 , ONERPT+75, ONERPT+76, ONERPT+77, ONERPT+78, ONERPT+79, ONERPT+80, ONERPT+81 |
EEXT | EXTPKG+19 |
EXTPKG | SRVREXT+29 |
ONEPKGSZ | SRVREXT+32 |
ONERPT | ONEPKGSZ+22 |
PDAD | RPTSIZE+20 |
RPTSIZE | SIZERPT+8 |
SIZERPT | EEXT+18 |
WRERR | SRVREXT+33, EEXT+7, EEXT+17, RPTSIZE+29, ONEPKGSZ+15, ONERPT+90 |
Name | Field # of Occurrence |
---|---|
^( | RPTSIZE+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDPRFX | ONEPKGSZ+5~ |
ADP | ONERPT+7~, ONERPT+18*, ONERPT+19*, ONERPT+36, ONERPT+37, ONERPT+41, ONERPT+42, ONERPT+46, ONERPT+50, ONERPT+51 , ONERPT+55, ONERPT+56, ONERPT+59, ONERPT+62 |
ADP( | ONERPT+19*, ONERPT+37, ONERPT+42, ONERPT+46, ONERPT+51, ONERPT+56, ONERPT+59, ONERPT+62 |
DATA | PDAD~, PDAD+2, PDAD+3, PDAD+4, PDAD+5, PDAD+6, PDAD+7, PDAD+8, PDAD+9 |
DATANDE | PDAD+1~, PDAD+12*, PDAD+13*, PDAD+14*, PDAD+15*, PDAD+16 |
DUZ | EEXT+10, WRERR+13, RPTSIZE+5, RPTSIZE+24, ONERPT+67, ONERPT+85 |
ERRTEXT | WRERR~, WRERR+9, WRERR+12, WRERR+19* |
FFCTRSLT | ONERPT+7~, ONERPT+30*, ONERPT+31, ONERPT+32 |
FLDTOT | PDAD+1~, PDAD+5*, PDAD+15, ONERPT+7~, ONERPT+32*, ONERPT+77 |
FTOT | PDAD+1~, PDAD+4*, PDAD+15, ONERPT+7~, ONERPT+31*, ONERPT+76 |
HDRTEXT | WRERR~, WRERR+1 |
LINECNT | RPTSIZE+1~, RPTSIZE+2*, RPTSIZE+4, RPTSIZE+5, RPTSIZE+8, RPTSIZE+9, RPTSIZE+10, RPTSIZE+11, RPTSIZE+12, RPTSIZE+13 , RPTSIZE+20, PDAD~, PDAD+11, PDAD+16, PDAD+17, ADDLNE~, ADDLNE+6*, ADDLNE+7, ONERPT+8~, ONERPT+9* , ONERPT+64, ONERPT+65, ONERPT+66, ONERPT+67, ONERPT+70, ONERPT+71, ONERPT+72, ONERPT+73, ONERPT+74, ONERPT+75 , ONERPT+76, ONERPT+77, ONERPT+78, ONERPT+79, ONERPT+80, ONERPT+81 |
LNITMCT | SRVREXT+10~, SRVREXT+12*, SRVREXT+24* |
LNNUM | SIZERPT+2~ |
MSG | ADDLNE~, ADDLNE+7 |
OTOT | PDAD+1~, PDAD+6*, PDAD+15, ONERPT+7~, ONERPT+40*, ONERPT+41, ONERPT+42, ONERPT+78 |
PARMDAT | ONERPT+8~, ONERPT+17*, ONERPT+19, ONERPT+21*, ONERPT+23 |
PARMDAT3 | ONERPT+8~, ONERPT+26*, ONERPT+30 |
PARMDAT4 | ONERPT+8~, ONERPT+27*, ONERPT+30 |
PARMDAT7 | ONERPT+8~, ONERPT+28*, ONERPT+30 |
PARMDAT8 | ONERPT+8~, ONERPT+29*, ONERPT+30 |
>> PARMEXRT | SRVREXT+12* |
PCENUM | ONEPKGSZ+5~, ONERPT+7~, ONERPT+18*, ONERPT+19*, ONERPT+22*, ONERPT+23* |
PKGERR | ONEPKGSZ+5~, ONEPKGSZ+6*, ONEPKGSZ+14*, ONEPKGSZ+16 |
PKGIEN | ONERPT+7~, ONERPT+9*, ONERPT+11*, ONERPT+12*, ONERPT+13*, ONERPT+45, ONERPT+46 |
PKGNAME | WRERR~, WRERR+6, WRERR+8, WRERR+10, RPTSIZE+16~, RPTSIZE+17*, RPTSIZE+18*, RPTSIZE+19, RPTSIZE+20, PDAD~ , PDAD+11, ONEPKGSZ+5~, ONEPKGSZ+10*, ONEPKGSZ+15, ONEPKGSZ+20, ONEPKGSZ+22, ONERPT~, ONERPT+10, ONERPT+11, ONERPT+12 , ONERPT+13, ONERPT+19, ONERPT+72, ONERPT+90 |
PKGNMEL1 | SIZERPT+2~ |
PKGNMEL2 | SIZERPT+2~ |
PKGNMEL3 | SIZERPT+2~ |
PKGNUM | ONEPKGSZ+5~ |
PKGPFX | RPTSIZE+16~, RPTSIZE+18*, RPTSIZE+19*, RPTSIZE+20, PDAD~, PDAD+13, ONEPKGSZ+5~, ONEPKGSZ+12*, ONEPKGSZ+13, ONEPKGSZ+22 , ONERPT~, ONERPT+30, ONERPT+36, ONERPT+41, ONERPT+45, ONERPT+50, ONERPT+55, ONERPT+58, ONERPT+61 |
PRCTOT | ONERPT+7~, ONERPT+45*, ONERPT+46*, ONERPT+79 |
PREFIX | ONEPKGSZ+5~ |
PTOT | PDAD+1~, PDAD+7*, PDAD+15 |
Q | ONERPT+7~, ONERPT+18*, ONERPT+19*, ONERPT+22*, ONERPT+23*, ONERPT+37*, ONERPT+42*, ONERPT+46*, ONERPT+51*, ONERPT+56* , ONERPT+59*, ONERPT+62* |
QCHK | EEXT+2~, EEXT+3* |
RDP | ONERPT+7~, ONERPT+22*, ONERPT+23*, ONERPT+36, ONERPT+37, ONERPT+41, ONERPT+42, ONERPT+45, ONERPT+46, ONERPT+50 , ONERPT+51, ONERPT+55, ONERPT+56, ONERPT+58, ONERPT+59, ONERPT+61, ONERPT+62 |
RDP( | ONERPT+23* |
RNDT | RPTSIZE+7*, RPTSIZE+8, ONERPT+7~, ONERPT+69*, ONERPT+70 |
RPTOT | PDAD+1~, PDAD+8*, PDAD+15, ONERPT+7~, ONERPT+49*, ONERPT+50, ONERPT+51, ONERPT+80 |
RTOT | PDAD+1~, PDAD+2*, PDAD+15, ONERPT+7~, ONERPT+36*, ONERPT+37*, ONERPT+74 |
RUNDT | RPTSIZE+1~ |
SELPKGPM | SRVREXT+10~, SRVREXT+11*, SRVREXT+24, SRVREXT+27*, SRVREXT+32, SRVREXT+33, ONEPKGSZ~, ONEPKGSZ+10, ONEPKGSZ+12, ONEPKGSZ+22 , ONERPT~, ONERPT+17, ONERPT+21, ONERPT+26, ONERPT+27, ONERPT+28, ONERPT+29 |
SPCT | PDAD+1~, PDAD+14* |
TLCNT | PDAD+1~, PDAD+3*, PDAD+15, ONERPT+7~, ONERPT+35*, ONERPT+36, ONERPT+37, ONERPT+75 |
TMPARY | ADDLNE~, ADDLNE+7 |
TPLTTOT | PDAD+1~, PDAD+9*, PDAD+15, ONERPT+7~, ONERPT+54*, ONERPT+55, ONERPT+56, ONERPT+58, ONERPT+59, ONERPT+61 , ONERPT+62, ONERPT+81 |
VPIEN | EXTPKG+6~, EXTPKG+11*, EXTPKG+12*, EXTPKG+13 |
VPNAME | EXTPKG+6~, EXTPKG+12*, EXTPKG+14, EXTPKG+15*, EXTPKG+16 |
>> X | RPTSIZE+6, ONERPT+68 |
XDATE | EEXT+9~, EEXT+13*, EEXT+14*, EEXT+15 |
XMDUZ | EEXT+9~, EEXT+10*, WRERR+4~, WRERR+13*, RPTSIZE+23~, RPTSIZE+24*, ONERPT+84~, ONERPT+85* |
XMER | SRVREXT+10~, SRVREXT+13*, SRVREXT+14, SRVREXT+15 |
XMERR | EEXT+9~, WRERR+4~, RPTSIZE+23~, ONERPT+84~ |
>> XMREC | SRVREXT+14 |
XMRG | SRVREXT+10~, SRVREXT+16 |
XMSUB | EEXT+9~, EEXT+15*, WRERR+4~, WRERR+16*, RPTSIZE+23~, RPTSIZE+27*, ONERPT+84~, ONERPT+88* |
XMTEXT | EEXT+9~, EEXT+12*, WRERR+4~, WRERR+15*, RPTSIZE+23~, RPTSIZE+26*, ONERPT+84~, ONERPT+87* |
XMY | SRVREXT+10~, EEXT+9~, WRERR+4~, RPTSIZE+23~, ONERPT+84~ |
XMY( | EEXT+11*, WRERR+14*, RPTSIZE+25*, ONERPT+86* |
>> XMZ | EEXT+17, WRERR+18, RPTSIZE+29, ONERPT+90 |
XPID | EEXT+2~, EEXT+4*, EEXT+7, EEXT+8, EEXT+12, EEXT+13, EEXT+15, EEXT+17, EEXT+19 |
XTVSEXTP | SRVREXT+10~, SRVREXT+19*, SRVREXT+29 |
XTVSLN | SRVREXT+10~, SRVREXT+16*, SRVREXT+17, SRVREXT+19, SRVREXT+20, SRVREXT+24, SRVREXT+27 |
XTVSPRML | SRVREXT+10~, SRVREXT+12* |
XTVSRPTP | SRVREXT+10~, SRVREXT+20*, SRVREXT+29, SRVREXT+31, EXTPKG~, EXTPKG+19 |
XTVSSIZE | EEXT~, EEXT+5*, EEXT+18 |
XTVSSNDR | SRVREXT+10~, SRVREXT+17*, SRVREXT+29, SRVREXT+32, SRVREXT+33, EXTPKG~, EXTPKG+16, EXTPKG+19, EEXT~, EEXT+7 , EEXT+11, EEXT+17, EEXT+18, WRERR~, WRERR+14, WRERR+19, SIZERPT~, SIZERPT+8, RPTSIZE~, RPTSIZE+25 , RPTSIZE+29, ONEPKGSZ~, ONEPKGSZ+15, ONEPKGSZ+22, ONERPT~, ONERPT+86, ONERPT+90 |
>> XTVSUNME | EXTPKG+9 |
>> Y | RPTSIZE+6*, RPTSIZE+7, ONERPT+68*, ONERPT+69 |