× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Brian,

Two comments:

1) The code you show has a minor syntax error - there's no End to go with
the Do.

2) For anyone (like me) who uses the mouse occasionally as well as the
shortcut keys, it's nice to also include

        'set action.button1double BLOCK MARK WORD'

This keeps the mouse button 1 double-click action the same as Ctl-T.

Thanks for the idea and the code!

Dave Shaw
Rauch Industries, Inc.
Gastonia, NC

-----Original Message-----
From: Brian D. James [mailto:bjames@isdsolutions.net]

In an earlier post I expressed a dislike for the way the <Ctrl+T> SELECTWORD
function works. It selects the entire RPG field the cursor is in instead of
just the RPG symbolic name the cursor is on. The following is the workaround
I'm now using to achieve my desired results.

First, I made the following modification to my profile.lx file to add the
special characters allowed in RPG symbolic names to the characters
considered as part of a WORD.


/* load customizations for specific document types */
'extract doctype'

   /* RPG source file customizations */
if doctype='RPG' | doctype = 'IRP' then do

      /* Add the special characters (@,#,$,_) allowed in RPG symbolic    */
      /* names to the list of characters that are considered part of a   */
      /* word - This allows for the BLOCK MARK WORD function <Ctrl+T> to */
      /* select the entire RPG symbolic name.                            */
       'extract wordchars into a'
       'set wordchars 'a'#@$_'
   /* end RPG source file customizations */


Then, I modified my profile.lx file to change the action for <Ctrl+T> from
SELECTWORD to BLOCK MARK WORD.


 'set action.c-t BLOCK MARK WORD'


Using this workaround, pressing <Ctrl+T> now selects only the RPG symbolic
name (e.g., record format name or variable name) the cursor is positioned
on.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.