Routine: XTVSSVR

Information

XTVSSVR ;ALB/GTS - VistA Package Sizing Manager; 26-FEB-2020

Package	Total	Call Graph
Toolkit	4	NOTCE^XTVSLAPI (SETXTMP,XTMPORD)^XTVSLNA1 TALLYRPT^XTVSRFL ($$COUNTFLS,$$MULTX,$$PROTOCOL,$$ROUTINE,CNTR,KIDSIDX)^XTVSRFL1
MailMan	3	^XMD ENT^XMPG $$NETNAME^XMXUTIL
Kernel	2	APPERROR^%ZTER ($$FMADD,$$FMTE,$$NOW)^XLFDT
VA FileMan	2	DD^%DT NOW^%DTC

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Toolkit	1	XTVSLNA1

Entry Points

Name	Comments	DBIA/ICR reference
SRVREXT	; Entry point - Process XTVS Request Message ; -- Server Option: XTVS PKG EXTRACT SERVER
PARSLN	; Parse message line of package parameters (XT7.3152)
PKGLNRBD(ARRYNAME,XTVSLN,XTPKGLN,LNITMCT)	;Rebuild multiple message lines into single pkg param line (XT7.3152) ; Input: ; ARRYNAME - First Subscript of ^TMP array [VAL] ; XTVSLN - Current message line [VAL] ; XTPKGLN - Package line being created [VAL] ; LNITMCT - Node # to store complete Package String in ^TMP array [REF]
EXTPKG(XTVSSNDR)	; 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

External References

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+8
$$FMTE^XLFDT	EEXT+18, RPTSIZE+27, ONERPT+88
$$NOW^XLFDT	EXTPKG+8, RPTSIZE+27, ONERPT+88
^XMD	WRERR+17, RPTSIZE+28, ONERPT+89
ENT^XMPG	EEXT+20
$$NETNAME^XMXUTIL	RPTSIZE+5, ONERPT+67
NOTCE^XTVSLAPI	EXTPKG+20
SETXTMP^XTVSLNA1	EXTPKG+21
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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("PROD"	EXTPKG+8, WRERR+7, WRERR+11, WRERR+16, RPTSIZE+27, ONERPT+88
^DIC(9.4 - [#9.4]	EXTPKG+11, EXTPKG+12, EXTPKG+14, EXTPKG+15, ONERPT+11, ONERPT+12, ONERPT+13
^TMP(	PKGLNRBD+10*
^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+26!, 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+6!, EXTPKG+8*, EEXT+11, EEXT+12, EEXT+17, EEXT+19, EEXT+23!, SIZERPT+10!

Label References

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	SRVREXT+20
EXTPKG	SRVREXT+20
ONEPKGSZ	SRVREXT+23
ONERPT	ONEPKGSZ+22
PARSLN	SRVREXT+18
PDAD	RPTSIZE+20
PKGLNRBD	PARSLN+27
RPTSIZE	SIZERPT+8
SIZERPT	EEXT+22
WRERR	SRVREXT+24, EEXT+11, EEXT+21, RPTSIZE+29, ONEPKGSZ+15, ONERPT+90

Naked Globals

Name	Field # of Occurrence
^(	RPTSIZE+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIVST	EXTPKG+5~, EXTPKG+16*, EXTPKG+17
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
ARRYNAME	PKGLNRBD~, PKGLNRBD+10
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+14, 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+11~, SRVREXT+13, PARSLN+27, PKGLNRBD~, PKGLNRBD+9, PKGLNRBD+10
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
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+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+6~, EEXT+7*
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+12, SRVREXT+23, SRVREXT+24, PARSLN+27, PARSLN+28, PARSLN+29*, ONEPKGSZ~, ONEPKGSZ+10 , ONEPKGSZ+12, ONEPKGSZ+20, 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
VPCURST	EXTPKG+5~, EXTPKG+15*, EXTPKG+16
VPIEN	EXTPKG+5~, EXTPKG+10, EXTPKG+11, EXTPKG+12, EXTPKG+14, EXTPKG+15
VPN	EXTPKG+5~, EXTPKG+14*, EXTPKG+17
VPNAME	EXTPKG+5~, EXTPKG+11, EXTPKG+18, EXTPKG+19, EXTPKG+20
VPNAT	EXTPKG+5~, EXTPKG+12*, EXTPKG+13
VPNATRSLT	EXTPKG+5~, EXTPKG+13*, EXTPKG+17
>> X	RPTSIZE+6, ONERPT+68
XDATE	EEXT+13~, EEXT+17, EEXT+18, EEXT+19
XMDUZ	EEXT+13~, EEXT+14, WRERR+4~, WRERR+13, RPTSIZE+23~, RPTSIZE+24, ONERPT+84~, ONERPT+85
XMER	SRVREXT+10~, SRVREXT+14*, SRVREXT+15, SRVREXT+16
XMERR	EEXT+13~, WRERR+4~, RPTSIZE+23~, ONERPT+84~
>> XMREC	SRVREXT+15
XMRG	SRVREXT+10~, SRVREXT+17
XMSUB	EEXT+13~, EEXT+19, WRERR+4~, WRERR+16, RPTSIZE+23~, RPTSIZE+27, ONERPT+84~, ONERPT+88
XMTEXT	EEXT+13~, EEXT+16, WRERR+4~, WRERR+15, RPTSIZE+23~, RPTSIZE+26, ONERPT+84~, ONERPT+87
XMY	SRVREXT+10~, EEXT+13~, WRERR+4~, RPTSIZE+23~, ONERPT+84~
XMY(	EEXT+15, WRERR+14, RPTSIZE+25, ONERPT+86
>> XMZ	EEXT+21, WRERR+18, RPTSIZE+29, ONERPT+90
XPID	EEXT+6~, EEXT+8*, EEXT+11, EEXT+12, EEXT+16, EEXT+17, EEXT+19, EEXT+21, EEXT+23
XTPKGLN	SRVREXT+11~, SRVREXT+12, PARSLN+27, PKGLNRBD~, PKGLNRBD+7, PKGLNRBD+8, PKGLNRBD+10, PKGLNRBD+11*
XTPPARM	SRVREXT+11~, SRVREXT+13, PARSLN+26, PARSLN+29
XTVSEXTP	SRVREXT+10~, SRVREXT+20, PARSLN+16*
XTVSLN	SRVREXT+10~, SRVREXT+17*, PARSLN+14, PARSLN+16, PARSLN+17, PARSLN+27, PARSLN+28, PARSLN+29, PKGLNRBD~, PKGLNRBD+7
XTVSRPTP	SRVREXT+10~, SRVREXT+20, SRVREXT+22, PARSLN+17*
XTVSSIZE	EEXT~, EEXT+9*, EEXT+22
XTVSSNDR	SRVREXT+10~, SRVREXT+20, SRVREXT+23, SRVREXT+24, PARSLN+14*, EXTPKG~, EXTPKG+20, EEXT~, EEXT+11, EEXT+15 , EEXT+21, EEXT+22, 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+8
>> Y	RPTSIZE+6, RPTSIZE+7, ONERPT+68, ONERPT+69

Customize PDF page

Package: Toolkit

Routine: XTVSSVR

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: