Arnaldo Cruz

Descobri era um bug no Avast , pois desativei o avast e parou de acontecer - ativava o avast voltava a acontece, entrei em contato com o suporte do avast o cara acessou a minha maquina fez um upgrade do avast e voltou tudo ao normal

Colegas tenho um sistema do SNGPC feito no delphi 2010 Firebird 2.1 sem componentes de terceiros( só componentes nativos do Delphi) Migrei este sistema para Delphi XE6 Na atualização nos clientes. Substituo as dlls --- Midas,dbxfb e o executavel 1 - Em alguns clientes funciona o sistema é aberto e tudo funciona. 2 - Em outros clientes da Erro Access Violation logo na abertura, porem se eu volto o executavel anterior abre sem erro. Alguem sabe mim dizer se tem alguma coisa a mais neste tipo de atualização. tanto no Win7 quanto no XP em alguns lugares funciona e em outros não funciona

Eu faço isso O problema é exatamente este Compilo executo é instalado do Emulador no emulador quando clico no icone pra abrir o sistema, fica uma tela preta e depois de muito tempo(uma Hora ou mais) dá uma mensagem que o sistema não está respondendo se eu quero esperar ou não.

Uso Firebird porem ma sua dica não funciona Caixa 1 pega o generator e envia uma NFC no intervalo entre pegar o generator e enviar o segundo caixa pega o mesmo generator o que pensei foi somente incremetar mo numero da NFc no momento do envio, até funciona porem caso haja uma rejeição ou qualquer motivo que não efetive o envio vou ficar com numeração pulado e sem uso.

Colegas estou com uma certa dificuldade para gerar a numeração da NFC Criei no bco de Dados do Servidor uma tabela Numero_NFC a cada emissão eu incremento esta tabela com +1 Isso funciona correto somente quando é usado um caixa, quando mais de um caixa corre o risco de usarem o mesmo numero para NFc, lógico que no envio vai acontecer a recusa por duplicidade, mas fica chato acontecer isso. Como é que os colegas fazem este tipo de controle ? Obrigado

Ja tentou mudar tag <cUF> para 13 lembrando que a tag UF cliente tem ser a mesma

è isso mesmo Regis tratei dentro da exceção e con seghui pegar o retorno Obrigado

Preciso imprimir o Danfe da NFc-e em 3 impressoras diferentes, em duas estou fazendo pela dll da impressora se alguem conhecer uma forma mais simples.. Bematech MP4200 estou fazendo pela dll MP2032.dll. Daruma DR700 Estou fazendo pelo dll DarumaFramework. Impressora Fiscal Relatório Gerencial não sei como imprimir o QRCode pelo Acbr. enviando Linha a linha ============================= Fiz um Danfe no FAstReport para tenhtar imprimir na Daruma e Bematech. habilitei a propriedade endLess do fast, ativei a propriedade cosrtar no final da impressão direto na impressora. Porem quando envio o relatório ele imprime, mas dependendo do tamanho do relatório acaba dando um pulo. tipo uma NFC com 50 itens ele imprime 33 itens da um espaço e continua até o final. Pedi suporte a Bematech e eles mim disseram que eu só irira conseguir se mandasse linha a linha. Estou disesperado, minha homologação e mês que vem e ainda não conclui a nfc. se alguem puder mim dá umas dicas eu agradeço, pode ser que eu esteja seguindo o caminho mais longo. Abrigado

colegas não estou sabendo capturar o retorno do envio da Nfc No exemplo ACBrNFe1.Enviar(vNumLote,True,Sincrono); MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetWS); memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetornoWS); LoadXML(MemoResp, WBResposta); MemoDados.Lines.Add(''); MemoDados.Lines.Add('Envio NFe'); MemoDados.Lines.Add('tpAmb: '+ TpAmbToStr(ACBrNFe1.WebServices.Retorno.TpAmb)); Coloquei um BreakPoint >>> MemoResp.Lines.Text Quando acontece um rejeição ele nunca para para exibir o retorno do envio.

Está acontecendo algo estranho. no Desktop eu tenho um icone pra abrir meu executavel. o procedimento deveria ser 1 - Clicar no icone 2 - Abrir a Tela de Login(digitar usuário e senha) 3 - Abrir formulário Principal Mas está acontecendo como segue 1 - Clico no Icone 2 - Abre a tela de login e se fecha 3 - Abre a tela de login novamente e se fecha 4 - Passa uns 10 segundos 5 - Abre a tela de login novamente(na terceira vez ela não fecha - ai digito usuario e senha e é aberto o Formulario principal) Como eu sei disso ? Porque ao carregar o sistema é aberto um sistema de moni toramento que fica no systray ai fico observando que aparece 3 vezes o systema no systray.. Já passei o antevirus e nada foi detectado.

