Function CVT_get_dec128

src/common/cvt.cpp:3058–3139

Decimal128 CVT_get_dec128(const dsc* desc, DecimalStatus decSt, ErrorFunction err)
{
/**************************************
 *
 *      C V T _ g e t _ d e c 1 2 8
 *
 **************************************
 *
 * Functional description
 *      Convert something arbitrary to a DecFloat(34) / (128 bit).
 *
 **************************************/
	VaryStr<1024> buffer;			// represents unreasonably long decfloat literal in ASCII
	Decimal128 d128;

	// adjust exact numeric values to same scaling
	int scale = 0;
	if (DTYPE_IS_EXACT(desc->dsc_dtype))
		scale = -desc->dsc_scale;

	const char* p = reinterpret_cast<char*>(desc->dsc_address);

	try
	{
		switch (desc->dsc_dtype)
		{
		case dtype_short:
			return d128.set(*(SSHORT*) p, decSt, scale);

		case dtype_long:
			return d128.set(*(SLONG*) p, decSt, scale);

		case dtype_quad:
			return d128.set(CVT_get_int64(desc, 0, decSt, err), decSt, scale);

		case dtype_int64:
			return d128.set(*(SINT64*) p, decSt, scale);

		case dtype_varying:
		case dtype_cstring:
		case dtype_text:
			make_null_string(desc, ttype_ascii, &p, &buffer, sizeof(buffer) - 1, decSt, err);
			try
			{
				return d128.set(buffer.vary_string, decSt);
			}
			catch (const Exception& e)
			{
				checkForIndeterminant(e, desc, err);
				throw;
			}

		case dtype_real:
			return d128.set(*((float*) p), decSt);

		case dtype_double:
			return d128.set(*((double*) p), decSt);