お世話になります。
mippaと申します｡

API関数（ReportEvent）を用いてイベントビューアーにメッセージを書込むことを考えております。
（スクリプトは以下を参照願います｡）
シングルラインエディットに入力された文字列（sle_1.text）をイベントビューアーに書き込むこと
はできましたが，その際，
「ｿｰｽ (WINAPP) 内のｲﾍﾞﾝﾄ ID (0) に関する説明が見つかりません。次の挿入文字列が含まれています:XXXXXXXX.」
というメッセージも合わせて出力されてしまいます。（XXXXXXXXはシングルラインエディットに入力された文字列）

どなたか対処方法を教えて下さい｡
よろしくお願い致します｡

///////////////// スクリプト ///////////////////////
long hEventLog,iEventID,cbStringSize,hmsgs

string ls_work,ls_work1,ls_log[]

int iLogType = 4
int iNumStrings,li_work

boolean lb_work

long ll_work

ls_work1 = sle_1.text
iEventID = 0
iNumStrings = 1
li_work = 0

ls_log[1] = ls_work1

setnull(ls_work)
hEventLog = RegisterEventSource(ls_work,\"WINAPP\")

ulong GMEM_MOVEABLE = 66
hmsgs = GlobalAlloc(GMEM_MOVEABLE, cbStringSize)

copymemory(hmsgs,ls_work1,cbStringSize)

setnull(ll_work)
lb_work = ReportEvent(hEventLog, iLogType, li_work, iEventID, ll_work,iNumStrings, 
cbStringSize,ls_log[],hmsgs)

GlobalFree(hmsgs)
DeregisterEventSource (hEventLog)

////////////////////////////////////////////////////