The PRFMINE XEDIT macro, part of
  http://www.vm.ibm.com/download/packages/descript.cgi?GD-XEDIT
has a CMTB prefix command to make a new, empty, comment box.  But,
when entered one a label line like this
  MySubroutine: /* perform a check */
it gets converted to:
  /*----------------------------------------------------------*/
  MySubroutine: /* perform a check                            */
  /*----------------------------------------------------------*/
(this doesn't look nicely aligned with a variable font)

2008/4/16, Schuh, Richard <[EMAIL PROTECTED]>:
> I have an XEDIT macro that operates as a prefix command. It turns specified 
> lines into comments. It has the ability to turn blocks of lines into 
> comments, as well. Here is an example using a snippet of code from SMTPNOTE 
> EXEC:
>
>  Before - note the asterisks in the prefix area. That is the synonym I use.
>
>  00059 imp =''
>  *0060 fix =''
>  00061 enrich=''
>  0*062 nofill=''
>  00063 su = ''
>  00**  da = ''
>  00065 debug = 0
>  00066 batch = ''
>  00067 parms = translate(parms,'7C'x,'õ'); /* transl. at sign    98/11/10 RT 
> */
>  00068 i = 1                                 /* get number of parms.      */
>  **069 j = words(parms)                      /* get number of parms.      */
>
>
>  After
>
>  00059 imp =''
>  00060 /*fix ='' */
>  00061 enrich=''
>  00062 /*nofill='' */
>  00063 su = ''
>  00064 /*da = '' */
>  00065 /*debug = 0 */
>  00066 /*batch = '' */
>  00067 /*parms = translate(parms,'7C'x,'õ'); /* transl. at sign    98/11/10 
> RT */ */
>  00068 /*i = 1                                 /* get number of parms.      
> */ */
>  00069 /*j = words(parms)                      /* get number of parms.      
> */ */
>
>  Is this thee type of macro you seek?
>
>  Regards,
>
> Richard Schuh
>
>
>
>
>  > -----Original Message-----
>  > From: The IBM z/VM Operating System
>  > [mailto:[EMAIL PROTECTED] On Behalf Of Shimon Lebowitz
>  > Sent: Tuesday, April 15, 2008 3:01 PM
>  > To: [email protected]
>
> > Subject: Re: comment xedit macro ?
>  >
>  > I don't know about what "anyone" did, the best I can offer is
>  > my "change all of these lines to comments"
>  > macro.
>  >
>  > Shimon
>  >
>  > ---- Original message ----
>  > >Date:   Tue, 15 Apr 2008 13:57:46 -0700
>  > >From:   "Lionel B. Dyck" <[EMAIL PROTECTED]>
>  > >Subject:   comment xedit macro ?
>  > >To:   [email protected]
>  > >
>  > >   Has anyone developed a xedit command similar to the
>  > >   comment z/os ispf command (from the cbt tape) that
>  > >   they would be willing to share?
>  > >
>  > >   The ISPF Comment command syntax is something like
>  > >   this:
>  > >
>  > >   Comment comment-text
>  > >
>  > >   with an A (for after) or B (for before) on the
>  > >   desired line within the ISPF edit text.
>  > >
>  > >   It will build a REXX comment box with the
>  > >   comment-text within it
>  > >
>  > >   Thanks
>  > >
>  > >     ------------------------------------------------
>  > >
>  > >   Lionel B. Dyck, Consultant/Specialist
>  > >   Enterprise Platform Services, Mainframe Engineering
>  > >   KP-IT Enterprise Engineering
>  > >   925-926-5332 (8-473-5332) | E-Mail:
>  > >   [EMAIL PROTECTED]
>  > >   AIM: lbdyck | Yahoo IM: lbdyck
>  > >   Kaiser Service Credo: "Our cause is health. Our
>  > >   passion is service. We're here to make lives
>  > >   better."
>  > >   I never guess. It is a capital mistake to theorize
>  > >   before one has data. Insensibly one begins to twist
>  > >   facts to suit theories, instead of theories to suit
>  > >   facts.
>  > >   - Sir Arthur Conan Doyle
>  > >   NOTICE TO RECIPIENT: If you are not the intended
>  > >   recipient of this e-mail, you are prohibited from
>  > >   sharing, copying, or otherwise using or disclosing
>  > >   its contents. If you have received this e-mail in
>  > >   error, please notify the sender immediately by reply
>  > >   e-mail and permanently delete this e-mail and any
>  > >   attachments without reading, forwarding or saving
>  > >   them. Thank you.
>  >
>


-- 
Kris Buelens,
IBM Belgium, VM customer support

Reply via email to