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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: XTVSLP

Package: Toolkit

Routine: XTVSLP


Information

XTVSLP ;Albany FO/GTS - VistA Package Sizing Manager; 7-JUL-2016

Source Information

Source file <XTVSLP.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Toolkit 8 $$GET^XPAR  ^XTVSHLP1  ($$CHKPID,$$REQLOCK,$$SELXTMP,$$UNLCKPFL,JUSTPAWS,LISTOUT,SPLITADD)^XTVSLAPI  ($$BLDNUM,$$VERNUM)^XTVSLM  ($$PRMFLIST,EXIT)^XTVSLP  EN^XTVSLPC  EN^XTVSLPDC  EN^XTVSLPER  
List Manager 3 EN^VALM  (CLEAR,FULL,PAUSE)^VALM1  (CLEAN,KILL)^VALM10  
Kernel 2 ($$LIST,$$STATUS,CLOSE,OPEN)^%ZISH  DISP^XQORM1  
VA FileMan 1 ^DIR  

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: 10

Package Total Caller Graph
Toolkit 9 XTVS PKG MGR PARAM COMPARE ACTION  XTVS PKG MGR PARAM DATA MAP HELP ACTION  XTVS PKG MGR PARAM DISP CAPTION ACTION  XTVS PKG MGR PARAM DISPLAY  XTVS PKG MGR PARAM ERR DISP ACTION  XTVSLM  XTVSLP  XTVSLR  
XTVSRFL  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for XTVS PKG MGR PARAM DISPLAY
HDR ; -- header code
BUILD ; - Build local and global display arrays
INIT ; -- init variables and list array
HELP ; -- help code
EXIT ; -- exit code
REFRESH ; -- refresh display
MSG(TEXT) ; -- set default message
KILL ; - Cleanup local and global display arrays
LOADTMP(LINEITEM) ;Store LineItem into ^TMP global
FILNDX(FLRNGE,PKGNAME,TYPE,FSET) ; Set File Number Index [^TMP("XTVS-FRIDX",$J)]
PFXIDX(PKGPFX,PKGNAME,PFXLST) ;Set ^TMP("XTVS-PFXIDX",$J,<namespace prefix>,<package name>)=<list of prefixes>
SCAPARY(LINEITEM) ; Set single line Array & caption display array for action processing
CLNTMPGB ;Kill temporary globals
PRMFLIST(FLESRCH,PAWSOUT) ;List parameter files for selection
SELPKG(ITEMNUM,SELARY) ; Select Package to Edit from ^TMP("XTVS PKG MGR PARAM CAP",$J)
; INPUT: SELARY - Array of packages
; ITEMNUM - Number of items in SELARY
PARMMAP ; Map of Parameter data elements
;
PKGERR ; -- Package Parameter Errors
; -- Protocol: XTVS PKG MGR PARAM ERR DISP ACTION
PARAMRPT ; -- Package Parameter Caption list
; -- Protocol: XTVS PKG MGR PARAM DISP CAPTION ACTION
PARAMAP ; -- Display Data Map for Parameter File
; -- Protocol: XTVS PKG MGR PARAM DATA MAP HELP ACTION
PARAMCMP ; -- Package Parameter Comparison report
; -- Protocol: XTVS PKG MGR PARAM COMPARE ACTION

External References

