CelsoVS

Olá pessoal, boa tarde! Relativo a "Erro no suporte a canais seguros", acabo de resolver esse problema em um dos meus clientes, seguindo orientação obtida em outro fórum e postada por Lúcio Costa Gusmão (Consultor técnico). No meu caso, fiz apenas o recomendado, conforme segue: "Boa tarde. Este erro pode estar ocorrendo devido a falhas de comunicação entre o componente e a SEFAZ. Para sanar esta falha na comunicação basta seguir o passo a passo abaixo: 1º - Vá até o Painel de Controle do Microsoft Windows: Menu Iniciar -> Painel de Controle 2º - Escolha a Opção: Opções da Internet; 3º - Vá até a aba “Avançadas” e, na caixa “Configurações”, vá até as últimas opções (role a barra de rolagem até o final) e: a. Marque a opção: Usar SSL 2.0; b. Desmarque a opção: Usar SSL 3.0; c. Verifique se a opção “Usar TLS 1.0” está marcada. Caso não esteja, marque esta opção; d. Certifique-se de que as opções de TLS 1.1 e 1.2 estejam desmarcadas; e. Aplique as configurações e reinicie a aplicação. Outra causa também pode ser em relação ao certificado. Faça um teste informando o TipoCertificado=file. Experimente acessar este site no Internet Explorer https://nfe.fazenda.pr.gov.br/NFENWebServices/services/nfeStatusServicoNF (ESSE LINK, TALVEZ ESTEJA DESATUALIZADO, E NÃO FUNCIONOU) Caso abra, tente enviar novamente a chamada pelo componente. * Se for problema de cadeia de certificados o IE vai resolver. * Já se o seu certificado estiver vencido provavelmente nem vai abrir. Caso o problema persista desabilite o proxy, o firewall e o anti-virus. Eles podem atrapalhar na comunicação." OBS: Resolvi postar aqui, pois vejo que muitos passam pelo mesmo problema, e sei que não é fácil encontrar material que realmente resolve. Esse resolveu, pelo menos no meu caso. Porém, cada caso é um caso. O link, por exemplo, NÃO funcionou. Ele até pede a senha do certificado, mas não retorna nada. Apenas diz que o recurso não está disponível. Abraços CelsoVS

Olá Joel, bom dia! Obrigado pela atenção. Ajudou sim, mas pelo que entendi, a tabela .doc está completa e a .pdf inicia em 7309.0090. É isso mesmo ? Eu cheguei a entrar nesse site, mas não consegui chegar até esses arquivos. Obrigado mesmo, Abraços.

Senhores, bom dia! A NT 2014.004, que trata das mudanças na validação dos códigos NCM, nos remete ao link http://www.receita.fazenda.gov.br/guiacontribuinte/consclassfiscmerc.htm do MDIC. Imaginei que lá eu encontraria a tabela completa e outras informações sobre a Tabela de Classificação de NCM. Diferentemente disso, além do link estar quebrado (erro 404), eu navegando para www.mdic.gov.br nada consegui encontrar, mesmo seguindo instruções contidas na NT. Alguém saberia onde achar, com segurança, essa tabele ? Já procurei em muitos lugares, e há inclusive um site que fala em vender a tal tabela. É isso mesmo ??? Abraços, CelsoVS

Olá Juliomar, boa tarde! Obrigado pela atenção. Sempre que posso procuro entender o código. Sua confirmação vem clarear não apenas a minha dúvida, mas também de muitos outros companheiros de sofrimento. Abraço, CelsoVS

Olá companheiros, boa noite! Andei observando o código do ACBrNFe.pas, e concluí que eu não preciso fazer "NotasFiscais.Assinar" e "NotasFiscais.Valida". Pelo que entendi, quando executo "ACBrNFe.Enviar", o ACBr já faz também a assinatura e validação. Está correto isso? Ou não entendi direito o código ? Grato, CelsoVS

Obrigado mesmo Robson. Os esclarecimentos de vocês foram perfeitos. Essa lentidão estava me preocupando, por isso pensei em usar o off-line. Mas não sabia dessas recomendações todas. Agora vou refazer para transmissão em tempo real, com utilização de contingencia apenas em casos extremos. Grande abraço, CelsoVS

Olá Robson, mais uma vez obrigado. Ficou mais claro agora. Acho que tem tudo a ver com o que o que o Gilson falou também. É exatamente isso Gilson. Estou vendo o resultado em modo de homologação. Ainda não tive o prazer de fazê-lo em produção, e isso estava me preocupando muito. Estava até pensando em emitir tudo em lotes, ou seja, emissão em contingencia e envio em lotes no final do dia. Sendo assim, acho que não será necessário. Obrigado mesmo ao Robson e ao Gilson. Vida que segue agora! Abraço, CelsoVS

