VPE

VPE: the Victory Programming Environment
What is it? VPE consists of a number of integrated programmer utilities that will increase productivity and decrease the number of key strokes required to complete normal programming tasks in the VISTA environment.

Download from the Hardhats. VPE on Hardhats

Installation Instructions
The following were taken from http://hardhats.org/tools/vpe/vpe_db2.html so that they could be edited.

V P E Version 12

The Victory Programmer Environment consists of 2 files that are saved in MSM format, but that can be read by the MUMPS implementations mentioned below.


 * VPE_12_Rtns.MGR . . . Programmer Shell & VPE Modules
 * VPE_12_Rtns.PRD . . . Fileman files that support some modules

GTM SYSTEMS
Load both VPE_12_Rtns.MGR and VPE_12_Rtns.PRD into your GTM environment. DO ^ZVEMBLD for setup instructions. If you encounter the message "THIS IS NOT THE MANAGER UCI", select YES to continue. Next, DO ^VEEMINIT to setup Fileman files (optional).

Install notes:

I downloaded the files from here: http://hardhats.org/tools/vpe/vpe_db.html

This gets me these files: VPE_12_Read Me.txt VPE_12_Rtns.MGR VPE_12_Rtns.PRD VPE_72.pdf

I ran dos2unix on the files. (not sure if needed or not) I tried importing them with KIDS --> " not a distribution."

Next, load them with ^%RI...

NOTICE: when asked for an input device, this is a FILENAME, not a VistA DEVICE entry. See example below.

