From: amitbj82 <ami...@gm...> - 2009-04-28 10:25:05
|
Hi All, I have an TCL application. The application seems to terminate abnormally after few hours. The error is read as as "Caught signal 11" exception. The same function/method is working fine and does it job correctly for the first few hours. Below is the method to help you guys understand the problem better. Could you please help me resolve the problem or Can I suppress the exception and continue the normal program execution. Thanks in Advance. proc formid_post_item_cb { wrname record_list itemno item_list } \ { global gDATA set formid 5005 set pageID "" catch { set formid [attr_GetAttributeValue $item_list FormID] } catch { set pageID [attr_GetAttributeValue $item_list PageID] } set conf "???" catch { set conf [attr_GetAttributeValue $item_list FormIDConf] } wf_Log ERROR "POST_ITEM_CB: FormID='$formid' - PageID='$pageID' Conf='$conf'" attr_SetDouble $item_list FormConf $conf if { -1 != [lsearch $gDATA(DEFINED_FORMIDS,ADA) $formid] } { if { $formid == 58236 } { attr_PutString $item_list PageID DentalADA.Standard } elseif { $formid == 60000 } { attr_PutString $item_list PageID DentalADA.Unknown } else { attr_PutString $item_list PageID DentalADA.v_$formid } } elseif { ![regexp {Attachment} $pageID] } { if { [regexp {DentalADA} $pageID] } { attr_PutString $item_list PageID DentalADA.Unknown } } foreach attrib { EString EStatus ECommand } { catch { attr_DelAttribute $item_list $attrib } } return 0 } Note: bye the way I am not a TCL programmer. :) -- View this message in context: http://www.nabble.com/TCL-script--%22Caught-signal-11%22-error-tp23274270p23274270.html Sent from the tcl-threads mailing list archive at Nabble.com. |