Code: Select all
Input: Displays:
532.37 532.37
1.50 1.50
0.80 80. *here's the error
Code: Select all
oBal = 0.80
Thanks,
-RC
Code: Select all
Input: Displays:
532.37 532.37
1.50 1.50
0.80 80. *here's the error
Code: Select all
oBal = 0.80
Code: Select all
A INDARA
A R TEST
A 1 2HTML('QPUIREC0 ')
A 1 3HTML('{"screen":{"record format nam-
A e":"TEST"},"items":[{"id":"OutputFi-
A eld1","field type":"output field","-
A value":{"fieldName":"oOutput1","dat-
A aLength":"9","decPos":"2","numSep":-
A "false","zeroBalance":"false","zero-
A Fill":"false","curSym":"","dataType-
A ":"zoned","formatting":"Number","un-
A its":"","negNum":"-999.00","designV-
A alue":"[oOutput1]"},"left":"65px","-
A top":"15px"},{"id":"Label1","field -
A type":"output field","value":"0.50 -
A =","left":"10px","top":"15px","font-
A weight":"bold","text align":"right-
A ","width":"45px"},{"id":"Label2","f-
A ield type":"output field","value":"-
A Decimal, length 9, decimals 2, with-
A out 1000 separator","left":"145px",-
A "top":"15px","font weight":"bold","-
A text align":"left","width":"355px"}-
A ,{"id":"OutputField2","field type":-
A "output field","value":{"fieldName"-
A :"oOutput2","dataLength":"9","decPo-
A s":"2","numSep":"true","zeroBalance-
A ":"false","zeroFill":"false","curSy-
A m":"","dataType":"zoned","formattin-
A g":"Number","units":"","negNum":"-9-
A 99.00","designValue":"[oOutput2]"},-
A "left":"65px","top":"40px"},{"id":"-
A Label2_copy","field type":"output f-
A ield","value":"Decimal, length 9, d-
A ecimals 2, with 1000 separator","fo-
A nt weight":"bold","text align":"lef-
A t","left":"145px","top":"40px","wid-
A th":"355px"}]}')
A OOUTPUT1 9S 2H
A OOUTPUT2 9S 2H
Code: Select all
H DFTACTGRP(*NO)
H/DEFINE PROFOUNDUI
//
FPUITESTFM CF E Workstn EXTFILE('RECLIB/PUITESTFM')
/free
oOutput1 = 0.50;
oOutput2 = 0.50;
exfmt TEST;
*INLR = *On;
/end-free
Code: Select all
0.50 = .50 Decimal, length 9, decimals 2, without 1000 separator
50. Decimal, length 9, decimals 2, with 1000 separator
Code: Select all
0.50 = .50 Decimal, length 9, decimals 2, without 1000 separator
.50 Decimal, length 9, decimals 2, with 1000 separator
Users browsing this forum: No registered users and 3 guests