DadosUltimaReducaoZ Impressoras ELGIN Com BUG

[Maicon Luis Ferreira]

Bom eu tenho mais uma contribuição a fazer que é na função DadosUltimaReducaoZ.

Nela com minha ELGIN K está retornando em aliquotas assim

[Aliquotas]

02T1700

03T1200

Quando teria que ser assim

[Aliquotas]

01T1700

02T1200

Começando no 01 pq o indice 00 esta com uma licota 0 em minha impressora mais ai é problema meu quando inciiei a impressora coloquei esta alicota la bom resumindo o indice deveria começar no 00 mais esta começando no 01 por este motivo

Na linha 3276 da Unit ACBrECFFiscNET.pas esta deste modo a variavel nAux Acrescentada de 1

Result := Result +

FormatFloat('00', nAux+1 ) +

Aliquotas[ nAux2 ].Tipo +

IntToStrZero( Trunc( Aliquotas[ nAux2 ].Aliquota * 100 ), 4 ) + ' = '+

FloatToStr( nVal ) + sLineBreak ;

Quando deveria estar sem esta acrescentada. Ai me surge uma duvida pois não sei se devo fazer esta linha especifica para os modelos elgin ou é BUG em todas FiscNet lembrando que todas demais funções que se trata de indice esta funcionando certo na ordem correda 00 01 02 somente esta que começa em 01 02 entao na minha unit ficou assim a mesma linha

Result := Result +

FormatFloat('00',nAux ) +

Aliquotas[ nAux2 ].Tipo +

IntToStrZero( Trunc( Aliquotas[ nAux2 ].Aliquota * 100 ), 4 ) + ' = '+

FloatToStr( nVal ) + sLineBreak ;

Em vermelho é o que julgo estar errado e em verde o certo lembrando que fiz testes com minha ELGIN K e deu certo.

Maicon Luis Ferreira