top:
waitfor "login:" 30 stepa end
stepa:
transmit "xxxxxxx^M"
waitfor "Password:" 30 stepb end
stepb:
transmit "xxxxxxx^M"
waitfor "AECN: START" 60 stepc end
stepc:
transmit "@sndxtalk^M"
waitfor "OK" 60 stepd end
stepd:
waitfor "Ready to RECEIVE File" 30 stepe end
stepe:
send stepf end
stepf:
waitfor "RECEIVED CLAIMS" 60 stepg end
stepg:
transmit "MAILIT^M"
waitfor "REPORT/MAIL" 90 steph stepj
steph:
transmit "RXmodem PRINT001^M"
receive stepi stepj
stepi:
transmit "GOTREPORT^M"
waitfor "ACTIVITY REPORT" 30 stepj stepj
stepj:
receive end: end:
end: