A1VSLPER ;Albany FO/GTS - VistA Package Sizing Manager; 7-JUL-2016
Source file <A1VSLPER.m>
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Kernel | 1 | ^ORD(101 |
| VistA Package Sizing Utility | 1 | A1VSLP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for A1VS PKG MGR PARAM ERROR DISP
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EXPND | ; -- expand code
|
|
| KILL | ; - Clean up local and global display arrays
|
|
| INCONSCK | ;Check for overlaps in Forum Package file data
|
|
| FLDDATLP(TMPROOT,PKGNME,PREFIX,ADPFXIND) | ;Check Fields and Data for 'ADDPFX' and 'FLERNG'
; Input: TMPROOT - Package "A1VS-PKGEDIT" array root [^TMP("A1VS-PKGEDIT",$J,PKGNME,PREFIX)] ; PKGNME - Package Name using Prefix ; PREFIX - Additional Prefix used by Package ; ADPFXIND - Indicates that prefix has been checked |
|
| CHKPFX(PKGNME,PREFIX,TMPROOT,PKGPFX) | ; Check Prefix for multiple use
; Input: PKGNME - Package Name using Prefix ; PREFIX - Additional Prefix used by Package ; TMPROOT - Package "A1VS-PKGEDIT" array root [^TMP("A1VS-PKGEDIT",J,PKGNME,PREFIX)] ; PKGPFX - Package Prefix |
|
| CHKFILE(PKGNME,FLERNG,TMPROOT,PKGPFX) | ; Check File range for multiple use
; Input: PKGNME - Package Name using Prefix ; FILRNG - File Range used by Package Name ; TMPROOT - Package "A1VS-PKGEDIT" array root ; PKGPFX - Package Prefix |
|
| MLTPFX(TMPROOT,PKGSUB,PKGNME,SUBPFX,ERRARYCT,FILERPRT) | ; Report multiple use of prefix
|
|
| PKGERHDR(TMPROOT,ERRAYRT,PKGNME,ERRARYCT) | ; Output Header info for PREFIX and FILE RANGE overlap arrays
|
|
| CMBARST(CMBARCT) | ;Add Header to Combined Prefix and File Range overlap error array
|
|
| SETFLHDR(NODETYPE,ERRARYCT) | ;Set File Header
|
|
| SPLITNDE(TEXT,NODESUB,ERRARYCT) | ;Split Error Node
|
|
| NOPKGRT(PKGNME,PKGPFX,ERRARYCT,CMBARCT,PKGRPRT) | ;Report Package for File section
|
|
| RNGCHK(RNGBEG,RNGEND,STARTSUB,ENDSUB) | ;Check Package file ranges against Range index
|
|
| DPFXERR | ; Display prefix overlap list
; -- Protocol: A1VS PKG MGR PREFIX OVERLAP ACTION |
|
| DRNGERR | ; Display File range errors
; -- Protocol: A1VS PKG MGR FILE OVERLAP ACTION |
|
| CMBERR | ; Redisplay Prefix/File Range overlaps
; -- Protocol: A1VS PKG MGR PARAM OVRLP REDISP ACTION |
|
| ERPT | ; Email ^TMP("A1VS PKG MGR PARAM ERROR DISP") displayed report
; -- Protocol: A1VS PKG MGR EMAIL OVRLAP RPT ACTION |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("A1VS PKG MGR PARAM ERROR DISP" | KILL+3!, DPFXERR+5!, DRNGERR+5!, CMBERR+6! |
| ^TMP("A1VS-ERROR" | INIT+7, KILL+3!, CHKPFX+12, CHKFILE+12, CHKFILE+24, CHKFILE+33*, CHKFILE+36*, MLTPFX+6*, MLTPFX+9, MLTPFX+16* , MLTPFX+18*, MLTPFX+23*, MLTPFX+30*, MLTPFX+33*, MLTPFX+36*, MLTPFX+47*, MLTPFX+48*, CMBARST+1*, SETFLHDR+1*, SETFLHDR+3* , SETFLHDR+5*, SETFLHDR+7*, SETFLHDR+9*, SPLITNDE+4*, NOPKGRT+3*, NOPKGRT+8*, NOPKGRT+14*, NOPKGRT+18*, NOPKGRT+20*, DPFXERR+9 , DRNGERR+8, CMBERR+9 |
| ^TMP("A1VS-PKGEDIT" | CHKFILE+28, CHKFILE+29, MLTPFX+12, MLTPFX+38 |
| ^TMP("A1VS-PKGRPT-CMB-IDX" | INCONSCK+15!, MLTPFX+21, PKGERHDR+4*, NOPKGRT+7 |
| ^TMP("A1VS-PKGRPT-FRNG-IDX" | INCONSCK+15!, PKGERHDR+3*, NOPKGRT+6 |
| ^TMP("A1VS-PKGRPT-PFX-IDX" | INCONSCK+15!, MLTPFX+20, PKGERHDR+2* |
| ^TMP("XMY" | ERPT+12 |
| Name | Line Occurrences |
|---|---|
| $$RNGCHK | CHKFILE+19 |
| $$SPLITNDE | CHKFILE+32, CHKFILE+35, MLTPFX+45, MLTPFX+46 |
| CHKFILE | FLDDATLP+12 |
| CHKPFX | INCONSCK+11, FLDDATLP+11 |
| CMBARST | CHKFILE+25, MLTPFX+10 |
| FLDDATLP | INCONSCK+14 |
| INCONSCK | INIT+2 |
| KILL | INIT+1, EXIT+1 |
| MLTPFX | CHKPFX+18, CHKPFX+19 |
| NOPKGRT | CHKFILE+27 |
| PKGERHDR | MLTPFX+20, MLTPFX+25, NOPKGRT+6, NOPKGRT+10 |
| SETFLHDR | CHKFILE+22, CMBARST+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A1INSTMM | ERPT+3~, ERPT+8 |
| A1INSTMM("ADD | R FLAGS" , ERPT+6* |
| A1LPCNT | ERPT+10~, ERPT+11*, ERPT+12* |
| A1TOMM | ERPT+3~ |
| A1TYPE | ERPT+3~, ERPT+7*, ERPT+8 |
| >> A1VPSPRM | HDR+10 |
| ADDREMPX | CHKPFX+8~, CHKPFX+11*, CHKPFX+19 |
| ADPFXIND | INCONSCK+1~, INCONSCK+4*, INCONSCK+11, INCONSCK+12*, INCONSCK+14, FLDDATLP~, FLDDATLP+11* |
| CMBARCT | CHKFILE+8~, CHKFILE+24*, CHKFILE+25, CHKFILE+27, CHKFILE+34*, CHKFILE+35, CHKFILE+36, MLTPFX+1~, MLTPFX+9*, MLTPFX+10 , MLTPFX+17*, MLTPFX+22*, MLTPFX+23, MLTPFX+24*, MLTPFX+25, MLTPFX+29*, MLTPFX+30, MLTPFX+35*, MLTPFX+36, MLTPFX+41* , MLTPFX+46, MLTPFX+48, CMBARST~, CMBARST+2*, CMBARST+3, NOPKGRT~, NOPKGRT+5*, NOPKGRT+8, NOPKGRT+9*, NOPKGRT+10 , NOPKGRT+14, NOPKGRT+15*, NOPKGRT+20, NOPKGRT+21* |
| CMBHDR | MLTPFX+1~, MLTPFX+2*, MLTPFX+26*, MLTPFX+28 |
| CMBLP | INIT+4~, INIT+5*, INIT+7*, CMBERR+3~, CMBERR+8*, CMBERR+9* |
| DATASUB | FLDDATLP+6~, FLDDATLP+9*, FLDDATLP+10*, FLDDATLP+11, FLDDATLP+12 |
| DEFDIR | HDR+1~, HDR+3*, HDR+6 |
| DIRHEAD | HDR+1~, HDR+6*, HDR+7, HDR+8, HDR+10*, HDR+11, HDR+12 |
| DUZ | ERPT+8, ERPT+13 |
| ENDSUB | CHKFILE+8~, CHKFILE+16*, CHKFILE+19, CHKFILE+30, RNGCHK~, RNGCHK+13, RNGCHK+14, RNGCHK+15, RNGCHK+16 |
| ERRARYCT | CHKPFX+8~, CHKPFX+12*, CHKPFX+18, CHKPFX+19, CHKFILE+8~, CHKFILE+12*, CHKFILE+21*, CHKFILE+22, CHKFILE+27, CHKFILE+32 , CHKFILE+33, MLTPFX~, MLTPFX+4*, MLTPFX+5, MLTPFX+7*, MLTPFX+16, MLTPFX+18, MLTPFX+19*, MLTPFX+20, MLTPFX+33 , MLTPFX+34*, MLTPFX+45, MLTPFX+47, PKGERHDR~, PKGERHDR+7, PKGERHDR+8*, PKGERHDR+9, PKGERHDR+11*, PKGERHDR+12, PKGERHDR+13* , SETFLHDR~, SETFLHDR+1, SETFLHDR+2*, SETFLHDR+3, SETFLHDR+4*, SETFLHDR+5, SETFLHDR+6*, SETFLHDR+7, SETFLHDR+8*, SETFLHDR+9 , SETFLHDR+10*, SPLITNDE~, SPLITNDE+4, SPLITNDE+5*, NOPKGRT~, NOPKGRT+3, NOPKGRT+4*, NOPKGRT+6, NOPKGRT+18, NOPKGRT+19* |
| ERRAYRT | PKGERHDR~, PKGERHDR+2, PKGERHDR+3, PKGERHDR+4, PKGERHDR+7, PKGERHDR+9, PKGERHDR+12 |
| FILERPRT | CHKPFX+8~, CHKPFX+9*, CHKPFX+18, CHKPFX+19, MLTPFX~, MLTPFX+15, MLTPFX+37* |
| FLDSUB | FLDDATLP+6~, FLDDATLP+7*, FLDDATLP+8*, FLDDATLP+10, FLDDATLP+11, FLDDATLP+12 |
| FLEHDR | NOPKGRT+1~, NOPKGRT+2*, NOPKGRT+11*, NOPKGRT+13 |
| FLERNG | CHKFILE~, CHKFILE+10, CHKFILE+11, NOPKGRT+17 |
| IDXROOT | CHKPFX+8~, CHKPFX+10*, CHKPFX+11, CHKPFX+13*, CHKPFX+14, CHKPFX+17, CHKFILE+8~, CHKFILE+13*, CHKFILE+14*, CHKFILE+15 , CHKFILE+16, CHKFILE+17 |
| IDXRT3 | CHKPFX+16~, CHKPFX+17*, CHKPFX+18, CHKPFX+19 |
| INRNG | RNGCHK+11~, RNGCHK+12*, RNGCHK+13*, RNGCHK+14*, RNGCHK+15*, RNGCHK+16*, RNGCHK+17 |
| LPITEM | DPFXERR+3~, DPFXERR+7~, DPFXERR+8*, DPFXERR+9*, DRNGERR+3~, DRNGERR+7*, DRNGERR+8* |
| NDTXTCMB | CHKFILE+8~, CHKFILE+31*, CHKFILE+35, MLTPFX+43~, MLTPFX+44*, MLTPFX+46 |
| NODESUB | SPLITNDE~, SPLITNDE+4 |
| NODETXT | CHKFILE+8~, CHKFILE+30*, CHKFILE+31, CHKFILE+32*, CHKFILE+33, CHKFILE+35*, CHKFILE+36, MLTPFX+1~, MLTPFX+32*, MLTPFX+33 , MLTPFX+36, MLTPFX+40*, MLTPFX+42, MLTPFX+44, MLTPFX+45*, MLTPFX+46*, MLTPFX+47, MLTPFX+48, SPLITNDE+1~, SPLITNDE+6* , SPLITNDE+7, NOPKGRT+1~, NOPKGRT+17*, NOPKGRT+18, NOPKGRT+20 |
| NODETYPE | SETFLHDR~, SETFLHDR+1, SETFLHDR+3, SETFLHDR+5, SETFLHDR+7, SETFLHDR+9 |
| OLDPKG | INCONSCK+1~, INCONSCK+3*, INCONSCK+9, INCONSCK+13* |
| PARENT | CHKFILE+8~, CHKFILE+29*, CHKFILE+30, MLTPFX+1~, MLTPFX+3*, MLTPFX+38*, MLTPFX+40, PKGERHDR+10*, PKGERHDR+12 |
| PARNTPLC | SPLITNDE+1~, SPLITNDE+2*, SPLITNDE+3, SPLITNDE+6 |
| >> PKGHDOUT | MLTPFX+2* |
| PKGNME | INCONSCK+1~, INCONSCK+6*, INCONSCK+9, INCONSCK+11, INCONSCK+13, INCONSCK+14, FLDDATLP~, FLDDATLP+11, FLDDATLP+12, CHKPFX~ , CHKPFX+11, CHKPFX+15, CHKPFX+18, CHKPFX+19, CHKFILE~, CHKFILE+18, CHKFILE+27, MLTPFX~, MLTPFX+20, MLTPFX+21 , MLTPFX+25, PKGERHDR~, PKGERHDR+2, PKGERHDR+3, PKGERHDR+4, PKGERHDR+9, NOPKGRT~, NOPKGRT+6, NOPKGRT+7, NOPKGRT+10 |
| PKGPFX | CHKPFX~, CHKFILE~, CHKFILE+27, MLTPFX+12*, MLTPFX+38, PKGERHDR+1~, PKGERHDR+6*, PKGERHDR+9, NOPKGRT~ |
| PKGRPRT | CHKFILE+8~, CHKFILE+9*, CHKFILE+27, NOPKGRT~, NOPKGRT+22* |
| PKGSUB | CHKPFX+8~, CHKPFX+14*, CHKPFX+15, CHKPFX+18, CHKPFX+19, CHKFILE+8~, CHKFILE+17*, CHKFILE+18, CHKFILE+28, CHKFILE+29 , CHKFILE+30, MLTPFX~, MLTPFX+12, MLTPFX+38, MLTPFX+40 |
| PREFIX | INCONSCK+1~, INCONSCK+7*, INCONSCK+11, INCONSCK+14, FLDDATLP~, FLDDATLP+11, FLDDATLP+12, CHKPFX~, CHKPFX+10, CHKPFX+13 , CHKPFX+18, CHKPFX+19, CHKFILE+8~, CHKFILE+28*, CHKFILE+29, MLTPFX+32 |
| RNGBEG | CHKFILE+8~, CHKFILE+10*, CHKFILE+19, RNGCHK~, RNGCHK+13, RNGCHK+15, RNGCHK+16 |
| RNGEND | CHKFILE+8~, CHKFILE+11*, CHKFILE+19, RNGCHK~, RNGCHK+14, RNGCHK+15, RNGCHK+16 |
| RNGIND | CHKFILE+8~, CHKFILE+19*, CHKFILE+20 |
| SPCPAD | HDR+1~, HDR+2*, HDR+7*, HDR+8, HDR+9*, HDR+11*, HDR+12 |
| STARTSUB | CHKFILE+8~, CHKFILE+15*, CHKFILE+19, CHKFILE+30, RNGCHK~, RNGCHK+13, RNGCHK+14, RNGCHK+15, RNGCHK+16 |
| SUBPFX | MLTPFX~, MLTPFX+40 |
| TEXT | SPLITNDE~, SPLITNDE+2, SPLITNDE+3, SPLITNDE+6 |
| TMPROOT | INCONSCK+1~, INCONSCK+2*, INCONSCK+3, INCONSCK+5*, INCONSCK+6, INCONSCK+7, INCONSCK+14, FLDDATLP~, FLDDATLP+8, FLDDATLP+10 , FLDDATLP+11, FLDDATLP+12, CHKPFX~, CHKPFX+18, CHKPFX+19, CHKFILE~, MLTPFX~, MLTPFX+20, MLTPFX+25, PKGERHDR~ , PKGERHDR+6, PKGERHDR+10, NOPKGRT+6, NOPKGRT+10 |
| TXTSLICE | SPLITNDE+1~, SPLITNDE+3*, SPLITNDE+4 |
| >> VALMBCK | DPFXERR+11*, DRNGERR+10*, CMBERR+11*, ERPT+20* |
| >> VALMBG | DPFXERR+10*, DRNGERR+9*, CMBERR+10* |
| >> VALMCNT | INIT+6*, INIT+7, DPFXERR+6*, DPFXERR+9, DRNGERR+6*, DRNGERR+8, CMBERR+7*, CMBERR+9 |
| >> VALMHDR(1 | HDR+4*, DPFXERR+4*, DRNGERR+4*, CMBERR+5*, ERPT+14, ERPT+17 |
| >> VALMHDR(2 | HDR+5* |
| >> VALMHDR(3 | HDR+8* |
| >> VALMHDR(4 | HDR+12*, ERPT+14 |
| >> X | HELP+1* |
| XMDUZ | ERPT+10~, ERPT+13* |
| XMERR | ERPT+3~, ERPT+5!, ERPT+9 |
| XMSUB | ERPT+10~, ERPT+14* |
| XMTEXT | ERPT+10~, ERPT+15* |
| XMY | ERPT+10~ |
| XMY( | ERPT+12* |
| XMZ | ERPT+3~, ERPT+17, ERPT+18 |