Olá Robson, bom dia! Obrigado pela sua atenção. Fiquei meio confuso em relação a isso. A função está definida assim: function TACBrNFe.Enviar(ALote: Integer; Imprimir: Boolean = True; Sincrono: Boolean = False): Boolean; Pelo que você está dizendo, eu tenho que enviar Síncrono e não Assíncrono. É isso mesmo ? Não seria Sincrono = False para enviar Assíncrono ? Sinceramente, isso não está bem claro pra mim, pois sempre achei que o modo Assíncrono é o mais rápido em relação a resposta do WS. Abç, CelsoVS

Senhores, boa noite! Estou desenvolvendo minha NFC-e, com a preciosa ajuda dos componentes ACBr. Ao chegar na fase de envio ao Sefaz, estou tendo uma demora muito grande para receber a resposta. Não imagino o que estou fazendo de errado, mas quem já errou sabe. Por isso peço ajuda dos senhores. Tenho notado em alguns lugares onde já estão usando NFC-e, ao pagar alguma compra a emissão é quase que instantânea. Agradeço de coração qualquer coisa que possa encurtar o meu caminho na solução desse problema. Abraços.

Olá Tatieli, bom dia! Ainda não consegui. Procurei bastante a respeito, mas não encontrei nada. Até hoje, alguns usuários me cobram isso. Eu não fiz nada para tirar o bendito clips, e não encontrei nada que pudesse modificar essa situação. Eles estão recebendo o e_mail, que está com o arquivo anexado, e como eles não veem o "tal" do clips, eles simplesmente não abrem o e_mail. Então ligam para meu cliente reclamando que o e_mail veio sem o anexo. Eu, quando fiz a rotina, imaginei exatamente o que o Jean Patrick explicou acima. Mas não é o que está ocorrendo. Qualquer solução que possa aparecer, eu vou postar aqui no fórum. Abç.

Olá Jean Patrick, bom dia! Obrigado pela atenção. Eu realmente não me preocupei com esse detalhe, quando eu fiz uma rotina para enviar arquivos anexados por e_mail usando ACBRMail, porque eu imaginava que ocorria exatamente o que você disse. Que o aplicativo de visualização colocaria aquele sinalzinho quando o e_mail tivesse um arquivo anexado. Mas não é isso que está acontecendo, e eu já procurei nas propriedades do ACBRMail e não achei nada que pudesse fazer isso. O problema é que o meu cliente está enviando os e_mails para seus destinatários (com anexo), e alguns desse destinatários quando olham o e_mail, eles se baseiam naquele sinal. Como não está com o bendito sinalzinho, eles não abrem o e_mail e ligam para o meu cliente reclamando que não veio. O arquivo está lá anexado, basta abrir o e_mail para ver, mas eles só abrem quando veem o sinal. abç, CelsoVS

Como sinalizar com aquele Clips para indicar que o e_mail tem anexo(s), usando o ACBrMail ??? Grato, CelsoVS

Senhores, boa noite! A título de informação, quero relatar o seguinte: Hoje perdi boa parte do meu dia, tentando resolver a rejeição Rejeição (533): Total da BC ICMS-ST difere do somatório dos itens Ocorre, que eu precisei adiantar meu computador em 1 (uma) hora para fazer testes com um ECF que está com seu horário errado e precisando de intervenção para que seja acertado. Concluídos esses testes, eu voltei a trabalhar em meu aplicativo NFC-e, e não me lembrei de corrigir a hora do computador. A partir daí, todas as tentativas de enviar NFC-e ao SEFAZ me retornavam a rejeição 533. Depois de muito apanhar, percebi meu esquecimento em corrigir o horário do computador. De pronto, fiz a correção, e pra minha surpresa passei a conseguir enviar minhas NFC-es sem que me retornassem a rejeição 533. Fica aqui o alerta para que outros não passem por isso. Abç

Resolvido. ACBrNFe.DANFE.ImprimirDANFEResumido ( NotasFiscais.Items[0].NFe ). Obrigado a todos.

Desculpe companheiro, mas eu fiquei em dúvida. Como lá não foi um tópico, eu apenas incluí como se fosse uma resposta. Eu achei que não foi adequado, e tentei excluir mas não soube como fazer. Então eu removi o anexo e criei um tópico novo. Peço desculpas se fui inconveniente.

Senhores, tenho uma dúvida e uma oferta de colaboração: - A dúvida é como fazer o DANFe (ACBrNFeDANFCeFortes) imprimir apenas a forma resumida. - A oferta, é que fiz algumas melhorias no visual desse DANFE ( impressão em bobina de 80mm ), e estou postando aqui a quem interessar possa. OBS: O zip contém apenas os arquivos ACBrDANFCeFortesFr.dfm e ACBrDANFCeFortesFr.pas FR.ZIP FR.ZIP

Senhores, tenho uma dúvida e uma oferta de colaboração: - A dúvida é como fazer o DANFe (ACBrNFeDANFCeFortes) imprimir apenas a forma resumida. - A oferta, é que fiz algumas melhorias no visual desse DANFE ( impressão em bobina de 80mm ), e estou postando aqui a quem interessar possa. OBS: O zip contém apenas os arquivos ACBrDANFCeFortesFr.dfm e ACBrDANFCeFortesFr.pas

