Error 121: Fatal exception during script execution 1

[rking66]

I am receiving the message 'Error 121: Fatal exception during script execution' occasionally when using the Procomm dialing queue. I have a fairly simple data collection script that I manually launch after each connection has been established, and this error pops up when the script is attempting to log out of the site event buffer.
I have found a similar thread (thread448-412567) where there is reference to a fix that involves modifying the script with a procedure to grow ASPECT's runtime stack, but I can't seem to get it to compile correctly.
Any help would be greatly appreciated! Thank you

 

[knob]

Can you post your script, a version pre-fix if possible?

http://www.aspectscripting.com

 

[rking66]

Knob,
Thanks for taking a look at this. As you can see, the attached script is fairly basic, and probably not too well written either, but it serves it's purpose quite well. I have noticed that the error seems to occur at the end of the script (which I have placed a comment at)

proc main

integer iDay, iMonth, iYear, iHour, iMin, iSec
string ddate
string report2
string report3
string report1
string report4
string report5

ltimeints $LTIME iYear iMonth iDay iHour iMin iSec
strfmt ddate "%d%02d%02d" iYear iMonth iDay
report1 = $DIALCONNECT
strcat report1 "_trks_"
strcat report1 ddate
strcat report1 ".cap"
set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report1

transmit "LD 20^M"
waitfor "REQ: "
transmit "PRT^M"
waitfor "TYPE: "
transmit "TRK^M"
waitfor "TN "
transmit "^M"
waitfor "CDEN "
transmit "^M"
waitfor "CUST "
transmit "^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
pause 1

capture ON
pause 1

transmit "^M"
waitfor "NACT " FOREVER
pause 1

clear

capture OFF

;******************************************


transmit "^M"
waitfor "REQ: "
transmit "PRT^M"
waitfor "TYPE: "
transmit "2250^M"
waitfor "TN "
transmit "^M"
waitfor "CUST "
transmit "^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
pause 1

capture ON
pause 1

transmit "^M"
waitfor "REQ:" 5
if success
pause 1
else
waitfor "NACT "
transmit "^M"
waitfor "REQ: "
endif

pause 2
clear

capture OFF
pause 1


transmit "PRT^M"
waitfor "TYPE: "
transmit "PWR^M"
waitfor "TN "
transmit "^M"
waitfor "CDEN "
transmit "^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
pause 2

capture ON
pause 1


transmit "^M"
waitfor "REQ:" 5
if success
pause 1
else
waitfor "NACT " 1
transmit "^M"
waitfor "REQ: "
endif


pause 2

clear

capture OFF
pause 1


transmit "****^M"
waitfor ">"

;***********************************************************


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report2 = $DIALCONNECT
strcat report2 "_SLT_"
strcat report2 ddate
strcat report2 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report2



transmit "LD 22^M"
waitfor "REQ "
transmit "SLT"
pause 2

capture ON
pause 1
transmit "^M"

waitfor "REQ "
pause 2

clear
capture OFF
pause 1

transmit "****^M"
waitfor ">"


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report3 = $DIALCONNECT
strcat report3 "_VoiceMail_"
strcat report3 ddate
strcat report3 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report3



transmit "LD 81^M"
waitfor "REQ "
transmit "LST^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "IMA^M"
waitfor "FEAT "
transmit "MMA^M"
waitfor "FEAT "
transmit "VMA^M"
waitfor "FEAT "
pause 2

capture ON
pause 1


transmit "^M"
waitfor "NACT "
pause 2

clear

capture OFF
pause 1



transmit "^M"


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report4 = $DIALCONNECT
strcat report4 "_ATA_FLXA_"
strcat report4 ddate
strcat report4 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report4



waitfor "REQ "
transmit "LST^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "FLXA^M"
waitfor "FEAT "
pause 2

capture ON
pause 1


transmit "^M"
waitfor "NACT "
pause 2
clear

capture OFF
pause 1


;**********************************************


transmit "^M"


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report5 = $DIALCONNECT
strcat report5 "_SETS_DCFWs_ACDs_"
strcat report5 ddate
strcat report5 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report5



waitfor "REQ "
transmit "CNT^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "SETS^M"
waitfor "FEAT "

pause 2

capture ON
pause 1




transmit "^M"
waitfor "NACT "
transmit "^M"
waitfor "REQ "
transmit "CNT^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "DCFW^M"
waitfor "FEAT "
transmit "^M"
waitfor "NACT "
transmit "^M"
waitfor "REQ "
transmit "CNT^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "ACD^M"
waitfor "FEAT "
transmit "^M"
waitfor "NACT "
pause 2

clear

capture OFF
pause 1

transmit "^M"
waitfor "REQ " 3
transmit "****^M"

set capture query ON

;Disconnnect

transmit "****^M"
transmit "LOGO^M"
pause 2
transmit "LOGO^M"
waitfor ">" 2
transmit "^]A"
waitfor "Command: " 3
if success
transmit "6^M"


;***Failure Location?
;Error seems to occur immediately after the following line of text appears from the SEB

waitfor "Do you really want to clear mass memory? (Y/N)"


transmit "Y^M"
waitfor "Command: "
transmit "X^M"
else
pause 2
transmit "LOGOUT^M"
pause 2
disconnect
endif

endproc

 

[knob]

Hi, finally got a chance to look the script over and nothing obvious jumps out at me. Just to be clear on your scenario, you are dialing a group of numbers in Procomm, then after each connect, you are running the script manually instead of launching it automatically from the Connection Directory, correct? And the error does not occur with each connection, only intermittently?

http://www.aspectscripting.com

 

[rking66]

Hello Knob,
Yes, you are correct with all of your assumptions. A few things I thought I should add: I am running Procomm Plus 4.8 on a Windows 2003 Server (SP2) with 1 GB RAM, and am using a US Robotics 56K external modem.

 

