XTVSLPR1 ;ALBANY FO/GTS - VistA Package Sizing Manager; 18-DEC-2018
Source file <XTVSLPR1.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
INCONSCK | ;Check for overlaps in Forum Package file data
|
|
FLDDATLP(TMPROOT,PKGNME,PREFIX,ADPFXIND) | ;Check Fields and Data for 'ADDPFX' and 'FLERNG' Nodes
; Input: TMPROOT - Package "XTVS-PKGEDIT" array root [^TMP("XTVS-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 "XTVS-PKGEDIT" array root [^TMP("XTVS-PKGEDIT",J,PKGNME,PREFIX)] ; PKGPFX - Package Prefix |
|
CHKFILE(PKGNME,FLERNG,TMPROOT,PKGPFX,FSRC) | ; Check File range for multiple use
; Input: PKGNME - Package Name using Prefix ; FILRNG - File Range used by Package Name ; TMPROOT - Package "XTVS-PKGEDIT" array root ; PKGPFX - Package Prefix ; FSRC - File Source ; F1 : File Range multiple ; F2 : *LOW/*HIGH fields ; F3 : File List multiple |
|
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,SPTEXT) | ;Split Error Node
|
|
NOPKGRT(TMPROOT,PKGNME,PKGPFX,FTYPE,ERRARYCT,CMBARCT,PKGRPRT) | ;Report Package for File section
|
|
RNGCHK(RNGBEG,RNGEND,STARTSUB,ENDSUB) | ;Check Package file ranges against Range index
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("XTVS-ERROR" | CHKPFX+12, CHKFILE+18, CHKFILE+30, CHKFILE+41*, CHKFILE+44*, 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*, SETFLHDR+11*, SETFLHDR+13*, SETFLHDR+15*, SPLITNDE+4*, NOPKGRT+3*, NOPKGRT+8*, NOPKGRT+14*, NOPKGRT+21*, NOPKGRT+25* |
^TMP("XTVS-PKGEDIT" | CHKFILE+34, CHKFILE+35, MLTPFX+12, MLTPFX+38 |
^TMP("XTVS-PKGRPT-CMB-IDX" | INCONSCK+16!, MLTPFX+21, PKGERHDR+4*, NOPKGRT+7 |
^TMP("XTVS-PKGRPT-FRNG-IDX" | INCONSCK+16!, PKGERHDR+3*, NOPKGRT+6 |
^TMP("XTVS-PKGRPT-PFX-IDX" | INCONSCK+16!, MLTPFX+20, PKGERHDR+2* |
Name | Line Occurrences |
---|---|
$$RNGCHK | CHKFILE+25 |
$$SPLITNDE | CHKFILE+40, CHKFILE+43, MLTPFX+45, MLTPFX+46, NOPKGRT+20, NOPKGRT+23 |
CHKFILE | FLDDATLP+15, FLDDATLP+18, FLDDATLP+21 |
CHKPFX | INCONSCK+12, FLDDATLP+13 |
CMBARST | CHKFILE+31, MLTPFX+10 |
FLDDATLP | INCONSCK+15 |
MLTPFX | CHKPFX+18, CHKPFX+19 |
NOPKGRT | CHKFILE+33 |
PKGERHDR | MLTPFX+20, MLTPFX+25, NOPKGRT+6, NOPKGRT+10 |
SETFLHDR | CHKFILE+28, CMBARST+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDREMPX | CHKPFX+8~, CHKPFX+11*, CHKPFX+19 |
ADPFXIND | INCONSCK+2~, INCONSCK+5*, INCONSCK+12, INCONSCK+13*, INCONSCK+15, FLDDATLP~, FLDDATLP+13* |
CMBARCT | CHKFILE+13~, CHKFILE+30*, CHKFILE+31, CHKFILE+33, CHKFILE+42*, CHKFILE+43, CHKFILE+44, 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+22*, NOPKGRT+23, NOPKGRT+25, NOPKGRT+26* |
CMBHDR | MLTPFX+1~, MLTPFX+2*, MLTPFX+26*, MLTPFX+28 |
DATASUB | FLDDATLP+6~, FLDDATLP+10*, FLDDATLP+11*, FLDDATLP+13, FLDDATLP+15, FLDDATLP+18, FLDDATLP+19, FLDDATLP+21, FLDDATLP+22 |
ENDSUB | CHKFILE+12~, CHKFILE+22*, CHKFILE+25, CHKFILE+38, RNGCHK~, RNGCHK+13, RNGCHK+14, RNGCHK+15, RNGCHK+16 |
ERRARYCT | CHKPFX+8~, CHKPFX+12*, CHKPFX+18, CHKPFX+19, CHKFILE+12~, CHKFILE+18*, CHKFILE+27*, CHKFILE+28, CHKFILE+33, CHKFILE+40 , CHKFILE+41, 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*, SETFLHDR+11, SETFLHDR+12*, SETFLHDR+13, SETFLHDR+14*, SETFLHDR+15, SETFLHDR+16*, SPLITNDE~, SPLITNDE+4, SPLITNDE+5* , NOPKGRT~, NOPKGRT+3, NOPKGRT+4*, NOPKGRT+6, NOPKGRT+19*, NOPKGRT+20, NOPKGRT+21, NOPKGRT+24* |
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+8*, FLDDATLP+9*, FLDDATLP+11, FLDDATLP+13, FLDDATLP+14, FLDDATLP+17, FLDDATLP+19, FLDDATLP+20, FLDDATLP+22 |
FLEHDR | NOPKGRT+1~, NOPKGRT+2*, NOPKGRT+11*, NOPKGRT+13 |
FLERNG | CHKFILE~, CHKFILE+16, CHKFILE+17, NOPKGRT+17 |
FLERNGFD | FLDDATLP+6~, FLDDATLP+7*, FLDDATLP+16*, FLDDATLP+17, FLDDATLP+19*, FLDDATLP+20, FLDDATLP+22* |
FSRC | CHKFILE~, CHKFILE+15 |
FTYPE | CHKFILE+13~, CHKFILE+15*, CHKFILE+33, NOPKGRT~, NOPKGRT+17 |
IDXROOT | CHKPFX+8~, CHKPFX+10*, CHKPFX+11, CHKPFX+13*, CHKPFX+14, CHKPFX+17, CHKFILE+12~, CHKFILE+19*, CHKFILE+20*, CHKFILE+21 , CHKFILE+22, CHKFILE+23, CHKFILE+36 |
IDXRT3 | CHKPFX+16~, CHKPFX+17*, CHKPFX+18, CHKPFX+19 |
INRNG | RNGCHK+11~, RNGCHK+12*, RNGCHK+13*, RNGCHK+14*, RNGCHK+15*, RNGCHK+16*, RNGCHK+17 |
NDTXTCMB | CHKFILE+13~, CHKFILE+39*, CHKFILE+43, MLTPFX+43~, MLTPFX+44*, MLTPFX+46, NOPKGRT+1~, NOPKGRT+18*, NOPKGRT+23 |
NODESUB | SPLITNDE~, SPLITNDE+4 |
NODETXT | CHKFILE+13~, CHKFILE+38*, CHKFILE+39, CHKFILE+40*, CHKFILE+41, CHKFILE+43*, CHKFILE+44, MLTPFX+1~, MLTPFX+32*, MLTPFX+33 , MLTPFX+36, MLTPFX+40*, MLTPFX+42, MLTPFX+44, MLTPFX+45*, MLTPFX+46*, MLTPFX+47, MLTPFX+48, SPLITNDE+6*, SPLITNDE+7 , NOPKGRT+1~, NOPKGRT+17*, NOPKGRT+18, NOPKGRT+20*, NOPKGRT+21, NOPKGRT+23*, NOPKGRT+25 |
NODETXTG | SPLITNDE+1~ |
NODETYPE | SETFLHDR~, SETFLHDR+1, SETFLHDR+3, SETFLHDR+5, SETFLHDR+7, SETFLHDR+9, SETFLHDR+11, SETFLHDR+13, SETFLHDR+15 |
OLDPKG | INCONSCK+2~, INCONSCK+4*, INCONSCK+10, INCONSCK+14* |
OPFTCODE | CHKFILE+13~, CHKFILE+36*, CHKFILE+37, CHKFILE+38 |
OPFTYPE | CHKFILE+13~, CHKFILE+37*, CHKFILE+38 |
PARENT | CHKFILE+12~, CHKFILE+35*, CHKFILE+38, MLTPFX+1~, MLTPFX+3*, MLTPFX+38*, MLTPFX+40, PKGERHDR+10*, PKGERHDR+12 |
>> PKGHDOUT | MLTPFX+2* |
PKGNME | INCONSCK+2~, INCONSCK+7*, INCONSCK+10, INCONSCK+12, INCONSCK+14, INCONSCK+15, FLDDATLP~, FLDDATLP+13, FLDDATLP+15, FLDDATLP+18 , FLDDATLP+21, CHKPFX~, CHKPFX+11, CHKPFX+15, CHKPFX+18, CHKPFX+19, CHKFILE~, CHKFILE+24, CHKFILE+33, 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+33, MLTPFX+12*, MLTPFX+38, PKGERHDR+1~, PKGERHDR+6*, PKGERHDR+9, NOPKGRT~ |
PKGRPRT | CHKFILE+12~, CHKFILE+14*, CHKFILE+33, NOPKGRT~, NOPKGRT+28* |
PKGSUB | CHKPFX+8~, CHKPFX+14*, CHKPFX+15, CHKPFX+18, CHKPFX+19, CHKFILE+12~, CHKFILE+23*, CHKFILE+24, CHKFILE+34, CHKFILE+35 , CHKFILE+38, MLTPFX~, MLTPFX+12, MLTPFX+38, MLTPFX+40 |
PREFIX | INCONSCK+2~, INCONSCK+8*, INCONSCK+12, INCONSCK+15, FLDDATLP~, FLDDATLP+13, FLDDATLP+15, FLDDATLP+18, FLDDATLP+21, CHKPFX~ , CHKPFX+10, CHKPFX+13, CHKPFX+18, CHKPFX+19, CHKFILE+12~, CHKFILE+34*, CHKFILE+35, MLTPFX+32 |
RNGBEG | CHKFILE+12~, CHKFILE+16*, CHKFILE+25, RNGCHK~, RNGCHK+13, RNGCHK+15, RNGCHK+16 |
RNGEND | CHKFILE+12~, CHKFILE+17*, CHKFILE+25, RNGCHK~, RNGCHK+14, RNGCHK+15, RNGCHK+16 |
RNGIND | CHKFILE+12~, CHKFILE+25*, CHKFILE+26 |
SPLITPLC | SPLITNDE+1~, SPLITNDE+2*, SPLITNDE+3, SPLITNDE+6 |
SPTEXT | SPLITNDE~, SPLITNDE+2 |
STARTSUB | CHKFILE+12~, CHKFILE+21*, CHKFILE+25, CHKFILE+38, RNGCHK~, RNGCHK+13, RNGCHK+14, RNGCHK+15, RNGCHK+16 |
SUBPFX | MLTPFX~, MLTPFX+40 |
TEXT | SPLITNDE~, SPLITNDE+2, SPLITNDE+3, SPLITNDE+6 |
TMPROOT | INCONSCK+2~, INCONSCK+3*, INCONSCK+4, INCONSCK+6*, INCONSCK+7, INCONSCK+8, INCONSCK+15, FLDDATLP~, FLDDATLP+9, FLDDATLP+11 , FLDDATLP+13, FLDDATLP+15, FLDDATLP+17, FLDDATLP+18, FLDDATLP+19, FLDDATLP+21, FLDDATLP+22, CHKPFX~, CHKPFX+18, CHKPFX+19 , CHKFILE~, CHKFILE+33, MLTPFX~, MLTPFX+20, MLTPFX+25, PKGERHDR~, PKGERHDR+6, PKGERHDR+10, NOPKGRT~, NOPKGRT+6 , NOPKGRT+10 |
TXTSLICE | SPLITNDE+1~, SPLITNDE+3*, SPLITNDE+4 |