Matematica

Exercício 16 - Atualizando o cadastro de CONTAS CORRENTES
Descrição do Processamento
Gravar versão atualizada do Cadastro de
Conta Corrente – CADCCN a partir do processamento dos arquivos CADCCA e
MOVCC, exibindo mensagem com registros sem correspondência.
CADCCA MOVCC
PROGRAMA 16
CADCCN
MENSAGEM
Regras para o processamento
Todos os registros nos arquivos CADCCA e MOVCC estão classificados em ordem ascendente pelos campos AGENCIA e CONTA (chave do registro);
Ler inicialmente um registro do arquivo CADCCA e um registro do arquivo MOVCC, procedendo conforme segue:
CHAVE-CCA = CHAVE-MOV  atualização
Se TIPOL-MOV = 1 (debito), verificar se o valor do lançamento (VALOR-MOV) do arquivo MOVCC é menor ou igual que a soma do saldo (SALDO-CCA) mais limite
(LIMITE-CCA) do arquivo CADCCA. Se menor ou igual, subtrair o valor do lançamento do campo saldo, gravando o registro atualizado no arquivo CADCCN, caso contrario, gravar o registro do arquivo CADCCA no arquivo CADCCN, sem qualquer atualização, exibindo a mensagem:
SALDO INSUFICIENTE PARA DEBITO chave-cca / saldo-cca
Se TIPOL-MOV = 2 (credito), adicionar o valor do lancamento (VALOR-MOV) do arquivo MOVCC ao conteúdo do campo do saldo (SALDO-CCA) do arquivo
CADCCA, gravando o registro atualizado no arquivo CADCCN.
Ler registro do CADCCA e do MOVCC.
CHAVE-CCA < CHAVE-MOV  permanência
Gravar o registro do arquivo CADCCA no arquivo CADCCN. Ler o próximo registro do arquivo CADCCA.
CHAVE-CCA > CHAVE-MOV  sem correspondência.
Exibir a mensagem
REGISTRO SEM CORRESPONDENTE NO CADCC ' chave MOVCC
Ler o próximo registro do arquivo