Assignment on Table Structure:

Question #1: This is valid way to set up the soup table. Explain why it works.

01  TABLE-COMBINED.
    05  FILLER PIC X(51) VALUE
        "03SEAFOOD CHOWDER12CORN CHOWDER   15CLAM CHOWDER   ".
05 FILLER PIC X(51) VALUE 
        "17TOMATO SOUP    24CHICKEN SOUP   25VEGETABLE SOUP ".
05 FILLER PIC X(51) VALUE
        "27ONION SOUP     28GREEN PEA SOUP 45WONTON SOUP    ".
01  RDF-TABLE-COMBINED REDEFINES TABLE-COMBINED.
    05  ENTRIES  OCCURS 9 TIMES.
        10  ITEM-NUMBER-TBL   PIC 99.
        10  ITEM-NAME-TBL     PIC X(15).

Question #2: Is this is valid way to set up the soup table. Explain!

01  TABLE-COMBINED.
    05  FILLER PIC X(34) 
        VALUE "03SEAFOOD CHOWDER12CORN CHOWDER   ".
    05  FILLER PIC X(34) 
        VALUE "15CLAM CHOWDER   17TOMATO SOUP    ".
05 FILLER PIC X(34
        VALUE "24CHICKEN SOUP   25VEGETABLE SOUP ".
    05  FILLER PIC X(51) VALUE 
        "27ONION SOUP     28GREEN PEA SOUP 45WONTON SOUP    ".
01  RDF-TABLE-COMBINED REDEFINES TABLE-COMBINED.
    05  ENTRIES  OCCURS 9 TIMES.
        10  ITEM-NUMBER-TBL   PIC 99.
        10  ITEM-NAME-TBL     PIC X(15).

Question #3: Is this a valid way to handle the table? Please give a reason why I choose to do it the other way in the TABLSOUP program.

01  TABLE-NUMBER.
    05  FILLER PIC X(2) VALUE "03".
    05  FILLER PIC X(2) VALUE "12".
    05  FILLER PIC X(2) VALUE "15".
    05  FILLER PIC X(2) VALUE "17".
    05  FILLER PIC X(2) VALUE "24".
    05  FILLER PIC X(2) VALUE "25".
    05  FILLER PIC X(2) VALUE "27".
    05  FILLER PIC X(2) VALUE "28".
    05  FILLER PIC X(2) VALUE "45".
01  RDF-TABLE-NUMBER REDEFINES TABLE-NUMBER.
    05  ITEM-NUMBER-TBL   PIC 99   OCCURS 9 TIMES.

01  TABLE-NAME.
    05  FILLER PIC X(15) VALUE "SEAFOOD CHOWDER".
    05  FILLER PIC X(15) VALUE "CORN CHOWDER   ".
    05  FILLER PIC X(15) VALUE "CLAM CHOWDER   ".
    05  FILLER PIC X(15) VALUE "TOMATO SOUP    ".
    05  FILLER PIC X(15) VALUE "CHICKEN SOUP   ".
    05  FILLER PIC X(15) VALUE "VEGETABLE SOUP ".
    05  FILLER PIC X(15) VALUE "ONION SOUP     ".
    05  FILLER PIC X(15) VALUE "GREEN PEA SOUP ".
    05  FILLER PIC X(15) VALUE "WONTON SOUP    ".
01  RDF-TABLE-NAME REDEFINES TABLE-NAME.
    05  ITEM-NAME-TBL     PIC X(15)   OCCURS 9 TIMES.

Question #4: Is this a valid way to handle the table number table shown in question #3?

01  TABLE-NUMBER.
    05  FILLER PIC X(18) VALUE "031215172425272845".
01  RDF-TABLE-NUMBER REDEFINES TABLE-NUMBER.
    05  ITEM-NUMBER-TBL   PIC 99   OCCURS 9 TIMES.

Question #5: Is this a valid way to handle the number and name data?

01  TABLE-COMBINED.
05 FILLER PIC X(18) VALUE "031215172425272845".
    05  FILLER PIC X(15) VALUE "SEAFOOD CHOWDER".
    05  FILLER PIC X(15) VALUE "CORN CHOWDER   ".
    05  FILLER PIC X(15) VALUE "CLAM CHOWDER   ".
    05  FILLER PIC X(15) VALUE "TOMATO SOUP    ".
    05  FILLER PIC X(15) VALUE "CHICKEN SOUP   ".
    05  FILLER PIC X(15) VALUE "VEGETABLE SOUP ".
    05  FILLER PIC X(15) VALUE "ONION SOUP     ".
    05  FILLER PIC X(15) VALUE "GREEN PEA SOUP ".
    05  FILLER PIC X(15) VALUE "WONTON SOUP    ".
01  RDF-TABLE-COMBINED REDEFINES TABLE-COMBINED.
    05  ENTRIES  OCCURS 9 TIMES.
        10  ITEM-NUMBER-TBL   PIC 99.
        10  ITEM-NAME-TBL     PIC X(15).