COBOL Like MOVE Command at a Breakpoint

Accessing Main Storage: CORE › Breakpoint Commands › COBOL Like MOVE Command at a Breakpoint

COBOL Like MOVE Command at a Breakpoint

The MOVE command is valid for COBOL and PL/I programs stopped at a breakpoint.It has two formats:

To move the contents of field 1 to field 2, enter:
```
CORE=MOVE field 1 TO field 2
```
To move a literal to a field, enter:
```
CORE=MOVE literal TO field 2
```

field 1: Names the sending area.
field 2: Names the receiving area. Both fields must be defined in the program. Do not enclose either field name in quotes. Qualify, index, or subscript either field.
literal: Indicates a fixed point numeric value, a string of EBCDIC characters, or a keyword, such as ZERO or SPACES.
fixed point literal: Indicates a string of up to 18 decimal digits with an optional leading plus, +, or minus sign, . (No sign defaults to +.) Embedded decimal points are not allowed.

Specify any string of characters from one to 120 EBCDIC characters enclosed in quotes as a literal. A quotation mark cannot be part of the character string defining the literal.

Use the following keywords as literals:

Literal Keyword	Actual value
ZERO	Numeric value 0
SPACE	One or more blanks (X'40')
HIGH‑VALUE	One or more occurrences of X'FF'
LOW‑VALUE	One or more occurrences of X'00'
QUOTE	One or more occurrences of the quotation mark (X'7D')

Note: Append the letter S to any of the previous keywords without changing its meaning. For example, the command MOVE SPACES TO CUSTNAME is equivalent to MOVE SPACE TO CUSTNAME.

To repetitively fill a field with a particular character string or decimal digit, precede the literal with the keyword ALL followed by a space. For example, ALL 'XYZ' or ALL 9. The literal following ALL is any valid EBCDIC character string enclosed in quotes. If the literal following ALL is a numeric, it must be a single unsigned decimal digit.

The MOVE command handles only certain data types and makes any required conversions from one data type to another. The conversions follow the examples specified in the IBM Full American National Standard COBOL Reference Manual. The fields are checked for numeric content, as needed.

A list of supported data types and the corresponding conversion rules follows:

Data Type	Conversion Value
GROUP	Data is left justified with no conversion. This type of move is made if either the sending or receiving field has group data.
DISPLAY	Data conversion is performed with left justification.
DISPLAY NUMERIC	Data conversion is performed with right justification.
COMP‑3	Data conversion is performed.
COMP	Data conversion is performed.
ALPHANUMERIC EDITED	Handled as DISPLAY, but without editing.
NUMERIC EDITED	Handled as NUMERIC, but without editing.