我開始學習如何通過TCL客戶端使用tclws api來調用JAX-WS webservice。我有一個簡單的計算Web服務部署在glassfish服務器上(使用java/jaxws/netbeans編寫),它由我的tcl webservice客戶端成功調用。肥皂信息交換看起來很好。然而,在客戶端調用Web服務的GlassFish後,我獲得額外的標頭,我不知道它是如何返回什麼這個做,爲什麼它顯示我的屏幕上爲什麼從TCL WS客戶端調用java webservice時返回額外的頭信息
set xns [dict get [::WS::Utils::GetServiceTypeDef Client CalculatorWS tns1:add] xns] definition {param1 {type xs:int comment {}} param2 {type xs:int comment {}}} xns tns1 result is :7
這裏是我的樣品TCL ws客戶端代碼:
package require WS::Client
::WS::Client::GetAndParseWsdl http://xxxx.xx.xx.com:8099/CalculatorWS/CalculatorWS?wsdl
set param1 5
set param2 2
set inputs [list param1 $param1 param2 $param2]
set result [ ::WS::Client::DoCall CalculatorWS add $inputs]
set res [dict get $result return]
puts "result is :$res"
任何人都可以請幫助我如何防止這個標題被打印/顯示?我錯過了什麼嗎?
Tclws有一些調試'puts'。我認爲有人應該閱讀代碼並刪除所有代碼。 –
感謝Johannes13準確的指針。 – user981116