You may want an ACL/E program to send a copy of the screen to the Log when an error occurs so that the programmer can easily see what was going on when the error occurred.
The following statements send the screen to the Log when the search string is not found:
SEARCH 'xxx' SEARCH FOR DATA
BRANCH NE,ERROR1 IF NOT FOUND, PRINT THE SCREEN
...
ERROR1 COMMAND 'P * LOG' PRINT SCREEN TO TPX LOG
WAIT 1 GIVE 'P' COMMAND TIME TO EXECUTE
...
|
Copyright © 2013 CA.
All rights reserved.
|
|