cics问题

mousexqshe

大家好，cics报A147错误，请问大概是什么原因造成的。
谢谢

rdcwayx

看看这个先：

http://www-01.ibm.com/support/docview.wss?uid=swg21052658

What causes an abend A147?

Technote (troubleshooting)

Problem(Abstract)
What causes an A147?
Resolving the problem
A147 Abend:
When an application returns to CICS if CICS detects an exceptional condition it abends with an A147. Reviewing code this is a default abend if CICS does not have a handle on the cause of the failure. Usually due to inappropriate coding methods in C. It can also be due to a STOP RUN statement coded within the COBOL application. In C it can be due to issuing an exit function within a program which terminates the program (without care to CICS) back to UNIX. The exit function within C is a non-safe CICS function.

An incorrectly defined environment for Micro Focus COBOL can cause the A147. Review the /var/cics_region/<region name>/<region name>.env file for all the required Micro Focus environment variablies. Any additional environment variables needed can be added to the /var/cics_region/<region name>/environment file.