namespace eval ::wsdb::types::aca::FileSourceCodeType { variable base xsd::string variable validate ::wsdb::types::aca::FileSourceCodeType::validate }
proc ::wsdb::types::aca::FileSourceCodeType::validate { value } { variable base if {[::wsdb::types::${base}::validate "$value"] && [lsearch -exact {1 2 3 4 5 6 7 8 9 0} "$value"] > -1} { return 1 } else { return 0 } }