Errores al compilar

[dariodr]

Hola, tengo este codigo pero al compilar me aparecen estos errores:
En rmcobol compila bien.

IBM COBOL for Linux 1.1.0 compile started
0LineID Message code Message text
IGYSC0090-W 5 sequence errors were found in this program.
52 IGYPS0009-E "IF" should not begin in area "A". It was processed as if found in ar
ea "B".
55 IGYPS0009-E "ADD" should not begin in area "A". It was processed as if found in a
rea "B".
58 IGYPS0009-E "DISPLAY" should not begin in area "A". It was processed as if found
in area "B".
Same message on line: 59
-Messages Total Informational Warning Error Severe Terminating
0Printed: 5 1 4
End of compilation 1, program COMUNI, highest severity: Error.
Return code 8

IDENTIFICATION DIVISION.
PROGRAM-ID. COMUNI.
*
ENVIRONMENT DIVISION.
*
DATA DIVISION.
WORKING-STORAGE SECTION.
01 NUM-PERSONAS PIC 9(3) VALUE 1.
01 COMUNIDAD.
03 TABLA-PERSONAS OCCURS 100 TIMES
DEPENDING ON NUM-PERSONAS.
05 GENERO PIC X VALUE SPACES.
05 TALLA-POLO PIC XX VALUE SPACES.
05 USA-LENTES PIC X VALUE SPACES.
05 TIENE-CELULAR PIC X VALUE SPACES.
05 EDAD PIC 99 VALUE 0.
01 MAS-DATOS PIC X VALUE SPACES.
01 CONTA PIC 9(3) VALUE 1.
01 VARIABLES.
03 MUJER-TALLAM PIC 99 VALUE 0.
03 HOMBRE-TALLAXL PIC 99 VALUE 0.
*
PROCEDURE DIVISION.
PRINCIPAL.
PERFORM INGRESO-DATOS UNTIL MAS-DATOS = 'N'.
PERFORM PUNTO-A UNTIL CONTA > NUM-PERSONAS.
PERFORM RESULTADOS.
STOP RUN.
*
INGRESO-DATOS.
DISPLAY "Genero (M o F): " NO ADVANCING.
ACCEPT GENERO(NUM-PERSONAS).
DISPLAY "Talla de polo (S,M,L,XL): " NO ADVANCING.
ACCEPT TALLA-POLO(NUM-PERSONAS).
DISPLAY "Usa lentes (S/N): " NO ADVANCING.
ACCEPT USA-LENTES(NUM-PERSONAS).
DISPLAY "Tiene celular (S/N): " NO ADVANCING.
ACCEPT TIENE-CELULAR(NUM-PERSONAS).
DISPLAY "Edad de la persona: " NO ADVANCING.
ACCEPT EDAD(NUM-PERSONAS).
DISPLAY "Registrar mas personas S/N: " NO ADVANCING.
ACCEPT MAS-DATOS.
IF MAS-DATOS = "S"
ADD 1 TO NUM-PERSONAS
END-IF.
*
PUNTO-A.
MOVE 1 TO CONTA.
IF GENERO(CONTA) = "F" AND TALLA-POLO(CONTA) = "M"
ADD 1 TO MUJER-TALLAM
END-IF.
IF GENERO(CONTA) = "M" AND TALLA-POLO(CONTA) = "XL"
ADD 1 TO HOMBRE-TALLAXL
END-IF.
ADD 1 TO CONTA.
*
RESULTADOS.
DISPLAY "Mujeres con talla M: " MUJER-TALLAM.
DISPLAY "Hombres con talla XL: " HOMBRE-TALLAXL.

[Josber]

Te está diciendo que, esos "IF", "ADD" y "DISPLAY", los has escrito antes de la columna 12, (lo que antiguamente, se conocía como "Área A", que eran las columnas 8 a 11, y las columnas 12 a 72, eran el "Área B").

Eso suele ocurrir cuando, en vez de la barra espaciadora, usas el tabulador para desplazar el cursor y empezar a escribir, que, aunque parezca que tienes el cursor bien colocado, (en la columna 12), dependiendo del procesador de textos que uses, los tabuladores los trata de una manera u otra. Borra los espacios en blanco que haya delante de esas instrucciones, e insértalos otra vez pero con la barra espaciadora.

Un salu2.-