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

Package Total Call Graph
Toolkit 9 $$GET^XPAR  ^XTVSHLP1  ($$CHKPID,$$REQLOCK,$$SELXTMP,$$UNLCKPFL,JUSTPAWS,LISTOUT,SPLITADD)^XTVSLAPI  ($$BLDNUM,$$VERNUM)^XTVSLM  ($$PRMFLIST,EXIT)^XTVSLP  EN^XTVSLPC  EN^XTVSLPDC  EN^XTVSLPER  
SELLIST^XTVSLPR2  
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: 11

Package Total Caller Graph
Toolkit 10 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  XTVSLAPI  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
SELITEM(QSTHLP1,ITEMNUM,SELARY,PARAMSTR) ; Select Package Parameter file from SELARY
; INPUT: QSTHLP1 - Help string for 1 question mark help [Optional]
; ITEMNUM - Number of items in SELARY
; SELARY - Array of Package Parameter files
; PARAMSTR - Array of string parameters as follows:
; PARAMSTR("ADDITM") - 0: Adding item to SELARY NOT Allowed; 1: Adding unique item to SELARY Allowed 1^1: Add duplicates allowed
; PARAMSTR("DEFANS") - Only pertains to Package selection. Not Null: Last selected Package
; PARAMSTR("MAXLNG") - Maximum length of entered string [default 30, or 10 more than MINLNG when MINLNG>MAXLNG]
; PARAMSTR("MINLNG") - Minumum length of entered string [default 10] - DEV NOTE: MINLNG must be > or = #Chars in PATRN begin & end strings
; PARAMSTR("PATRN") - Pattern match definition for text [default .ANP)
; PARAMSTR("XTUPCASE") - 0: case matters, 1: All item text translated to upper case [default]
PRECHK(DEFANS,X,SELARY,ITEMNUM) ; SELITEM X value DIR("PRE") pre-check
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 SELITEM+40
EN^VALM EN+1
CLEAR^VALM1 HELP+5, HELP+14
FULL^VALM1 INIT+2, 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, INIT+7, EXIT+2, PRMFLIST+2, PARAMRPT+4
DISP^XQORM1 HELP+3, HELP+9
^XTVSHLP1 HELP+13
$$CHKPID^XTVSLAPI INIT+9, EXIT+3, PARAMRPT+4
$$REQLOCK^XTVSLAPI INIT+10
$$SELXTMP^XTVSLAPI INIT+5
$$UNLCKPFL^XTVSLAPI EXIT+7
JUSTPAWS^XTVSLAPI INIT+12, INIT+13, INIT+17, EXIT+9, EXIT+10, PRMFLIST+33, PRMFLIST+35, PARAMAP+5, PARAMCMP+7
LISTOUT^XTVSLAPI PRMFLIST+22
SPLITADD^XTVSLAPI BUILD+10
$$BLDNUM^XTVSLM HDR+5
$$VERNUM^XTVSLM HDR+5
$$PRMFLIST^XTVSLP PARAMCMP+4
EXIT^XTVSLP INIT+18
EN^XTVSLPC PARAMCMP+6
EN^XTVSLPDC PARAMRPT+3
EN^XTVSLPER PKGERR+2
SELLIST^XTVSLPR2 PRECHK+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," <* LOCK request denied! Try again later. *>"
  • Line Location: INIT+16
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+32
Function Call: WRITE
  • Prompt: " ",X
  • Line Location: PRECHK+1
Function Call: WRITE
  • Prompt: !,HLPTEXT
  • Line Location: PARAMAP+4
Routine Call
  • DIR
  • Line Location:
    • SELITEM+40
Routine Call
  • VALM
  • Line Location:
    • EN+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^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
