Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- [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.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "2"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "3"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "4"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "5"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "6"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[left]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "7"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "8"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "9"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "1"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "0"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "kf"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[tab]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "992"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[field+]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[pf7]"
- autECLSession.autECLPS.WaitForAttrib 11,39,"00","3c",3,10000
- autECLSession.autECLPS.WaitForCursor 11,40,10000
- autECLSession.autECLOIA.WaitForAppAvailable
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- autECLSession.autECLOIA.WaitForInputReady
- autECLSession.autECLPS.SendKeys "[right]"
- end sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement