XTVSHLP1 ;ALBANY FO/GTS - VistA Package Sizing Manager; 25-JAN-2019
;;7.3;TOOLKIT;**143,152**;Apr 25, 1995;Build 3
;Per VA Directive 6402, this routine should not be modified.
;
LNTXT ; Help Text [Extract Manager]
;;Descriptions:
;;
;; Extract Package Data - This action extracts pertinent data from the local
;; Package file and loads it into the ^XTMP("XTSIZE",$J) global. The extract
;; is added to the Extract Manager list. If an extract in the ^XTMP("XTSIZE")
;; global with the same $JOB value exists, the user is prompted to confirm
;; overwrite of the existing ^XTMP global.
;;
;; Delete Extract - This action prompts the user for an extract to delete.
;; The ^XTMP extract global is selected by entry of the Process ID.
;;
;; Display Extract - This action prompts the user for an extract to display.
;; The ^XTMP extract global is selected by entry of the Process ID. The
;; Display Extract list presents the extract in a user readable format.
;;$PAUSE
;;
;; Convert Extract to Parameter list - This action prompts the user for a Process
;; ID and displays the Package Parameters list. The Package Parameters list
;; includes actions to assist review of the parameters for accuracy.
;;
;; Email Extract Global - This action prompts the user for a Process ID and
;; sends the ^XTMP("XTSIZE",$J) global to entered Email addresses. This
;; allows the extract to be sent to a fully patched VistA instance.
;;
;; Remote VistA Extract Query - This action prompts the user for a VistA site
;; to query a Package file extract. If Forum is queried, the user has the
;; option of requesting a VistA Package size report for all packages on Forum.
;; NOTE: VistA Size Reports returned from Forum will use the Package file
;; extract (returned with the request) to calculate package sizes.
;;
;;
;; NOTE: Delete Extract, Display Extract, Convert Extract to Parameter list, and
;; Email Extract Global require an ^XTMP("XTSIZE") global to exist before
;; they may be invoked. (E.G. An extract must be listed)
;;
;;$PAUSE
;;$END
;
LPTXT ; Help Text [Parameter Display]
;;Descriptions:
;;
;; Display Package Overlap List - This action compares package file and
;; prefix assignments. It reports files and prefixes that are assigned
;; to multiple packages.
;;
;; Display Captioned Parameters - This action redisplays the data elements
;; in the Parameter Display in a user readable form with the data element
;; caption. The Captioned List display includes actions to edit package
;; parameters, delete packages and save changes to the Package Parameter
;; file.
;;
;;$PAUSE
;; Display Parameter File Data Map - This action lists the data elements
;; delimited by the up caret (^). It also indicates the data element
;; name and the field in the Forum system Package file where the source
;; data is usually extracted. This information can be helpful when reading
;; the Parameter file listed.
;;
;; Parameter File Comparison - This action prompts the user for a Parameter
;; File to compare to the displayed Parameter File. It then lists the
;; differences between the two files.
;;
;;$END
;
LPCTXT ; ?? Help Text [Parameter Compare]
;;HINTS for using the Comparison Report:
;; The 'Selected' file is the one you are reviewing. It is reported as the
;; 'SEL' file. One way to use this report is to identify updates needed in
;; the 'SEL' file and add the changes to make it the most up-to-date Package
;; Parameter file. In this use-case, the 'SEL' file might be derived from
;; the most recent VistA Package file extract.
;;
;; The 'Comparison' file can be used as a baseline from which to find changes
;; needed to create a new Parameter file. This report identifies it as the
;; 'CPR' file and differences between it and the 'SEL' file are reported.
;; One use-case is to select the most up-to-date Package Parameters file
;; and compare it to the 'SEL' (Selected) file.
;;
;; The Comparison Report answers the question: What was done to the 'SEL' file
;; to make the differences between it and the 'CPR' file? For example...
;; - If package A in the 'CPR' file has a 'File Numbers' list of '7|8|9|'
;; and the 'SEL' file does not have any files defined in the 'File Numbers'
;; list (for package A), the report would be:
;; Package: A
;; Files
;; Deleted entire list in SEL file:
;; 7|8|9
;;$PAUSE
;; This report is designed for use by package Subject Matter Experts (SMEs).
;; Package SMEs have the technical knowledge of package components to
;; cleanup incorrect parameters and add missing parameters.
;;
;; It is important to remember that new Package Parameter files may be created
;; by updating Package Parameter data derived from a Vista Package file
;; extract. When an old Package Parameter file is used for comparison [CPR],
;; it may have been previously reviewed by an SME. An SME may have corrected
;; data in the 'CPR' Package Parameter file that has long been incorrect in
;; a new VistA Package file extract. [The SME should contact the VistA
;; DBA to update the Package definition in the Forum Package File (#9.4).]
;;
;; In the above instance, the Comparison Report might indicate that data has been
;; deleted from a 'SEL' Package Parameter file. If the 'CPR' Package Parameter
;; file was updated by an SME and the data is missing from the 'SEL' Parameter
;; file, the missing data may need to be added to the 'SEL' Parameter file
;; again.
;;
;; {See the example on the following screen}
;;$PAUSE
;; For example:
;; 1) VistA Package file entry 'APP A' does not include Additional Prefix "A".
;; 2) An SME created Package Parameter file "X" from a VistA Package file
;; extract and added Additional Prefix "A" to the 'APP A' package.
;; 3) A User extracts data from the VistA Package file with 'APP A' still
;; missing Additional Prefix "A".
;; 4) The User creates Package Parameter file "Y" from the new VistA Package
;; file extract.
;; 5) A comparison of old Parameter file "X" [CPR] to new Parameter file "Y"
;; [SEL] reports that Additional Prefix "A" is missing from 'APP A' in
;; the new Package Parameter file "Y" [SEL].
;;
;; An SME analysis of Package Parameter file "Y" could determine...
;; a) Additional Prefix "A" needs to be added to 'APP A' in the Package
;; Parameter file "Y".
;; OR
;; b) Additional Prefix "A" was removed from 'APP A' in the VistA Package
;; file since the last extract, and the Package Parameter file "Y" is
;; correct.
;;
;; Unless a new Package definition change has been made to VistA, the
;; correction is to add Additional Prefix "A" to Package Parameter file "Y".
;;$PAUSE
;;$END
;
LPDCTXT ; Help Text [Captioned List]
;;Descriptions:
;;
;; Edit Package Parameters - This action prompts the user for a package to
;; edit. If the package is not defined, the user is prompted to add the
;; package. Selecting to add the package will prompt for the data elements.
;; Selecting to NOT add the package will prompt to display a list of packages.
;; If the selected package is defined, the user is prompted to enter the
;; data elements.
;;
;; NOTE: Rearranging data on "Additional Prefixes', 'Excepted Prefixes'
;; 'File Numbers', or 'File Ranges' is NOT a parameter edit and will
;; not be saved.
;;
;;$PAUSE
;; Save Package Parameter Changes - When edits (package add, change, or delete)
;; are made to the Parameter list, {EDITED} is displayed in the header to
;; indicate the Parameter list has unsaved edits. The Save Package Parameter
;; Changes action prompts the user to save the changes to either a new
;; Parameter file or overwrite the displayed Parameter file. If the Parameter
;; file is overwritten, it is first copied to a file of the same name with a
;; ".BAK" extension. Only one ".BAK" file is retained with the most recent
;; 'before save' copy of the Parameter file.
;;
;; Delete Package Parameter Entry - This action prompts the user for a Package
;; to delete. The user is then prompted to confirm deletion. When a package
;; is deleted, {EDITED} is displayed in the header until the deletion is
;; saved to the file.
;;
;;
;; NOTE: Parameter changes are not saved to the disk file until the user either
;; invokes the "Save Package Parameter Changes" action or confirms saving
;; the Parameter file when exiting the parameter Captioned List display
;; with unsaved edits in the Parameter file.
;;
;;$PAUSE
;;$END
;
LRTXT ; ?? Help Text [Package Statistics]
;;Descriptions:
;;
;; Create Text File - This action writes the displayed report to a text file
;; in the default host file directory. The default text file name is in
;; the form:
;; VistAPkgSize_{julian data/time}.txt
;; The user may change the directory where the file is written or the file
;; name at the respective prompts.
;;
;; Email Rpt Attachment - This action prompts the user for Email addresses,
;; bundles the displayed Package Statistics report into a file, includes
;; the file as an attachment in the message and sends the message to the
;; recipients. The text file name is in the form:
;; VistAPkgSize_{julian data/time}.txt
;; The message indicates the creation date, attached file name and the data
;; in the file. Alternately, the file text can be sent in the message.
;;$PAUSE
;; Remote VistA Size Query - This action prompts the user for a package in
;; the selected Package Parameter file and a VistA server to query. The
;; report from the remote VistA is sent to the users' VA MailMan address.
;;
;; Swap Header - This action is available when a user readable VistA package
;; size report for ALL packages is displayed. It will toggle the header
;; area on the report screen between the "VistA Package Size Analysis
;; Manager - Package Statistics" heading and the report column headings.
;; This allows a user who has progressed beyond the first screen of the
;; report to display the column headings. The action is inactive when
;; displaying a size report for a SINGLE package or a caret (^) delimited
;; report of ALL packages.
;;
;;
;;$PAUSE
;; The Package Statistics lists the following size data for each package:
;; - Number of Routines
;; - Total size of all routines (# of characters)
;; - Number of Files
;; - Number of Fields
;; - Number of Options
;; - Number of Protocols
;; - Number of RPCs
;; - Number of Fileman Templates (Print, Sort, & Input Templates)
;;
;; NOTE: Namespaces duplicated in 'Additional Prefixes' for multiple packages
;; will not be counted in component totals for any package EXCEPT the
;; Package that has the namespace defined for the 'Primary Prefix'
;; and/or the prefix defined for the KIDS package.
;;
;; * THE PARAMETER FILE USED TO CREATE A SIZE REPORT NEEDS TO HAVE *
;; * CORRECTLY DEFINED PACKAGES AND PARAMETERS FOR A CORRECT REPORT. *
;;$PAUSE
;;$END
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXTVSHLP1 11766 printed Dec 13, 2024@02:42:05 Page 2
XTVSHLP1 ;ALBANY FO/GTS - VistA Package Sizing Manager; 25-JAN-2019
+1 ;;7.3;TOOLKIT;**143,152**;Apr 25, 1995;Build 3
+2 ;Per VA Directive 6402, this routine should not be modified.
+3 ;
LNTXT ; Help Text [Extract Manager]
+1 ;;Descriptions:
+2 ;;
+3 ;; Extract Package Data - This action extracts pertinent data from the local
+4 ;; Package file and loads it into the ^XTMP("XTSIZE",$J) global. The extract
+5 ;; is added to the Extract Manager list. If an extract in the ^XTMP("XTSIZE")
+6 ;; global with the same $JOB value exists, the user is prompted to confirm
+7 ;; overwrite of the existing ^XTMP global.
+8 ;;
+9 ;; Delete Extract - This action prompts the user for an extract to delete.
+10 ;; The ^XTMP extract global is selected by entry of the Process ID.
+11 ;;
+12 ;; Display Extract - This action prompts the user for an extract to display.
+13 ;; The ^XTMP extract global is selected by entry of the Process ID. The
+14 ;; Display Extract list presents the extract in a user readable format.
+15 ;;$PAUSE
+16 ;;
+17 ;; Convert Extract to Parameter list - This action prompts the user for a Process
+18 ;; ID and displays the Package Parameters list. The Package Parameters list
+19 ;; includes actions to assist review of the parameters for accuracy.
+20 ;;
+21 ;; Email Extract Global - This action prompts the user for a Process ID and
+22 ;; sends the ^XTMP("XTSIZE",$J) global to entered Email addresses. This
+23 ;; allows the extract to be sent to a fully patched VistA instance.
+24 ;;
+25 ;; Remote VistA Extract Query - This action prompts the user for a VistA site
+26 ;; to query a Package file extract. If Forum is queried, the user has the
+27 ;; option of requesting a VistA Package size report for all packages on Forum.
+28 ;; NOTE: VistA Size Reports returned from Forum will use the Package file
+29 ;; extract (returned with the request) to calculate package sizes.
+30 ;;
+31 ;;
+32 ;; NOTE: Delete Extract, Display Extract, Convert Extract to Parameter list, and
+33 ;; Email Extract Global require an ^XTMP("XTSIZE") global to exist before
+34 ;; they may be invoked. (E.G. An extract must be listed)
+35 ;;
+36 ;;$PAUSE
+37 ;;$END
+38 ;
LPTXT ; Help Text [Parameter Display]
+1 ;;Descriptions:
+2 ;;
+3 ;; Display Package Overlap List - This action compares package file and
+4 ;; prefix assignments. It reports files and prefixes that are assigned
+5 ;; to multiple packages.
+6 ;;
+7 ;; Display Captioned Parameters - This action redisplays the data elements
+8 ;; in the Parameter Display in a user readable form with the data element
+9 ;; caption. The Captioned List display includes actions to edit package
+10 ;; parameters, delete packages and save changes to the Package Parameter
+11 ;; file.
+12 ;;
+13 ;;$PAUSE
+14 ;; Display Parameter File Data Map - This action lists the data elements
+15 ;; delimited by the up caret (^). It also indicates the data element
+16 ;; name and the field in the Forum system Package file where the source
+17 ;; data is usually extracted. This information can be helpful when reading
+18 ;; the Parameter file listed.
+19 ;;
+20 ;; Parameter File Comparison - This action prompts the user for a Parameter
+21 ;; File to compare to the displayed Parameter File. It then lists the
+22 ;; differences between the two files.
+23 ;;
+24 ;;$END
+25 ;
LPCTXT ; ?? Help Text [Parameter Compare]
+1 ;;HINTS for using the Comparison Report:
+2 ;; The 'Selected' file is the one you are reviewing. It is reported as the
+3 ;; 'SEL' file. One way to use this report is to identify updates needed in
+4 ;; the 'SEL' file and add the changes to make it the most up-to-date Package
+5 ;; Parameter file. In this use-case, the 'SEL' file might be derived from
+6 ;; the most recent VistA Package file extract.
+7 ;;
+8 ;; The 'Comparison' file can be used as a baseline from which to find changes
+9 ;; needed to create a new Parameter file. This report identifies it as the
+10 ;; 'CPR' file and differences between it and the 'SEL' file are reported.
+11 ;; One use-case is to select the most up-to-date Package Parameters file
+12 ;; and compare it to the 'SEL' (Selected) file.
+13 ;;
+14 ;; The Comparison Report answers the question: What was done to the 'SEL' file
+15 ;; to make the differences between it and the 'CPR' file? For example...
+16 ;; - If package A in the 'CPR' file has a 'File Numbers' list of '7|8|9|'
+17 ;; and the 'SEL' file does not have any files defined in the 'File Numbers'
+18 ;; list (for package A), the report would be:
+19 ;; Package: A
+20 ;; Files
+21 ;; Deleted entire list in SEL file:
+22 ;; 7|8|9
+23 ;;$PAUSE
+24 ;; This report is designed for use by package Subject Matter Experts (SMEs).
+25 ;; Package SMEs have the technical knowledge of package components to
+26 ;; cleanup incorrect parameters and add missing parameters.
+27 ;;
+28 ;; It is important to remember that new Package Parameter files may be created
+29 ;; by updating Package Parameter data derived from a Vista Package file
+30 ;; extract. When an old Package Parameter file is used for comparison [CPR],
+31 ;; it may have been previously reviewed by an SME. An SME may have corrected
+32 ;; data in the 'CPR' Package Parameter file that has long been incorrect in
+33 ;; a new VistA Package file extract. [The SME should contact the VistA
+34 ;; DBA to update the Package definition in the Forum Package File (#9.4).]
+35 ;;
+36 ;; In the above instance, the Comparison Report might indicate that data has been
+37 ;; deleted from a 'SEL' Package Parameter file. If the 'CPR' Package Parameter
+38 ;; file was updated by an SME and the data is missing from the 'SEL' Parameter
+39 ;; file, the missing data may need to be added to the 'SEL' Parameter file
+40 ;; again.
+41 ;;
+42 ;; {See the example on the following screen}
+43 ;;$PAUSE
+44 ;; For example:
+45 ;; 1) VistA Package file entry 'APP A' does not include Additional Prefix "A".
+46 ;; 2) An SME created Package Parameter file "X" from a VistA Package file
+47 ;; extract and added Additional Prefix "A" to the 'APP A' package.
+48 ;; 3) A User extracts data from the VistA Package file with 'APP A' still
+49 ;; missing Additional Prefix "A".
+50 ;; 4) The User creates Package Parameter file "Y" from the new VistA Package
+51 ;; file extract.
+52 ;; 5) A comparison of old Parameter file "X" [CPR] to new Parameter file "Y"
+53 ;; [SEL] reports that Additional Prefix "A" is missing from 'APP A' in
+54 ;; the new Package Parameter file "Y" [SEL].
+55 ;;
+56 ;; An SME analysis of Package Parameter file "Y" could determine...
+57 ;; a) Additional Prefix "A" needs to be added to 'APP A' in the Package
+58 ;; Parameter file "Y".
+59 ;; OR
+60 ;; b) Additional Prefix "A" was removed from 'APP A' in the VistA Package
+61 ;; file since the last extract, and the Package Parameter file "Y" is
+62 ;; correct.
+63 ;;
+64 ;; Unless a new Package definition change has been made to VistA, the
+65 ;; correction is to add Additional Prefix "A" to Package Parameter file "Y".
+66 ;;$PAUSE
+67 ;;$END
+68 ;
LPDCTXT ; Help Text [Captioned List]
+1 ;;Descriptions:
+2 ;;
+3 ;; Edit Package Parameters - This action prompts the user for a package to
+4 ;; edit. If the package is not defined, the user is prompted to add the
+5 ;; package. Selecting to add the package will prompt for the data elements.
+6 ;; Selecting to NOT add the package will prompt to display a list of packages.
+7 ;; If the selected package is defined, the user is prompted to enter the
+8 ;; data elements.
+9 ;;
+10 ;; NOTE: Rearranging data on "Additional Prefixes', 'Excepted Prefixes'
+11 ;; 'File Numbers', or 'File Ranges' is NOT a parameter edit and will
+12 ;; not be saved.
+13 ;;
+14 ;;$PAUSE
+15 ;; Save Package Parameter Changes - When edits (package add, change, or delete)
+16 ;; are made to the Parameter list, {EDITED} is displayed in the header to
+17 ;; indicate the Parameter list has unsaved edits. The Save Package Parameter
+18 ;; Changes action prompts the user to save the changes to either a new
+19 ;; Parameter file or overwrite the displayed Parameter file. If the Parameter
+20 ;; file is overwritten, it is first copied to a file of the same name with a
+21 ;; ".BAK" extension. Only one ".BAK" file is retained with the most recent
+22 ;; 'before save' copy of the Parameter file.
+23 ;;
+24 ;; Delete Package Parameter Entry - This action prompts the user for a Package
+25 ;; to delete. The user is then prompted to confirm deletion. When a package
+26 ;; is deleted, {EDITED} is displayed in the header until the deletion is
+27 ;; saved to the file.
+28 ;;
+29 ;;
+30 ;; NOTE: Parameter changes are not saved to the disk file until the user either
+31 ;; invokes the "Save Package Parameter Changes" action or confirms saving
+32 ;; the Parameter file when exiting the parameter Captioned List display
+33 ;; with unsaved edits in the Parameter file.
+34 ;;
+35 ;;$PAUSE
+36 ;;$END
+37 ;
LRTXT ; ?? Help Text [Package Statistics]
+1 ;;Descriptions:
+2 ;;
+3 ;; Create Text File - This action writes the displayed report to a text file
+4 ;; in the default host file directory. The default text file name is in
+5 ;; the form:
+6 ;; VistAPkgSize_{julian data/time}.txt
+7 ;; The user may change the directory where the file is written or the file
+8 ;; name at the respective prompts.
+9 ;;
+10 ;; Email Rpt Attachment - This action prompts the user for Email addresses,
+11 ;; bundles the displayed Package Statistics report into a file, includes
+12 ;; the file as an attachment in the message and sends the message to the
+13 ;; recipients. The text file name is in the form:
+14 ;; VistAPkgSize_{julian data/time}.txt
+15 ;; The message indicates the creation date, attached file name and the data
+16 ;; in the file. Alternately, the file text can be sent in the message.
+17 ;;$PAUSE
+18 ;; Remote VistA Size Query - This action prompts the user for a package in
+19 ;; the selected Package Parameter file and a VistA server to query. The
+20 ;; report from the remote VistA is sent to the users' VA MailMan address.
+21 ;;
+22 ;; Swap Header - This action is available when a user readable VistA package
+23 ;; size report for ALL packages is displayed. It will toggle the header
+24 ;; area on the report screen between the "VistA Package Size Analysis
+25 ;; Manager - Package Statistics" heading and the report column headings.
+26 ;; This allows a user who has progressed beyond the first screen of the
+27 ;; report to display the column headings. The action is inactive when
+28 ;; displaying a size report for a SINGLE package or a caret (^) delimited
+29 ;; report of ALL packages.
+30 ;;
+31 ;;
+32 ;;$PAUSE
+33 ;; The Package Statistics lists the following size data for each package:
+34 ;; - Number of Routines
+35 ;; - Total size of all routines (# of characters)
+36 ;; - Number of Files
+37 ;; - Number of Fields
+38 ;; - Number of Options
+39 ;; - Number of Protocols
+40 ;; - Number of RPCs
+41 ;; - Number of Fileman Templates (Print, Sort, & Input Templates)
+42 ;;
+43 ;; NOTE: Namespaces duplicated in 'Additional Prefixes' for multiple packages
+44 ;; will not be counted in component totals for any package EXCEPT the
+45 ;; Package that has the namespace defined for the 'Primary Prefix'
+46 ;; and/or the prefix defined for the KIDS package.
+47 ;;
+48 ;; * THE PARAMETER FILE USED TO CREATE A SIZE REPORT NEEDS TO HAVE *
+49 ;; * CORRECTLY DEFINED PACKAGES AND PARAMETERS FOR A CORRECT REPORT. *
+50 ;;$PAUSE
+51 ;;$END