PCOMM Script - Hangs

mrpetreli
NewLounger
Posts: 3
Joined: 16 Feb 2012, 12:35

PCOMM Script - Hangs

Post by mrpetreli »

Hi I have created a script to load data on PCOMM but it hangs. Any Ideas?

Code: Select all

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)

REM This line calls the macro subroutine
subSub1_

sub subSub1_()
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "1"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "1erere"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "2"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES2"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "3"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "124wes"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "4"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "sd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "5"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "dfd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "6"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "5656565"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "7"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "8"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "124wes"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "9"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "sd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "10"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "rtfgg"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "11"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "12"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "124wes"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "13"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "sd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "14"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "dfd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "15"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "rtfgg"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "16"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "17"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "124wes"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "18"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "sd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "19"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "dfd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "20"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "rtfgg"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "21"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "22"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "124wes"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "23"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "sd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "24"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "rtfgg"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "25"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "26"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "124wes"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "27"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "sd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "28"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "dfd"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "29"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "rtfgg"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "30"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitForAppAvailable
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLPS.SendKeys "[TAB]"
autoECLSession.autoECLPS.SendKeys "CDES"
autECLSession.autECLPS.SendKeys "[ENTER]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[HOME]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "[TAB]"
autECLSession.autECLOIA.WaitforInputReady
autECLSession.autECLPS.SendKeys "31"
autECLSession.autECLPS.SendKeys "[ENTER]"



end sub
Top
User avatar
StuartR
Administrator
Posts: 12612
Joined: 16 Jan 2010, 15:49
Location: London, Europe

Re: PCOMM Script - Hangs

Post by StuartR »

Welcome to Eileen's Lounge.

You have posted a very long code extract, is it possible for you to try making this a bit shorter to see if you can locate exactly where it hangs?

We do have one lounger who is familiar with PCOMM, but it is a foreign language to most of us. Please be patient and hopefully you may get an answer soon.
StuartR
Top
mrpetreli
NewLounger
Posts: 3
Joined: 16 Feb 2012, 12:35

Re: PCOMM Script - Hangs

Post by mrpetreli »

Thank you for the quick response. It hangs after the first set of sendkeys. I assumed as a script its just doing the repeditivness of tab, enter data, tab ...etc
Top
mrpetreli
NewLounger
Posts: 3
Joined: 16 Feb 2012, 12:35

Re: PCOMM Script - Hangs

Post by mrpetreli »

Think I sorted it, same code. Must have been connectivity issue
Top
User avatar
HansV
Administrator
Posts: 78530
Joined: 16 Jan 2010, 00:14
Status: Microsoft MVP
Location: Wageningen, The Netherlands

Re: PCOMM Script - Hangs

Post by HansV »

Thanks for the feedback!
Best wishes,
Hans
Top

Return to “VB/VBA/.Net/Office Scripting”