My IF Else Loop Sample in COBOL Programming in LINUX ^_^

PROCEDURE Decimal
Begin.
PERFORM DecimalValue THRU DecimalValueExit
STOP RUN.
DecimalValue.
Statements
Statements
IF ErrorFound GO TO DecimalValueExit
END-IF
Statements
Statements
IF ErrorFound GO TO DecimalValueExit
END-IF
Statements
Statements
Statements
IF ErrorFound GO TO DecimalValueExit
END-IF
Statements
Statements
Statements
Statements
DecimalValueExit
EXIT.