From 1364f862c0185e64df6b8c0d36c8679bd77c22be Mon Sep 17 00:00:00 2001
From: tfoman <tommy.oman@gmail.com>
Date: Thu, 11 Dec 2014 20:28:30 +0100
Subject: [PATCH] listing the reserved words

---
 CobXmlSupport/GenCobCode.cs | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/CobXmlSupport/GenCobCode.cs b/CobXmlSupport/GenCobCode.cs
index fd8cda4..cecafcf 100644
--- a/CobXmlSupport/GenCobCode.cs
+++ b/CobXmlSupport/GenCobCode.cs
@@ -1796,7 +1796,21 @@ namespace CobXmlSupport
 
         private void btnTestThings_Click(object sender, EventArgs e)
         {
-            //string str1 = Util.GetStringResource("String1");
+            //Create showing window
+            fromToMoves = new ShowCode();
+            fromToMoves.Parent = this;
+            fromToMoves.Labeltext = "Cobol \"reserved\" Words";
+            string number = "";
+            for(int i=0;i<700;i++){
+                number = i.ToString("0");
+                string strName = "String" + (string)(i>0?number:"");
+                string str = Properties.Resources.ResourceManager.GetString(strName);
+                if (str==null) break;
+                else fromToMoves.CodeShower.Text += "\r\n";
+                fromToMoves.CodeShower.Text += str;
+            }
+
+            fromToMoves.Show();
             //createXMLMoveCode();
         }