Entering Selections

The Translator menu for MVS is shown below. The Translator menu for VM/CMS follows. Default responses for the optional parameters are shown and acceptable values appear to the right of the input area. When you enter a parameter value, you are only required to type the capitalized abbreviation.

                  COBOL FD Translator - Version 3.0

   COBOL FD Dataset Name =>                                              

         Member (if PDS) =>                                             
                                                                        
        MFD Dataset Name => userid.MASTER.DATA                          
              MFD Member =>                                             
          Replace Member => N  (Yes,No)                                 
                                                                         
 File Type (SUFFIX=)            => F       (Fix,Com,Vsam,Isam)          
 Field Name Length              => 30      (12,30)                      
 Skip 'n' Hyphens in COBOL Name => 0       (0,1,2,3)                    
 Remove Hyphens or Use Underbars=> R       (Remove,Underbars)           
 Generate GROUP Fields          => A       (All,None,Printable only)    
 Generate REDEFINE Fields       => C       (Comments,None,Segments)     
 Generate LEVEL 88 as Comments  => Y       (Yes,No)                     
 Describe Occurs as Segments    => Y       (Yes,No)                     
 Zoned Numeric Field Usage      => P       (Packed,Alpha)               
 Numeric Field Edit Options     =>         (S,C,B,R,M,N,L combinations) 
                                                                        
 1=Help      2=Read Me   3=Exit     4=Edit FD    5=Edit MFD   6=Check MFD
 7=FD List   8=MFD List  9=Header  10=Messages  11=Debugging 12=Audit     

                  COBOL FD Translator - Version 3.0
           COBOL FD Name =>           COBOL     *                            

                MFD Name =>           MASTER    A                    
             Replace MFD => N  (Yes,No)                                 
                                                                         
 File Type (SUFFIX=)            => F       (Fix,Com,Vsam,Isam)           
 Field Name Length              => 30      (12,30)                       
 Skip 'n' Hyphens in COBOL Name => 0       (0,1,2,3)                     
 Remove Hyphens or Use Underbars=> R       (Remove,Underbars)            
 Generate GROUP Fields          => A       (All,None,Printable only)     
 Generate REDEFINE Fields       => C       (Comments,None,Segments)      
 Generate LEVEL 88 as Comments  => Y       (Yes,No)                      
 Describe Occurs as Segments    => Y       (Yes,No)                      
 Zoned Numeric Field Usage      => P       (Packed,Alpha)                
 Numeric Field Edit Options     =>         (S,C,B,R,M,N,L combinations)  
                                                                         
 1=Help      2=Read Me   3=Exit     4=Edit FD    5=Edit MFD   6=Check MFD
 7=FD List   8=MFD List  9=Header  10=Messages  11=Debugging 12=Audit     

The following topics describe the Translator menu options and the values you may supply for the parameters. See Translator Options and Examples for more details and sample input and output.

MVS Dataset Information

The following list describes the dataset parameters in the Translator menu for MVS.

COBOL FD Dataset Name

Enter the fully-qualified dataset name where the COBOL FD to be described is stored. Do not use quotation marks in the dataset name. The dataset may be sequential or partitioned. If it is partitioned, include the member name in the Member entry.

Member (if PDS)

Enter the member name of the COBOL FD if it is stored in a partitioned dataset (PDS). If the dataset is sequential, leave this entry blank. This parameter may also be supplied by choosing it from a list (see MVS Member Display List for details).

MFD Dataset Name

Enter the fully-qualified dataset name of the Master File PDS where the Master File will be stored. Do not use quotation marks in the dataset name.

MFD Member

Enter the 1 to 8-character name that you will use for the data in all requests. This name must be a valid member name. This parameter may also be supplied by choosing it from a list (see MVS Member Display List for details).

Replace Member (Yes, No)

Enter N if you do not want to overwrite an existing Master File. Enter Y if you wish to replace a Master File that already exists.

VM/CMS File Information

The following list describes the file name parameters in the Translator for VM/CMS.

COBOL FD Name

