Re: CL: BINARY(4) -> DEC?

[Scott Klement <midrange-l@xxxxxxxxxxxxxxxx>]

Hi Mike,

> What is the proper procedure in CL to convert the BINARY(4) Batch jobs
> waiting for messages output from QWCRSSTS to DEC(<len> 0)?

I guess it depends on how you've got BINARY(4) fields defined in your CL
programs.  In V5R2 and earlier, it's usually defined as:

       DCL VAR(&MYVAR) TYPE(*CHAR) LEN(4)

but, in V5R3 there are actual integer data types that you can use instead.

Assuming that you want to use the V5R2 and below method, you can do the
following:

       DCL VAR(&MYDEC) TYPE(*DEC) LEN(10 0)
       DCL VAR(&MYBIN) TYPE(*CHAR) LEN(4)

       CHGVAR VAR(&MYDEC) VALUE(%BIN(&MYBIN))