Hola Ciro, prueba con estas lineas. En el evento ItemCick
Código COBOL:
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
LINKAGE SECTION.
01 POW-NINDEX PIC S9(9) COMP-5.
01 POW-NCOLUMN PIC S9(4) COMP-5.
PROCEDURE DIVISION USING POW-NINDEX POW-NCOLUMN.
IF "CellText"(POW-NINDEX 1) OF CT-REGISTRO-ITe = SPACES EXIT PROGRAM.