Enter the filename, filetype, and filemode of the COBOL FD. You may use an asterisk (*) in the filemode to search all attached disks. When selecting the List function, you can use the special character * (asterisk) to represent any number of characters in the filename and filetype (see VM/CMS File Display List for details).

MFD Name

Enter the 1 to 8 character name that you will refer to the data as in all requests. This name must be a valid filename. The filetype is always MASTER. Enter the filemode where the MFD will be written. When selecting the List option, the special character * can be used in the MFD name and the * can be used in the filemode (see VM/CMS File Display List for details).

Replace MFD (Yes,No)

Enter 'N' if you do not want to overwrite an existing MFD. Enter 'Y' if you wish to replace a Master File that already exists.

File and Fieldname Information

The following list describes the file and fieldname parameters in the Translator menu.

File Type (SUFFIX=) (Fix,Com,Vsam,Isam)

Describes the access method used to retrieve data from the file. It is used to populate the SUFFIX attribute in the Master File. Enter F for fixed-format sequential files, C for comma-delimited files, V for VSAM files, and I for ISAM files.

Fieldname Length (12,30)

Enter 30 to generate fieldnames of up to 30 characters. Enter 12 to generate 12-character fieldnames, noting that the COBOL fieldnames may be truncated. Software releases that do not support long fieldnames do not allow you to change this value from 12.

Skip 'n' Hyphens in COBOL Name (0,1,2,3)

Enter the number of COBOL prefixes to eliminate from the Master File fieldnames. A value of 0 will retain the entire COBOL name. A value of 1 ignores the first prefix, up to and including the first hyphen in the COBOL name.

Remove Hyphens or Use Underbars (Remove,Underbars)

Enter R to remove all hyphens in the COBOL name from the Master File fieldnames. Enter U to replace all hyphens in the COBOL name with the underscore character.

Special Options

The following list describes the parameters for the special options in the Translator menu.

Generate GROUP Fields (All,None,Printable only)

Enter A to include all COBOL group fields as GROUP fields in the Master File. Enter N to exclude all COBOL group fields from the Master File. Enter P to include only printable group fields in the Master File. A printable group is one that is composed only of alphanumeric elements. A non-printable group is composed of one or more numeric elements, which are not readable when printed as part of the group.

Generate REDEFINE Fields (Comments,None,Segments)

Enter C to include COBOL REDEFINE fields as comments in the Master File. Enter N to exclude REDEFINEs from the Master File. Enter S to describe first level REDEFINE fields as segments. Note that nested REDEFINEs are described as comments, even with this option. The Comment option allows you to customize the Master File output to select the redefinitions of your choice. The Segment option gives you immediate access to all first level REDEFINEs and may still require customization. The Segment option is only available in software releases that support it.

Generate LEVEL 88 as Comments (Yes,No)

Enter Y to include COBOL level 88 fields as comments in the Master File. Enter N to exclude level 88 fields. The comments act as documentation in the Master File, describing the values of the primary field.

Describe Occurs as Segments (Yes,No)

Enter Y to describe all COBOL OCCURS fields as segments in the Master File. Enter N to describe fixed OCCURS as individual fields. The existence of any variably occurring group causes this value to be treated as Y.

Zoned Numeric Field Usage (Packed,Alpha)

Enter P to describe unsigned zoned numeric fields as packed numeric data. Enter A to describe these fields as alphanumeric.

Numeric Field Edit Options (S,C,B,R,M,N,L combinations)

Enter up to five edit options from the following list, to be used when displaying numeric fields. This entry may also be left blank for no editing of numeric fields.

S -Suppresses printing of the digit zero for a field whose value is zero.

C -Includes commas where appropriate, for example, 1,234.

B -Brackets negative values, for example, (1234).

R -Credits negative values, for example, 1234 CR.

M -Displays a floating dollar sign with commas, for example, $1,234.

N -Displays a fixed dollar sign with commas, for example, $ 1,234.

L -Displays leading zeroes, for example, 001234.

Edit options may be entered in any order and combination except for the pairs SL, MN, and BR, which are mutually exclusive.

Function Keys

The following list describes the purpose of the function (PF) keys in the Translator menu.

1=Help

Displays the online help screen.

2=Read Me

Displays recent announcements not yet in the documentation.

