From b70c342f4c706b1a64fd16768b1434e833017022 Mon Sep 17 00:00:00 2001 From: tfoman Date: Tue, 1 Sep 2015 13:07:38 +0200 Subject: [PATCH] Saknat endif vid utmatnings-kod --- CobXmlSupport/GenCobCode.cs | 8 ++++++++ CobXmlSupport/ShowCode.cs | 4 ++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/CobXmlSupport/GenCobCode.cs b/CobXmlSupport/GenCobCode.cs index f2b9302..737c45a 100644 --- a/CobXmlSupport/GenCobCode.cs +++ b/CobXmlSupport/GenCobCode.cs @@ -2303,6 +2303,14 @@ namespace CobXmlSupport fromToMoves.CodeShower.Text += " END-IF\r\n"; } } + else + { + if (tmpQfh.qualCobRow.FieldName.ToUpper().Contains("_VALUE")) { } + else + { + fromToMoves.CodeShower.Text += " END-IF\r\n"; + } + } } } diff --git a/CobXmlSupport/ShowCode.cs b/CobXmlSupport/ShowCode.cs index 9fad431..cf7ccbc 100644 --- a/CobXmlSupport/ShowCode.cs +++ b/CobXmlSupport/ShowCode.cs @@ -86,8 +86,8 @@ namespace CobXmlSupport { string tmpNewText = txtCode.Text.Substring(oldTxt.Length); - // Debug.Write(tmpNewText); - // Tag bort denna kommentering för att testa på vad som precis skrivs på log-fönster. + //Debug.Write(tmpNewText); + //Tag bort denna kommentering för att testa på vad som precis skrivs på log-fönster. oldTxt = txtCode.Text; } }