$$SELITEM PRMFLIST+30
BUILD INIT+14, 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
ADDITEM SELITEM+15~, SELITEM+16*, SELITEM+17*, SELITEM+31, SELITEM+36, SELITEM+37
APFX LOADTMP+13~, LOADTMP+53*, LOADTMP+54, LOADTMP+55
APFXLST LOADTMP+13~, 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+4~, INIT+10*, INIT+11, INIT+12, INIT+15, INIT+17, EXIT+10
CMPRFNME PARAMCMP+2~, PARAMCMP+4*, PARAMCMP+5, PARAMCMP+6, PARAMCMP+7
DEFANS SELITEM+15~, SELITEM+20*, PRECHK~, PRECHK+1
DEFDIR HDR+1~, HDR+3*, HDR+6, BUILD+1~, BUILD+3*, BUILD+4, INIT+4~, INIT+7*, INIT+9, EXIT+1~
EXIT+2*, EXIT+3, PRMFLIST+1~, PRMFLIST+2*, PRMFLIST+6
DIR KILL+5!, SELITEM+15~
DIR("?" SELITEM+30*, SELITEM+31*, SELITEM+32*, SELITEM+34*, SELITEM+36*, SELITEM+37*, SELITEM+38*
DIR("??" SELITEM+39*
DIR("A" SELITEM+26*
DIR("PRE" SELITEM+28*
DIR(0 SELITEM+27*
DIRHEAD HDR+1~, HDR+6*, HDR+7, HDR+8, HDR+10*, HDR+11, HDR+12
DIRUT KILL+5!, SELITEM+15~
DTOUT KILL+5!, SELITEM+15~, PRECHK+2
DUOUT KILL+5!, SELITEM+15~
ENDFLNUM LOADTMP+13~, LOADTMP+18*, LOADTMP+35, LOADTMP+46, LOADTMP+47
ENDFNUM FILNDX+18~, FILNDX+20*, FILNDX+21
FILELIST LOADTMP+13~, 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+32*, PRMFLIST+36
FILENME( PRMFLIST+5*
>> FIRSTITM INIT+3, INIT+5, INIT+20
>> FLERNG LOADTMP+29*, LOADTMP+30, LOADTMP+31
FLESRCH PRMFLIST~, PRMFLIST+3*, PRMFLIST+5, PRMFLIST+12, PRMFLIST+13, PRMFLIST+17, PRMFLIST+21
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+18, PRMFLIST+23, PRMFLIST+30, PRMFLIST+32, PRMFLIST+33
, SELITEM~, SELITEM+27, SELITEM+30, PRECHK~, PRECHK+3
>> LASTITM INIT+3, INIT+5, INIT+20
LCKCHK INIT+4~, INIT+9*, INIT+11, INIT+13, INIT+15, EXIT+1~, EXIT+3*, EXIT+5, EXIT+10, PARAMRPT+2~
PARAMRPT+4*, PARAMRPT+5, PARAMRPT+8
LINEITEM BUILD+1~, 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+35
MAXLG SELITEM+15~, SELITEM+22*, SELITEM+24*, SELITEM+25
MINLG SELITEM+15~, SELITEM+21*, SELITEM+23*, SELITEM+24, SELITEM+25
PARAMSTR PRMFLIST+16~, PRMFLIST+30, SELITEM~, PRECHK+3
PARAMSTR("ADDITM" PRMFLIST+29*, SELITEM+16, SELITEM+17
PARAMSTR("DEFANS" PRMFLIST+27*, SELITEM+20
PARAMSTR("MAXLNG" PRMFLIST+28*, SELITEM+22, SELITEM+24*, SELITEM+25*
PARAMSTR("MINLNG" PRMFLIST+19*, PRMFLIST+24*, SELITEM+21, SELITEM+23*
PARAMSTR("PATRN" PRMFLIST+26*, SELITEM+19*
PARAMSTR("XTUPCASE" SELITEM+18*
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+33, PRMFLIST+35
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+13~, 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+13~, 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
QSTHLP1 PRMFLIST+16~, PRMFLIST+18*, PRMFLIST+23*, PRMFLIST+30, SELITEM~, SELITEM+29, SELITEM+33, SELITEM+34, SELITEM+35
RPFX LOADTMP+13~, LOADTMP+59*, LOADTMP+60
RPFXLST LOADTMP+13~, LOADTMP+51*, LOADTMP+55, LOADTMP+56, LOADTMP+59
SELARY PRMFLIST+1~, PRMFLIST+22, PRMFLIST+30, SELITEM~, PRECHK~, PRECHK+3
SELARY( PRMFLIST+12*, PRMFLIST+13*, PRMFLIST+32
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+18*, INIT+19*, INIT+20*, PARAMRPT+8*
>> VALMSG MSG+1*, MSG+2*
X HELP+1, HELP+2*, HELP+4, KILL+5!, SELITEM+15~, PRECHK~, PRECHK+1*, PRECHK+2, PRECHK+3
XTQVAR HELP+10*, HELP+11, HELP+12*, HELP+13, HELP+14*, HELP+19!
>> XTVPSPRM HDR+10, BUILD+4, INIT+8*, INIT+9, INIT+10, INIT+13, EXIT+3, EXIT+7, PARAMRPT+4
XTVSXFNM INIT+1~, INIT+5*, INIT+6, INIT+8, INIT+19, INIT+20
XTX HELP+13*, HELP+14, HELP+15, HELP+19!
XVAL PRMFLIST+1~, PRMFLIST+30*, PRMFLIST+32
Y HELP+10, HELP+14, HELP+19!, KILL+5!, SELITEM+15~, SELITEM+41

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