Nunca vi o pessoal fazendo 285 coisas no mesmo arquivo. Cada parte do programa será descrita em um arquivo e depois será definida como cada parte se encaixa. Pode até ser algo assim:
LANG=RUST
DEPÓSITO
DEPOSITA UM VALOR EM UMA CONTA
ENTRADA
WS-NUMERO-DA-CONTA
WS-VALOR
PROCESSAMENTO
SEEK WS-NUMERO-DA-CONTA AT END PROCESSA-ERRO.
ADD WS-VALOR TO WS-SALDO
WRITE CONTA
RETURN OK
PROCESSA-ERRO
SEEK: DISPLAY "CONTA INEXISTENTE"
WRITE: DISPLAY "ERRO NA ESCRITA"
RETURN FALSE
:D