diff --git a/CICS/UCTRAN41.cob b/CICS/UCTRAN41.cob
index 182b2e6..744854b 100644
--- a/CICS/UCTRAN41.cob
+++ b/CICS/UCTRAN41.cob
@@ -17,6 +17,8 @@
 
        PROCEDURE DIVISION.
 
+           EXEC CICS RETURN END-EXEC.
+
            MOVE EIBTRMID TO EIBTRMID
            MOVE EIBTRNID TO EIBTRNID