Focal Point
[SOLVED] Needing help

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/5757091076

April 16, 2014, 03:32 PM
Don Robison
[SOLVED] Needing help
03 VI001-FIXD-INT-RATE-PCT PIC SV9(5) COMP-3. ---- .00050
03 VI001-VAR-INT-RATE-PCT PIC SV9(5) COMP-3. ---- .00025
03 VI001-PR-INTEREST-PCT PIC SV9(5) COMP-3. ---- .00035


I am just unsure of what is should convert to.
????? ??
FIELD=FIXD_INT_RATE_PCT,FIXD_INT_RATE_PCT,USAGE=P0.5S ,ACTUAL=P2,MISSING=OFF,$

This message has been edited. Last edited by: <Kathryn Henning>,


Version 7.17
April 25, 2014, 07:11 PM
<Kathryn Henning>
Hi All,

Please see the discussion for this issue in Needing help with the conversion of the following fields from IBM.

Regards,

Kathryn
April 26, 2014, 02:35 PM
Danny-SRL
Don,
IBM COMP-3 fields are packed, 2 digits per byte + another half byte for the sign. V indicates the position of the virtual decimal point.
In your examples you have SV9(5), meaning 5 digits and a sign = 6 half bytes = 3 bytes.
In FOCUS you would code this: USAGE=P7.5, ACTUAL=P3, $
ACTUAL=P3 => 3 bytes packed
USAGE=P7.5 => 7 digits including the decimal point with 5 digits after the decimal point


Daniel
In Focus since 1982
wf 8.202M/Win10/IIS/SSA - WrapApp Front End for WF

April 28, 2014, 04:38 PM
Don Robison
This has been SOLVED think you for your help
Don R


Version 7.17