Solution Verissimo Postado 29 Agosto Solution Postado 29 Agosto Bom dia, Houve uma mudanca na geracao da TAG QUANTIDADE, agora tem que ser com 2 decimais Postei o codigo em texto porque nao conseguir anexxar o arquivo. function TNFSeW_AssessorPublico.GerarServico: TACBrXmlNodeArray; var i: integer; begin Result := nil; SetLength(Result, NFSe.Servico.ItemServico.Count); for i := 0 to NFSe.Servico.ItemServico.Count - 1 do begin Result[i] := CreateElement('SERVICO'); Result[i].AppendChild(AddNode(tcStr, '#1', 'DESCRICAO', 1, 60, 1, NFSe.Servico.ItemServico.Items[i].Descricao, '')); Result[i].AppendChild(AddNode(tcDe2, '#1', 'VALORUNIT', 1, 15, 1, NFSe.Servico.ItemServico.Items[i].ValorUnitario, '')); Result[i].AppendChild(AddNode(tcDe2, '#1', 'QUANTIDADE', 1, 10, 1, NFSe.Servico.ItemServico.Items[i].Quantidade, '')); Result[i].AppendChild(AddNode(tcDe2, '#1', 'DESCONTO', 1, 10, 1, NFSe.Servico.ItemServico.Items[i].DescontoIncondicionado, '')); end; if NFSe.Servico.ItemServico.Count > 10 then wAlerta('#54', 'SERVICO', '', ERR_MSG_MAIOR_MAXIMO + '10'); end;
Consultores Italo Giurizzato Junior Postado 29 Agosto Consultores Postado 29 Agosto Boa tarde @Verissimo, Muito obrigado pela colaboração, já abrimos a TK-5914 para aplicar a sua alteração. Italo Giurizzato Junior Ajude o Projeto ACBr crescer - Assine o SAC Analista de Sistemas / Araraquara-SP Araraquara - A era dos Trólebus
Consultores Italo Giurizzato Junior Postado 2 Setembro Consultores Postado 2 Setembro Boa tarde @Verissimo, Já esta no SVN. 1 Italo Giurizzato Junior Ajude o Projeto ACBr crescer - Assine o SAC Analista de Sistemas / Araraquara-SP Araraquara - A era dos Trólebus
Recommended Posts
Crie uma conta ou entre para comentar
Você precisar ser um membro para fazer um comentário
Criar uma conta
Crie uma nova conta em nossa comunidade. É fácil!
Crie uma nova contaEntrar
Já tem uma conta? Faça o login.
Entrar Agora