1. You’ve got an F spec in the mainline – not subprocedure — something like ..
FprtFName O E Printer USROPN
2. You’ve got a command that you only process once?
Open(E) prtFName <– and you get error and it really the error file already open
3. You’ve got a write xxfmtName <– which is defined in the printer file prtFName and you get an error which is the file not open error???
Ohhhhhh, what a mystery!
If you’re calling the test program — rather than using sbmjob and it fails without getting the *INLR on
thennnnnnn the file may still be open the next tttttime you run. Sign-off and back-on and see if it runs the same.
Right – in initialization or when you need a different file (or seperate spool file)
This is “fail-safe” code. It’s the way to go.