... KKKKKKKKKKKKKKKKKKK ... o triste é ter que olhar pra'quilo sem dizer nada ... karaka , nunca tinha escrito "pra'quilo" ... nem sei se está certo, mas vale assim mesmo ... abç meu camarada conterrâneo ... qq coisa estamos por aqui ...

Olá xybery, bom dia! Desculpe a demora, mas o ritmo anda meio quente por aqui. Eu estou usando REST sim, e tentei achar onde alterar o html mas ainda não consegui descobrir, porque estava (entre outras coisas) dando prioridade a questão inicial desse post, lembra ? Pois bem, tenho boas notícias e vou postar aqui para dar como RESOLVIDO esse post, e certamente vai ser muito útil. Vamos lá: 1 - Mudei meu fonte, como já estava previsto para que se possa setar a conexão e a porta através de parâmetros. Segue o código que retorna a conexão: function TParamsServidor.GetConnection( ConnectionProperties: TDBXProperties ): TDBXConnection; Var vProps : TDBXProperties ; vDataBase : String; Begin if ConnectionProperties = Nil then vProps:= TDBXConnectionFactory.GetConnectionFactory.GetDriverProperties('Firebird') Else vProps:= ConnectionProperties ; With frmParamsServ Do Begin //Acessando a Base Um Try vDataBase := 'NomeComputador-ou-IP:X:\Caminho\NomeBancoDeDados'; vProps.Properties.Values['DataBase'] := vDataBase; Result := TDBXConnectionFactory.GetConnectionFactory.GetConnection(vProps); Except On E:Exception Do Begin Result := Nil; ... coloque aqui seu código para caso de algum erro ... End ; End ; End ; End; 2 - Identifiquei o que é preciso levar para a máquina onde será instalado o meu servidor, como segue: a - Compilei em meu projeto, a MidasDLL para não ter que distribuir tambem a Midas.dll (menos uma preocupação - não há esquecimento). b - Em Arquivos de "Programas\Common Files", criei a pasta "Borland Shared" e para dentro dela eu copiei a pasta "DBExpress" (para usar Firebird). Essa pasta está na sua máquina de desenvolvimento na mesma localização, e contém os arquivos "dbxconnections.ini" e "dbxdrivers.ini". c - Na minha máquina de desenvolvimento, onde está instalado o Delphi , na sub-pasta "Redist" existem uma sub-pasta "win32" e "win64" (atentar para a versão usada), selecionei as dll´s "fbclient.dll" e "dbxfb.dll". ATENÇÃO. Por precaução, coloquei-as na mesma pasta de meu executável. BEM! Aí foi só partir pro abraço e ser feliz! Emfim uma solução menos lusitana.

Olá xybery, boa tarde. Meu camarada, é o seguinte cara. E já fiz isso e está funcionando, apenas, não consigo ver remotamente os métodos que eu crio, mas vejo o ReverseString que é o método de teste que o Delphi cria. Sacou ?

Fala xybery. Tudo bem? Cara, interessante. Realmente aí no params ele não está, mas está no Object Inspector. Eu tenho aqui o fbcliente.dll, obrigado mais uma vez. Quanto ao Datasnap, acho que não me expressei bem. Eu quero que o programador que vai fazer a outra parte veja a API via internet porque ele está em SP e eu aqui no Rio. Eu consigo ver aqui na minha máquina, mas quando eu tento ver via internet, ele só mostra o ReverseString.

A propósito, vc sabe como faço para que outra pessoa veja a API do meu servidor datasnap ?

Olá xybery. Tudo bem? A minha tem umas diferenças, mas não acho que tenha a ver não: librarynameosx=libsqlfb.dylib vendorlibwin64=fbclient.dll vendorlibosx=/Library/Frameworks/Firebird.framework/Firebird blobsize=-1 commitretain=False database=database.fdb localecode=0000 password=masterkey rolename=RoleName sqldialect=3 isolationlevel=ReadCommitted user_name=sysdba waitonlocks=True trim char=False

Meu camarada boa tarde. Apaga tudo. Você não vai acreditar! Sabe ali no Data Explorer, onde vc cria a sua conexão com o BD ? Pois é. Esse era o problema, porque aquela conexão que é criada ali para o seu acesso a dados NÂO vai no seu executável de forma nenhuma, e essa era a causa. Não sei se você pode me dizer isso, mas preciso descobrir como faço para instalar isso na máquina onde vou montar meu servidor. Eu resolvi instalando o Delphi nessa maquina, abrindo o projeto lá e criando a conexão no Data Explorer. Mas claro que não deve ser assim e eu preciso descobrir como fazer. De QQ forma, já posso seguir em frente. Mais uma vez , obrigado pela sua ajuda e a paciência em participar do problema. Vamos continuar buscando uma solução menos lusitana ... rs ... Abç

OK Elton. Obrigado pela ajuda. Já desmarquei.