Painel de líderes
Conteúdo popular
Showing content with the highest reputation on 06-09-2019 em todas as áreas
-
Olá @Fabio Fernandes da Silva Agradeço pelos esclarecimentos e parabens pela inciativa, mas o suporte que vocês disponibilizaram em São José dos Campos com todo respeito foi uma das piores experiencias de atendimento ao cliente que já tive até hoje, e olhe que já passei poucas e boas com o detram rs. Há mais de uma semana abri ticket, mandei email, e até liguei pra o numero do suporte da página da prefeitura , e nao obtive resposta alguma. A solução para todos esses problemas que nós temos enfretando nessa integração teria sido dirimida com apenas um exemplo do RPS preenchido corretamente. Entendi e até achei bacana o esforço da DSF em manter o layout antigo, mas infelizmente com um suporte desses, e sem documentação, fica muito obscuro ajustar tudo para funcionar corretamente. Tem sido uma seara por modificações tão simples. Se não fosse o pessoal daqui do ACBR, e as discussões com outros devs, não teriamos saido do lugar2 pontos
-
muito obrigado julio, ta resolvido aqui, a dica do ctrl resolveu, declareia no user pcnConversao, pcnConversaoNFe e tudo ok agora!!, vc é campeão!! vlw!!!2 pontos
-
Então a primeira coisa é tu deixar um único local pois se tiver dois ou mais delphi um único local serve. da segunda pergunta se fez cópia de units do acbr para dentro de pastas do seu projeto, deve verificar. mas é quase certo que onde está funcionando tem trechos de códigos que não deveriam estar ali . dica segure o Ctrl e clique em cima da propriedade que vai abrir onde ela está depois faz o mesmo com o tipo e dai verifica se essa unit faz parte da uses de seu formulário. é quase certo que não2 pontos
-
1 ponto
-
Boa tarde Suas sugestões foram disponibilizadas nos fontes do Projeto ACBr. Obrigado pela contribuição!1 ponto
-
1 ponto
-
Como eu precisava liberar isso pro cliente, tomei a liberdade de fazer a mudança. Se algum moderador puder validar e dar o "feedback" se isso pode de fato incorporar o componente, agradeço. Segue em anexo a .pas alterada. ACBrDFeDANFeReport.pas1 ponto
-
Boa tarde Laudelino, Você não pode incluir o INI do MDF-e junto com o da NF-e. Existem comandos da NF-e (NFe.comando) e existem comandos do MDF-e (MDFe.Comando). Sendo assim, você gera um arquivo INI para a NF-e e outro para o MDF-e. Muitos comandos são idênticos, inclusive os parâmetros. Um detalhe importante com relação ao MDF-e. Todo MDF-e tem que ser Cancelado caso o transporte não ocorra, ou Encerrado quando toda a carga do caminhão for entregue. Se não encerrar não consegue emitir outro MDF-e para o mesmo caminhão. Existem outras situações que devemos fazer o encerramento. Sugiro que você baixe a Cartilha Nacional do MDF-e que se encontra no Portal da SEFAZ-Virutal do RS - MDF-e e leia com muita atenção, existem diversos exemplos (situações) de transporte.1 ponto
-
1 ponto
-
Você precisa fazer configurações semelhantes ao usado para NFe. Como quase todas são as mesmas, podemos dizer que seu ACBrMonitor já está 80% configurado. Ainda assim, você deve verificar em especial a aba "DFe" e suas sub-abas.1 ponto
-
Reiniciamos a máquina, fizemos uma venda e cancelamos. Parece que está funcionando, vamos ver como ocorre ao longo do dia. Muito obrigado!1 ponto
-
So pra avisar que o Problema foi sanado . pela Ultima Atualização . Obrigado Acbr .1 ponto
-
1 ponto
-
Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.1 ponto
-
Show!!! Funcionou perfeitamente! Mais uma vez muito obrigado!! Um Grande Abraço!1 ponto
-
muito obrigado meu amigo!!, amanha cedo vou verificar e dou 1 retorno aqui se funcionou ou não, Vlw1 ponto
-
perguntas: tem só uma pasta de fontes do ACBr no micro? não tem fontes do ACBr com cópias por dentro seus projetos?1 ponto
-
Boa tarde, Realmente, alguns bancos estão tratando nas instruções. Att.1 ponto
-
Ok... agora compreendi... Veja a Unit: ACBrEscBematech.pas function TACBrEscBematech.ComandoQrCode(const ACodigo: AnsiString): AnsiString; begin with fpPosPrinter.ConfigQRCode do begin Result := GS + 'kQ' + // Codigo QRCode AnsiChr(ErrorLevel) + // N1 Error correction level 0 - L, 1 - M, 2 - Q, 3 - H AnsiChr(LarguraModulo * 2) + // N2 - MSB; 0 = default = 4 AnsiChr(0) + // N3 - Precisa computar Version QRCode ??? AnsiChr(1) + // N4, Encoding modes: 0 – Numeric only, 1 – Alphanumeric, 2 – Binary (8 bits), 3 – Kanji, IntToLEStr( Length(ACodigo) ) + // N5 e N6 ACodigo; end; end; Veja ainda o método: IntToLEStr, da Unit ACBrUtil.pas {----------------------------------------------------------------------------- Converte um "AInteger" em uma String bin�ria codificada como Little Endian, no tamanho m�ximo de "BytesStr" Exemplos: IntToLEStr( 106 ) = chr(106) + chr(0) ---------------------------------------------------------------------------- } function IntToLEStr(AInteger: Integer; BytesStr: Integer): AnsiString; var AHexStr: String; LenHex, P, DecVal: Integer; begin LenHex := BytesStr * 2 ; AHexStr := IntToHex(AInteger,LenHex); Result := '' ; P := 1; while P < LenHex do begin DecVal := StrToInt('$'+copy(AHexStr,P,2)) ; Result := AnsiChar( DecVal ) + Result; P := P + 2 ; end ; end;1 ponto
-
@BigWings você esta correto ! Vi no manual versão 6 que a mensagem 597 que na NT 2011/02 era "Rejeição: NF-e emitida em ambiente de homologação com CNPJ do destinatário diferente de 99999999000191" foi substituída por "Rejeição: CFOP de Importação e não informado dados de IPI" mantiveram apenas a 598 "Rejeição: NF-e emitida em ambiente de homologação com Razão Social do destinatário diferente de NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL" O mais estanho é que tenho isso numa classe que ate hoje emite as notas em homologação com base na NT2011/02 e nenhuma nota é rejeitada. Acredito que devem ter mudado isso devido a manifestação do destinatário que se tornava impossível de testar nesse ambiente. @darlananogueira desculpe a resposta imprecisa, mas para me redimir submeti o primeiro xml que vc compartilhou no site do validador do RS e deu a resposta abaixo.1 ponto
-
Se você tem os fontes dos componentes do ACBr baixados, está na pasta ACBr\Exemplos\ACBrDFe\Schemas\CTe.1 ponto
-
remova o IdHTTP1 do seu formulario e tente usar assim: Var code: Integer; sResponse: String; Json: String; JsontoSend, AResponseContent: TStringStream; iStatusCode: Integer; http: TIdHTTP; Begin Json := '{"Customer": { "DocumentType" : "CNPJ", "DocumentNumber" : "11229082000167" }, "Driver": { "PhoneCountry": "+55", "PhoneNumber": "19999690130", "Name": "Daniel Marcelo"} }'; JsonToSend := TStringStream.Create(Json); AResponseContent := TStringStream.Create(''); http := TIdHTTP.Create(Nil); Try http.Request.CharSet := 'utf-8'; http.Request.ContentType := 'application/json'; http.Request.CustomHeaders.AddValue('AppKey', '58fb05c3-4e8b-4929-b7df-95bd261035c9'); http.Request.CustomHeaders.AddValue('RequesterKey', '629eda6f-9df5-40e7-a94e-4c54cec83a15'); http.Response.ContentType := 'applicattion/json'; http.Response.CharSet := 'utf-8'; Try http.Post('https://api.tudoentregue.com.br/v1/customers/AddDriver', JsontoSend, AResponseContent); Except On E: Exception Do Begin Memo1.Lines.Clear; Memo1.Lines.Add('Error on Response Code: ' + InttoStr(http.ResponseCode)); Memo1.Lines.Add('Error on Response Text: ' + http.ResponseText); Memo1.Lines.Add('Error on Request: ' + sLineBreak + e.Message); exit; End; End; Memo1.Lines.Clear; Memo1.Lines.Add('Response Content: ' + AResponseContent.DataString); Memo1.Lines.Add('Response Code: ' + InttoStr(http.ResponseCode)); Memo1.Lines.Add('Response Text: ' + http.ResponseText); Finally JsontoSend.Free; AResponseContent.Free; http.Free; End; eu adicionei essas duas linhas: Memo1.Lines.Add('Error on Response Code: ' + InttoStr(http.ResponseCode)); Memo1.Lines.Add('Error on Response Text: ' + http.ResponseText); porque caso ResponseCode for 403,404,422 o indy vai levantar um except sendo que //IdHTTP1.ResponseCode = 403 Motorista não Relacionado. *response vazio* //IdHTTP1.ResponseCode = 404 Motorista não Localizado. *response vazio* então você não conseguiria tratar o erro de Motorista não Localizado por exemplo. caso tenha resolvido seu problema marque o post como melhor resposta clicando no sinal de no canto superior esquerdo do post1 ponto
-
Esse erro ocorreu quando foi instalar um pacote que utiliza o Fast Report. Verifique se o mesmo se encontra instalado na IDE.1 ponto
-
O CNPJ do destinatário esta diferente de 99.999.999/0001-91 ja que é homologacao e a IE deveria estar vazio1 ponto
-
Meu amigo, você deve ler o manual do contribuinte http://www.nfe.fazenda.gov.br/portal/exibirArquivo.aspx?conteudo=URCYvjVMIzI= para se interar dos campos necessários1 ponto
-
Por acaso você não inverteu o emitente pelo destinatário? Pois analisando o seu XML pude perceber que o seu emitente é uma pessoa física, está correto? <emit> <CPF>45560641553</CPF> <xNome>RICARDO YAMADA</xNome> <xFant>RICARDO YAMADA</xFant>1 ponto
-
Boa Tarde Amigo Marcos, solução é: nas linhas abaixo comentei a linha "tfNenhum" e no meu form com Combox so tem Valor 1 e 2,(nao informar a 0 zero nao ) e assim como normal no form deixei como Eventual do modo Padrao, no tipo de fretamento ao passar as informação, alimento com Data de saida somente para Eventual, deu certo e apareceu na XML, lembrando que schemas Atualizado.. 1 = Eventual + Data Saida e Horario, porem nao sendo com Data e horario do mesmo de Emissao 2 = Continuo espero ter ajudado... with infFretamento do begin case DM.qryConsulta['CON_TPFRETAMENTO'] of //0 : infFretamento.tpFretamento := tfNenhum; 1 : infFretamento.tpFretamento := tfEventual; 2 : infFretamento.tpFretamento := tpContinuo; end; if infFretamento.tpFretamento = tfEventual then begin infFretamento.dhViagem := DM.qryConsulta['CON_DATAEMISSAO']; end; end;1 ponto