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"