3=Exit

Exits the COBOL FD Translator.

4=Edit FD

Edits the COBOL FD using TED.

5=Edit MFD

Edits the Master File using TED.

6=Check MFD

Checks the Master File member for errors and generates a diagram of its structure. After the picture is displayed, type in any character and press the Enter key. In MVS, the member must reside in a dataset allocated to ddname MASTER, EDAMFD, or HOLDMAST for this option to execute successfully (the Master File Dataset Name is not used).

7=FD List

Displays a list COBOL FDs. dataset.

8=MFD List

Displays a list of members in the partitioned Master File dataset.

9=Header

Edits the Header Page using TED.

10=Messages

Edits the Messages Report using TED.

11=Debugging

Edits the Debugging Report using TED.

12=Audit

Edits the Audit Report using TED.

MVS Member Display List

Once you have entered a COBOL FD dataset or Master File dataset name, you can display a list of existing members in the designated dataset to select a member rather than having to type it. Press the PF7 key to list members of the COBOL FD dataset. Press the PF8 key to list members of the Master File dataset. The following screen shows the member display list for the supplied COBOL FD dataset:

                                                           +----------------+
                       COBOL FD Translator - Version 3.0   |COBOL FD members| 
   COBOL FD Dataset Name => userid.CTF.COBOL               +(MORE)----------+ 
         Member (if PDS) =>                                |MGROUP          | 
                                                           |MMAX4K          | 
        MFD Dataset Name => userid.MASTER.DATA             |MMAX4KOK        | 
              MFD Member =>                                |MOCCURSF        | 
          Replace Member => N (Yes,No)                     |MOCCURSM        | 
                                                           |MOCCURSN        | 
 File Type (SUFFIX=)            => F       (Fix,Com,Vsam,I |MOCCURSV        | 
 Field Name Length              => 30      (12,30)         |MREDEF          | 
 Skip  n  Hyphens in COBOL Name => 0       (0,1,2,3)       |MSALES          | 
 Remove Hyphens or Use Underbars=> R       (Remove,Underba |MSALES1         | 
 Generate GROUP Fields          => A       (All,None,Print |MSALES20        | 
 Generate REDEFINE Fields       => C       (Comments,None, |MSALES22        | 
 Generate LEVEL 88 as Comments  => Y       (Yes,No)        |MSKIPD          | 
 Describe Occurs as Segments    => Y       (Yes,No)        |M01             | 
 Zoned Numeric Field Usage      => P       (Packed,Alpha)  |M1OLD           | 
 Numeric Field Edit Options     =>         (S,C,B,R,M,N,L  |PSAFOLD         | 
                                                           +(MORE)----------+ 
 1=Help       2=           3=Return     4=Edit       5=Edit       6=          
 7=Backward   8=Forward    9=          10=          11=          12=       

The member display list shows the members from the selected partitioned dataset. Scroll the list by pressing the PF7 or PF8 key. Search for a string by entering any pattern and pressing the Enter key. The asterisk (*) is a multiple-character wild card. The question mark (?) is a single-character wild card. An equal sign (=) can be used to repeat the previous search.

You may view a member by placing the cursor on it and pressing the PF4 or PF5 key. You may select a member from this list by positioning the cursor on it and pressing the Enter key. This member name then appears on the Translator menu.

VM/CMS File Display List

You can display a list of existing COBOL FD or Master Files from which you can select. Enter mask values in the file name, file type, and file mode, using the asterisk (*) as a wildcard to represent any number of characters. Press the PF7 key to list matching COBOL FDs. Press the PF8 key to list matching Master Files. The following screen shows the member display list for the mask 'M* COBOL *':

The file display list shows files that match the mask that you entered. Scroll the list by pressing the PF7 or PF8 key. Search for a string by entering any pattern and pressing the Enter key. The asterisk (*) is a multiple-character wild card; the question mark (?) is a single-character wild card. An equal sign (=) can be used to repeat the previous search.

You may view a file by placing the cursor on it and pressing the PF4 or PF5 key. You may select a file from this list by positioning the cursor on it and pressing the Enter key. This file name then replaces the mask on the Translator menu.