|
SoftTree Technologies
Technical Support Forums
|
|
Author |
Message |
Sim, Gyou-Hun
Joined: 17 Mar 2009 Posts: 1 Country: Korea, Republic of |
|
MailSend Timeout Problem !! |
|
Hi, I appreciate 24x7. Wow!!
My job got error, MailSend statement results in timeout.
I wondering....
In simple code test, no problem.
Belows, I attached real code and my simple test code
Help me...
E-Mail option is SMTP, MIME:none, text/plain
---------------------------------------- S008-I003 Job Script -------------------------
~
AppMon_LogFileErrorCheck ( watch_file, snapshot_file, chk_text_file, pattern_chk, err_chk, rtn_str )
//rtn_str value--->"Y
//
//PL/SQL procedure successfully completed.
//
//
// G_RC
//----------
// 0
//
//
//G_MSG
//--------------------------------------------------------------------------------
//LG카드 이용내역 작업이 정상적으로 종료되었습니다.
//
//
//
//
//
//
//"<---rtn_str value
GetToken ( "\r\n", rtn_str, temp)
IsEqual ( temp, "Y", err_found )
IfThen ( err_found, ENGINEER_NOTIFY2 )
GoTo UPDATEMONRESULT
~
ENGINEER_NOTIFY2:
ConcatEx ( subject, "[AppMon] Alert - ", system_name, " e-Accounting credit card i/f failures !!", subject )
Set ( message, rtn_str )
AppMon_EngineerNotify ( _orgno, subject, message )
~
-------------------------------------------------------------------------------------------
----------------------------- AppMon_EngineerNotify Script Library -----------------
Dim recipients, string
AppMon_GetMailRecipients ( _orgno, recipients )
MailSend ( "AppMon", "", recipients , subject, message )
-------------------------------------------------------------------------------------------
----------------------------- AppMon_GetMailRecipients Script Library --------------
DatabaseConnectEx ( "ODBC", "", "****", "****", "****", false )
~
DatabaseRetrieve ( sql_stmt, retrieved_rows )
DatabaseDisconnect
ForNext ( cnt, 1, retrieved_rows, 1, END_LOOP )
DatabaseGet ( cnt, 1, str )
Concat ( recipients, str, recipients )
IsEqual ( cnt, retrieved_rows, endflag )
IfThen ( endflag, PROC_END )
Concat ( recipients, ",", recipients )
PROC_END:
END_LOOP:
NotEqual ( recipients, "", existflag )
IfThen existflag, END
FileReadAll ( adminlist_file, recipients )
END:
Return recipients
-------------------------------------------------------------------------------------------
--------------------Simple test code ----------------------------------------------------
Dim subject, string, "[AppMon] Alert - e-Accounting SYSTEM e-Accounting credit card i/f failures !!"
Dim message, string
Dim recipients, string, "111@yyy.com,222@yyy.com"
// tmp file have above rtn_str values...
FileReadAll ( "@V"24x7_home"AppMon\\temp\\S008-I003.tmp", message )
MailSend ( "AppMon", "", recipients , subject, message )
-------------------------------------------------------------------------------------------
|
|
Wed Apr 08, 2009 1:42 am |
|
|
SysOp
Site Admin
Joined: 26 Nov 2006 Posts: 7857
|
|
|
|
Sorry, it is difficult to understand this way what makes your test job code different from the non-test job code. The timeout issue could be related to bad data, perhaps wrong email address.
However, there is an easy way to find out. Please enable tracing features in the scheduler options (Tools/Options menu; Log tab; Trace Enabled) and rerun both test jobs and regular job. compare their output (see new files created in the C:\Program Files\24x7 Automation Suite 3\Performancse Data subfolder).
In case you don't find an obvious problem in the trace files, please port contents of both files, and let's check them together.
|
|
Wed Apr 08, 2009 8:08 am |
|
|
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|
|