Scott Nelson Marlex Petroleum Information Systems Department 2633 Cherry Avenue, Suite 400 Signal Hill, California 90806 (213) 595-5758 Telex 65-6496 (ECO PETRO SGHL) Here is a few programs and command procedures which have been useful here at Marlex. Please feel free to contact me if you have any comments, suggestions, enhancements, bugs, etc. BRDCST This utility is used to send REPLY/ALL/BELL messages to the last line of the screen (which has been reserved in our applications programs). Very useful to preserve the screen. More useful if set-up as a foreign command: BRO*ADCAST :== $device:[directory]BRDCST BRDCST.COB Source BRDCSTA.MAR Generates global constants BRDCSTBLD.COM Compiles the programs DELTREE This utility will delete a directory from the bottom-up. This is a corrected version of figure 2-4 on page 2-12 of the VAX/VMS System Management and Operations Guide. DELTREE.COM FIXSCREEN This procedure issues all of the appropriate escape sequences to put a VT132 back to normal mode. (Useful if you have games that leave the terminal in VT52 mode!) Can be made more useful by creating a foreign command: FIX*SCREEN :== @device:[directory]FIXSCREEN FIXSCREEN.COM Command procedure FIXVT132.LIS File containing the escape codes MOUNTED This procedure makes sure the right tape is mounted (via the tape label) before you start writing on it! MOUNTED.COM PRINT This procedure shows all of the *.LIS files in the current directory, and interactivly lets the user select files for printing. The top of the screen is used to show the filenames, and the bottom is used for selecting the appropriate action. On non-ANSI_CRT terminals, it does not try to set up scrolling regions. PRINT.COM STRIP Removes trailing blanks and/or tabs from the end of records of the selected file(s). Implemented as my first try in using the command definition utility (SET COMMAND) and my first try in using the wildcarding feature in RMS. STRIP.CLD Command definition STRIP.MAR Source program