Rules for the QUALIFIED keyword:

Figure 116. Example of the QUALIFIED keyword
 * file1 has formats HDR, INFO, ERR.
 * file2 has format INFO.
 * The QUALIFIED keyword is used for both files, making it
 * unnecessary to rename one of the "INFO" formats.

 * Note that the record format names are not qualified when 
 * specified in keywords of the File specification.
Ffile1     if   e             disk qualified 
F                                  ignore(hdr)
F                                  rename(err:errorRec)
Ffile2     o    e             disk qualified
 * The record formats must be qualified on all specifications other
 * than the File specification for the file.
D ds1             ds                  likerec(file1.info : *input) 
D errDs           ds                  likerec(file1.errorRec : *input)
D ds2             ds                  likerec(file2.info : *output) 
 /free                                           
        read file1.info ds1;
        eval-corr ds2 = ds1;
        write file2.info ds2;
        read file1.errorRec errDs;


[ Top of Page | Previous Page | Next Page | Contents | Index ]