12492 - Invalid variant type conversion
Problema: Descrição do Problema: Ao gerar o SPED Contribuições utilizando regra para o Bloco I, ocorre o erro:
Erro na geração do Registro I200 : Invalid variant type conversion
Quando ocorre / onde se aplica: Geração do SPED Contribuições / F669SPC
Solução: Solução: Essa mensagem ocorreu por um problema de regra no cliente.
O campo CTARED é numérico no ERP;
No leiaute do SPED Contribuições, Declaração, o campo está classificado com Alfanumérico.
Na regra foi tratado o campo como Alfanumérico, desta forma ocorreu erro. Deverá ser alterado a regra para que o retorno seja um numero inteiro, e não um alfanumérico.
Exemplo de regras:
@------------------------------------------------------------------------------@
@ SPED CONTRIBUIÇÕES - GERAÇÃO DO REGISTRO I200 @
@------------------------------------------------------------------------------@
Definir Alfa IMPACMDSQL;
Definir Alfa IMPAPRMSQL;
Definir Alfa IMPAEVEREG;
Definir Alfa IMPAREG;
Definir Alfa IMPANUM_CAMPO;
Definir Alfa IMPACOD_DET;
Definir Numero IMPNDET_VALOR;
Definir Numero IMPNCODEMP;
Definir Numero IMPNCODFIL;
Definir Data IMPDDATINI;
Se ((IMPAREG=I200) e (IMPAPRMSQL=) e (IMPAEVEREG=SQL)) {
@--- SQL para buscar Informações para compor o registro I200 ---@
IMPACMDSQL = SELECT '02' AS NUMCMP, 'R0201' AS CODDET,+
VlrRec AS VLRCFF, 0 AS CODCTA, '' AS INFCPL+
FROM E667SOR+
WHERE E667SOR.CodEmp = {CODEMP}+
AND E667SOR.CodFil = {CODFIL}+
AND E667SOR.DatCpt >= {DATINI}+
AND E667SOR.DatCpt <= {DATFIM}+
AND E667SOR.FilMov = {CODFIL};
}
c
Validade: /#31/12/2050#
Público: Interno, canais/consultores, clientes
Erro na geração do Registro I200 : Invalid variant type conversion
Quando ocorre / onde se aplica: Geração do SPED Contribuições / F669SPC
Solução: Solução: Essa mensagem ocorreu por um problema de regra no cliente.
O campo CTARED é numérico no ERP;
No leiaute do SPED Contribuições, Declaração, o campo está classificado com Alfanumérico.
Na regra foi tratado o campo como Alfanumérico, desta forma ocorreu erro. Deverá ser alterado a regra para que o retorno seja um numero inteiro, e não um alfanumérico.
Exemplo de regras:
@------------------------------------------------------------------------------@
@ SPED CONTRIBUIÇÕES - GERAÇÃO DO REGISTRO I200 @
@------------------------------------------------------------------------------@
Definir Alfa IMPACMDSQL;
Definir Alfa IMPAPRMSQL;
Definir Alfa IMPAEVEREG;
Definir Alfa IMPAREG;
Definir Alfa IMPANUM_CAMPO;
Definir Alfa IMPACOD_DET;
Definir Numero IMPNDET_VALOR;
Definir Numero IMPNCODEMP;
Definir Numero IMPNCODFIL;
Definir Data IMPDDATINI;
Se ((IMPAREG=I200) e (IMPAPRMSQL=) e (IMPAEVEREG=SQL)) {
@--- SQL para buscar Informações para compor o registro I200 ---@
IMPACMDSQL = SELECT '02' AS NUMCMP, 'R0201' AS CODDET,+
VlrRec AS VLRCFF, 0 AS CODCTA, '' AS INFCPL+
FROM E667SOR+
WHERE E667SOR.CodEmp = {CODEMP}+
AND E667SOR.CodFil = {CODFIL}+
AND E667SOR.DatCpt >= {DATINI}+
AND E667SOR.DatCpt <= {DATFIM}+
AND E667SOR.FilMov = {CODFIL};
}
c
Validade: /#31/12/2050#
Público: Interno, canais/consultores, clientes