Re: Useful CODE/400 Macros -- CODE400-L

Is there a place on midrange.com where source code can
be placed?  Or maybe in the FAQ?

Just a thought.

Phil


--- craigs@dekko.com wrote:
> Since we are on the subject of wish lists, I thought
> I would mention the
> macros I have and use on a regular basis.  I meant
> to mention this earlier.
> Every one of them I have created in-house or
> modified from the website for
> ultimate flexibility, elimination of errors, and
> ease of use.  Some of the
> macros like clipline.lx and modmark.lx on the
> website, had errors so I
> stopped using them but modified them instead.  I am
> willing to share them
> with IBM if they are interested.  I use CODE/400
> quite a bit and I have
> been using the following macros for quite awhile:
> 1. ModBlock.lx - Used to fill in a modification mark
> in positions 1-5 and
> can also be used to update the modification date
> depending on what parm you
> pass.  You can select a block in any fashion
> (select/mark) and the block
> will be modified.  You can even use the select all
> to modify the blocks.
> Of course, if you don't even select anything, the
> line you are on
> automatically gets selected.  Since both functions
> have the same type of
> processing, they are in one macro.  Other errors
> like cutting off the
> comments in ILE RPG are now fixed.  Also allows
> blanking out a mod mark or
> zeroing out a date.  Written by Scott Johnson as
> Mod2, rewritten by Craig
> Strong as ModBlock.  I think this is also a good
> example of using
> subroutines in REXX.
>
> 2. ClipLine.lx - Uses the mark text method for
> cut/copy.  Now includes an
> identification of a block as unmarked by blocktype =
> 'UNSET' method to
> handle all selections like ModBlock.lx does.  I
> think there are some
> original errors that are fixed now too.
> Written by David Morris, modified by Brian James for
> mark text, and
> modified by Craig Strong to fix original errors.
>
> 3. Create_Subroutine_RPG (also as RPGLE) - Create
> subroutine.  Written by
> Craig Strong.  Note: This macro might not want to be
> used as is because you
> would want comments different ways.  It prompts for
> the comment and then
> the name of the subroutine.
>
> If anyone would like any of these macros, please
> e-mail me and I will send
> them out right away.
> The original authors of the first two macros did an
> excellent job writing
> them and setting a strong foundation, I just took
> them some steps further.
> Maybe other people can come up with different mods.
> I could still see a
> use for the ModBlock macro after the IBM
> modification in service pack 5 to
> include a SIGNATURE as a Mod Mark when adding a
> line.
>
> Thanks,
> Craig Strong
> craigs@dekko.com
>
> _______________________________________________
> This is the CODE/400 Discussion & Support
> (CODE400-L) mailing list
> To post a message email: CODE400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit:
> http://lists.midrange.com/cgi-bin/listinfo/code400-l
> or email: CODE400-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/code400-l.
>


__________________________________________________
Do You Yahoo!?
Send FREE video emails in Yahoo! Mail!
http://promo.yahoo.com/videomail/