00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00047 #ifndef COMSTL_INCL_COMSTL_UTIL_H_DECIMAL_FUNCTIONS
00048 #define COMSTL_INCL_COMSTL_UTIL_H_DECIMAL_FUNCTIONS
00049
00050 #ifndef STLSOFT_DOCUMENTATION_SKIP_SECTION
00051 # define COMSTL_VER_COMSTL_UTIL_H_DECIMAL_FUNCTIONS_MAJOR 1
00052 # define COMSTL_VER_COMSTL_UTIL_H_DECIMAL_FUNCTIONS_MINOR 0
00053 # define COMSTL_VER_COMSTL_UTIL_H_DECIMAL_FUNCTIONS_REVISION 2
00054 # define COMSTL_VER_COMSTL_UTIL_H_DECIMAL_FUNCTIONS_EDIT 3
00055 #endif
00056
00057
00058
00059
00060
00061 #ifndef COMSTL_INCL_COMSTL_H_COMSTL
00062 # include <comstl/comstl.h>
00063 #endif
00064
00065 #ifndef STLSOFT_INCL_H_OAIDL
00066 # define STLSOFT_INCL_H_OAIDL
00067 # include <oaidl.h>
00068 #endif
00069 #ifndef STLSOFT_INCL_H_WTYPES
00070 # define STLSOFT_INCL_H_WTYPES
00071 # include <wtypes.h>
00072 #endif
00073
00074
00075
00076
00077
00078 #if !defined(_COMSTL_NO_NAMESPACE) && \
00079 !defined(STLSOFT_DOCUMENTATION_SKIP_SECTION)
00080 # if defined(_STLSOFT_NO_NAMESPACE)
00081
00082 namespace comstl
00083 {
00084 # else
00085
00086
00087 namespace stlsoft
00088 {
00089
00090 namespace comstl_project
00091 {
00092
00093 # endif
00094 #endif
00095
00096
00097
00098
00099
00110 STLSOFT_INLINE int comstl__DECIMAL_compare(DECIMAL const* lhs, DECIMAL const* rhs)
00111 {
00112 COMSTL_MESSAGE_ASSERT("Cannot pass NULL pointer(s) to DECIMAL_compare()", (NULL != lhs && NULL != rhs));
00113 COMSTL_MESSAGE_ASSERT("invalid sign value in lhs", (0 == lhs->sign || DECIMAL_NEG == lhs->sign));
00114 COMSTL_MESSAGE_ASSERT("invalid sign value in rhs", (0 == rhs->sign || DECIMAL_NEG == rhs->sign));
00115
00116 if(lhs->sign != rhs->sign)
00117 {
00118
00119
00120
00121
00122 if( 0 == lhs->Hi32 &&
00123 0 == rhs->Hi32 &&
00124 0 == lhs->Mid32 &&
00125 0 == rhs->Mid32 &&
00126 0 == lhs->Lo32 &&
00127 0 == rhs->Lo32)
00128 {
00129 return 0;
00130 }
00131 else
00132 {
00133 if(0 != lhs->sign)
00134 {
00135
00136 return -1;
00137 }
00138 else
00139 {
00140 return +1;
00141 }
00142 }
00143 }
00144 else
00145 {
00146
00147 if(lhs->scale != rhs->scale)
00148 {
00149
00150
00151
00152 VARIANT vdecL;
00153 VARIANT vdecR;
00154 VARIANT vdblL;
00155 VARIANT vdblR;
00156
00157 VariantClear(&vdecL);
00158 VariantClear(&vdecR);
00159 VariantClear(&vdblL);
00160 VariantClear(&vdblR);
00161
00162 COMSTL_ACCESS_VARIANT_vt_BYREF(vdecL) = VT_DECIMAL;
00163 COMSTL_ACCESS_VARIANT_decVal_BYREF(vdecL) = *lhs;
00164
00165 COMSTL_ACCESS_VARIANT_vt_BYREF(vdecR) = VT_DECIMAL;
00166 COMSTL_ACCESS_VARIANT_decVal_BYREF(vdecR) = *rhs;
00167
00168 VariantChangeType(&vdblL, &vdecL, 0, VT_R8);
00169 VariantChangeType(&vdblR, &vdecR, 0, VT_R8);
00170
00171 if(COMSTL_ACCESS_VARIANT_MEM_BYREF(vdblL, dblVal) == COMSTL_ACCESS_VARIANT_MEM_BYREF(vdblR, dblVal))
00172 {
00173 return 0;
00174 }
00175 else if(COMSTL_ACCESS_VARIANT_MEM_BYREF(vdblL, dblVal) < COMSTL_ACCESS_VARIANT_MEM_BYREF(vdblR, dblVal))
00176 {
00177 return -1;
00178 }
00179 else
00180 {
00181 return +1;
00182 }
00183 }
00184 else
00185 {
00186
00187 if(lhs->Hi32 != rhs->Hi32)
00188 {
00189 return (lhs->Hi32 < rhs->Hi32) ? -1 : +1;
00190 }
00191 else
00192 {
00193 if(lhs->Mid32 != rhs->Mid32)
00194 {
00195 return (lhs->Mid32 < rhs->Mid32) ? -1 : +1;
00196 }
00197 else
00198 {
00199 if(lhs->Lo32 != rhs->Lo32)
00200 {
00201 return (lhs->Lo32 < rhs->Lo32) ? -1 : +1;
00202 }
00203 else
00204 {
00205 return 0;
00206 }
00207 }
00208 }
00209 }
00210 }
00211 }
00212
00213
00214
00215
00216
00217 #ifdef STLSOFT_DOCUMENTATION_SKIP_SECTION
00218 namespace comstl
00219 {
00220 #endif
00221
00222
00223
00224
00225
00226 #ifdef __cplusplus
00227
00238 inline int DECIMAL_compare(DECIMAL const* lhs, DECIMAL const* rhs)
00239 {
00240 return comstl__DECIMAL_compare(lhs, rhs);
00241 }
00242
00250 inline int DECIMAL_compare(DECIMAL const& lhs, DECIMAL const& rhs)
00251 {
00252 return comstl__DECIMAL_compare(&lhs, &rhs);
00253 }
00254
00255 #endif
00256
00257
00258
00259
00260
00261 #ifdef STLSOFT_UNITTEST
00262 # include "./unittest/DECIMAL_functions_unittest_.h"
00263 #endif
00264
00265
00266
00267 #ifndef _COMSTL_NO_NAMESPACE
00268 # if defined(_STLSOFT_NO_NAMESPACE) || \
00269 defined(STLSOFT_DOCUMENTATION_SKIP_SECTION)
00270 }
00271 # else
00272 }
00273 }
00274 # endif
00275 #endif
00276
00277
00278
00279 #endif
00280
00281