Name Field # of Occurrence
$$LIST^%ZISH PRMFLIST+6
$$STATUS^%ZISH BUILD+7
CLOSE^%ZISH BUILD+12
OPEN^%ZISH BUILD+4
^DIR SELPKG+12
EN^VALM EN+1
CLEAR^VALM1 HELP+5, HELP+14
FULL^VALM1 HELP+6, EXIT+4, PARAMAP+3, PARAMCMP+3
PAUSE^VALM1 HELP+14
CLEAN^VALM10 KILL+1
KILL^VALM10 KILL+2
$$GET^XPAR HDR+3, BUILD+3, EXIT+2, PRMFLIST+2, PARAMRPT+4
DISP^XQORM1 HELP+3, HELP+9
^XTVSHLP1 HELP+13
$$CHKPID^XTVSLAPI EXIT+3, PARAMRPT+4
$$REQLOCK^XTVSLAPI INIT+6
$$SELXTMP^XTVSLAPI INIT+3
$$UNLCKPFL^XTVSLAPI EXIT+7
JUSTPAWS^XTVSLAPI INIT+11, EXIT+9, EXIT+10, PRMFLIST+20, PRMFLIST+22, PARAMAP+5, PARAMCMP+7
LISTOUT^XTVSLAPI PRMFLIST+16
SPLITADD^XTVSLAPI BUILD+10
$$BLDNUM^XTVSLM HDR+5
$$VERNUM^XTVSLM HDR+5
$$PRMFLIST^XTVSLP PARAMCMP+4
EXIT^XTVSLP INIT+12
EN^XTVSLPC PARAMCMP+6
EN^XTVSLPDC PARAMRPT+3
EN^XTVSLPER PKGERR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," <* LOCK request denied! Try again later. *>"
  • Line Location: INIT+10
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+9
Function Call: WRITE
  • Prompt: !,$S(XTX["$PAUSE":"",1:XTX)
  • Line Location: HELP+15
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+16
Function Call: WRITE
  • Prompt: !!," <* UNLOCK ERROR. Check LOCK file Integrity. *>"
  • Line Location: EXIT+8
Function Call: WRITE
  • Prompt: " ",FILENME
  • Line Location: PRMFLIST+19
Function Call: WRITE
  • Prompt: !,HLPTEXT
  • Line Location: PARAMAP+4
Routine Call
  • DIR
  • Line Location:
    • SELPKG+12
Routine Call
  • VALM
  • Line Location:
    • EN+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("XTVS PACKAGE MGR" INIT+5
^TMP("XTVS PKG MAN PARM DISP" KILL+4!
^TMP("XTVS-ERROR" CLNTMPGB+1!
^TMP("XTVS-FRIDX" FILNDX+21*, CLNTMPGB+1!
^TMP("XTVS-PARAM-CAP" SCAPARY+5*, SCAPARY+7*, SCAPARY+9*, SCAPARY+11*, SCAPARY+13*, SCAPARY+15*, SCAPARY+17*, SCAPARY+19*, SCAPARY+21*, SCAPARY+23*
, CLNTMPGB+2!
^TMP("XTVS-PFXIDX" PFXIDX+2*, CLNTMPGB+1!
^TMP("XTVS-PKGEDIT" LOADTMP+21*, LOADTMP+30*, LOADTMP+42*, LOADTMP+46*, LOADTMP+47*, LOADTMP+54*, LOADTMP+60*, LOADTMP+63*, CLNTMPGB+1!

Label References

Name Line Occurrences
$$SELPKG PRMFLIST+17
BUILD INIT+8, REFRESH+1
CLNTMPGB KILL+3
FILNDX LOADTMP+31, LOADTMP+35, LOADTMP+43
KILL BUILD+2, EXIT+12
LOADTMP BUILD+11
MSG HDR+13, HELP+18, PKGERR+4, PARAMRPT+7, PARAMAP+8, PARAMCMP+9
PFXIDX LOADTMP+55, LOADTMP+56
REFRESH PKGERR+3, PARAMRPT+6, PARAMAP+7, PARAMCMP+8
SCAPARY BUILD+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APFX LOADTMP+53*, LOADTMP+54, LOADTMP+55
>> APFXLST LOADTMP+50*, LOADTMP+53, LOADTMP+55, LOADTMP+56
BEGFLNUM LOADTMP+13~, LOADTMP+17*, LOADTMP+35, LOADTMP+46, LOADTMP+47
BEGFNUM FILNDX+18~, FILNDX+19*, FILNDX+21
CHKLKER INIT+2~, INIT+6*, INIT+7, INIT+10, INIT+11, INIT+12, EXIT+10
CMPRFNME PARAMCMP+2~, PARAMCMP+4*, PARAMCMP+5, PARAMCMP+6, PARAMCMP+7
DEFDIR HDR+1~, HDR+3*, HDR+6, BUILD+1~, BUILD+3*, BUILD+4, EXIT+1~, EXIT+2*, EXIT+3, PRMFLIST+1~
, PRMFLIST+2*, PRMFLIST+6
DIR KILL+5!, SELPKG+6~
DIR("?" SELPKG+9*, SELPKG+10*
DIR("??" SELPKG+11*
DIR("A" SELPKG+7*
DIR(0 SELPKG+8*
DIRHEAD HDR+1~, HDR+6*, HDR+7, HDR+8, HDR+10*, HDR+11, HDR+12
DIRUT KILL+5!, SELPKG+6~
DTOUT KILL+5!, SELPKG+6~
DUOUT KILL+5!, SELPKG+6~
ENDFLNUM LOADTMP+13~, LOADTMP+18*, LOADTMP+35, LOADTMP+46, LOADTMP+47
ENDFNUM FILNDX+18~, FILNDX+20*, FILNDX+21
FILELIST LOADTMP+24*, LOADTMP+27, LOADTMP+29, LOADTMP+34, LOADTMP+39*, LOADTMP+41, PRMFLIST+1~
FILELIST( PRMFLIST+11
FILENME PRMFLIST+1~, PRMFLIST+7*, PRMFLIST+11*, PRMFLIST+12, PRMFLIST+13, PRMFLIST+19*, PRMFLIST+23
FILENME( PRMFLIST+5*
>> FIRSTITM INIT+1, INIT+3
>> FLERNG LOADTMP+29*, LOADTMP+30, LOADTMP+31
FLESRCH PRMFLIST~, PRMFLIST+3*, PRMFLIST+5, PRMFLIST+12, PRMFLIST+13
FLRNGE FILNDX~, FILNDX+19, FILNDX+20
FNUM LOADTMP+13~, LOADTMP+41*, LOADTMP+42, LOADTMP+43
FSET LOADTMP+13~, LOADTMP+14*, LOADTMP+31, LOADTMP+35, LOADTMP+43, FILNDX~, FILNDX+22*
HLPTEXT PARAMAP+2~, PARAMAP+4*
IO BUILD+5
ITEMNUM PRMFLIST+1~, PRMFLIST+10*, PRMFLIST+12*, PRMFLIST+13*, PRMFLIST+15, PRMFLIST+17, PRMFLIST+19, PRMFLIST+20, SELPKG~, SELPKG+8
>> LASTITM INIT+1, INIT+3
LCKCHK EXIT+1~, EXIT+3*, EXIT+5, EXIT+10, PARAMRPT+2~, PARAMRPT+4*, PARAMRPT+5, PARAMRPT+8
LINEITEM BUILD+7*, BUILD+8, BUILD+9, BUILD+10, BUILD+11, LOADTMP~, LOADTMP+15, LOADTMP+16, LOADTMP+17, LOADTMP+18
, LOADTMP+21, LOADTMP+24, LOADTMP+38, LOADTMP+39, LOADTMP+50, LOADTMP+51, LOADTMP+63, SCAPARY~, SCAPARY+4, SCAPARY+5
, SCAPARY+6, SCAPARY+8, SCAPARY+10, SCAPARY+12, SCAPARY+14, SCAPARY+16, SCAPARY+18, SCAPARY+20, SCAPARY+22
LNENUM PARAMAP+2~, PARAMAP+4*
LSTRSLT PRMFLIST+1~, PRMFLIST+6*, PRMFLIST+8, PRMFLIST+22
PARMDAT SCAPARY+1~, SCAPARY+6*, SCAPARY+7, SCAPARY+8*, SCAPARY+9, SCAPARY+10*, SCAPARY+11, SCAPARY+12*, SCAPARY+13, SCAPARY+14*
, SCAPARY+15, SCAPARY+16*, SCAPARY+17, SCAPARY+18*, SCAPARY+19, SCAPARY+20*, SCAPARY+21, SCAPARY+22*, SCAPARY+23
PAWSOUT PRMFLIST~, PRMFLIST+4*, PRMFLIST+20, PRMFLIST+22
PCENUM LOADTMP+13~, LOADTMP+28*, LOADTMP+29*, LOADTMP+40*, LOADTMP+41*, LOADTMP+52*, LOADTMP+53*, LOADTMP+58*, LOADTMP+59*
PFXLST PFXIDX~, PFXIDX+1*, PFXIDX+2
PKG SCAPARY+1~, SCAPARY+4*, SCAPARY+5, SCAPARY+7, SCAPARY+9, SCAPARY+11, SCAPARY+13, SCAPARY+15, SCAPARY+17, SCAPARY+19
, SCAPARY+21, SCAPARY+23
PKGNAME LOADTMP+15*, LOADTMP+21, LOADTMP+30, LOADTMP+31, LOADTMP+35, LOADTMP+42, LOADTMP+43, LOADTMP+46, LOADTMP+47, LOADTMP+54
, LOADTMP+55, LOADTMP+56, LOADTMP+60, LOADTMP+63, FILNDX~, FILNDX+21, PFXIDX~, PFXIDX+2
PKGPFX LOADTMP+16*, LOADTMP+21, LOADTMP+30, LOADTMP+42, LOADTMP+46, LOADTMP+47, LOADTMP+50, LOADTMP+54, LOADTMP+56, LOADTMP+60
, LOADTMP+63, PFXIDX~, PFXIDX+2
>> RPFX LOADTMP+59*, LOADTMP+60
>> RPFXLST LOADTMP+51*, LOADTMP+55, LOADTMP+56, LOADTMP+59
SELARY PRMFLIST+1~, PRMFLIST+16, PRMFLIST+17, SELPKG~
SELARY( PRMFLIST+12*, PRMFLIST+13*, PRMFLIST+19
SPCPAD HDR+1~, HDR+2*, HDR+7*, HDR+8, HDR+9*, HDR+11*, HDR+12
TEXT MSG~, MSG+1, MSG+2
TXTCT HELP+13*, HELP+19!
TYPE FILNDX~, FILNDX+21
UNLKRSLT EXIT+6~, EXIT+7*, EXIT+8, EXIT+9
>> VALMBCK HELP+17*, REFRESH+2*
>> VALMCNT BUILD+6*, BUILD+10
>> VALMHDR(1 HDR+4*
>> VALMHDR(2 HDR+5*
>> VALMHDR(3 HDR+8*
>> VALMHDR(4 HDR+12*
>> VALMQUIT INIT+9*, INIT+12*, INIT+13*, PARAMRPT+8*
>> VALMSG MSG+1*, MSG+2*
X HELP+1, HELP+2*, HELP+4, KILL+5!, SELPKG+6~
XTQVAR HELP+10*, HELP+11, HELP+12*, HELP+13, HELP+14*, HELP+19!
XTTMPLNN INIT+2~, INIT+3*, INIT+4, INIT+5, INIT+13
>> XTVPSPRM HDR+10, BUILD+4, INIT+5*, INIT+6, INIT+8, INIT+9, EXIT+3, EXIT+7, PARAMRPT+4
XTX HELP+13*, HELP+14, HELP+15, HELP+19!
>> XVAL PRMFLIST+17*, PRMFLIST+19
Y HELP+10, HELP+14, HELP+19!, KILL+5!, SELPKG+6~, SELPKG+13

Marked Items

Name Field # of Occurrence
$T(LPTXT+TXTCT^XTVSHLP1 HELP+13
$T(PARMMAP+LNENUM PARAMAP+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All