Já consegUi gerar a imagem com o QRCode e montar o relatório gerencial. Agora não sei como enviar para impressora a imagem do QrCode (Observação a impressora aceita impressão de imagem) fiz a impressão sem QRCode. Fica simplesmemnte ridiculo. Quando impresso a relação de produtos 1 - no meio da lista de produtos é impresso aquela maldita frase - NÃO É DOCUMENTO FISCAL Quando sem relação no meio dos dados do emitente a mesma frase NÃO É DOCUMENTO FISCAL. fiz o mesmo danfe na MP4200 TH não fiscal fica Show de bola.

Alguem já está imprimindo o Danfe da NFC-e em relatorio Gerencial ? Se sim como passar do componente para o relatório ? Obrigado

Já descobri o motivo Ao imprimir o Cupom Fiscal Cupom Fiscal COO = 5637 Relatorio Gerencial COO = 5638 Quando envio o comando de cancelar o cupom ele tenta cancela o COO 5638 porem ele é de um relatório gerencial. por isso não cancela ALguem sabe como posso resolver isso ? Obrigado

Estou tendo problemas para cancelar o ultimo cupom emitido Na Homologação da farmacia popular ao concluir a operação se cancela o cupom fiscal. vou colocar o processo inteiro 1 - FDataModule.ACBrECF.AbreCupom(edtCPFPaciente.Text , edtNomePaciente.Text ,'',False); 2 - FDataModule.ACBrECF.VendeItem(cdsMedicamentoCODIGO.AsString, cdsMedicamentoMEDICAMENTO.AsString, cdsMedicamentoECFICMSST.AsString, cdsMedicamentoQTDEFA.AsFloat, cdsMedicamentoVENDA.AsFloat,0, cdsMedicamentoUNIDADE.AsString); 3 - FDataModule.ACBrECF.SubtotalizaCupom(0); 4 - Quando tem valor a ser pago pelo paciente 4.1 Valor do MS FDataModule.ACBrECF.EfetuaPagamento(FormaPagto, edtVlSaude.Value); 4.2 Valor Pago pelo Paciente FDataModule.ACBrECF.EfetuaPagamento(Formas.Codigo, edtvlPaciente.Value); 5 - Quando não tem valor a ser pago pelo Paciente 5.1 FDataModule.ACBrECF.EfetuaPagamento(FormaPagto, edtVlSaude.Value); 6 - FDataModule.ACBrECF.InfoRodapeCupom.Imposto.Fonte := 'IBPT'; 7 - FDataModule.ACBrECF.InfoRodapeCupom.Imposto.ValorAproximado := valorMG; 8 - FDataModule.ACBrECF.InfoRodapeCupom.ParaibaLegal := true; 9 - FDataModule.ACBrECF.FechaCupom(Mensagem); 10 - FDataModule.ACBrECF.AbreRelatorioGerencial(StrToInt(RelatorioGe)); 11 - FDataModule.ACBrECF.LinhaRelatorioGerencial(Texto); (Aqui as linhas do gerencial) 12 - FDataModule.ACBrECF.FechaRelatorio; Até aqui perfeito sem problemas Se Ambiente for de homologação já delete o CUpom fiscal emitido FDataModule.ACBrECF.CancelaCupom; COOCAN:= STRTOINT(FDataModule.ACBrECF.NumCOO )- 1; Aqui le entra na Unit da Daruma que retonra que não existe cupom a ser camcelado procedure TACBrECFDaruma.CancelaCupom; if fpMFD then begin RetCmd := EnviaComando( FS + 'R' + #200 + '046'); // Verifica se precisa cancelar CCD; end else raise EACBrECFCMDInvalido.Create( ACBrStr('Não existe documento para cancelar.') ); /////////Já Cai aqui

Não sei se é a mesma coisa, mais rescentemente baixei da devmedia um sincronizador. ele sincroniza dados de 5 bases diferentes. Access Firebird SqlServer paradox mysql o procedimento vc monta via xml, se alguma tabela for alterada basta mudar o xml ou atualizar pelo proprio sistema. ele está manual, mais foi feito para aprendizado, a pessoa querendo colocar automático basta implementar. Eu fiz o teste com dois bancos e funcionou perfeitamente. Access para Firebir / Firebird para Firebird. e da forma que foi feita basta implementar outras base de dados.

Estou fazendo o farmacia popular Estou com dificuldades no fechamento do cupom, estou usando o codigo abaixo Impressora Daruma FS-700 UECF.AbreCupom(edtCPFPaciente.Text , edtNomePaciente.Text ,'',''); UECF.VendeItem(cdsMedicamentoCODIGO.AsString , cdsMedicamentoMEDICAMENTO.AsString , cdsMedicamentoECFICMSST.AsString , cdsMedicamentoQTDEAUTO.AsFloat , cdsMedicamentoVENDA.AsFloat ,cdsMedicamentoUNIDADE.AsString); UECF.EfetuaFormaPagamento(Formas.Codigo, edtvlPaciente.Value); FDataModule.ACBrECF1.IdentificaOperador(edtoginvendedor.Text); FDataModule.ACBrECF1.InfoRodapeCupom.ParaibaLegal := true; VarMensagem := 'Val.Aprox.Tributos R$ ' + FormataFloat('V',valorMG ) + '(' + FormataFloat('V',perca) + '%)Fonte IBPT'; FDataModule.ACBrECF1.FechaCupom(VarMensagem); Aqui acontece o erro (Impressora Daruma não está respondendo) Pelo caixa o fechamento do cupom é utilizado o ACBRTEFD não acontece o erro.

tenho um sistema fiscal que utiliza formas 06 formas de pagamento e 6 relatórios gerenciais. fui instalar este sistema em uma loja que tem 8 caixa, esta loja já utilizava um outro sistema. Eu emiti uma leitura X nas impressoras e só tem cadastrados duas formas de pagamento e 01 relatório gerencial. Pergunto. Eu posso cadastrar outras formas de pagamento e outros relatórios gerenciais sem precisar de intervenção ? 150X8 = 1.200,00 custo da intervenção -- um verdadeiro assalto

Juliomar obrigado por responder A minha duvida é a seguinte. Pelo meu entedimento os dados do envio e recebimento são em formato xml, porem no manual fala que o envio e resposta são em formata txt, inclusive passam até o layout de cada arquivo. Eu já trabalho com o sngpc que é em formato XML, e o problema da farmacia popular é que não existe um espaço pra que se possa fazer testes,

Estou desenvolvendo o Farmacia Popular. Não estou sabendo como pegar o retorno, pois não sei como é que ele vem, se em XML,String. Se alguem já fez e puder mim dá uma dica eu agradeço.

Solivan eu gtentei desse jeito porem fica comentado FormListaCliente.ShowModal(procedure(ModalResult: TModalResult) "TModalResult' Objeto não declared ou não identificate algo assim

Pra resolver o problema da assinatura eu criei o keystore , mas após conseguir abrir o sistema do emuladr android descobri tanta diferença. android 4.3 ShowModal não funciona no android ou não tem suporte, mas dá pra contornar tranquilamente SetFocus também não funciona ou não tem suporte A aplicação não abre como um icone, pra que o usuário aperte ai venha a tela de login, já abre na tela de login. ( esse aqui é o que tá pegando) não sei nem como colocar o icone. da forma tradicional do Delphi não é pois já fiz.

Estou tentando gerar o APK no delphi XE6 compilação sem erro e sem warning. na geração do apk aparece a seguinte mensagem c:\program files (x86)\embarcadero\studio\14.0\bin\paclient.exe -u8 [Warning Warning] Missing provisioning information for the "Application Store" platform configuration, the file '.\Android\Debug\UsoftCrediario\bin\UsoftCrediario.apk' has been sucessfully generated but it has not been signed and it is a non-instalable package. pela tradução o arquivo não é assinado. pesquisando na net encontrei alguns tópicos dizendo que o delphi não assina APK com mais de 10mb. eu achei estranho, pois qualquer APK no delphi fica enorme e os caras não iam cometer um erro desses. Se alguem tiver alguma dica eu agradeço. Observação. As propriedades do SDK manager está tudo OK, nenhuma com exclamação. o projeto roda certinho em modo windows.

Estou gfazendo o roteiro do TEF payGo da NTK nos teste que tem que desligar a impressora recebo a mensagem "Impressora não responde, Deseja continuar ?" porem mouse e teclado estão travados olhando o fonte do TEFD vi que é usado este comando "BloquearMouseTeclado( True)" Quando então de mensagens não teria que em algum lugar destravar mouse e teclado com o comando "BloquearMouseTeclado( False)". Se já existe desculpem mais somente pra esta mensagem que fica travado, pras demais mensagens do TEFD o mouse e teclado são destravados. Obrigado

Adriano tambem estou fazendo o roteiro de teste do TEF e estou justamente no passo 23. No meu caso recebo a mensagem "Documento não pode ser alterado" estou com o roteiro 2.0 baixado do site da NTK aconteceu com vc tambem ? Resultado esperado pelo teste Venda de 10,00 Recibo impresso Transação confirmada valor total 9,00 valor original 10,00 Desconto 1,00

Daniel o problema é que na minha maquina todos funcionam perfeitamente, o problema é na maquina do cliente com Win7 32 bits, na minha maquina com win7 64bits funciona não dá problema. o cliente veio até o escritorio pra que eu mostrasse pra ele que aqui não dava erro, levei ele também em outro cliente pra mostrar que não dava erro. o bababdo é que só na maquina dele acontece isso. o instalador que usei é o mesmo que usei nos clientes que não dão problema, já revisei toda a configuração da máquina, a unica coisa diferente neste cliente é a versão do windows7 32bit e o antevirus Nod32, que nos outros clientes usam avast ou kapesky e windows 7 64bits. tô quase mandando ele formatar a maquina