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  | All
Print Page as PDF
Routine: A1VSLPDC

Package: VistA Package Sizing Utility

Routine: A1VSLPDC


Information

A1VSLPDC ;Albany FO/GTS - VistA Package Sizing Manager - Caption display; 12-JUL-2016

Source Information

Source file <A1VSLPDC.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 3 ($$DEL,$$MV,CLOSE,OPEN)^%ZISH  ($$FMTE,$$NOW)^XLFDT  DISP^XQORM1  
List Manager 3 EN^VALM  FULL^VALM1  (CLEAN,KILL)^VALM10  
VistA Package Sizing Utility 3 ($$YNCHK,ADD,JUSTPAWS,LISTOUT,SPLITADD)^A1VSLAPI  ($$BLDNUM,$$VERNUM)^A1VSLM  ($$SETSTR,EDITFNUM,EDITFRNG,EDITPRFX,SPLITOUT,UPDTNODE)^A1VSLPD1  
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: 2

Package Total Caller Graph
VistA Package Sizing Utility 2 A1VSLP  A1VSRFL  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for A1VS PKG MGR PARAM CAPTN DISP
HDR ; -- header code
INIT ; -- init variables and list array
HELP ; -- help code
EXIT ; -- exit code
EXPND ; -- expand code
KILL ; - Cleanup local and global display arrays
SELPKG(ADPKG) ; Select Package to Edit from ^TMP("A1VS PKG MGR PARAM CAP",$J)
; INPUT:
; ADPKG : 0 - Do not allow add new package [Default]
; : 1 - Allow add new package
DATACHK(PKG) ; Check for existence of entered package in ^TMP("A1VS PKG MGR PARAM CAP",$J)
EDPKGPRM(PKGNME) ; Edit Package Parameters
CHKX(XADD) ;Check for Package
; INPUT:
; XADD : 0 - Do not allow add new package
; : 1 - Allow add new package
PKGLIST(X,LASTSPKG) ;List packages from user entry [to support 'XADD' mod in CHKX]
PKGHLP ; Package selection help
EDITPRM ; Edit parameters for a package
; -- Protocol: A1VS PKG MGR EDIT PACKAGE PARM ACTION
DELPMPKG ; Delete parameters from a package
; -- Protocol: A1VS PKG MGR DEL PACKAGE PARM ACTION
SAVPMPKG ; Save Package Parameters file
; -- Protocol: A1VS PKG MGR SAVE PACKAGE PARM ACTION

External References

Name Field # of Occurrence
$$DEL^%ZISH SAVPMPKG+29, SAVPMPKG+31
$$MV^%ZISH SAVPMPKG+30
CLOSE^%ZISH SAVPMPKG+42
OPEN^%ZISH SAVPMPKG+36
$$YNCHK^A1VSLAPI CHKX+15, PKGHLP+2, DELPMPKG+12, SAVPMPKG+17, SAVPMPKG+18
ADD^A1VSLAPI INIT+8, INIT+9
JUSTPAWS^A1VSLAPI PKGLIST+12, EDITPRM+22, DELPMPKG+15, SAVPMPKG+4
LISTOUT^A1VSLAPI PKGLIST+8, PKGLIST+13, PKGHLP+9
SPLITADD^A1VSLAPI INIT+13
$$BLDNUM^A1VSLM HDR+5
$$VERNUM^A1VSLM HDR+5
$$SETSTR^A1VSLPD1 EDITPRM+19
EDITFNUM^A1VSLPD1 EDPKGPRM+65
EDITFRNG^A1VSLPD1 EDPKGPRM+83
EDITPRFX^A1VSLPD1 EDPKGPRM+47
SPLITOUT^A1VSLPD1 EDPKGPRM+38, EDPKGPRM+56, EDPKGPRM+74
UPDTNODE^A1VSLPD1 EDPKGPRM+18, EDPKGPRM+28, EDPKGPRM+94
^DIR SELPKG+14, EDPKGPRM+16, EDPKGPRM+26, EDPKGPRM+44, EDPKGPRM+62, EDPKGPRM+80, EDPKGPRM+92
EN^VALM EN+3
FULL^VALM1 EDITPRM+13, DELPMPKG+4, SAVPMPKG+3
CLEAN^VALM10 KILL+1
KILL^VALM10 KILL+2
$$FMTE^XLFDT SAVPMPKG+8
$$NOW^XLFDT SAVPMPKG+8
$$GET^XPAR HDR+3, SAVPMPKG+14
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: X
  • Line Location: CHKX+10
