Edit macro LCFIX                                                Edit macro LCFIX

                                                       Author: David McRitchie
                                                   formatted on  1995/04/01 06:54
          for assistance contact: D. McRitchie                DMcRitchie@hotmail.com
--------------------------------------------------------------------------------
Execute NAME.  LCFIX
users.       PDF EDIT users particularly SCRIPT users
type.        Edit Macro   resides in SYS1.TSOCLIST,  and in IS03.SPF2.MACROS for
             use on SPF/PC

--------------------------------------------------------------------------------
LCFIX    Lower Case Fix.
--------------------------------------------------------------------------------
    related   @C (word-list),  @CAPS,  @SMALLS,  LCFIX, SPELL, and perhaps  @BIG
          S (block letters)
--------------------------------------------------------------------------------

The  LCFIX  edit  macro is used as a part of processing the telephone directory,
and is also used in the edit macro USERSDCF.

--------------------------------------------------------------------------------

  ISREDIT  LCFIX

--------------------------------------------------------------------------------


Examples:

      LCFIX   .


Internal Aspects:
  This EDIT MACRO Execute is sufficiently short, so it is shown below.

   /*REXX -- Lower-case fix for lastnames, titles, etc. */
    Address "ISREDIT";"MACRO"
    CONTROL ASIS"
    "CAPS OFF"
    "C ALL NX 'II'  WORD 'II'"
    "C ALL NX 'III' WORD 'III'"
    "C ALL NX 'IV'  WORD 'IV'"
    "C ALL NX 'II'  WORD 'II'"
    /* "C ALL NX prefix p'Mac<<<' p'Mac><<'"  */
    /* "C ALL NX prefix c'MAC' c'Mac'"        */
    /* "C ALL NX prefix p'Mc<<<' p'Mc><<'"    */
    /* "C ALL NX prefix c'Mc' c'Mc'"          */
    "C ALL NX word c'SYSTEMS PROGRAMM' 'SYSTEMS PROGRAMMER'"
    "C ALL NX word c'Systems Programm' 'Systems Programmer'"
    "C ALL NX word C'PROGRAMMER/ANALY' 'PROGRAMMER/ANALYST'"
    "C ALL NX word c'Programmer/analy' 'Programmer/Analyst'"
    "C ALL NX word c'SYSTEMS PROGR'    'SYSTEMS PROGRAMMER'"
    "C ALL NX word c'Systems Progr'    'Systems Programmer'"
    "C ALL NX word c'PROGRAMMER/AN'    'PROGRAMMER/ANALYST'"
    "C ALL NX word c'Programmer/An'    'Programmer/Analyst'"