The following operations are supported. For a formal definition, please review the Service Description.

Web Service Links

Namespace Children of ::wsdb::types::openacs::email

Namespace Code for ::wsdb::types::openacs::email

namespace eval ::wsdb::types::openacs::email {
    variable base xsd::string
    variable pattern {^[^@\t ]+@[^@.\t]+(\.[^@.\n ]+)+$}
    variable validate ::wsdb::types::openacs::email::validate

}

Procedures in ::wsdb::types::openacs::email


proc ::wsdb::types::openacs::email::validate {
    value
} {
        variable base
        variable pattern
        if {[::wsdb::types::${base}::validate $value] && [regexp $pattern $value]} {
            return 1
        } else {
            return 0
     }}