How to Save a Set of Commands as a Qfile › Modifying Your Qfile Definition Syntax › Step 3 - Replace the SALARY Qfile definition

Step 3 - Replace the SALARY Qfile definition

In this step, you replace the qfile definition in the data dictionary.

Press [PF6] to replace the qfile definition in the data dictionary.

                       IDD nn.n ONLINE      PAGE 2 LINE 11 DICT=TSTDICT    34/91
EMPLOYEE, EMPOSITION  WHERE (EMP-EMPOSITION.EMPLOYEE.EMPOSITION AND SALARY-GRADE
 -0420 GT 18)
 PAGE HEADER BLANK LINES AFTER 1  -
  LINE 1 'EMPLOYEE/EMPOSITION REPORT'  CENTER -
  LINE 2 '$DATE'  CENTER
 PAGE FOOTER BLANK LINES BEFORE 1  -
  LINE 1 '- $PAGE -'  CENTER
 EDIT EMP-FIRST-NAME-0415  -
       ALIGN LEFT   -
       OLQHEADER 'FIRST'-
                 'NAME'-
       PICTURE 'X(10)'
 EDIT EMP-LAST-NAME-0415  -
       ALIGN LEFT   -
       OLQHEADER 'LAST'-
                 'NAME'-
       PICTURE 'X(15)'
 EDIT START-YEAR-0415  -
       ALIGN RIGHT  -
       OLQHEADER ' '-
       PICTURE '99'
 EDIT START-MONTH-0415  -
       ALIGN RIGHT  -

IDD responds with the message NO ERRORS on the top line of the screen.

                      IDD nn.n ONLINE      NO ERRORS      DICT=TSTDICT
SIGNON DICTNAME= TSTDICT  NODENAME= ' '    USA UPD.
DISPLAY QFILE 'SALARY                          ' VERSION    1 AS SYN VERB MODIF
.
     MODIFY
     QFILE NAME IS SALARY VERSION IS 1
         LANGUAGE IS OLQ
             TEXT IS OLQ
*+       DATE CREATED IS      02/20/91
*+       DATE LAST UPDATED IS 02/20/91
*+       TIME LAST UPDATED IS 11160166
*+       PREPARED BY SYB
*+       REVISED  BY SYB
         DESCRIPTION IS OLQ
         USER IS SYB
             REGISTERED FOR ALL
             RESPONSIBLE FOR CREATION
                         AND UPDATE
                         AND DELETION
             TEXT IS OLQ
         PUBLIC ACCESS IS ALLOWED FOR ALL
*+       ACCESSED BY USER SYB
         COMMENTS
             'EXAMPLE'