The MODIFY-ELEMENT substatement ADD-TEXT-MODIFICATION corrects text records of an object module and phases. This substatement generates a correction journal record (TXTP record) that contains the original contents of the text area.
With the MODIFY-MODIFICATION-DEFAULTS statement, you can specify that no correction journal record is to be created. Corrections without a correction journal record cannot be reversed by the REMOVE-MODIFICATION substatement.
This substatement may be used only for members of types R, C and L.
Format
ADD-TEXT-MODIFICATION | ||||||||||||||||||||||||||||||||||||
|
Operands
ADDRESS = <x-string 1..8>(...)
Specifies the address at which the member selected by MODIFY-ELEMENT is to be modified.
BASE-ADDRESS = *MODIFICATION-DEFAULT / <x-string 1..8>
Base address. The default BASE-ADDRESS is 0.
The base address is added to ADDRESS. The resulting correction address is as follows:
For ... | Relative to: |
---|---|
modules | start of CSECT |
phases | start of phase |
LLMs | start of CSECT if a CSECT has been specified |
start of sub-LLM if a sub-LLM has been specified | |
start of slice if a slice has been specified | |
start of LLM if nothing has been specified and the LLM only consists of one slice. |
NEW-CONTENTS = <x-string 1..100>(...) / <c-string 1..50 with-low>(...)
Replacement text specified in character or hexadecimal form.
OLD-CONTENTS = *ANY / <x-string 1..100> / <c-string 1..50 with-low>
Original text of the member. The original text must always be specified with the same length as the replacement text.
OLD-CONTENTS = *ANY
Any old contents are replaced.
MODIFICATION-ID = *MODIFICATION-DEFAULT / *SPACES / <c-string 1..12 with-low>
Identification which is held in the correction journal record (TXTP record). If SPACES is specified, blanks are used as the identification. The preset value are blanks or the value set with MODIFY-MODIFICATION-DEFAULTS.
For member types R and C, only 8 characters are allowed.
The identification for types R and C is to have the form 'Annnnnnn', and the form 'Annnnnnn-jjj' for type L, where Annnnnnn is a problem report number and jjj is a Julian date.