HP3000-L Archives

March 2002, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
John Pollard <[log in to unmask]>
Reply To:
John Pollard <[log in to unmask]>
Date:
Wed, 27 Mar 2002 19:17:42 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (35 lines)
"Roy Brown" <[log in to unmask]> wrote

> BTW do we believe the REPLACE... REPLACING syntax of Example 2 for
REPLACE,
> which doesn't appear in the overall syntax specification for this
command,
> and doesn't seem to be explained at all clearly?
>
> I don't see how you use it......


Do you mean the example in the HP online Cobol Reference Manual?  This
one?

------------------------------------------------------------------------
------------------
Assume the source program contains the following text before the
replacement:[REV END]

             01   (FIRST)-RECORD        PIC X(80).
[REV BEG]

After the following REPLACE statement[REV END]

     REPLACE COPY-MODULE REPLACING ==(FIRST)== BY ==INPUT==.

the resultant text is:

             01   INPUT-RECORD          PIC X(80).
------------------------------------------------------------------------
---------------------

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2