Cobol Foro - [Sintaxis] Table: ultima fila ocupada

Cobol Foro (https://www.cobolforo.es/index.php)

- PowerCOBOL (ActiveX, v4 - v11) (https://www.cobolforo.es/forumdisplay.php?f=9)

- - [Sintaxis] Table: ultima fila ocupada (https://www.cobolforo.es/showthread.php?t=1183)

Table: ultima fila ocupada

Buen dia

se puede consultar el numero de lineas ocupadas en un table control?.

muchas gracias

Supongo que por "número de lineas ocupadas", te refieres al total de lineas de una tabla y no a la cantidad de lineas con "algo" en ellas.

Para el primer caso, sí, sí se puede con la propiedad RowCount de la tabla

Código COBOL:

WORKING-STORAGE SECTION.
01  LIN                                     PIC 9(5) COMP-5.
PROCEDURE DIVISION.
   .
   .
   .
   .
     MOVE "RowCount" OF TABLA TO LIN.

LIN, contiene el número total de lineas, (que nunca será mayor de 2000).

para el segundo caso, la única manera de hacerlo es con un bucle.

Un salu2.-