dcsimg
Results 1 to 3 of 3

Thread: Currency datatype functions

  1. #1

    Thread Starter
    MS SQL Powerposter szlamany's Avatar
    Join Date
    Mar 2004
    Location
    CT
    Posts
    17,805

    Currency datatype functions

    These two functions allow you to display strings of "currency" formatted values and also use those strings in math functions. The strings are converted to integer datatype with an implied decimal point (just like CURRENCY in VB6).

    First function - parseMoney - takes a STRING argument and returns an integer value.

    Code:
    function parseMoney(strMoney) {
        var intMoney = parseInt(0, 10);
        var intDecimal = 0;
        var intLength = 0;
        if (!(typeof strMoney == "string")) {
            strMoney = String(strMoney);
        }
        if (strMoney.length != 0) {
            strMoney = strMoney.replace(/,/g, "").replace("$", "").replace("**","");
            intDecimal = strMoney.indexOf(".");
            intLength = strMoney.length;
            if (intDecimal == -1) {
                strMoney = strMoney + ".00";
            } else {
                if ((intDecimal + 3) != intLength) {
                    if (intLength == (intDecimal + 1)) {
                        strMoney = strMoney + "00";
                    } else if (intLength == (intDecimal + 2)) {
                        strMoney = strMoney + "0";
                    } else {
                        strMoney = strMoney.substring(0, intDecimal + 3);
                    }
                }
            }
            intMoney = parseInt(strMoney.replace(".", ""), 10);
        }
        return intMoney;
    }
    Second function - parseCurrency - will take that integer "currency" value as the argument and return a formatted string.

    Code:
    function parseCurrency(intMoney) {
        var strMoney = "";
        var blnIsNeg = false;
        strMoney = String(intMoney);
        if (strMoney.substring(0, 1) == "-") {
            blnIsNeg = true;
            strMoney = strMoney.substring(1, strMoney.length);
        }
        var intLength = strMoney.length;
        if (intLength < 3) {
            strMoney = ("000" + strMoney).substring(intLength, intLength + 3); 
            intLength = 3;
        }
        strMoney = ((blnIsNeg) ? "-" : "") + addCommas(strMoney.substring(0, intLength - 2)) + "." + strMoney.substring(intLength - 2);
        return strMoney;
    }
    This function - addCommas - is needed for support of the parseCurrency function.

    Code:
    function addCommas(sValue) {
        var sRegExp = new RegExp('(-?[0-9]+)([0-9]{3})');
    
        while (sRegExp.test(sValue)) {
            sValue = sValue.replace(sRegExp, '$1,$2');
        }
        return sValue;
    }

    *** Read the sticky in the DB forum about how to get your question answered quickly!! ***

    Please remember to rate posts! Rate any post you find helpful - even in old threads! Use the link to the left - "Rate this Post".

    Some Informative Links:
    [ SQL Rules to Live By ] [ Reserved SQL keywords ] [ When to use INDEX HINTS! ] [ Passing Multi-item Parameters to STORED PROCEDURES ]
    [ Solution to non-domain Windows Authentication ] [ Crazy things we do to shrink log files ] [ SQL 2005 Features ] [ Loading Pictures from DB ]

    MS MVP 2006, 2007, 2008

  2. #2

    Thread Starter
    MS SQL Powerposter szlamany's Avatar
    Join Date
    Mar 2004
    Location
    CT
    Posts
    17,805

    Re: Currency datatype functions

    These functions are used like this:

    Code:
    // Medical must always be filled first
    item.Medical = parseCurrency(((parseMoney(item.DedAmt) + parseMoney(item.Premium))
         - (parseMoney(item.Dental) + parseMoney(item.Life))) + parseMoney(item.ApplyCredit));
    
    item.OverUnder = parseCurrency(parseMoney(item.Medical) - parseMoney(item.TotalCost));
    if ((parseMoney(item.OverUnder) >= -5) && (parseMoney(item.OverUnder) <= 5)) {
         item.OverUnder =  parseCurrency(0);
    }
    item.Balance = parseCurrency(parseMoney(item.OverUnder) - parseMoney(item.ToCredit)
          - parseMoney(item.AdjAmt));
    item.AcctCredit = parseCurrency((parseMoney(item.LMAcctCredit)
          - parseMoney(item.ApplyCredit)) + parseMoney(item.ToCredit))

    *** Read the sticky in the DB forum about how to get your question answered quickly!! ***

    Please remember to rate posts! Rate any post you find helpful - even in old threads! Use the link to the left - "Rate this Post".

    Some Informative Links:
    [ SQL Rules to Live By ] [ Reserved SQL keywords ] [ When to use INDEX HINTS! ] [ Passing Multi-item Parameters to STORED PROCEDURES ]
    [ Solution to non-domain Windows Authentication ] [ Crazy things we do to shrink log files ] [ SQL 2005 Features ] [ Loading Pictures from DB ]

    MS MVP 2006, 2007, 2008

  3. #3

    Thread Starter
    MS SQL Powerposter szlamany's Avatar
    Join Date
    Mar 2004
    Location
    CT
    Posts
    17,805

    Re: Currency datatype functions

    http://jsfiddle.net/mn9jpfgt/

    I obviously don't know how to make a fiddle...

    Any help would be greatly appreciated!

    I wanted to just show a couple of ALERT calls to show the functionality in action. What would I put in the HTML window to make that happen?

    *** Read the sticky in the DB forum about how to get your question answered quickly!! ***

    Please remember to rate posts! Rate any post you find helpful - even in old threads! Use the link to the left - "Rate this Post".

    Some Informative Links:
    [ SQL Rules to Live By ] [ Reserved SQL keywords ] [ When to use INDEX HINTS! ] [ Passing Multi-item Parameters to STORED PROCEDURES ]
    [ Solution to non-domain Windows Authentication ] [ Crazy things we do to shrink log files ] [ SQL 2005 Features ] [ Loading Pictures from DB ]

    MS MVP 2006, 2007, 2008

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Featured


Click Here to Expand Forum to Full Width