namespace init ::biz namespace schema ::biz "http://biz.semitasker.com/biz/" element sequence biz::address { {Id!xsd::integer} {Name!xsd::string} {LineOne!xsd::string} {LineTwo!xsd::string} {City!xsd::string} {State!xsd::string} {Zipcode!xsd::string} } element sequence biz::item { {Line!xsd::integer} {PartNum!xsd::string} {Description!xsd::string} {Quantity!xsd::integer} } element sequence biz::items { {Item!elements::biz::item {maxOccurs 10}} } element sequence biz::invoice { {Id!xsd::integer} {MailAddress!elements::biz::address} {ShipAddress!elements::biz::address} {Items!elements::biz::items} } proc biz::EchoInvoice EchoInvoiceRequest!elements::biz::invoice { return $Invoice } returns EchoInvoiceResponse!elements::biz::invoice namespace finalize ::biz return ::biz