GTM>do ^%RI Routine Input Utility - Converts RO file to *.m files. Formfeed delimited ? y Input device: : /home/kdt0p/VPE_12_Rtns.MGR 7:49 AM 5-JAN-04 VPE Version 12 Output directory : /usr/local/VOEVistA/r/ <--- note final '/' needed! %ZVEMD   %ZVEMD1   %ZVEMDC   %ZVEMDI   %ZVEMDL   %ZVEMDL1  %ZVEMDLB  %ZVEMDLD %ZVEMDLE %ZVEMDLI  %ZVEMDLM  %ZVEMDM   %ZVEMDN   %ZVEMDPR  %ZVEMDPT  %ZVEMDT %ZVEMDU  %ZVEMDU1  %ZVEMDUM  %ZVEMDX   %ZVEMDXK  %ZVEMDY   %ZVEMG    %ZVEMG1 %ZVEMGE  %ZVEMGE1  %ZVEMGI   %ZVEMGI1  %ZVEMGM   %ZVEMGM1  %ZVEMGMC  %ZVEMGO %ZVEMGP  %ZVEMGPI  %ZVEMGPS  %ZVEMGR   %ZVEMGR1  %ZVEMGS   %ZVEMGU   %ZVEMGUM %ZVEMGY  %ZVEMKC   %ZVEMKDT  %ZVEMKE   %ZVEMKEA  %ZVEMKEB  %ZVEMKEC  %ZVEMKI1 %ZVEMKI2 %ZVEMKI3  %ZVEMKI4  %ZVEMKI5  %ZVEMKP   %ZVEMKR   %ZVEMKRN  %ZVEMKST %ZVEMKT  %ZVEMKT1  %ZVEMKT2  %ZVEMKTF  %ZVEMKTG  %ZVEMKTM  %ZVEMKTR  %ZVEMKTS %ZVEMKTT %ZVEMKTU  %ZVEMKU   %ZVEMKU1  %ZVEMKY   %ZVEMKY1  %ZVEMKY2  %ZVEMKY3 %ZVEMKYB %ZVEMO    %ZVEMOC   %ZVEMOE   %ZVEMOE1  %ZVEMOE2  %ZVEMOEA  %ZVEMOEB %ZVEMOEP %ZVEMOEU  %ZVEMOM   %ZVEMOM1  %ZVEMOM2  %ZVEMOS   %ZVEMOSS  %ZVEMOU %ZVEMOUM %ZVEMOY   %ZVEMR    %ZVEMRC   %ZVEMRE   %ZVEMRE1  %ZVEMRE2  %ZVEMREA %ZVEMREB %ZVEMREJ  %ZVEMREL  %ZVEMREM  %ZVEMREO  %ZVEMREP  %ZVEMRER  %ZVEMREW %ZVEMRI  %ZVEMRI1  %ZVEMRID  %ZVEMRIE  %ZVEMRLI  %ZVEMRLM  %ZVEMRLO  %ZVEMRLP %ZVEMRLU %ZVEMRLV  %ZVEMRLX  %ZVEMRLY  %ZVEMRLZ  %ZVEMRM   %ZVEMRM1  %ZVEMRM2 %ZVEMRMG %ZVEMRMS  %ZVEMRP   %ZVEMRP1  %ZVEMRP2  %ZVEMRS   %ZVEMRS1  %ZVEMRSS %ZVEMRU  %ZVEMRUM  %ZVEMRUS  %ZVEMRV   %ZVEMRY   %ZVEMSCL  %ZVEMSCU  %ZVEMSD %ZVEMSF  %ZVEMSH   %ZVEMSHY  %ZVEMSID  %ZVEMSL   %ZVEMSNR  %ZVEMSO   %ZVEMSO1 %ZVEMSP  %ZVEMSPS  %ZVEMSQ   %ZVEMSQA  %ZVEMSQE  %ZVEMSQL  %ZVEMSQS  %ZVEMSQU %ZVEMSQV %ZVEMSQW  %ZVEMSRL  %ZVEMSS   %ZVEMSS1  %ZVEMST   %ZVEMSTO  %ZVEMSU %ZVEMSU1 %ZVEMSU2  %ZVEMSY   %ZVEMSY1  %ZVEMSY2  ZVEMBLD   ZVEMBLDA ZVEMBLDB ZVEMBLDL  ZVEMBLDO  ZVEMDH1   ZVEMDH2   ZVEMDH3   ZVEMDH4   ZVEMDH5 ZVEMGH   ZVEMGH1   ZVEMGH2   ZVEMOH    ZVEMOH1   ZVEMOH2   ZVEMRH    ZVEMRH1 ZVEMRHK  ZVEMRHL   ZVEMRHW   ZVEMS     ZVEMSF1   ZVEMSF2   ZVEMSF3   ZVEMSF4 ZVEMSF5  ZVEMSF6   ZVEMSF7   ZVEMSF8   ZVEMSF9   ZVEMSFA   ZVEMSFB   ZVEMSFC ZVEMSFD  ZVEMSG    ZVEMSGC   ZVEMSGD   ZVEMSGH   ZVEMSGR   ZVEMSGS   ZVEMSGT ZVEMSGU  ZVEMSH1   ZVEMSH2   ZVEMSH3   ZVEMSH4   ZVEMSH5   ZVEMSH6   ZVEMSH7 ZVEMSH8  ZVEMSH9   ZVEMSLA   ZVEMSLB   ZVEMSLC   ZVEMSLD   ZVEMSN Restored 16609 lines in 222 routines. GTM> GTM>do ^%RI Routine Input Utility - Converts RO file to *.m files. Formfeed delimited ? y Input device: : /home/kdt0p/VPE_12_Rtns.PRD 4:39 PM 4-JAN-04 VPE Version 12 Output directory : /usr/local/VOEVistA/r/   <--- note final '/' needed! VEEMI001 VEEMI002  VEEMI003  VEEMI004  VEEMI005  VEEMI006  VEEMI007  VEEMI008 VEEMI009 VEEMI00A  VEEMI00B  VEEMI00C  VEEMI00D  VEEMI00E  VEEMI00F  VEEMI00G VEEMI00H VEEMI00I  VEEMI00J  VEEMI00K  VEEMI00L  VEEMI00M  VEEMI00N  VEEMI00O VEEMI00P VEEMI00Q  VEEMI00R  VEEMI00S  VEEMINI1  VEEMINI2  VEEMINI3  VEEMINI4 VEEMINI5 VEEMINIS  VEEMINIT  VEEMVPE Restored 3783 lines in 36 routines. GTM>

