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

Package: VistA Package Sizing Utility

Routine: A1VSLP


Information

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

Source Information

Source file <A1VSLP.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VistA Package Sizing Utility 6 ($$SELXTMP,JUSTPAWS,LISTOUT,SPLITADD)^A1VSLAPI  ($$BLDNUM,$$VERNUM)^A1VSLM  ($$PRMFLIST,EXIT)^A1VSLP  EN^A1VSLPC  EN^A1VSLPDC  EN^A1VSLPER  
List Manager 3 EN^VALM  FULL^VALM1  (CLEAN,KILL)^VALM10  
Kernel 2 ($$LIST,$$STATUS,CLOSE,OPEN)^%ZISH  DISP^XQORM1  
Toolkit 1 $$GET^XPAR  
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: 4

Package Total Caller Graph
VistA Package Sizing Utility 3 A1VSLM  A1VSLP  A1VSRFL  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for A1VS 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
EXPND ; -- expand 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) ; Set File Number Index [^TMP("A1VS-FRIDX",$J)]
PFXIDX(PKGPFX,PKGNAME,PFXLST) ;Set ^TMP("A1VS-PKGEDIT",$J,"PFXIDX",<namespace prefix>,<package name>)=""
SCAPARY(LINEITEM,CAPNODE) ; Set single line Array & caption display array for action processing
CLNTMPGB ;Kill temporary globals
PRMFLIST() ;List parameter files for selection
SELPKG(ITEMNUM,SELARY) ; Select Package to Edit from ^TMP("A1VS 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: A1VS PKG MGR PARAM ERR DISP ACTION
PARAMRPT ; -- Package Parameter Caption list
; -- Protocol: A1VS PKG MGR PARAM DISP CAPTION ACTION
PARAMAP ; -- Display Data Map for Parameter File
; -- Protocol: A1VS PKG MGR PARAM DATA MAP HELP ACTION
PARAMCMP ; -- Package Parameter Comparison report
; -- Protocol: A1VS PKG MGR PARAM COMPARE ACTION

External References

Name Field # of Occurrence
$$LIST^%ZISH PRMFLIST+4
$$STATUS^%ZISH BUILD+7
CLOSE^%ZISH BUILD+12
OPEN^%ZISH BUILD+4
$$SELXTMP^A1VSLAPI INIT+3
JUSTPAWS^A1VSLAPI PRMFLIST+17, PARAMAP+5, PARAMCMP+7
LISTOUT^A1VSLAPI PRMFLIST+12
SPLITADD^A1VSLAPI BUILD+10
$$BLDNUM^A1VSLM HDR+5
$$VERNUM^A1VSLM HDR+5
$$PRMFLIST^A1VSLP PARAMCMP+4
EXIT^A1VSLP INIT+8
EN^A1VSLPC PARAMCMP+6
EN^A1VSLPDC PARAMRPT+2
EN^A1VSLPER PKGERR+2
^DIR SELPKG+14
EN^VALM EN+1
FULL^VALM1 PARAMAP+3, PARAMCMP+3
CLEAN^VALM10 KILL+1
KILL^VALM10 KILL+2
$$GET^XPAR HDR+3, BUILD+3, PRMFLIST+2
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ",FILENME
  • Line Location: PRMFLIST+15
Function Call: WRITE
  • Prompt: !,HLPTEXT
  • Line Location: PARAMAP+4
Routine Call
  • DIR
  • Line Location:
    • SELPKG+14
Routine Call
  • VALM
  • Line Location:
    • EN+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("A1VS PACKAGE MGR" INIT+5
^TMP("A1VS PKG MAN PARM DISP" KILL+4!
^TMP("A1VS-ERROR" CLNTMPGB+1!
^TMP("A1VS-FRIDX" FILNDX+9*, CLNTMPGB+1!
^TMP("A1VS-PARAM-CAP" SCAPARY+7*, SCAPARY+9*, SCAPARY+11*, SCAPARY+13*, SCAPARY+15*, SCAPARY+17*, SCAPARY+19*, SCAPARY+21*, SCAPARY+23*, SCAPARY+25*
, CLNTMPGB+2!
^TMP("A1VS-PFXIDX" PFXIDX+2*, CLNTMPGB+1!
^TMP("A1VS-PKGEDIT" LOADTMP+18*, LOADTMP+25*, LOADTMP+34*, LOADTMP+35*, LOADTMP+41*, LOADTMP+48*, LOADTMP+54*, LOADTMP+57*, CLNTMPGB+1!

Label References

Name Line Occurrences
$$SELPKG PRMFLIST+13
BUILD INIT+6, REFRESH+1
CLNTMPGB KILL+3
FILNDX LOADTMP+26, LOADTMP+31
KILL BUILD+2, EXIT+1
LOADTMP BUILD+11
MSG PKGERR+4, PARAMRPT+4, PARAMAP+8, PARAMCMP+9
PFXIDX LOADTMP+49, LOADTMP+50
REFRESH PKGERR+3, PARAMRPT+3, PARAMAP+7, PARAMCMP+8
SCAPARY BUILD+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A1TMPLNN INIT+2~, INIT+3*, INIT+4, INIT+5, INIT+8
>> A1VPSPRM HDR+10, BUILD+4, INIT+5*, INIT+6, INIT+7
>> APFX LOADTMP+47*, LOADTMP+48, LOADTMP+49
>> APFXLST LOADTMP+44*, LOADTMP+47, LOADTMP+49, LOADTMP+50
BEG LOADTMP+28~, LOADTMP+29*, LOADTMP+31
BEGFNUM FILNDX+6~, FILNDX+7*, FILNDX+9
CAPNODE BUILD+1~, BUILD+6*, BUILD+9, SCAPARY~, SCAPARY+2*
CMPRFNME PARAMCMP+2~, PARAMCMP+4*, PARAMCMP+5, PARAMCMP+6, PARAMCMP+7
DEFDIR HDR+1~, HDR+3*, HDR+6, BUILD+1~, BUILD+3*, BUILD+4, PRMFLIST+1~, PRMFLIST+2*, PRMFLIST+4
DIR KILL+5!, SELPKG+6~
DIR("?" SELPKG+11*, SELPKG+12*
DIR("??" SELPKG+13*
DIR("A" SELPKG+8*
DIR(0 SELPKG+9*
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~
END LOADTMP+28~, LOADTMP+30*, LOADTMP+31
ENDFNUM FILNDX+6~, FILNDX+8*, FILNDX+9
FILELIST LOADTMP+21*, LOADTMP+23, LOADTMP+24, LOADTMP+27, LOADTMP+38*, LOADTMP+40, PRMFLIST+1~
FILELIST( PRMFLIST+9
FILENME PRMFLIST+1~, PRMFLIST+8*, PRMFLIST+9*, PRMFLIST+15*, PRMFLIST+18
FILENME("XTMPSIZE*" PRMFLIST+3*
>> FIRSTITM INIT+1, INIT+3
>> FLERNG LOADTMP+24*, LOADTMP+25, LOADTMP+26
FLRNGE FILNDX~, FILNDX+7, FILNDX+8
>> FNUM LOADTMP+40*, LOADTMP+41
HLPTEXT PARAMAP+2~, PARAMAP+4*
IO BUILD+5
ITEMNUM PRMFLIST+1~, PRMFLIST+7*, PRMFLIST+9*, PRMFLIST+11, PRMFLIST+13, PRMFLIST+15, PRMFLIST+17, SELPKG~, SELPKG+9
>> LASTITM INIT+1, INIT+3
LINEITEM BUILD+7*, BUILD+8, BUILD+9, BUILD+10, BUILD+11, LOADTMP~, LOADTMP+14, LOADTMP+15, LOADTMP+18, LOADTMP+21
, LOADTMP+29, LOADTMP+30, LOADTMP+34, LOADTMP+35, LOADTMP+38, LOADTMP+44, LOADTMP+45, LOADTMP+57, SCAPARY~, SCAPARY+6
, SCAPARY+7, SCAPARY+8, SCAPARY+10, SCAPARY+12, SCAPARY+14, SCAPARY+16, SCAPARY+18, SCAPARY+20, SCAPARY+22, SCAPARY+24
LNENUM PARAMAP+2~, PARAMAP+4*
LSTRSLT PRMFLIST+1~, PRMFLIST+4*, PRMFLIST+5
PARMDAT SCAPARY+1~, 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, SCAPARY+24*, SCAPARY+25
>> PCENUM LOADTMP+22*, LOADTMP+24*, LOADTMP+39*, LOADTMP+40*, LOADTMP+46*, LOADTMP+47*, LOADTMP+52*, LOADTMP+53*
PFXLST PFXIDX~, PFXIDX+1*, PFXIDX+2
PKG SCAPARY+1~, SCAPARY+6*, SCAPARY+7, SCAPARY+9, SCAPARY+11, SCAPARY+13, SCAPARY+15, SCAPARY+17, SCAPARY+19, SCAPARY+21
, SCAPARY+23, SCAPARY+25
PKGNAME LOADTMP+14*, LOADTMP+18, LOADTMP+25, LOADTMP+26, LOADTMP+31, LOADTMP+34, LOADTMP+35, LOADTMP+41, LOADTMP+48, LOADTMP+49
, LOADTMP+50, LOADTMP+54, LOADTMP+57, FILNDX~, FILNDX+9, PFXIDX~, PFXIDX+2
PKGPFX LOADTMP+15*, LOADTMP+18, LOADTMP+25, LOADTMP+34, LOADTMP+35, LOADTMP+41, LOADTMP+48, LOADTMP+50, LOADTMP+54, LOADTMP+57
, PFXIDX~, PFXIDX+2
>> RPFX LOADTMP+53*, LOADTMP+54
>> RPFXLST LOADTMP+45*, LOADTMP+49, LOADTMP+50, LOADTMP+53
SELARY PRMFLIST+1~, PRMFLIST+12, PRMFLIST+13, SELPKG~
SELARY( PRMFLIST+9*, PRMFLIST+15
SPCPAD HDR+1~, HDR+2*, HDR+7*, HDR+8, HDR+9*, HDR+11*, HDR+12
TEXT MSG~
>> VALMBCK 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+7*, INIT+8*
X HELP+1*, KILL+5!, SELPKG+6~
>> XVAL PRMFLIST+13*, PRMFLIST+15
Y KILL+5!, SELPKG+6~, SELPKG+17

Marked Items

Name Field # of Occurrence
$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