Initial

analytic/MONEY.CPP

@@ -0,0 +1,86 @@
+#include <analytic/money.hpp>
+#include <common/stdio.hpp>
+
+Money::Money(void)
+: mValue(0.00), mFormat("% 12.2lf")
+{
+}
+
+Money::Money(double value)
+: mValue(value), mFormat("% 12.2lf")
+{
+}
+
+Money::Money(const Money &someMoney)
+{
+  *this=someMoney;
+}
+
+Money::~Money()
+{
+}
+
+Money &Money::operator=(const Money &someMoney)
+{
+  format(someMoney.format());
+  value(someMoney.value());
+  return *this;
+}
+
+void Money::format(const String &strFormat)
+{
+  mFormat=strFormat;
+}
+
+const String &Money::format(void)const
+{
+  return mFormat;
+}
+
+double Money::value(void)const
+{
+  return mValue;
+}
+
+void Money::value(double value)
+{
+  mValue=value;
+}
+
+Money::operator String(void)
+{
+  String strString;
+  String moneyString;
+
+  ::sprintf(strString,mFormat,mValue);
+  char *strPtr=strString;
+  char *strRoot=strPtr;
+  while(*strPtr!='.')strPtr++;
+  while(TRUE)
+  {
+    for(int count=0;count<3&&strPtr>strRoot&&*strPtr!=' ';count++)strPtr--;
+    if(strPtr<strRoot)break;
+    moneyString.insert(strPtr);
+    if(*strPtr==' '||strPtr==strRoot)break;
+    if(*(strPtr-1)!=' '&&*(strPtr-1)!='-')moneyString.insert(",");
+    *strPtr=0;
+  }
+  apply(moneyString);
+  return moneyString;
+}
+
+Money::Money(String strMoney)
+: mFormat("% 12.2lf")
+{
+  BOOL negate(FALSE);
+  strMoney.removeTokens("$,");
+  if(-1!=strMoney.strchr('(')){strMoney.removeTokens("(");strMoney.removeTokens(")");negate=TRUE;}
+  mValue=::atof(strMoney);
+  if(negate)mValue=-mValue;
+}
+
+// virtuals
+void Money::apply(String &strMoney)
+{
+  strMoney.insert("$");
+}