HIGH vaules and LOW values

, ,
1

Hi,

How can I move HIGH and LOW values in Natural?

Can I do it like below

MOVE H’00’ TO VAR1
MOVE H’99’ TO VAR2

Thanks,
Mishra

2

Yes or more reusable:
Make a local - perhaps with a redefine if you migh need that ?
1 HIGH-VALUE (B1) INIT
1 REDEFINE HIGH-VALUE
2 HIGH-VALUE-A (A1)
1 LOW-VALUE (B1) INIT
1 REDEFINE LOW-VALUE
2 LOW-VALUE-A (A1)

You can then use a syntax like in COBOL
Move HIGH-VALUE to VAR1

Finn

3

You may want to change the move slightly:

MOVE ALL H'00' TO #VAR
4

and for high value, use:

MOVE H'FF'  TO #VAR