Joined: 06 Jun 2008 Posts: 8231 Location: Dubuque, Iowa, USA
IF EIBAID = DFHPF3
GO TO 100-EXIT-MENU
EXEC CICS ISSUE DISCONNECT
The error message is pretty much self explanatory -- hit PF3, go to 100-EXIT-MENU, and your code has neither a GOBACK nor EXEC CICS RETURN END-EXEC at the end of this paragraph. Your program ran past the end of the code.