******************************************************************
      * DCLGEN TABLE(DBADB2.TB_FUALU)                                  *
      *        LIBRARY(DBADB2.JCL.DATA(FUALU))                         *
      *        ACTION(REPLACE)                                         *
      *        LANGUAGE(COBOL)                                         *
      *        STRUCTURE(FUALU)                                        *
      *        APOST                                                   *
      * ... IS THE DCLGEN COMMAND THAT MADE THE FOLLOWING STATEMENTS   *
      ******************************************************************
           EXEC SQL DECLARE DBADB2.TB_FUALU TABLE
           ( CO_FUTU_T01                    SMALLINT NOT NULL,
             NU_CPF_ALUNO                   DECIMAL(14, 0) ,
             NO_ALUNO                       CHAR(30) NOT NULL,
             ED_ALUNO                       CHAR(30) NOT NULL,
             NT_ALUNO                       SMALLINT NOT NULL
           ) END-EXEC.
      ******************************************************************
      * COBOL DECLARATION FOR TABLE DBADB2.TB_FUALU                    *
      ******************************************************************
       01  FUALU.
           10 CO-FUTU-T01          PIC S9(4) USAGE COMP.
           10 NU-CPF-ALUNO         PIC S9(14)V USAGE COMP-3.
           10 NO-ALUNO             PIC X(30).
           10 ED-ALUNO             PIC X(30).
           10 NT-ALUNO             PIC S9(4) USAGE COMP.
      ******************************************************************
      * THE NUMBER OF COLUMNS DESCRIBED BY THIS DECLARATION IS 5       *
      ******************************************************************