RE: "Extract Fields" problem

["Scott Johnson" <sjohnson@xxxxxxxxxxxxx>]

Dave,
1. Yes, you should be able to do it that way.  I think the way they have
CODE set up is that it should find and use the Fields.lx in your MyMacros
folder first.

2.  I have a space in mine, so the first one listed.

3.  Did you search for it? Mine is in \WDT400\extras.  This is the profile
macro that sets up the "Extras" pull down in CODE. You should have one
unless you have really changed your CODE profile macros around.

-- Scott Johnson


Okay, a few clarifying questions:

1.  I should first copy the FIELDS.LX macro to MyMacros folder, then edit
THAT copy, correct?

2.  Do I want a blank between the second apostrophe and LEFT?  In other
words, is it
       'insert ' LEFT(stuff,80)    or
       'insert 'LEFT(stuff,80)     ??

3.  I don't have a PROFSYS.LXU file, but I do have a PROFILE.LX in MyMacros
folder.  I assume I can add the PopupMenu line to that.  I don't understand
the part about adding "it to the IF at the end of the profile source."  I
don't have an "IF" at the end.  What's the format of THAT?


This is great stuff!

Dave


> -----Original Message-----
> From: code400-l-admin@midrange.com
> [mailto:code400-l-admin@midrange.com]On Behalf Of Scott Johnson
> Sent: Tuesday, November 06, 2001 12:19 PM
> To: code400-l@midrange.com
> Subject: RE: "Extract Fields" problem
>
>
>
> David,
>
> For the error, try this:  Edit the file
> ?:\WDT400\macros\fields.lx in CODE.
> At about line 326 you should see the statement 'insert
> 'stuff. Change this
> line to
> 'insert ' LEFT(stuff,80).  Warning:  I did not have any long text
> descriptions to test this on!
>
> To add the option to the pop-up menu from the right mouse
> button, add the
> following to your profsys.lxu file (or the profile file of
> your choice):
>                'SET POPUPMENU.Extract_fields_(LIST) MACRO FIELDS'
> The single ticks are needed. If you want it only available
> for RPG source,
> add it to the IF at the end of the profile source.  I did not
> actually test
> this, but in theory it should work.
>
> --
> ------------------------------------------------------
> Scott P. Johnson
> Applications Development Team Coordinator
> Microcomputer Development Specialist
> IBM Certified Specialist - AS/400 RPG Programmer
> Highsmith Inc.
> W5527 Hwy 106, PO BOX 800
> Fort Atkinson, WI 53538-0800
> TEL:  920-563-9571                FAX:  920-563-7395
> sjohnson@highsmith.com
> www.highsmith.com
> ------------------------------------------------------