XTVSLPDC ;Albany FO/GTS - VistA Package Sizing Manager - Caption display; 12-JUL-2016
Source file <XTVSLPDC.m>
Package | Total | Call Graph |
---|---|---|
Toolkit | 6 | $$GET^XPAR ^XTVSHLP1 ($$CHKPID,$$REQLOCK,$$UNLCKPFL,$$YNCHK,ADD,JUSTPAWS,LISTOUT,SPLITADD)^XTVSLAPI ($$BLDNUM,$$VERNUM)^XTVSLM ($$EDCHK,$$SETSTR,BEFORIMG,EDPKGPRM)^XTVSLPD1 EXIT^XTVSLPDC |
Kernel | 3 | ($$DEL,$$MV,CLOSE,OPEN)^%ZISH ($$FMTE,$$NOW)^XLFDT DISP^XQORM1 |
List Manager | 3 | EN^VALM (CLEAR,FULL,PAUSE)^VALM1 (CLEAN,KILL)^VALM10 |
VA FileMan | 1 | ^DIR |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for XTVS PKG MGR PARAM CAPTN DISP
|
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
|
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
MSG(TEXT) | ; -- set default message
|
|
KILL | ; - Cleanup local and global display arrays
|
|
SELPKG(ADPKG) | ; Select Package to Edit from ^TMP("XTVS PKG MGR PARAM CAP",$J)
; INPUT: ; ADPKG : 0 - Do not allow add new package [Default] ; : 1 - Allow add new package |
|
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(PRNT) | ; Package selection help
|
|
EDITPRM | ; Edit parameters for a package
; -- Protocol: XTVS PKG MGR EDIT PACKAGE PARM ACTION |
|
DELPMPKG | ; Delete parameters from a package
; -- Protocol: XTVS PKG MGR DEL PACKAGE PARM ACTION |
|
SAVPMPKG | ; Save Package Parameters file
; -- Protocol: XTVS PKG MGR SAVE PACKAGE PARM ACTION |
|
PKGSAVE | ;Save Package Changes
|
|
CRTFLE(DEFDIR,FILENME,WNFILE) | ; Update old file/Write New file
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("XTVS PKG MGR PARAM CAP" | KILL+3! |
^TMP("XTVS-PARAM-BI" | EN+3!, EXIT+17!, EDITPRM+15, EDITPRM+20!, EDITPRM+21, DELPMPKG+18, DELPMPKG+20!, DELPMPKG+21, CRTFLE+12! |
^TMP("XTVS-PARAM-CAP" | INIT+8, INIT+13, INIT+14, INIT+15, CHKX+11, CHKX+20*, CHKX+21*, CHKX+22*, CHKX+23*, CHKX+24* , CHKX+25*, CHKX+26*, CHKX+27*, CHKX+28*, CHKX+29*, PKGLIST+3, PKGHLP+11, CRTFLE+8 |
^VA(200 - [#200] | PKGSAVE+6 |
Name | Line Occurrences |
---|---|
$$SELPKG | EDITPRM+13, DELPMPKG+8 |
CRTFLE | PKGSAVE+27, PKGSAVE+35 |
HDR | HELP+17, EDITPRM+25, DELPMPKG+22, SAVPMPKG+11 |
INIT | HELP+17, EDITPRM+25, DELPMPKG+22, SAVPMPKG+11 |
KILL | INIT+5, EXIT+18 |
MSG | HDR+13, EDITPRM+27, DELPMPKG+16, DELPMPKG+24, SAVPMPKG+8, SAVPMPKG+12 |
PKGLIST | CHKX+12, CHKX+16, CHKX+18, CHKX+30 |
PKGSAVE | EXIT+8, SAVPMPKG+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADPKG | SELPKG~, SELPKG+6*, SELPKG+10 |
CAPARY | EDITPRM+8~, EDITPRM+16*, EDITPRM+19, DELPMPKG+3~, DELPMPKG+10*, DELPMPKG+19 |
CAPDAT | INIT+1~, INIT+10*, INIT+14*, INIT+15, INIT+16 |
CHKLKER | PKGSAVE+19~, CRTFLE+1~, CRTFLE+14*, CRTFLE+15 |
CHNGMADE | EN+1~, EN+2*, HDR+10, EXIT+4, EXIT+9, EXIT+10, EDITPRM+21*, DELPMPKG+21*, SAVPMPKG+8, SAVPMPKG+9 , SAVPMPKG+11, SAVPMPKG+12, CRTFLE+11* |
DATAITEM | INIT+1~, INIT+15*, INIT+16 |
DEFDIR | HDR+1~, HDR+3*, HDR+6, INIT+1~, INIT+2*, INIT+3, EDITPRM+8~, EDITPRM+9*, EDITPRM+10, EDITPRM+23* , EDITPRM+24, DELPMPKG+3~, DELPMPKG+4*, DELPMPKG+5, DELPMPKG+22, DELPMPKG+26*, DELPMPKG+27, SAVPMPKG+3~, SAVPMPKG+4*, SAVPMPKG+5 , PKGSAVE+1~, PKGSAVE+8*, PKGSAVE+23, PKGSAVE+24, PKGSAVE+25, PKGSAVE+27, PKGSAVE+35, CRTFLE~, CRTFLE+3 |
DELFLE | PKGSAVE+19~, PKGSAVE+23, PKGSAVE+25 |
DELFLE( | PKGSAVE+23*!, PKGSAVE+25* |
DELPKG | DELPMPKG+3~, DELPMPKG+15*, DELPMPKG+16, DELPMPKG+17 |
DELRSLT | PKGSAVE+14~, PKGSAVE+17*, PKGSAVE+23*, PKGSAVE+24*, PKGSAVE+25*, PKGSAVE+30 |
DIR | SELPKG+5~ |
DIR("?" | SELPKG+11* |
DIR("A" | SELPKG+8* |
DIR("PRE" | SELPKG+10* |
DIR(0 | SELPKG+9* |
DIRHEAD | HDR+1~, HDR+6*, HDR+7, HDR+8, HDR+10*, HDR+11, HDR+12 |
DIRUT | SELPKG+5~, SELPKG+14 |
DOADD | CHKX+7~, CHKX+8*, CHKX+15*, CHKX+16, CHKX+17, CHKX+19 |
DTIME | PKGLIST+9 |
DTOUT | SELPKG+5~ |
DUOUT | SELPKG+5~ |
DUZ | PKGSAVE+6 |
EDITARY | EDITPRM+8~ |
EDPKG | EDITPRM+8~, EDITPRM+18*, EDITPRM+19, EDITPRM+20 |
FILENAME | INIT+1~ |
FILENME | PKGSAVE+1~, PKGSAVE+15*, PKGSAVE+20*, PKGSAVE+21*, PKGSAVE+22, PKGSAVE+26*, PKGSAVE+27, PKGSAVE+35, CRTFLE~, CRTFLE+3 , CRTFLE+10 |
INITIAL | PKGSAVE+1~, PKGSAVE+6*, PKGSAVE+7*, PKGSAVE+15 |
IO | CRTFLE+6 |
ITEMNUM | CHKX+7~, PKGLIST+1*, PKGLIST+4*, PKGLIST+5, PKGLIST+6, PKGLIST+9, PKGLIST+10, PKGLIST+15, PKGLIST+16, PKGHLP+8~ , PKGHLP+9*, PKGHLP+12*, PKGHLP+13 |
LASTSPKG | HDR+1~, INIT+1~, SELPKG+13*, CHKX+10, CHKX+12, CHKX+16, CHKX+18, CHKX+30, PKGLIST~, PKGLIST+16* |
LCKCHK | INIT+1~, INIT+3*, INIT+4, INIT+18, EXIT+2*, EXIT+3, EXIT+12, EXIT+15, EDITPRM+8~, EDITPRM+10* , EDITPRM+11, EDITPRM+24*, EDITPRM+25, EDITPRM+29, EDITPRM+30, DELPMPKG+3~, DELPMPKG+5*, DELPMPKG+6, DELPMPKG+27*, DELPMPKG+29 , DELPMPKG+30, SAVPMPKG+3~, SAVPMPKG+5*, SAVPMPKG+6, SAVPMPKG+15 |
LNENUM | INIT+1~, INIT+9*, INIT+13*, INIT+14, INIT+15 |
LPNM | INIT+1~ |
NOWDT | PKGSAVE+1~, PKGSAVE+2*, PKGSAVE+3*, PKGSAVE+4*, PKGSAVE+5*, PKGSAVE+15 |
OLDFNME | PKGSAVE+19~, PKGSAVE+22*, PKGSAVE+23, PKGSAVE+24 |
PKG | INIT+1~, INIT+6*, INIT+8*, INIT+13, INIT+14, INIT+15 |
PKGLP | CHKX+7~, PKGLIST+2*, PKGLIST+3*, PKGLIST+5, PKGHLP+8~, PKGHLP+10*, PKGHLP+11*, PKGHLP+13 |
PKGNME | SELPKG+5~, SELPKG+7*, SELPKG+14*, SELPKG+15, EDITPRM+8~, EDITPRM+13*, EDITPRM+14, EDITPRM+15, EDITPRM+16, EDITPRM+17 , EDITPRM+18, EDITPRM+20, EDITPRM+27, DELPMPKG+3~, DELPMPKG+8*, DELPMPKG+9, DELPMPKG+10, DELPMPKG+11, DELPMPKG+13, DELPMPKG+18 , DELPMPKG+20, DELPMPKG+24, PKGSAVE+1~, CRTFLE+7*, CRTFLE+8* |
>> POP | CRTFLE+4 |
POPERR | CRTFLE+1~, CRTFLE+2*, CRTFLE+4*, CRTFLE+5 |
PRMLNLP | INIT+1~ |
PRNT | PKGHLP~, PKGHLP+1, PKGHLP+2, PKGHLP+3, PKGHLP+4, PKGHLP+5, PKGHLP+6 |
SELARY | CHKX+7~, PKGLIST+8, PKGLIST+13, PKGHLP+8~, PKGHLP+14 |
SELARY( | PKGLIST+5*, PKGLIST+16, PKGHLP+13* |
SPCPAD | HDR+1~, HDR+2*, HDR+7*, HDR+8, HDR+9*, HDR+11*, HDR+12 |
SVEDT | EXIT+1~, EXIT+7*, EXIT+8 |
TEXT | MSG~, MSG+1, MSG+2 |
TXTCT | HELP+13*, HELP+19! |
>> UNLKRSLT | PKGSAVE+32*, PKGSAVE+33, PKGSAVE+34, PKGSAVE+35 |
>> VALMBCK | HELP+18*, EDITPRM+29*, DELPMPKG+29*, DELPMPKG+30*, SAVPMPKG+13* |
>> VALMCNT | INIT+7*, INIT+11, INIT+12, INIT+16 |
>> VALMHDR(1 | HDR+4* |
>> VALMHDR(2 | HDR+5* |
>> VALMHDR(3 | HDR+8* |
>> VALMHDR(4 | HDR+12* |
>> VALMQUIT | INIT+18*, EDITPRM+30*, DELPMPKG+30*, SAVPMPKG+15* |
>> VALMSG | MSG+1*, MSG+2* |
WNFILE | PKGSAVE+1~, PKGSAVE+10*, PKGSAVE+11*, PKGSAVE+12, PKGSAVE+13, PKGSAVE+15, PKGSAVE+27, PKGSAVE+31, PKGSAVE+35, CRTFLE~ , CRTFLE+13 |
WOFILE | PKGSAVE+1~, PKGSAVE+10*, PKGSAVE+12*, PKGSAVE+13, PKGSAVE+18 |
X | HELP+1, HELP+2*, HELP+4, SELPKG+5~, SELPKG+13, CHKX+5, CHKX+10*, CHKX+11, CHKX+12, CHKX+13 , CHKX+14, CHKX+16, CHKX+17!, CHKX+18, CHKX+20, CHKX+21, CHKX+22, CHKX+23, CHKX+24, CHKX+25 , CHKX+26, CHKX+27, CHKX+28, CHKX+29, CHKX+30, PKGLIST~, PKGLIST+2, PKGLIST+3, PKGLIST+15!, PKGLIST+16* |
XADD | CHKX~, CHKX+9*, CHKX+12, CHKX+13, CHKX+30 |
XTQVAR | HELP+10*, HELP+11, HELP+12*, HELP+13, HELP+14*, HELP+19! |
>> XTVPSPRM | HDR+10, INIT+3, EXIT+2, EDITPRM+10, EDITPRM+24, DELPMPKG+5, DELPMPKG+12, DELPMPKG+14, DELPMPKG+22, DELPMPKG+27 , SAVPMPKG+5, PKGSAVE+20, PKGSAVE+24, PKGSAVE+25, PKGSAVE+26, PKGSAVE+32, CRTFLE+10*, CRTFLE+14 |
XTX | HELP+13*, HELP+14, HELP+15, HELP+19! |
XVAL | CHKX+7~, PKGLIST+7*, PKGLIST+9*, PKGLIST+10, PKGLIST+11, PKGLIST+15, PKGLIST+16 |
Y | HELP+10, HELP+14, HELP+19!, SELPKG+5~, SELPKG+14 |
Name | Field # of Occurrence |
---|---|
$T(LPDCTXT+TXTCT^XTVSHLP1 | HELP+13 |