one of the documented procedures in this installation of the ACS
bulkmail_simple_checksum   string
What it does:
Computes a trivial checksum for a string. The checksum is the sum of the ascii values for each character of the string. Note that we're not trying to bolt things down. We're trying to keep the lazy,malicious attacker at bay. Someone who really wanted to come after us would figure out anything we could reasonably do here.
Defined in: /web/philip/tcl/bulkmail-utils.tcl

Source code:

    set string_chars [split $string {}]

    set total 0
    foreach char $string_chars {
	scan $char "%c" value
	incr total $value
    return $total