XTVSCP ;Albany FO/GTS - VistA Package Sizing Manager; 12-JUL-2016
Source file <XTVSCP.m>
Package | Total | Call Graph |
---|---|---|
Toolkit | 4 | $$GET^XPAR ^XTVSHELP ($$MSGORATC,$$UUBEGFN,$$UUEN,ADD,ENCODE,HANGCHAR,JUSTPAWS,SPLITADD)^XTVSLAPI ($$BLDNUM,$$VERNUM)^XTVSLM |
Kernel | 3 | (CLOSE,OPEN)^%ZISH ($$FMTE,$$NOW)^XLFDT DISP^XQORM1 |
List Manager | 3 | EN^VALM (CLEAR,FULL,PAUSE)^VALM1 (CLEAN,KILL)^VALM10 |
MailMan | 2 | SENDMSG^XMXAPI TOWHOM^XMXAPIU |
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(XPID) | ; -- main entry point for XTVS PKG EXT CRT PARAM
|
|
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 arrays
|
|
REDISPRM | ; -- Redisplay Paramters file
; -- Protocol: XTVS PKG EXT REDISP PARAM ACTION |
|
REDISCRT | ; -- Redisplay Parameter file corrections list
; -- Protocol: XTVS PKG EXT DISP CORRECTIONS ACTION |
|
WRPARMFL | ; Write Parameter File to VistA Package Size Default Directory
; -- Protocol: XTVS PKG EXT PARAM WRT ACTION |
|
SNDNPFLE | ;Send New Paramater file & report
; -- Protocol: XTVS PKG MGR NEW PARAM MAIL ACTION |
|
ALLMSG(XTPMARY,ERROOT,XTOTMSG) | ;Create msg array with no attachment
|
|
OUTLKARY(XTPMARY,XTOTLK,XTSVSUBJ,XTRT) | ;Create attachmts array
|
Name | Field # of Occurrence |
---|---|
CLOSE^%ZISH | WRPARMFL+28 |
OPEN^%ZISH | WRPARMFL+17 |
EN^VALM | EN+3 |
CLEAR^VALM1 | HELP+5, HELP+14, HELP+18, HELP+25 |
FULL^VALM1 | HELP+6, HELP+19, WRPARMFL+12, SNDNPFLE+10 |
PAUSE^VALM1 | HELP+14, HELP+25 |
CLEAN^VALM10 | KILL+1 |
KILL^VALM10 | KILL+2 |
$$FMTE^XLFDT | HDR+5, WRPARMFL+5, OUTLKARY+15, OUTLKARY+20 |
$$NOW^XLFDT | WRPARMFL+5, OUTLKARY+13 |
SENDMSG^XMXAPI | SNDNPFLE+34, SNDNPFLE+40 |
TOWHOM^XMXAPIU | SNDNPFLE+16 |
$$GET^XPAR | WRPARMFL+14 |
DISP^XQORM1 | HELP+3, HELP+9 |
^XTVSHELP | HELP+13, HELP+24 |
$$MSGORATC^XTVSLAPI | SNDNPFLE+29 |
$$UUBEGFN^XTVSLAPI | OUTLKARY+54 |
$$UUEN^XTVSLAPI | OUTLKARY+64 |
ADD^XTVSLAPI | REDISCRT+9, REDISCRT+10 |
ENCODE^XTVSLAPI | OUTLKARY+61, OUTLKARY+63 |
HANGCHAR^XTVSLAPI | ALLMSG+61, OUTLKARY+59 |
JUSTPAWS^XTVSLAPI | WRPARMFL+16, SNDNPFLE+35, SNDNPFLE+41 |
SPLITADD^XTVSLAPI | INIT+5 |
$$BLDNUM^XTVSLM | HDR+10 |
$$VERNUM^XTVSLM | HDR+10 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("XMY" | SNDNPFLE+23, SNDNPFLE+43! |
^TMP("XMY0" | SNDNPFLE+43! |
^TMP("XTVS PKG MAN NEW PARAM" | KILL+3! |
^TMP($J | SNDNPFLE+43! |
^VA(200 - [#200] | WRPARMFL+9, OUTLKARY+24 |
^XTMP("XTSIZE" | HDR+3, HDR+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIR | KILL+4! |
DIRHEAD | HDR+1~, HDR+11*, HDR+12, HDR+13 |
DIRUT | KILL+4! |
DTOUT | KILL+4! |
DUOUT | KILL+4! |
DUZ | WRPARMFL+9, SNDNPFLE+7, SNDNPFLE+16, OUTLKARY+24 |
ERROOT | ALLMSG~, ALLMSG+17, ALLMSG+27, ALLMSG+33, OUTLKARY+7~, OUTLKARY+35*, OUTLKARY+36, OUTLKARY+46, OUTLKARY+47*, OUTLKARY+49 , OUTLKARY+50 |
EXTDIR | WRPARMFL+3~, WRPARMFL+14*, WRPARMFL+17 |
FILENME | WRPARMFL+3~, WRPARMFL+15*, WRPARMFL+16, WRPARMFL+17 |
INITIAL | WRPARMFL+3~, WRPARMFL+9*, WRPARMFL+10*, WRPARMFL+15, OUTLKARY+7~, OUTLKARY+24*, OUTLKARY+25*, OUTLKARY+26 |
>> INSCTRT | WRPARMFL+22*, WRPARMFL+26 |
IO | WRPARMFL+20 |
NOWDT | WRPARMFL+3~, WRPARMFL+5*, WRPARMFL+6*, WRPARMFL+7*, WRPARMFL+8*, WRPARMFL+15, OUTLKARY+7~, OUTLKARY+20*, OUTLKARY+21*, OUTLKARY+22* , OUTLKARY+23*, OUTLKARY+26 |
OTLKNDE | ALLMSG+9~, ALLMSG+15*, ALLMSG+26*, ALLMSG+29*, ALLMSG+30*, ALLMSG+31, ALLMSG+34*, ALLMSG+36, ALLMSG+37*, ALLMSG+38 , ALLMSG+39*, ALLMSG+40, ALLMSG+41*, ALLMSG+42, ALLMSG+43*, ALLMSG+44, ALLMSG+45*, ALLMSG+46, ALLMSG+47*, ALLMSG+48 , ALLMSG+49*, ALLMSG+53, ALLMSG+54*, ALLMSG+55, ALLMSG+56*, ALLMSG+62*, OUTLKARY+7~, OUTLKARY+33*, OUTLKARY+45*, OUTLKARY+48* , OUTLKARY+49*, OUTLKARY+50, OUTLKARY+53*, OUTLKARY+54, OUTLKARY+56 |
PARMROOT | INIT+1~, INIT+3*, INIT+4*, INIT+5, REDISCRT+7*, REDISCRT+8*, REDISCRT+9, REDISCRT+10 |
PKGROOT | WRPARMFL+3~, WRPARMFL+21*, WRPARMFL+23*, WRPARMFL+24, WRPARMFL+25, WRPARMFL+27 |
>> POP | WRPARMFL+18 |
POPERR | WRPARMFL+3~, WRPARMFL+4*, WRPARMFL+18*, WRPARMFL+19 |
SPCPAD | HDR+1~, HDR+12*, HDR+13 |
SUB3 | WRPARMFL+3~, WRPARMFL+24*, WRPARMFL+26 |
SUB4 | WRPARMFL+3~, WRPARMFL+25*, WRPARMFL+26 |
TEXT | MSG~, MSG+1, MSG+2 |
TXTCT | HELP+13*, HELP+24*, HELP+30! |
>> VALMBCK | HELP+29*, REDISPRM+7*, REDISCRT+12*, WRPARMFL+30*, SNDNPFLE+46* |
>> VALMBG | REDISPRM+4*, REDISCRT+4* |
>> VALMCNT | INIT+2*, INIT+5, REDISCRT+6*, REDISCRT+9, REDISCRT+10 |
>> VALMHDR(1 | HDR+9*, REDISPRM+3*, REDISCRT+3* |
>> VALMHDR(2 | HDR+10* |
>> VALMHDR(3 | HDR+13* |
>> VALMSG | MSG+1*, MSG+2* |
X | HELP+1, HELP+2*, HELP+4, HELP+17, KILL+4! |
XDATE | HDR+1~, HDR+3*, HDR+5*, HDR+6*, HDR+11 |
XMERR | SNDNPFLE+3~, SNDNPFLE+15!, SNDNPFLE+25 |
XMZ | SNDNPFLE+3~ |
XPID | EN~, HDR+3, HDR+4, HDR+11 |
XQSND | SNDNPFLE+3~, SNDNPFLE+7*, SNDNPFLE+34, SNDNPFLE+40 |
XSYSTEM | HDR+1~, HDR+4*, HDR+7*, HDR+11 |
XTCHAR | ALLMSG+9~, ALLMSG+11*, ALLMSG+61, OUTLKARY+7~, OUTLKARY+9*, OUTLKARY+59 |
XTCRLF | OUTLKARY+7~, OUTLKARY+12*, OUTLKARY+15, OUTLKARY+17, OUTLKARY+28, OUTLKARY+60 |
XTDTTM | OUTLKARY+7~, OUTLKARY+13*, OUTLKARY+15, OUTLKARY+20 |
XTERRND | ALLMSG+9~, ALLMSG+27*, ALLMSG+28*, ALLMSG+30, ALLMSG+31 |
XTFILNAM | OUTLKARY+7~, OUTLKARY+26*, OUTLKARY+28, OUTLKARY+37, OUTLKARY+46, OUTLKARY+54 |
XTFORMAT | SNDNPFLE+28~, SNDNPFLE+29*, SNDNPFLE+31, SNDNPFLE+37 |
XTINSTMM | SNDNPFLE+3~, SNDNPFLE+16 |
XTINSTMM("ADD | R FLAGS" , SNDNPFLE+13* |
XTINSTVA | SNDNPFLE+3~, SNDNPFLE+34, SNDNPFLE+40 |
XTINSTVA("ADD | R FLAGS" , SNDNPFLE+19* |
XTINSTVA("FROM" | SNDNPFLE+20* |
XTLPCNT | SNDNPFLE+3~, SNDNPFLE+22*, SNDNPFLE+23* |
XTNODATA | OUTLKARY+7~, OUTLKARY+11*, OUTLKARY+29*, OUTLKARY+31, OUTLKARY+32 |
XTNODE | OUTLKARY+7~, OUTLKARY+55*, OUTLKARY+58*, OUTLKARY+59, OUTLKARY+60 |
XTOTLK | OUTLKARY~, OUTLKARY+14, OUTLKARY+15, OUTLKARY+16, OUTLKARY+17, OUTLKARY+18, OUTLKARY+28, OUTLKARY+30, OUTLKARY+31, OUTLKARY+32 , OUTLKARY+37, OUTLKARY+38, OUTLKARY+39, OUTLKARY+40, OUTLKARY+41, OUTLKARY+42, OUTLKARY+43, OUTLKARY+44, OUTLKARY+46, OUTLKARY+49 , OUTLKARY+50, OUTLKARY+54, OUTLKARY+61, OUTLKARY+63, OUTLKARY+64, OUTLKARY+65, OUTLKARY+66 |
XTOTMSG | ALLMSG~, ALLMSG+13, ALLMSG+14, ALLMSG+18, ALLMSG+19, ALLMSG+20, ALLMSG+21, ALLMSG+22, ALLMSG+23, ALLMSG+24 , ALLMSG+25, ALLMSG+30, ALLMSG+31, ALLMSG+33, ALLMSG+36, ALLMSG+38, ALLMSG+40, ALLMSG+42, ALLMSG+44, ALLMSG+46 , ALLMSG+48, ALLMSG+53, ALLMSG+55, ALLMSG+62 |
XTOUTNOD | OUTLKARY+7~, OUTLKARY+56*, OUTLKARY+61, OUTLKARY+63, OUTLKARY+64, OUTLKARY+65, OUTLKARY+66 |
XTPMARY | ALLMSG~, ALLMSG+52, ALLMSG+59, ALLMSG+60*, ALLMSG+61, ALLMSG+62, OUTLKARY~, OUTLKARY+29, OUTLKARY+55 |
XTQVAR | HELP+10*, HELP+11, HELP+12*, HELP+13, HELP+14*, HELP+21*, HELP+22, HELP+23*, HELP+24, HELP+25* , HELP+30! |
XTRT | ALLMSG+10*, ALLMSG+11, OUTLKARY~, OUTLKARY+8*, OUTLKARY+9, OUTLKARY+59 |
XTSTR | ALLMSG+12*, OUTLKARY+7~, OUTLKARY+10*, OUTLKARY+60*, OUTLKARY+61, OUTLKARY+63, OUTLKARY+64 |
XTSVSUBJ | SNDNPFLE+3~, SNDNPFLE+8*, SNDNPFLE+21*, SNDNPFLE+32*, SNDNPFLE+34, SNDNPFLE+39, SNDNPFLE+40, OUTLKARY~, OUTLKARY+17 |
XTTASKMM | SNDNPFLE+3~ |
XTTASKVA | SNDNPFLE+3~, SNDNPFLE+34, SNDNPFLE+35, SNDNPFLE+40, SNDNPFLE+41 |
XTTOMM | SNDNPFLE+3~ |
XTTOVA | SNDNPFLE+3~, SNDNPFLE+34, SNDNPFLE+40 |
XTTOVA( | SNDNPFLE+23* |
XTTYPE | SNDNPFLE+3~, SNDNPFLE+14*, SNDNPFLE+16 |
XTX | HELP+13*, HELP+14, HELP+15, HELP+24*, HELP+25, HELP+26, HELP+30! |
Y | HELP+10, HELP+14, HELP+21, HELP+25, HELP+30!, KILL+4! |