Abastecimento sem descrição

Ao entrar no caixa para imprimir algum cupom de abastecimentos feitos, percebesse que existem abastecimentos sem descrição.




Isto ocorre devido algumas ocasiões:

- Troca do MCA para uma versão não compatível com sistema (verificar versão MCA)
- Atualização do sistema incorreta (Verificar permissões, serviço, reinstalação)
- Banco de dados desestruturado (Rodar FIX)
- Alteração na sequência de abastecimentos (Ajustar GEN_A02AABA_ID)
- Alteração de combustível no momento do abastecimento (Apenas rodar a SQL)

As informações à cima são para novos abastecimentos.
Para corrigir abastecimentos que já estão no banco basta rodar esta sql no ibexpert com o CTRL+F12.
Segue SQL:

SET TERM ^ ;

CREATE OR ALTER PROCEDURE AJUSTA_NOME 
as
declare variable nome varchar(100);
declare variable bico integer;
declare variable tanque integer;
declare variable mercadoria integer;
Begin
        For
            Select b.btbomba,q.tqnro,q.tqcodm,m.menome from a02abmtq b
            left join a02ataq q on q.tqemp = b.btemp and q.tqnro = b.bttanque
            left join a02amerc m on m.mecod = q.tqcodm
            where metipo = 'C' and b.btsit = 'A'


            into :bico , :tanque, :mercadoria, :nome

            Do begin

            Update a02aaba ab set abatanque=:tanque,
                                  ab.abacodm=:mercadoria,
                                  ab.abadesc=:nome
                                  where ababomba = :bico
                                  and abatanque is null
                                  and abadata>='17.07.2012';

         end
end^

SET TERM ; ^

/* Existing privileges on this procedure */

GRANT EXECUTE ON PROCEDURE AJUSTA_NOME TO SYSDBA;

Após criar esta procedure, entre na mesma e execute-a.

Após executar, basta dar um Commit que a descrição dos abastecimentos voltarão.

Se o erro persistir, contate um facilitador.