Conversion script: link fix

2015-02-26T23:48:55Z

link fix

New page

<PRE>
* =================================== RMS.COMMON ========================================
* COM: 'INCLUDE' This is all RMS Compatible Programs.
* =======================================================================================
* 29.Dec.2010 james: Add RMS$USER.GROUP.S
* 16.Jan.2008 jim: Add LAST.ID.FILE for INPUT and other misc programs.
* 20.Jun.2007 jim: FKEY.ACTS is obsolete.
* 24.Jan.2007 jim: Add RMS$PID for Process ID; use UNUSED position.
* 13.Sep.2006 jim: Add PLATFORM 'Cache' or '[[UniVerse]]' for Cache migration.
* 07/29/91 Major Universe Version: Named Commons !(STD.SETUP only once)
* 01/21/90 ADD ALL TERMINAL, PRINTER STUFF FOR DSI
* =======================================================================================
*
* These are NAMED COMMONS: once they are set, they stay set until
* changed. Programs DO NOT need to include them if they are not
* used: they MAY have other commons which will not hurt these !
*
* =======================================================================================

common [[/RMS]]/ CLR, EJECT, ES, BELL, RN, RF, EL, TRUE, FALSE, AM, VM, SVM, ILEN, C.R
common [[/RMS]]/ TERMTYPE, EMBED.ATTR, TOP.LINE, BOT.LINE ;* TERMINAL SPECIFIC
common [[/RMS]]/ HD.CLR, BD.CLR, PR.CLR, M1.CLR, M2.CLR, BK.CLR, IN.CLR, ER.CLR, SP.CLR

common [[/RMS]]/ USER.NO, USER.ID, SEC.LVL

common [[/RMS]]/ ENTER.PARAMS, ENTER.RETURN ;* FOR FASTER MENUS TO INPUT
common [[/RMS]]/ FKEY.LEAD ;* 1st char of func-keys (must all be the same)
common [[/RMS]]/ DEBUG.FLAG ;* GLOBAL DEBUGGING FLAG !
common [[/RMS]]/ FKEY.DELAY ;* MACHINE-DEPENDANT HOW LONG FOR F-KEY
common [[/RMS]]/ INS.MODE ;* Global Insert-Mode Flag (false=replace)
common [[/RMS]]/ RMS$USER.GROUP.S ;* Now keep their list of Groups in Common too

common [[/RMS]]/ FKEY.LEVEL ;* How deep in function keys are we ?

common [[/RMS]]/ SYSTEM.NAME ;* 01/25/95 For DA stuff: everyone wants to know !
common [[/RMS]]/ SYSTEM.OS ;* 09/11/2002 Added for System Test
common [[/RMS]]/ PLATFORM ;* 'Cache' or '[[UniVerse]]' (will be '0' if never set)
common [[/RMS]]/ RMS$PID ;* Process ID: new syntax for Named Common ?

common [[/RMS]]/ UNUSED(2) ;* FOR LATER USE (+ see one above)
common [[/RMS]]/ OUT.MSGS, OUT.FLAG

* UNUSED ?: The TERMINAL array is pretty much obsolete now with terminal
* emulation being used everywhere; but we would have to remove all references
* to it and hard-code (or use a static EQU) instead; so leave it for now:

common [[/RMS]]/ LINE.REC(10), TERMINAL(75), PRINTER(20)

*old: common [[/RMS]]/ FKEY.ACTS(12) ;* Global Function Key Actions

* @TODO : Move this here from INPUT.COMMON:
*common [[/RMS]]/ LAST.ID.FILE
common [[/RMS]]/ RMS.UNUSED(12)
</PRE>

RMS.COMMON - Revision history

Conversion script: link fix