Boa tarde, estou tentando alimentar os campos abaixo mas está retornando a seguinte rejeição:
case cbDtPrevEntrega.ItemIndex of
0: compl.Entrega.TipoData := StrToTpDataPeriodo(okConversao, IntToStr(0));
1: compl.Entrega.TipoData := StrToTpDataPeriodo(okConversao, IntToStr(1));
2: compl.Entrega.TipoData := StrToTpDataPeriodo(okConversao, IntToStr(2));
3: compl.Entrega.TipoData := StrToTpDataPeriodo(okConversao, IntToStr(3));
4: compl.Entrega.TipoData := StrToTpDataPeriodo(okConversao, IntToStr(4));
end;
case cbDtPrevEntrega.ItemIndex of
0: begin
compl.Entrega.semData.tpPer := tdSemData;
end;
Envio CTe
tpAmb: 1
verAplic:
cStat: 0
cUF: 0
xMotivo:
cMsg: 0
xMsg:
Recibo:
Protocolo:
Chave:
XML:
----------------------------------------------------------------------------------------------------
Falha na validação dos dados do Conhecimento: 1
'0' violates enumeration constraint of '1 2 3'.
The element '{http://www.portalfiscal.inf.br/cte}tpPer' with value '0' failed to parse.
Algum dica de como posso fazê-lo corretamente ?
Atenciosamente,
Bruno