Thomas,
I posted this already, but in case it didn't make it to you (or
others)
There *IS* a method of insuring that old programs will compile cleanly and
that new programs can use partial word replacement with ":TAG:". This
method does allow the original "owner" to still own the COPY member. No
testing should be required - but certainly can be. Changes in the middle of
the night will still compile.
If you have a current copymember called "ABC" with the following code:
01 Group1.
05 WS-Field1 Pic X.
05 WS-Field2 Pic 9.
You want programs that use "COPY ABC." to continue to work "as is" but you
want to be able to change "WS-" in some cases.
Replace the member ABC with the following code:
Replace ==:TAG:== By ==WS-==.
Copy ABCX.
Replace off.
Then create a new member called ABCX with the following code:
01 Group1.
05 :TAG:Field1 Pic X.
05 :TAG:Field2 Pic 9.
***
All existing programs will continue to work without modification.
New programs (or changes to existing programs that want partial word
replacement) can use:
Copy ABCX
Replacing ==:TAG:== by ==New-Prefix-==.
* * *
Yes, this requires the "cooperation" of the owner of original member "ABC" -
but it should be a minimal change and will not impact any existing
functional programs.
"Thomas Berg" <[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>.
..
> > -----Ursprungligt meddelande-----
> > Från: IBM Mainframe Discussion List
> > [mailto:[EMAIL PROTECTED] För Howard Brazee
> > Skickat: den 14 november 2007 17:34
> > Till: [email protected]
> > Ämne: Re: SV: SV: COBOL COPY statement w REPLACING...
> >
> > On 13 Nov 2007 10:33:54 -0800, [EMAIL PROTECTED] (Thomas Berg) wrote:
> >
> > >> How many copy members have you created designed for the REPLACING
> > >> option?
> > >
> > >None. (The "new" COPY's must be backwards compatible with
> > old programs.)
> >
> > Old programs don't use new COPY statements unless they are modified to
> > do so.
> >
> > But future programs will.
> >
>
> Old programs that are recompiled get the "new" copys/versions.
> And fails in compilation if they contains the ":tag:" format
> (if they - as I mentioned - are not using REPLACING).
> And that is not acceptable.
>
> Thomas
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
