diff --git a/rpgJavaInterpreter-core/src/test/kotlin/com/smeup/rpgparser/evaluation/InterpreterTest.kt b/rpgJavaInterpreter-core/src/test/kotlin/com/smeup/rpgparser/evaluation/InterpreterTest.kt
index b8f2c6e4d..73c302d56 100644
--- a/rpgJavaInterpreter-core/src/test/kotlin/com/smeup/rpgparser/evaluation/InterpreterTest.kt
+++ b/rpgJavaInterpreter-core/src/test/kotlin/com/smeup/rpgparser/evaluation/InterpreterTest.kt
@@ -2255,6 +2255,15 @@ Test 6
         assertEquals(expected, "INDIC02".outputOf())
     }
 
+    @Test
+    fun executeINDIC03() {
+        val expected = listOf(
+            "*INKA(0) *IN01(1)",
+            "*INKA(1) *IN01(0)"
+        )
+        assertEquals(expected, "INDIC03".outputOf())
+    }
+
     @Test
     fun executeBIFCHECK() {
         assertEquals(listOf("ok"), outputOf("BIFCHECK"))
diff --git a/rpgJavaInterpreter-core/src/test/resources/INDIC03.rpgle b/rpgJavaInterpreter-core/src/test/resources/INDIC03.rpgle
new file mode 100644
index 000000000..e0098755b
--- /dev/null
+++ b/rpgJavaInterpreter-core/src/test/resources/INDIC03.rpgle
@@ -0,0 +1,18 @@
+     D £DBG_Str        S             50    VARYING
+
+     C                   MOVEL     *ON           *IN01
+     C                   MOVEL     *OFF          *INKA
+      *
+     C                   EVAL      £DBG_Str= '*INKA('+%CHAR(*INKA)+')'
+     C                                     +' *IN01('+%CHAR(*IN01)+')'
+     C     £DBG_Str      DSPLY
+      * result: '*INKA(0) *IN01(1)'
+      *
+     C                   MOVEL     *OFF          *IN01
+     C                   MOVEL     *ON           *INKA
+      *
+     C                   EVAL      £DBG_Str= '*INKA('+%CHAR(*INKA)+')'
+     C                                     +' *IN01('+%CHAR(*IN01)+')'
+     C     £DBG_Str      DSPLY
+      * result: '*INKA(1) *IN01(0)'
+     C                   SETON                                        LR