LDRabelo

ACBrBAL1.Modelo := balSaturno; ACBrBAL1.Device.HandShake := Nenhum; ACBrBAL1.Device.Parity := none; ACBrBAL1.Device.Stop := s1; ACBrBAL1.Device.Data := 8; ACBrBAL1.Device.Baud := StrToInt(4800 ); ACBrBAL1.Device.Porta := COM1; ACBrBAL1.ArqLOG := edLog.Text; abaixo o Log que está sendo gerado BalLog.txt

em anexo o Log do componente. BalLog.txt

Percebi que o UltimoPesoLido está vindo com #D000110 e quando vai vazer a conversão está dando esse erro de is not a valid floating point value, alguem sabe como corrigir? Luis

ACBrBAL1.Modelo := balSaturno; ACBrBAL1.Device.HandShake := Nenhum; ACBrBAL1.Device.Parity := none; ACBrBAL1.Device.Stop := s1; ACBrBAL1.Device.Data := 8; ACBrBAL1.Device.Baud := StrToInt(4800 ); ACBrBAL1.Device.Porta := COM1; ACBrBAL1.ArqLOG := edLog.Text;

Estou usando o componente do exemplo do ACBRBal, apenas coloquei uma balança fiz as configurações dela conforme o manual, quando clico no botão para ler o peso ocorre esse erro. Tenho que usar outro componente Acbr??, pois estou usando somente o AcbrBal, quero apenas ler o peso e gravar no BD, nada será impresso. Luis

Boa noite, Estou usando o AcbrBal, quando mando ler o peso, ocorre o seguinte erro: 000260 is not a valid floating point value, o erro ocorre quando o sistema le essa procedure procedure TACBrBALClass.LeSerial(MillisecTimeOut: Integer); //nessa linha fpUltimoPesoLido := InterpretarRepostaPeso(fpUltimaResposta); alguem poderia me ajudar. Obrigado Luis

Você poderia me falar qual arqui olhar, já procurei e não encontrei nada que possa me ajudar!!

Você poderia me dar um exemplo??

Já fiz removendo a conversão, nenhum desses abaixo funciona, com ou sem conversão! ACBrBAL1.Modelo := TACBrBALModelo(DM.QryBalancaINDICADOR.Value); ACBrBAL1.Device.HandShake := TACBrHandShake('0'); ACBrBAL1.Device.Parity := TACBrSerialParity(IntToStr(DM.QryBalancaPARITY.value )); ACBrBAL1.Device.Stop := TACBrSerialStop( DM.QryBalancaSTOPBITS.value );

Bom dia estou gravando as configurações da Balança no Banco e passando quando o sistema for aberto, fazendo da seguinte forma: if acbrBal1.Ativo then ACBrBAL1.Desativar; // configura porta de comunicação ACBrBAL1.Modelo := TACBrBALModelo(DM.QryBalancaINDICADOR.Value); ACBrBAL1.Device.HandShake := TACBrHandShake('0'); ACBrBAL1.Device.Parity := TACBrSerialParity(IntToStr(DM.QryBalancaPARITY.value )); ACBrBAL1.Device.Stop := TACBrSerialStop( DM.QryBalancaSTOPBITS.value ); ACBrBAL1.Device.Data := StrToInt( DM.QryBalancaDATABITS.Value ); ACBrBAL1.Device.Baud := StrToInt( DM.QryBalancaBAUDRATE.Value ); ACBrBAL1.Device.Porta := DM.QryBalancaPORTA.Value; Só que ocorre o seguinte erro: Invalid typecast

EMBarbosa, Muito obrigado pela dica, realmente era o modelo, meu algoritimo estava gravando as nfe como modelo 1 onde na realidade e 55, agora passou. Luis

São todas NFe de Entrada, compras feitas em outros estados.

Boa Tarde EMBarbosa, já li de tudo, inclusive até livro sobre o assunto já comprei, porém não estou conseguindo identificar o erro. Lus

Pessoal estou apanhando do SPED e preciso de uma ajuda, está ocorrendo o seguinte erro e não estou conseguido resolver. O registro não deve ser informado para o modelo de documento do Registro Pai C170 Segue o meu arquivo anexo. Qualquer ajuda será bem vindo. Luis ACBrSpedFiscal.txt

Boa noite pessoal, como proceder com as NFC-e emitidas(nota saída) para o consumidor final sem identificação, meu cliente emite somente esse tipo de nota, quando gera o sped apareçe somente as notas de entrada, pois a NFC-e como não tem identificação do contribuinte da erro, como proceder??? qualquer ajuda será bem vinda. Luis