Cobol: Utilizar sentencias SQL: count

Si queremos realizar un select count(*), la sentencia sería:

              SELECT COUNT(*) INTO :NUM-REG :IND-NULL
              FROM {TABLA,}[WHERE CONDICIÓN]

Teniendo en cuenta lo siguiente:

• Se deben definir NUM-REG e IND-NULL como PIC S9(04) COMP
• A la hora de controlar el SQLCODE devuelto por esta sentencia SQL es muy importante la variable IND-NULL por lo siguiente:

               IF SQLCODE EQUAL ZEROES

                      IF IND-NULL EQUAL -1

                          MOVE ZEROES TO NUM-REG

                      END-IF

               ELSE

                   PERFORM ERROR-DB2

               END-IF

Esto es todo lo que hay que tener en cuenta sobre esta sentencia SQL.