@DestinedBroken, hola amigo. Por lo pronto esto lo tendrás que modificar porque sinceramente no vale:
Código COBOL:
if si-no = "s"
move "s" to si-no
end-if
if si-no not = "s"
move "n" to si-no
end-if
Fíjate en el primer
MOVE, piensa en el
ELSE....
Luego por lo del error, me parece que es el momento de que uses el
Debug, verás que chollo. Te muestra el contenido de los campos, puedes seguir la ejecución sentencia por sentencia.
Si aún encuentras dificultades, dímelo y te doy más pistas
