File:  [Coherent Logic Development] / freem / mlib / %MAPPING.m
Revision 1.2: download - view: text, annotated - select for diffs
Mon Mar 10 00:38:15 2025 UTC (4 months, 3 weeks ago) by snw
Branches: MAIN
CVS tags: v0-63-1-rc1, v0-63-0-rc1, v0-63-0, v0-62-3, v0-62-2, v0-62-1, v0-62-0, HEAD
Phase 3 of REUSE compliance and header reformatting

    1: %MAPPING ;VCL/SNW-MAPPINGS; 03/09/25 06:19 PM
    2:     ;0.0;FreeM;****FREEM**;Serena Willis @2025
    3:     ;
    4:     ;   $Id: %MAPPING.m,v 1.2 2025/03/10 00:38:15 snw Exp $
    5:     ;    Mappings
    6:     ;
    7:     ;  
    8:     ;   Author: Serena Willis <snw@coherent-logic.com>
    9:     ;    Copyright (C) 1998 MUG Deutschland
   10:     ;    Copyright (C) 2023, 2025 Coherent Logic Development LLC
   11:     ;
   12:     ;
   13:     ;   This file is part of FreeM.
   14:     ;
   15:     ;   FreeM is free software: you can redistribute it and/or modify
   16:     ;   it under the terms of the GNU Affero Public License as published by
   17:     ;   the Free Software Foundation, either version 3 of the License, or
   18:     ;   (at your option) any later version.
   19:     ;
   20:     ;   FreeM is distributed in the hope that it will be useful,
   21:     ;   but WITHOUT ANY WARRANTY; without even the implied warranty of
   22:     ;   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   23:     ;   GNU Affero Public License for more details.
   24:     ;
   25:     ;   You should have received a copy of the GNU Affero Public License
   26:     ;   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
   27:     ;
   28:     ;   $Log: %MAPPING.m,v $
   29:     ;   Revision 1.2  2025/03/10 00:38:15  snw
   30:     ;   Phase 3 of REUSE compliance and header reformatting
   31:     ;
   32:     ;
   33:     ; SPDX-FileCopyrightText:  (C) 2025 Coherent Logic Development LLC
   34:     ; SPDX-License-Identifier: AGPL-3.0-or-later
   35:    D S^%DB("M","MAIN","NAME","Main Menu")
   36:    D S^%DB("M","MAIN","DESC","FreeM Mappings Manager")
   37:    D S^%DB("M","MAIN","DEFAULT","GL")
   38:    D SA^%DB("M","MAIN","OPTS","GD","Define Global Mapping")
   39:    D SA^%DB("M","MAIN","OPTS","GR","Remove Global Mapping")
   40:    D SA^%DB("M","MAIN","OPTS","GL","List Global Mappings")
   41:    D SA^%DB("M","MAIN","OPTS","RD","Define Routine Mapping")
   42:    D SA^%DB("M","MAIN","OPTS","RR","Remove Routine Mapping")
   43:    D SA^%DB("M","MAIN","OPTS","RL","List Routine Mappings")
   44:    D SA^%DB("M","MAIN","ACT","GD","GD^%MAPPING")
   45:    D SA^%DB("M","MAIN","ACT","GR","GR^%MAPPING")
   46:    D SA^%DB("M","MAIN","ACT","GL","GL^%MAPPING")
   47:    D SA^%DB("M","MAIN","ACT","RD","RD^%MAPPING")
   48:    D SA^%DB("M","MAIN","ACT","RR","RR^%MAPPING")
   49:    D SA^%DB("M","MAIN","ACT","RL","RL^%MAPPING")
   50: MN D GO^%MENU("M","MAIN")
   51:    Q
   52: GD Q
   53: GR Q
   54: GQ Q
   55: RD Q
   56: RR Q
   57: RL Q

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>