Copy Characters Left Adjust with Optional Pad

MOVEL - Demonstration Procedure to Simulate Fixed Format MOVEL in Free Format

The MOVEL procedure is basically a replacement for the MOVEL opcode. the MOVEL procedure may be used within expressions and between /FREE and /END-FREE statements. In these situations the MOVEL opcode itself is not allowed.

The MOVEL procedure is a free-format substitute for the MOVEL opcode which is unavailable in free format RPG IV. The MOVEL procedure works with character variables only.

void Move(
  szSource       32766A   OPTIONS(*VARSIZE)
  szTarget       32766A   VALUE VARYING
  szPAD              1A   CONST OPTIONS(*NOPASS)
)

Parameters

szSource

[input VChar(*)]  The source variable that contains the original data to be copied.

szTarget

[input VChar(*)]  The target variable that will receive the data that is being copied.

Return Value

The function has no return value.

Remarks

This procedure is intended for demonstration purposes only and should not be considered a replacement for the MOVEL or EVAL operation codes.