Re: Convert signed COMP-3 variable into unsigned integer

All you really need is: MOVE WS-VAR1 TO WS-VAR4 COBOL takes care of unpacking the data, dropping the sign. and truncating the decimal places. On Mon, Aug 10, 2009 at 8:40 AM, Gangar, Parin (MLITS) wrote: > Hi, > > I want to convert S9(13)V99 COMP-3 to simply 9(13). > > I declared following in W

Convert signed COMP-3 variable into unsigned integer

Hi, I want to convert S9(13)V99 COMP-3 to simply 9(13). I declared following in Working Storage section - 01 WS-VAR1 PIC S9(13)V99 COMP-3. 01 WS-VAR2 PIC S9(13)V99. 01 WS-VAR3 redefines WS-VAR2. 05 WS-VAR3-redef PIC 9(13)V99. 01 WS-VAR4