oneshotbr Colaborador
Registrado: Quarta-Feira, 6 de Mai de 2009 Mensagens: 1948 Localização: Taubaté - SP
|
Enviada: Qui Nov 06, 2014 10:35 am Assunto: Passar as aliquotas para o acbrecf |
|
|
Bom dia galera,
Estou com uma dúvida em questão à nomeclatura das aliquotas na hora de fazer a venda dos itens as que eu conheço são essas.
Código: | if sqlProdutos.FieldByName('ALIQUOTA').AsString = 'TRIBUTADO' then
begin
tributacao := FloatToStr(sqlProdutos.FieldByName('TRIBUTACAO').AsFloat);
aliquota := 'I' + tributacao;
end;
if sqlProdutos.FieldByName('ALIQUOTA').AsString = 'ISENTO' then
aliquota := 'II';
if sqlProdutos.FieldByName('ALIQUOTA').AsString = 'NAO TRIBUTADO' then
aliquota := 'NN';
if sqlProdutos.FieldByName('ALIQUOTA').AsString = 'SUBISTITUIÇÃO' then
aliquota := 'SF';
dm.ACBrECF.VendeItem(FieldByName('CODIGOBARRA').AsString, FieldByName('NOME').AsString,
aliquota, FieldByName('QUANTIDADE').AsFloat,
FieldByName('VALORUNITARIO').AsFloat,0,FieldByName('SIGLA').AsString);
|
Só que a caso o produto seja tributado está correto? É assim mesmo que passa as aliquotas? _________________ AMD Phenom II X4 960T 3.00 GHz - 8 GB DDR III - HD 1000 GB SATA - GeForce GTX 650 TI GDDR 5 - Monitor 21,5" Full HD - Kubuntu 14.04 + Windows 7 Professional x64. |
|