You need to have '()' around the subject to replace.

         01  ACTIVITY-RECORD.
             05  (AC)-VEH-OR-UNIT.
                 10  (AC)-UNIT-TYPE.
                     15  (AC)-VEH-NO           PIC 9(4).
                     15                      PIC X(4).
                 10  (AC)-UNIT-SER-NO          PIC X(10).
             05  (AC)-ACT-CODE                 PIC X(6).
             05  (AC)-COMPL-CODE               PIC XX.
             05  (AC)-ROAD-CALL                PIC XX.

COPY ACTIV REPLACING ==(AC) BY ==AX==.


Ray Shahan



> -----Original Message-----
> From: Tracy Pierce [SMTP:[log in to unmask]]
> Sent: Tuesday, March 26, 2002 11:15 AM
> To:   [log in to unmask]
> Subject:      Re: $Include vs. COPY
>
> My impression has always been that HP COBOL's COPY REPLACING is crippled
> beyond usage; I'd sure love to be corrected.  So how exactly do you make
> it
> work?  fregzample, I have a copybook ACTIV, which reads (snipped)
> something
> like
>  01  ACTIVITY-RECORD.
>      05  AC-VEH-OR-UNIT.
>          10  AC-UNIT-TYPE.
>              15  AC-VEH-NO           PIC 9(4).
>              15                      PIC X(4).
>          10  AC-UNIT-SER-NO          PIC X(10).
>      05  AC-ACT-CODE                 PIC X(6).
>      05  AC-COMPL-CODE               PIC XX.
>      05  AC-ROAD-CALL                PIC XX.
> etc, with about a hundred fields.  and of course what I want is COPY ACTIV
> REPLACING ==AC-== BY ==AX-==.  gets me no changes, as is predicited by the
> excellent docs.  got a hint?
>
> TIA
>
>
> K Tracy Pierce
> Systems Programmer
> Golden Gate Bridge, Hwy & Trnsp Dist
> P.O.Box 9000, Presidio Station
> San Francisco CA  94129-0601
> 415-923-2266
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

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