[knob]

One possible update you might want to make is at the below link from Symantec's website:

http://service1.symantec.com/SUPPOR...750c085d7846f37f88256a4c006ef461?OpenDocument

Below also find a version of your script with the growstack code that was pointed out in the other thread. Please let me know if that appears to solve your problem as well.

proc main

integer iDay, iMonth, iYear, iHour, iMin, iSec
string ddate
string report2
string report3
string report1
string report4
string report5

growstack(50)
ltimeints $LTIME iYear iMonth iDay iHour iMin iSec
strfmt ddate "%d%02d%02d" iYear iMonth iDay
report1 = $DIALCONNECT
strcat report1 "_trks_"
strcat report1 ddate
strcat report1 ".cap"
set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report1

transmit "LD 20^M"
waitfor "REQ: "
transmit "PRT^M"
waitfor "TYPE: "
transmit "TRK^M"
waitfor "TN "
transmit "^M"
waitfor "CDEN "
transmit "^M"
waitfor "CUST "
transmit "^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
pause 1

capture ON
pause 1

transmit "^M"
waitfor "NACT " FOREVER
pause 1

clear

capture OFF

;******************************************


transmit "^M"
waitfor "REQ: "
transmit "PRT^M"
waitfor "TYPE: "
transmit "2250^M"
waitfor "TN "
transmit "^M"
waitfor "CUST "
transmit "^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
pause 1

capture ON
pause 1

transmit "^M"
waitfor "REQ:" 5
if success
pause 1
else
waitfor "NACT "
transmit "^M"
waitfor "REQ: "
endif

pause 2
clear

capture OFF
pause 1


transmit "PRT^M"
waitfor "TYPE: "
transmit "PWR^M"
waitfor "TN "
transmit "^M"
waitfor "CDEN "
transmit "^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
pause 2

capture ON
pause 1


transmit "^M"
waitfor "REQ:" 5
if success
pause 1
else
waitfor "NACT " 1
transmit "^M"
waitfor "REQ: "
endif


pause 2

clear

capture OFF
pause 1


transmit "****^M"
waitfor ">"

;***********************************************************


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report2 = $DIALCONNECT
strcat report2 "_SLT_"
strcat report2 ddate
strcat report2 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report2



transmit "LD 22^M"
waitfor "REQ "
transmit "SLT"
pause 2

capture ON
pause 1
transmit "^M"

waitfor "REQ "
pause 2

clear
capture OFF
pause 1

transmit "****^M"
waitfor ">"


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report3 = $DIALCONNECT
strcat report3 "_VoiceMail_"
strcat report3 ddate
strcat report3 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report3



transmit "LD 81^M"
waitfor "REQ "
transmit "LST^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "IMA^M"
waitfor "FEAT "
transmit "MMA^M"
waitfor "FEAT "
transmit "VMA^M"
waitfor "FEAT "
pause 2

capture ON
pause 1


transmit "^M"
waitfor "NACT "
pause 2

clear

capture OFF
pause 1



transmit "^M"


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report4 = $DIALCONNECT
strcat report4 "_ATA_FLXA_"
strcat report4 ddate
strcat report4 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report4



waitfor "REQ "
transmit "LST^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "FLXA^M"
waitfor "FEAT "
pause 2

capture ON
pause 1


transmit "^M"
waitfor "NACT "
pause 2
clear

capture OFF
pause 1


;**********************************************


transmit "^M"


strfmt ddate "%d%02d%02d" iYear iMonth iDay
report5 = $DIALCONNECT
strcat report5 "_SETS_DCFWs_ACDs_"
strcat report5 ddate
strcat report5 ".cap"

set capture query off
set capture path "D:\Program Files\Symantec\Procomm Plus\Capture"
set capture file report5



waitfor "REQ "
transmit "CNT^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "SETS^M"
waitfor "FEAT "

pause 2

capture ON
pause 1




transmit "^M"
waitfor "NACT "
transmit "^M"
waitfor "REQ "
transmit "CNT^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "DCFW^M"
waitfor "FEAT "
transmit "^M"
waitfor "NACT "
transmit "^M"
waitfor "REQ "
transmit "CNT^M"
waitfor "CUST "
transmit "0^M"
waitfor "DATE "
transmit "^M"
waitfor "PAGE "
transmit "^M"
waitfor "DES "
transmit "^M"
waitfor "FEAT "
transmit "ACD^M"
waitfor "FEAT "
transmit "^M"
waitfor "NACT "
pause 2

clear

capture OFF
pause 1

transmit "^M"
waitfor "REQ " 3
transmit "****^M"

set capture query ON

;Disconnnect

transmit "****^M"
transmit "LOGO^M"
pause 2
transmit "LOGO^M"
waitfor ">" 2
transmit "^]A"
waitfor "Command: " 3
if success
transmit "6^M"


;***Failure Location?
;Error seems to occur immediately after the following line of text appears from the SEB

waitfor "Do you really want to clear mass memory? (Y/N)"


transmit "Y^M"
waitfor "Command: "
transmit "X^M"
else
pause 2
transmit "LOGOUT^M"
pause 2
disconnect
endif

endproc

proc growstack
param integer kbytes
string locstrs[4] ; approximately 1K stack required
if kbytes
growstack(kbytes - 1) ; 60 recursions result in a 60 K ASPECT memory block.
endif
endproc

http://www.aspectscripting.com

 

[rking66]

Hello Knob,
I have put your modified script into action, and am happy to report all is well. Thank you very much for all your help, we don't know what we'd do without you!

 

[knob]

Glad to hear it! Please keep me up to date if that error pops back, but hopefully the growstack workaround really did the trick.

http://www.aspectscripting.com