Function Call: WRITE
  • Prompt: !,"Select a package. [Number 1 - "_ITEMNUM_"]"
  • Line Location: PKGLIST+10
Function Call: WRITE
  • Prompt: !,"??"
  • Line Location: PKGLIST+11
Function Call: WRITE
  • Prompt: " ",X
  • Line Location: PKGLIST+16
Routine Call
  • DIR
  • Line Location:
    • SELPKG+14
    • EDPKGPRM+16
    • EDPKGPRM+26
    • EDPKGPRM+44
    • EDPKGPRM+62
    • EDPKGPRM+80
    • EDPKGPRM+92
Routine Call
  • VALM
  • Line Location:
    • EN+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("A1VS PKG MGR PARAM CAP" KILL+3!
^TMP("A1VS-PARAM-CAP" INIT+5, INIT+10, INIT+11, INIT+12, DATACHK+3, CHKX+11, CHKX+19*, CHKX+20*, CHKX+21*, CHKX+22*
, CHKX+23*, CHKX+24*, CHKX+25*, CHKX+26*, CHKX+27*, CHKX+28*, PKGLIST+3, PKGHLP+6, SAVPMPKG+41
^VA(200 - [#200] SAVPMPKG+12

Label References

Name Line Occurrences
$$EDPKGPRM EDITPRM+17
$$SELPKG EDITPRM+14, DELPMPKG+5
HDR EDITPRM+20, DELPMPKG+13, SAVPMPKG+45
INIT EDITPRM+20, DELPMPKG+13, SAVPMPKG+45
KILL INIT+2
PKGLIST CHKX+12, CHKX+16, CHKX+17, CHKX+29

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A1VPSPRM HDR+10, DELPMPKG+9, SAVPMPKG+26, SAVPMPKG+30, SAVPMPKG+31, SAVPMPKG+32, SAVPMPKG+43*
ADPKG SELPKG~, SELPKG+6*, SELPKG+12
CAPARY EDITPRM+12~, EDITPRM+16*, EDITPRM+19, DELPMPKG+3~, DELPMPKG+7*, DELPMPKG+13
CAPDAT INIT+1~, INIT+7*, INIT+11*, INIT+12, INIT+13
CHNGMADE EN+1~, EN+2*, HDR+10, EDPKGPRM+1~, EDPKGPRM+4*, EDPKGPRM+18, EDPKGPRM+19*, EDPKGPRM+28, EDPKGPRM+29*, EDPKGPRM+48*
, EDPKGPRM+66*, EDPKGPRM+84*, EDPKGPRM+94, EDPKGPRM+95*, EDPKGPRM+100, EDITPRM+17*, EDITPRM+18, DELPMPKG+12*, DELPMPKG+13, SAVPMPKG+4
SAVPMPKG+5, SAVPMPKG+44*
DATAITEM INIT+1~, INIT+12*, INIT+13
DATANAME EDPKGPRM+1~, EDPKGPRM+6*, EDPKGPRM+8, EDPKGPRM+9, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+37, EDPKGPRM+38
, EDPKGPRM+48, EDPKGPRM+55, EDPKGPRM+56, EDPKGPRM+66, EDPKGPRM+73, EDPKGPRM+74, EDPKGPRM+84, EDPKGPRM+94, EDPKGPRM+95
DATANUM EDPKGPRM+1~, EDPKGPRM+4*, EDPKGPRM+5*, EDPKGPRM+6, EDPKGPRM+9, EDPKGPRM+12, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+23, EDPKGPRM+28
, EDPKGPRM+29, EDPKGPRM+33, EDPKGPRM+37, EDPKGPRM+39, EDPKGPRM+48, EDPKGPRM+51, EDPKGPRM+55, EDPKGPRM+66, EDPKGPRM+69, EDPKGPRM+73
, EDPKGPRM+84, EDPKGPRM+87, EDPKGPRM+94, EDPKGPRM+95
DEFDIR HDR+1~, HDR+3*, HDR+6, SAVPMPKG+6~, SAVPMPKG+14*, SAVPMPKG+29, SAVPMPKG+30, SAVPMPKG+31, SAVPMPKG+36
DELFLE SAVPMPKG+25~, SAVPMPKG+29, SAVPMPKG+31
DELFLE( SAVPMPKG+29*!, SAVPMPKG+31*
DELRSLT SAVPMPKG+20~, SAVPMPKG+23*, SAVPMPKG+29*, SAVPMPKG+30*, SAVPMPKG+31*, SAVPMPKG+35
DIR SELPKG+5~, EDPKGPRM+7~, EDPKGPRM+97!, EDPKGPRM+99!
DIR("?" SELPKG+13*, EDPKGPRM+13*, EDPKGPRM+14*, EDPKGPRM+24*, EDPKGPRM+42*, EDPKGPRM+59*, EDPKGPRM+60*, EDPKGPRM+77*, EDPKGPRM+78*, EDPKGPRM+90*
DIR("A" SELPKG+8*, EDPKGPRM+8*, EDPKGPRM+40*, EDPKGPRM+57*, EDPKGPRM+75*, EDPKGPRM+88*
DIR("B" EDPKGPRM+9*, EDPKGPRM+41!, EDPKGPRM+58!, EDPKGPRM+76!
DIR("PRE" SELPKG+12*, EDPKGPRM+89*
DIR(0 SELPKG+11*, EDPKGPRM+15*, EDPKGPRM+25*, EDPKGPRM+43*, EDPKGPRM+61*, EDPKGPRM+79*, EDPKGPRM+91*
DIRHEAD HDR+1~, HDR+6*, HDR+7, HDR+8, HDR+10*, HDR+11, HDR+12
DIRUT SELPKG+5~, SELPKG+16, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+20!, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+30!, EDPKGPRM+94, EDPKGPRM+95
, EDPKGPRM+99!
DOADD CHKX+7~, CHKX+8*, CHKX+15*, CHKX+16, CHKX+18
DTIME PKGLIST+9
DTOUT SELPKG+5~, EDPKGPRM+5, EDPKGPRM+17, EDPKGPRM+27, EDPKGPRM+45, EDPKGPRM+63, EDPKGPRM+81, EDPKGPRM+93, EDPKGPRM+99!
DUOUT SELPKG+5~, EDPKGPRM+5, EDPKGPRM+17, EDPKGPRM+27, EDPKGPRM+45, EDPKGPRM+63, EDPKGPRM+81, EDPKGPRM+93, EDPKGPRM+99!
DUZ SAVPMPKG+12
EDITARY EDPKGPRM+1~, EDPKGPRM+3*, EDPKGPRM+5, EDPKGPRM+6, EDPKGPRM+9, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+37
, EDPKGPRM+48, EDPKGPRM+55, EDPKGPRM+66, EDPKGPRM+73, EDPKGPRM+84, EDPKGPRM+94, EDPKGPRM+95, EDITPRM+12~
FILENME SAVPMPKG+6~, SAVPMPKG+21*, SAVPMPKG+26*, SAVPMPKG+27*, SAVPMPKG+28, SAVPMPKG+32*, SAVPMPKG+36, SAVPMPKG+43
GETOUT EDPKGPRM+1~, EDPKGPRM+35*, EDPKGPRM+36, EDPKGPRM+45*, EDPKGPRM+47, EDPKGPRM+53*, EDPKGPRM+54, EDPKGPRM+63*, EDPKGPRM+65, EDPKGPRM+71*
, EDPKGPRM+72, EDPKGPRM+81*, EDPKGPRM+83
INITIAL SAVPMPKG+6~, SAVPMPKG+12*, SAVPMPKG+13*, SAVPMPKG+21
IO SAVPMPKG+39
ITEMNUM CHKX+7~, PKGLIST+1*, PKGLIST+4*, PKGLIST+5, PKGLIST+6, PKGLIST+9, PKGLIST+10, PKGLIST+15, PKGLIST+16, PKGHLP+3~
PKGHLP+4*, PKGHLP+7*, PKGHLP+8
LASTPKG INIT+1~
LASTSPKG HDR+1~, SELPKG+15*, CHKX+10, CHKX+12, CHKX+16, CHKX+17, CHKX+29, PKGLIST~, PKGLIST+16*
LISTDATA EDPKGPRM+34~, EDPKGPRM+37*, EDPKGPRM+38, EDPKGPRM+47, EDPKGPRM+48, EDPKGPRM+52~, EDPKGPRM+55*, EDPKGPRM+56, EDPKGPRM+65, EDPKGPRM+66
, EDPKGPRM+70~, EDPKGPRM+73*, EDPKGPRM+74, EDPKGPRM+83, EDPKGPRM+84
LNENUM INIT+1~, INIT+6*, INIT+10*, INIT+11, INIT+12
LPNM INIT+1~
NOWDT SAVPMPKG+6~, SAVPMPKG+8*, SAVPMPKG+9*, SAVPMPKG+10*, SAVPMPKG+11*, SAVPMPKG+21
OLDFNME SAVPMPKG+25~, SAVPMPKG+28*, SAVPMPKG+29, SAVPMPKG+30
PKG INIT+1~, INIT+3*, INIT+5*, INIT+10, INIT+11, INIT+12, DATACHK~, DATACHK+3
PKGLP CHKX+7~, PKGLIST+2*, PKGLIST+3*, PKGLIST+5, PKGHLP+3~, PKGHLP+5*, PKGHLP+6*, PKGHLP+8
PKGNME SELPKG+5~, SELPKG+7*, SELPKG+16*, SELPKG+17, EDPKGPRM~, EDPKGPRM+3, EDITPRM+12~, EDITPRM+14*, EDITPRM+15, EDITPRM+16
EDITPRM+17, EDITPRM+22, DELPMPKG+3~, DELPMPKG+5*, DELPMPKG+6, DELPMPKG+7, DELPMPKG+8, DELPMPKG+10, DELPMPKG+15, SAVPMPKG+6~
SAVPMPKG+40*, SAVPMPKG+41*
>> POP SAVPMPKG+37
POPERR SAVPMPKG+6~, SAVPMPKG+7*, SAVPMPKG+37*, SAVPMPKG+38
>> PPRMT EDPKGPRM+39*, EDPKGPRM+40
PRMLNLP INIT+1~
RESULT DATACHK+1~, DATACHK+2*, DATACHK+3*, DATACHK+4
SELARY CHKX+7~, PKGLIST+8, PKGLIST+13, PKGHLP+3~, PKGHLP+9
SELARY( PKGLIST+5*, PKGLIST+16, PKGHLP+8*
SPCPAD HDR+1~, HDR+2*, HDR+7*, HDR+8, HDR+9*, HDR+11*, HDR+12
UPDATLST EDPKGPRM+1~, EDPKGPRM+46*, EDPKGPRM+47, EDPKGPRM+48, EDPKGPRM+64*, EDPKGPRM+65, EDPKGPRM+66, EDPKGPRM+82*, EDPKGPRM+83, EDPKGPRM+84
>> VALMBCK EDITPRM+24*, DELPMPKG+17*, SAVPMPKG+47*
>> VALMCNT INIT+4*, INIT+8, INIT+9, INIT+13
>> VALMHDR(1 HDR+4*
>> VALMHDR(2 HDR+5*
>> VALMHDR(3 HDR+8*
>> VALMHDR(4 HDR+12*
WNFILE SAVPMPKG+6~, SAVPMPKG+16*, SAVPMPKG+17*, SAVPMPKG+18, SAVPMPKG+19, SAVPMPKG+21
WOFILE SAVPMPKG+6~, SAVPMPKG+16*, SAVPMPKG+18*, SAVPMPKG+19, SAVPMPKG+24
X HELP+1*, SELPKG+5~, SELPKG+15, EDPKGPRM+7~, EDPKGPRM+18, EDPKGPRM+19, EDPKGPRM+28, EDPKGPRM+29, EDPKGPRM+94, EDPKGPRM+95
, EDPKGPRM+97!, EDPKGPRM+99!, CHKX+5, CHKX+10*, CHKX+11, CHKX+12, CHKX+13, CHKX+14, CHKX+16, CHKX+17
, CHKX+19, CHKX+20, CHKX+21, CHKX+22, CHKX+23, CHKX+24, CHKX+25, CHKX+26, CHKX+27, CHKX+28
, CHKX+29, PKGLIST~, PKGLIST+2, PKGLIST+3, PKGLIST+15!, PKGLIST+16*
XADD CHKX~, CHKX+9*, CHKX+12, CHKX+13, CHKX+29
XVAL CHKX+7~, PKGLIST+7*, PKGLIST+9*, PKGLIST+10, PKGLIST+11, PKGLIST+15, PKGLIST+16
Y SELPKG+5~, SELPKG+16, EDPKGPRM+7~, EDPKGPRM+19, EDPKGPRM+29, EDPKGPRM+45, EDPKGPRM+47, EDPKGPRM+63, EDPKGPRM+65, EDPKGPRM+81
, EDPKGPRM+83, EDPKGPRM+95, EDPKGPRM+97!, EDPKGPRM+99!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All