MQSeries.net :: View topic

srailkar · Posted: Wed Oct 25, 2006 4:45 am Post subject: Ascii to signed decimal (ebcdic)

Can anyone tell me how to convert ascii value '-1274.47' to signed implied decimal ebcdic '2744M'?

My message flow is on Windows platform.
In the cobol copybook the field is :
PREMIUM PIC S9(09)V9(02).

The message set is created from cobol copy book with
Source Platform: WIN32
CodePage: ISO8859_1
Floating point format: IBM 390 Hex

Byte order : Little Eidian
External decimal sign : EBCDIC
TRUNC: BIN

bottom portion all 'ticked'

INPUT is XML PremiumTotal="-274.47"

In the message flow:
SET OutputLocalEnvironment.Variables.XML.HOLD.PremiumTotal = LTRIM(FIELDVALUE(InputRoot.XMLNS.ISI_CERT.(XML.Attribute)PremiumTotal));

in the mapping node I have:
$mq:InputLocalEnvironment.Variables.XML.HOLD.PremiumTotal

What I am receiving on the output queue is'2744w'.

Advice please.
Thanks.
SRailkar