[Josber]

A ver, el fallo lo tienes en

sw = 1

en COBOL, no existe esa forma, para darle valor a una variable, ha de hacerse con la instrucción MOVE,

MOVE 1 TO SW

o, como es una variable numérica, también valdría

COMPUTE SW = 1

Otra cosa, ya que en COBOL, se escribe muchíiiiiiisimo, puedes cambiar la instrucción PICTURE, (que no usa nadie), por su abreviatura PIC

Estos es idéntico

01  sw   PICTURE 9 VALUE 0.
 
01  sw   PIC 9 VALUE 0.

Pruébalo y dinos algo.

Por cierto, todo lo que sea código COBOL, tienes un botón que pone CBL, que es para resaltar la sintaxis de ese lenguaje, (hay un botón para cada uno de los lenguajes más usados), úsalo la próxima vez, por favor.

Un salu2.-