I've recorded a macro in PCOMM 5.8 for ELF (Express Logon Feature)
purposes. The macro and the whole ELF stuff are working fine; however
the macro always fails on the first connection attempt after starting
the PCOMM window. If I disconnect and connect again, the macro is
working fine, so apparently it is a timing problem. Here is the macro:
[wait app]
[wait inp inh]
"l tso
[enter]
[wait inp inh]
wait 10 sec until FieldAttribute 0000 at (1,26)
wait 10 sec until cursor at (2,1)
[wait app]
[wait inp inh]
elf applid TSOSYS1
")USR.ID(
[enter]
[wait inp inh]
wait 10 sec until FieldAttribute 000C at (8,19)
wait 10 sec until cursor at (8,20)
[wait app]
[wait inp inh]
")PSS.WD(
[enter]
To explain a little better what is happening, our system is an ADCD
system running on a Tserver. On the initial screen, the macro first
enters "L TSO" to get the userid prompt. Apparently, this string is
entered before the screen is ready to accept the input (in spite of the
two "wait" statements that were generated when the macro was recorded).
Subsequently, the userid is entered at the wrong time and the whole
process gets out of sync.
I'm looking for a modification to the macro that would make it wait
until the initial screen has really been set up. Note: Entering "LOGON
userid" on this first screen does not work well with ELF, it needs the
userid prompt. This is the relevant part of the first screen:
Application Developer System
// OOOOOOO SSSSS
// OO OO SS
zzzzzz // OO OO SS
zz // OO OO SSSS
zz // OO OO SS
zz // OO OO SS
zzzzzz // OOOOOOO SSSSS
System Customization - ADCD.Z.*
===> Enter "LOGON" followed by the TSO userid. Example "LOGON IBMUSER" or
===> Enter L followed by the APPLID
===> Examples: "L TSO", "L CICS", "L IMS3270
--
Ulrich Boche
SVA GmbH, Germany
IBM Premier Business Partner
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html