GTM>do ^ZVEMBLD \       /           \      /            \____/             \db/  I  C  T  O  R  Y    S  O  F  T  W  A  R  E              \/ ** VICTORY PROGRAMMER  ENVIROMENT ** WELCOME to the Victory Programmer Environment. VPE consists of a number of integrated programmer utilities that will increase your productivity and dramatically decrease the number of key strokes required to complete your normal tasks.  to continue, '^' to quit:

V I C T O R Y  P R O G R A M M E R   E N V I R O N M E N T  GLOBAL LISTER/EDITOR Use to view your globals. Has extensive support for VA FILEMAN files. ROUTINE READER/EDITOR Use to read and edit routines. Allows branching to other routines to follow the flow of the code or capture code for importing into the current routine. ELECTRONIC DATA DICTIONARY Easy to use utility for viewing the data dictionaries of VA FILEMAN files. PROGRAMMER VSHELL A replacement for conventional 'Programmer's Mode'. Provides a safe, productive environment for M programmers. You will wonder how you ever got along without it.  to continue, '^' to quit: G L O B A L  P R O T E C T I O N  If you receive 'Protection Errors' when you first start the VSHELL, check that the following globals are set correctly: ^%ZOSF  System-RWD   World-R     Group-R     User-RWD ^%ZVEMS System-RWD   World-RWD   Group-RWD   User-RWD If you have the VA KERNEL software on your system, you should confirm that node ^%ZOSF("OS") is set correctly. The 2nd piece of this node should be the number of your Mumps system. See node ^DD("OS"). DSM=2 MSM=8  DTM=9  VAXDSM=16  to continue, '^' to quit: U P G R A D E IF YOU CURRENTLY HAVE AN EARLIER VERSION OF VPE ON YOUR SYSTEM, FOLLOW THESE INSTRUCTIONS TO UPGRADE SMOOTHLY. 1) Have all users save their QWIKs (Use ..QSAVE System QWIK). 2) Make sure all users have halted off VPE Shell. 3) Delete routines ^ZVEM*, ^%ZVEM*, and ^VEEM*. 4) Kill global ^%ZVEMS. 5) Load VPE_xx.MGR routines from the disk. 6) DO ^ZVEMBLD to install VPE. 7) Load VPE_xx.PRD routines from the disk. 8) DO ^VEEMINIT to install VPE Fileman files. 9) Start VPE Shell and run ..QSAVE to restore your QWIKs. 10) Run ..PARAM to adjust your parameters.  to continue, '^' to quit: D E I N S T A L L To completely deinstall VPE do the following: 1) GLOBALS:     MGR      KILL ^%ZVEMS  2) ROUTINES:     MGR      DELETE ^%ZVEM* MGR     DELETE ^ZVEM* PRD     DELETE ^VEEM* 3) FILES:       PRD      DELETE VPE* files in FM   to continue, '^' to quit:  V P E   M O D U L E S   L I S T                                        ROUTINES          Action                                              ---    VGL...Global Lister/Editor..........^%ZVEMG*......DO ^%ZVEMG    VRR...Routine Reader................^%ZVEMR*......DO ^%ZVEMR    E.....Routine Editor...............................X ^%ZVEMS("E")    VEDD..Electronic Data Dictionary...^%ZVEMD*......DO ^%ZVEMD          VPE Shell.....................^%ZVEMS*.......X ^%ZVEMS   to continue, '^' to quit:

THIS IS NOT THE MANAGER UCI. I think it is EHR,EHR. Should I continue anyway: YES// yes <--- entered Load VPE Shell global: YES// Load VPE Shell global: YES// y................................................ .............. VPE Programmer Shell successfully loaded. VPE full screen routine editor successfully loaded. Initialization finished. NOTE: To start the VPE Shell, type: X ^%ZVEMS  to continue.. =========================< D I S C L A I M E R >========================= IN NO EVENT WILL I, THE DEVELOPER OF THIS SOFTWARE, BE LIABLE FOR DIRECT, INCIDENTAL, INDIRECT, SPECIAL, OR CONSEQUENTIAL DAMAGES RESULTING FROM ANY DEFECT IN THIS SOFTWARE OR ITS DOCUMENTATION OR ARISING OUT OF THE USE OF OR INABILITY TO USE THE SOFTWARE OR ACCOMPANYING DOCUMENTATION. DAVID BOLDUC ========================================================================= GTM>

GTM>x ^%ZVEMS ==========================< I D  N U M B E R >========================== Enter your VShell ID number. Your User QWIK commands will not be accessible if your ID is incorrect. For first time users: Your ID number can be a number from .1 to 999999, 2 decimal digits. It can match your DUZ number but it doesn't have to. The VShell will use your ID to store data that pertains only to you. If VA KERNEL routine ^XUP is not in this UCI, you will need to enter your ID number each time you enter the VShell from this UCI. ========================================================================= =========================< D I S C L A I M E R >========================= IN NO EVENT WILL I, THE DEVELOPER OF THIS SOFTWARE, BE LIABLE FOR DIRECT, INCIDENTAL, INDIRECT, SPECIAL, OR CONSEQUENTIAL DAMAGES RESULTING FROM ANY DEFECT IN THIS SOFTWARE OR ITS DOCUMENTATION OR ARISING OUT OF THE USE OF OR INABILITY TO USE THE SOFTWARE OR ACCOMPANYING DOCUMENTATION. DAVID BOLDUC ========================================================================= Enter ID Number: 9// TERMINAL TYPE: C-VT320 If your screen is now in Reverse Video, the REVERSE VIDEO OFF field in the TERMINAL TYPE file may not be correct for your terminal type. This will adversely effect some VSHELL screens and should be corrected. Type 'W $C(27,91,109)' if you need to return your screen to normal. VPE. . . Victory Programmer Environment. . . . . . . . . . . . David Bolduc ^,H,HALT=Quit  ?=Help   1,2=User QWIKs   3,4=System QWIKs I VEE("OS")=18 U $I:("":"+B") Q                               ^- At column 23, line 91, source module usr/local/VOEVistA/r/_ZVEMKY2.m %GTM-E-DEVPARUNK, Deviceparameter unknown I VEE("OS")=18 U $I:("":"-B") Q                             ^- At column 23, line 99, source module /usr/local/VOEVistA/r/_ZVEMKY2.m %GTM-E-DEVPARUNK, Deviceparameter unknown >>

Note: I think that the errors are from GT.M complaining about non-GT.M code. Not to worry, there are code guards that will prevent this from being executed.

MUMPS SYSTEMS OTHER THAN CACHE and GTM:
Load VPE_12_Rtns.MGR into your Manager account (Note: See screen scrape of install in GT.M. shown above. Technique should be similar on Cache') and DO ^ZVEMBLD for setup instructions. Load VPE_12_Rtns.PRD into the account where you plan to use VPE and DO ^VEEMINIT to setup Fileman files (optional).

VETERANS ADMINISTRATION CACHE SYSTEMS:
Carefully read the instructions for loading the routines Load both VPE_12_Rtns.MGR and VPE_12_Rtns.PRD into the account where you plan to use VPE. It is necessary to instruct Cache to use the Cache format when specifying the type of routines. DO NOT presume you need to use MSM since the routines were saved in MSM formatting. DO ^ZVEMBLD for setup instructions. DO ^VEEMINIT to setup Fileman files (optional).