RE: Useful CODE/400 Macros

What about using faq.midrange.com?  Would this be an appropriate use of
that?  Each person add's their own.

Phil



> -----Original Message-----
> From: code400-l-admin@midrange.com
> [mailto:code400-l-admin@midrange.com]On Behalf Of craigs@dekko.com
> Sent: Friday, January 18, 2002 8:06 AM
> To: code400-l@midrange.com
> Subject: Re: Useful CODE/400 Macros
>
>
> I think a place for shared macros, etc would be great.  I am
> wondering what
> IBM thinks about this and their shared macros website (link is below).  I
> think others might want to post some sample macros and such in relation to
> this CODE400 midrange.com.  Someone would have to be willing to update the
> website with new files.  I suppose you would see the same issues
> at the RPG
> midrange.com.  Maybe a link within the CODE400 midrange.com website and
> have someone at midrange.com update the website?  I would hate
> for Scott to
> be bogged down with requests when it probably should not be his
> responsibility.  Would someone at IBM or supporting the CODE400
> midrange.com please let us know what you plan for people who want to post
> files?  If you plan on updating your shared macros website, please let me
> know and I will email them to you.  If you want Scott to post the files, I
> will see if he would do that.  It might be a good idea to have a link to
> this or whatever other site agreed on within the CODE400 midrange.com
> website.
> I know there is a link within CODE/400 to this shared macros
> website, but I
> always forget how to get to it and other links.  Here are some
> links I keep
> around.
>
> For support, other macros, and CODE/400 downloads links, see the following
> website:
> http://www14.software.ibm.com/webapp/download/product.jsp?cat=ad&s
> =c&id=TDUN-49EVDN&pf
>
> &presb=&type=t&postsb=
> or http://www-3.ibm.com/software/ad/varpg/support/moresupport.html
>
> For frequently asked questions (FAQ):
> http://www-3.ibm.com/software/ad/varpg/support/cwintips.htm
>
> Modifying Editor Behavior Permanently
> http://localhost:49213/cgi-bin/vahwebx.exe/vahelp/va400/Extract/0/
> qadtswin/evffaq111.htm#HDRETH274
>
>
> Prevent my changes from being lost at release upgrades
> http://localhost:49213/cgi-bin/vahwebx.exe/vahelp/va400/Extract/0/
> qadtswin/evffaq96.htm#HDRPREVENT
>
> Thanks,
> Craig Strong
> craigs@dekko.com
>
>
> *** Phil wrote:
> Message-ID: <20020116183539.24751.qmail@web13806.mail.yahoo.com>
> Date: Wed, 16 Jan 2002 10:35:39 -0800 (PST)
> From: Phil Groschwitz <sublime78ska@yahoo.com>
> Subject: Re: Useful CODE/400 Macros
> To: code400-l@midrange.com
> In-Reply-To: <OF6AA88420.51C09CCE-ON86256B43.0064D367@HIGHSMITH.COM>
> MIME-Version: 1.0
> content-type: text/plain; charset=us-ascii
> Sender: code400-l-admin@midrange.com
> Precedence: bulk
> Reply-To: code400-l@midrange.com
> List-Help: <mailto:code400-l-request@midrange.com?subject=help>
> List-Post: <mailto:code400-l@midrange.com>
> List-Subscribe: <http://lists.midrange.com/cgi-bin/listinfo/code400-l>,
> <mailto:code400-l-request@midrange.com?subject=subscribe>
> List-Id: CODE/400 Discussion & Support <code400-l.midrange.com>
> List-Unsubscribe: <http://lists.midrange.com/cgi-bin/listinfo/code400-l>,
> <mailto:code400-l-request@midrange.com?subject=unsubscribe>
> List-Archive: <http://archive.midrange.com/code400-l/>
>
> I think that would be great.
>
>
> --- Scott Johnson <sjohnson@highsmith.com> wrote:
> >
> > Craig and Others,
> >
> > If we need someplace to offer these and/or other
> > Code Macros besides an IBM
> > site, I can offer up my personal site at
> > www.veriteccomputing.com .  I
> > already have some VARPG stuff there. I was going to
> > add my own Code macros
> > to it, but never got around to it.  I changed
> > positions and got away from
> > using CODE. Now I am back.
> >
> > I am not trying to promote anything on that site.  I
> > no longer have the
> > time to run a sideline consulting service and never
> > got around to changing
> > the site.  I just want to offer it up as a place to
> > put stuff like the
> > macros.
> >
> > --
> >
> ------------------------------------------------------
> > Scott P. Johnson
> > Applications Development Team Coordinator
> > Microcomputer Development Specialist
> > IBM Certified Specialist - AS/400 RPG Programmer
> >
> ------------------------------------------------------
> >
> >
> >
> >                     craigs@dekko.com
> >                     Sent by:                  To:
> >  code400-l@midrange.com
> >                     code400-l-admin@mi        cc:
> >                     drange.com
> > Subject:     Useful CODE/400 Macros
> >
> >
> >                     01/16/2002 12:03
> >                     PM
> >                     Please respond to
> >                     code400-l
> >
> >
> >
> >
> >
> >
> > 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.
> >
> >
> >
> >
> >
> > _______________________________________________
> > 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/
>
>
> _______________________________________________
> 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!?
Get your free @yahoo.com address at http://mail.yahoo.com