mirror of
https://git.postgresql.org/git/postgresql.git
synced 2026-02-16 11:26:59 +08:00
b9d2c5c7ac
Money values exceeding about 18 digits (depending on lc_monetary) could be inaccurately converted to numeric, due to select_div_scale() deciding it didn't need to compute any fractional digits. Force its hand by setting the dscale of one division input to equal the number of fractional digits we need. In passing, rearrange the logic to not do useless work in locales where money values are considered integral. Per bug #15925 from Slawomir Chodnicki. Back-patch to all supported branches. Discussion: https://postgr.es/m/15925-da9953e2674bb5c8@postgresql.org
132 lines
3.7 KiB
SQL
132 lines
3.7 KiB
SQL
--
|
|
-- MONEY
|
|
--
|
|
-- Note that we assume lc_monetary has been set to C.
|
|
--
|
|
|
|
CREATE TABLE money_data (m money);
|
|
|
|
INSERT INTO money_data VALUES ('123');
|
|
SELECT * FROM money_data;
|
|
SELECT m + '123' FROM money_data;
|
|
SELECT m + '123.45' FROM money_data;
|
|
SELECT m - '123.45' FROM money_data;
|
|
SELECT m / '2'::money FROM money_data;
|
|
SELECT m * 2 FROM money_data;
|
|
SELECT 2 * m FROM money_data;
|
|
SELECT m / 2 FROM money_data;
|
|
SELECT m * 2::int2 FROM money_data;
|
|
SELECT 2::int2 * m FROM money_data;
|
|
SELECT m / 2::int2 FROM money_data;
|
|
SELECT m * 2::int8 FROM money_data;
|
|
SELECT 2::int8 * m FROM money_data;
|
|
SELECT m / 2::int8 FROM money_data;
|
|
SELECT m * 2::float8 FROM money_data;
|
|
SELECT 2::float8 * m FROM money_data;
|
|
SELECT m / 2::float8 FROM money_data;
|
|
SELECT m * 2::float4 FROM money_data;
|
|
SELECT 2::float4 * m FROM money_data;
|
|
SELECT m / 2::float4 FROM money_data;
|
|
|
|
-- All true
|
|
SELECT m = '$123.00' FROM money_data;
|
|
SELECT m != '$124.00' FROM money_data;
|
|
SELECT m <= '$123.00' FROM money_data;
|
|
SELECT m >= '$123.00' FROM money_data;
|
|
SELECT m < '$124.00' FROM money_data;
|
|
SELECT m > '$122.00' FROM money_data;
|
|
|
|
-- All false
|
|
SELECT m = '$123.01' FROM money_data;
|
|
SELECT m != '$123.00' FROM money_data;
|
|
SELECT m <= '$122.99' FROM money_data;
|
|
SELECT m >= '$123.01' FROM money_data;
|
|
SELECT m > '$124.00' FROM money_data;
|
|
SELECT m < '$122.00' FROM money_data;
|
|
|
|
SELECT cashlarger(m, '$124.00') FROM money_data;
|
|
SELECT cashsmaller(m, '$124.00') FROM money_data;
|
|
SELECT cash_words(m) FROM money_data;
|
|
SELECT cash_words(m + '1.23') FROM money_data;
|
|
|
|
DELETE FROM money_data;
|
|
INSERT INTO money_data VALUES ('$123.45');
|
|
SELECT * FROM money_data;
|
|
|
|
DELETE FROM money_data;
|
|
INSERT INTO money_data VALUES ('$123.451');
|
|
SELECT * FROM money_data;
|
|
|
|
DELETE FROM money_data;
|
|
INSERT INTO money_data VALUES ('$123.454');
|
|
SELECT * FROM money_data;
|
|
|
|
DELETE FROM money_data;
|
|
INSERT INTO money_data VALUES ('$123.455');
|
|
SELECT * FROM money_data;
|
|
|
|
DELETE FROM money_data;
|
|
INSERT INTO money_data VALUES ('$123.456');
|
|
SELECT * FROM money_data;
|
|
|
|
DELETE FROM money_data;
|
|
INSERT INTO money_data VALUES ('$123.459');
|
|
SELECT * FROM money_data;
|
|
|
|
-- input checks
|
|
SELECT '1234567890'::money;
|
|
SELECT '12345678901234567'::money;
|
|
SELECT '123456789012345678'::money;
|
|
SELECT '9223372036854775807'::money;
|
|
SELECT '-12345'::money;
|
|
SELECT '-1234567890'::money;
|
|
SELECT '-12345678901234567'::money;
|
|
SELECT '-123456789012345678'::money;
|
|
SELECT '-9223372036854775808'::money;
|
|
|
|
-- special characters
|
|
SELECT '(1)'::money;
|
|
SELECT '($123,456.78)'::money;
|
|
|
|
-- documented minimums and maximums
|
|
SELECT '-92233720368547758.08'::money;
|
|
SELECT '92233720368547758.07'::money;
|
|
|
|
SELECT '-92233720368547758.09'::money;
|
|
SELECT '92233720368547758.08'::money;
|
|
|
|
-- rounding
|
|
SELECT '-92233720368547758.085'::money;
|
|
SELECT '92233720368547758.075'::money;
|
|
|
|
-- rounding vs. truncation in division
|
|
SELECT '878.08'::money / 11::float8;
|
|
SELECT '878.08'::money / 11::float4;
|
|
SELECT '878.08'::money / 11::bigint;
|
|
SELECT '878.08'::money / 11::int;
|
|
SELECT '878.08'::money / 11::smallint;
|
|
|
|
-- check for precision loss in division
|
|
SELECT '90000000000000099.00'::money / 10::bigint;
|
|
SELECT '90000000000000099.00'::money / 10::int;
|
|
SELECT '90000000000000099.00'::money / 10::smallint;
|
|
|
|
-- Cast int4/int8/numeric to money
|
|
SELECT 1234567890::money;
|
|
SELECT 12345678901234567::money;
|
|
SELECT (-12345)::money;
|
|
SELECT (-1234567890)::money;
|
|
SELECT (-12345678901234567)::money;
|
|
SELECT 1234567890::int4::money;
|
|
SELECT 12345678901234567::int8::money;
|
|
SELECT 12345678901234567::numeric::money;
|
|
SELECT (-1234567890)::int4::money;
|
|
SELECT (-12345678901234567)::int8::money;
|
|
SELECT (-12345678901234567)::numeric::money;
|
|
|
|
-- Cast from money to numeric
|
|
SELECT '12345678901234567'::money::numeric;
|
|
SELECT '-12345678901234567'::money::numeric;
|
|
SELECT '92233720368547758.07'::money::numeric;
|
|
SELECT '-92233720368547758.08'::money::numeric;
|