************************************************************

*** Debug Initialized ***

==============================
Thu 1/9/2003 11:56:54 AM
WinBatch 32 2002H
WIL DLL 3.8hch
C:\Documents and Settings\SENDMSG_CIS.WBT
Windows platform: NT, version: 5.0, build: 2195 (Service Pack 2)
==============================

Title01 = 'Test ehllapiConnectPS()'
(0) VALUE=> "Test ehllapiConnectPS()"

ErrorMode(@OFF)
(0) VALUE=> 1

ehllapiInit('C:\Program Files\Attachmate\E!E2K\EHLAPI32.DLL','',@TRUE)
(20) VALUE=> 1

ResultCode = LastError()
(20) VALUE=> 0

ErrorMode(@CANCEL)
(20) VALUE=> 0

ErrorMode(@OFF)
(20) VALUE=> 1

ehllapiConnectPS('A')
(120) VALUE=> 1

ResultCode = LastError()
(130) VALUE=> 0

ErrorMode(@CANCEL)
(130) VALUE=> 0

TempMsg = StrCat('ehllapiConnectPS("A")  RC = ',ResultCode,@CRLF)
(130) VALUE=> "ehllapiConnectPS("A")  RC = 0
"

Message(Title01,TempMsg)
(1462) VALUE=> 1

Title01 = 'Test ehllapiSearchPS()'
(1462) VALUE=> "Test ehllapiSearchPS()"

ErrorMode(@OFF)
(1462) VALUE=> 1

Result = ehllapiSearchPS(0,'','ENTRY')
(1462) VALUE=> 0

EXTENDER ERROR SUPPRESSED =>900 (900: Enhanced HLLAPI Extender: Invalid parameter)

ResultCode = LastError()
(1462) VALUE=> 900

ErrorMode(@CANCEL)
(1462) VALUE=> 0

TempMsg = StrCat('ehllapiSearchPS(0,"","ENTRY")  RC = ',ResultCode,@CRLF)
(1462) VALUE=> "ehllapiSearchPS(0,"","ENTRY")  RC = 900
"

if (ResultCode == 0)
(1462) END OPERATOR

Message(Title01,TempMsg)
(2273) VALUE=> 1

prefixNum='99'
(2273) VALUE=> "99"

callType='R1'
(2273) VALUE=> "R1"

phoneNum='9657268'
(2273) VALUE=> "9657268"

KeyHome = '@0'
(2273) VALUE=> "@0"

KeyTAB = '@T'
(2273) VALUE=> "@T"

KeyENTER = '@E'
(2273) VALUE=> "@E"

KeySequence=StrCat(KeyHome,callType, KeyTAB,KeyTAB,KeyTAB,KeyTAB,KeyTAB,KeyTAB,KeyTAB,KeyTAB,KeyTAB, prefixNum,phoneNum,KeyENTER)
(2273) VALUE=> "@0R1@T@T@T@T@T@T@T@T@T999657268@E"

ErrorMode(@OFF)
(2273) VALUE=> 1

ehllapiSendKey(KeySequence)
(2373) VALUE=> 1

ehllapiDisconnectPS()
(2383) VALUE=> 1

exit
(2383) VALUE=> 0

--- Normal termination ---

;;;END OF JOB;;;