From 2770e4a5f2680502fa4fb0b5ab319b68bc968f57 Mon Sep 17 00:00:00 2001
From: Quinn Evans <Quinn Evans>
Date: Mon, 27 Mar 2017 19:34:51 -0600
Subject: [PATCH] Remove excess complexity in channel record specification.

---
 WOPO.COB | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/WOPO.COB b/WOPO.COB
index 62e98a3..c419a20 100644
--- a/WOPO.COB
+++ b/WOPO.COB
@@ -34,8 +34,7 @@
            03 USER-NAME PIC X(40).
            03 USER-LEVEL PIC 9(2).
        FD CHANNELS.
-       01 CHANNEL-RECORD.
-           03 CHANNEL-NAME PIC X(50).
+       01 CHANNEL-NAME PIC X(50).
        
        WORKING-STORAGE SECTION.
       *CONFIGURATION "CONSTANTS"