Fernando Rodrigo

boa noite pessoal, liguei para NTK e falei com o Isac e ele me disse simplesmente para seguir o roteiro, que a unica modificação que tem que ser feito e em vez de passar o numero do COO na hora de dar o start no tef e passar em branco os parametros, como segue abaixo o fluxo normal do tef ACBrTEFD1.CRT(valor,indice,ACBrECF1.NumCOO) (Método normal) ACBrTEFD1.CRT(valor,indice,'') (Método alterado) o que deveria segundo ele é passar em branco o numero do COO, vendo essa alteração que ele me passou eu poderia em vez de passar o numero do COO passar o numero do meu pedido, ou numero da nota ou outro numero qualquer e seguir o fluxo normal do tef. Gerar a nfc-e passando esse mesmo numero, se o sefaz autorizar continua o fluxo normal, se nao autorizar cancela tudo, ja que o tef e a nfc-e teria o mesmo numero. O que voces acham ? não iria mudar praticamente nada do que existe hoje, so que em vez de pegar o numero do COO pegaria o numero que eu informar ja que esse número é unico. Qual a sugestão de voces ? alguem ja desenvolveu algo e que esteja funcionando ?

me passe ele sem formatação no xml, somente uma linha

diego_aguiar qual o problema ? tem como anexar seu xml para checagem

valeu Jefferson, fico muito grato pela sua ajuda,com isso posso fazer o restante dos estados

abri o programa que vc me passou e segui os passos so que não esta funcionando Post.WriteString('tCNPJ='+OnlyNumber(ACNPJ)+'&'); Post.WriteString('rTipoDoc=2'); Post.WriteString('tDoc='+OnlyNumber(ACNPJ)+'&'); Post.WriteString('tCCE='+OnlyNumber(AInscricaoEstadual)+'&'); Post.WriteString('tCPF='+OnlyNumber(AInscricaoEstadual)+'&'); Post.WriteString('btCGC=consultarSintegra'); Post.Position:= 0; HttpSend.Clear; HttpSend.Document.Position:= 0; HttpSend.Document.CopyFrom(Post, Post.Size); HTTPSend.MimeType := 'application/x-www-form-urlencoded'; HTTPPost('http://appasp.sefaz.go.gov.br/Sintegra/Consulta/default.asp'); precido que me ajude somente nesse primeiro para saber os passos de onde posso pegar as informações

vou dar uma olhada para ver como funciona, acho a ideia excelente, poderia ser implementado no acbr

Segue em anexo ACBrConsultaSintegra.pas

nao sei o que estou fazendo de errado, mas não retorna nada, ja olhei os anexos e não consigo achar o problema. ja mudei os parametros, voltei o que era antes, olhei no retorno, coloquei os parametros novamente e retorna zerado. Post.WriteString('CNPJ='+OnlyNumber(ACNPJ)+'&'); Post.WriteString('TipoDoc=2'); Post.WriteString('Doc='+OnlyNumber(ACNPJ)+'&'); Post.WriteString('CCE='+OnlyNumber(AInscricaoEstadual)+'&'); // Post.WriteString('btCGC=consultarSintegra()'); Post.WriteString('btCGC=Consultar'); Post.Position:= 0; HttpSend.Clear; HttpSend.Document.Position:= 0; HttpSend.Document.CopyFrom(Post, Post.Size); HTTPSend.MimeType := 'application/x-www-form-urlencoded'; HTTPPost('http://appasp.sefaz.go.gov.br/Sintegra/Consulta/default.asp');

bom dia pessoal, alguem deu continuidade ao componente ?

Bom dia a todos, estava vendo na internet e achei um site que faz consulta de protestos. Seria interessante fazer um componente para esse tipo de consulta ? o que vocês acham ? Consulta feita da mesma forma que CNPJ Vejam o link e façam os testes http://www.pesquisaprotesto.com.br/index.php

Estou fazendo a validação do cheque em anexo e esta sempre retornando o numero de cheque invalido (Número de Cheque inválido.). Nunca tinha visto esse banco. A validação do cheque é feito no módulo 11 pq fiz os teste com esse modulo e pelo que vi o numero do cheque esta incorreto mesmo. Será que o banco fez o cheque errado ?

Ja tentou mudar a porta para 587 ? Tente tambem deixar ACBrMail1.SetSSL := False; No meu passou dessa forma, mas somente quando é gmail no meu caso faço dessa forma if dm_Geral.CONF_EMAILTLS.Value = 'S' then // utilizar TLS ? ACBrMail1.SetTLS := True else ACBrMail1.SetTLS := False; // se o e-mail for do gmail a opção do componente utilizar SetSSL tem que ser false, mas se outros e-mail dai o sistema checa na configuração do meu sistema if pos('gmail',DeEmail) = 0 then // email do emitente, checa se tem alguma palavra gmail para configuração diferente dos outros e-mails begin if dm_Geral.CONF_EMAILAUTENTICACAO.Value = 'S' then ACBrMail1.SetSSL := True else ACBrMail1.SetSSL := False; end;

alguem fez para delphi

bom dia qual a utilização e aplicação ?

na guia não é impresso o nome do destinatario, somente o cnpj e municipio, teria como imprimir tambem o nome passado no xml, estava vendo os fontes e não achei como fazer, no arquivo GNRE_GUIA.fr3 tambem não tem como colocar o campo tipo [Guia."razaoSocialDestinatario"] pq não é exportado para a guia. Como iria fazer ? <c37_razaoSocialDestinatario>DADOS DO DESTINATARIO</c37_razaoSocialDestinatario>

estava vendo a essa tabela e estava vendo que poderá ter um furo no código de barras. Imagine que vc tem 4 tipos de amortecedores de carro, todos eles tem a mesma classificação fiscal, mas o código de barras será diferente. Como poderia tratar esse problema ? A ideia é excelente de reunir esses dados, mas fiquei em dúvida quando ao problema acima.

o sefaz esta com problema ja faz algum tempo, somente em ambiente de homologação. Ainda não foi resolvido https://ciranda.me/tsdn/base-de-conhecimento/post/problema-no-ambiente-de-homologacao-de-goias

1º - Vá até o Painel de Controle do Microsoft Windows: Menu Iniciar -> Painel de Controle2º - 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; 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.

Ítalo, nunca disse que vocês tem que resolver isso, eu disse ( Alguém já conseguiu resolver esse problema) ? Como não sei quem utiliza a empresa webiss achei que outras pessoas também estavam passando por esse mesmo problema ou ate mesmo com outros servidores. Como aqui é um fórum achei que poderia fazer esse tipo de pergunta, mas peço desculpas pela minha dúvida.

Caros amigos, alguém ja fez a conciliação Tef no seu sistema de automação Chega no final do mês pego todas as vendas, a vista, a prazo, parcelado no cartão e faço uma conciliação no meu sistema de automação. Fazer um serviço de conferência de vendas, pagamentos e cancelamentos de cartões de crédito, debito integrada ao nosso sistema Saber as vendas recebidas, a receber, antecipações, taxas, despesas e cancelamentos. Conciliação, entre as (Vendas realizadas) x (Pagamentos):

Pessoal tambem utilizo o webiss em porto nacional, mas não utilizo o acbr para geração das notas, so que a prefeitura esta levando quase 5 minutos para liberação as notas de serviço. Mandei um e-mail para eles e me disseram que as notas entram em fila e vc tem que aguardar a liberação das notas pelo sistema da webiss. Alguem ja conseguiu resolver esse problema :

Caros amigos, alguém esta utilizando acbr para fazer NFC-e juntamente com TEF ? Se alguém estiver utilizando como é feito ? No modo normal via impressora fiscal o meu esta normal, agora com a NFC-e não sei como será os procedimentos, ja que não tem numero do cupom ainda para geração do Tef. Como fica a impressão do comprovante da transação do tef ?

cada estado tem sua configuração, o demo so faz uma demonstração de como é feito, tem estados que exige informações complementares como numero do danfe e outras informações, tem outros estados que vc tem que informar um produto, cada estado tem sua particularidade. Existem estado que o produto é o mesmo, mas tem outros que o produto muda o nome, então tem que entrar no site e ver qual de adapta mais na sua realidade. http://www.gnre.pe.gov.br/gnre/portal/GNRE_LoteGerar.jsp Segue como eu fiz o meu with ACBrGNRE1.Guias.Add.GNRE do begin c01_UfFavorecida := 'PR'; c02_receita := 100099; // codigo da receita c28_tipoDocOrigem := 10; c04_docOrigem := '253701'; c06_valorPrincipal := 1.00; if c01_UfFavorecida = 'SC' then c10_valorTotal := 1.00; c14_dataVencimento := Now; c15_convenio := '16461313'; // codigo do convenio c33_dataPagamento := Now; c27_tipoIdentificacaoEmitente := 1; //1 - CNPJ / 2 - CPF c03_idContribuinteEmitente := '11111111111111'; // c17_inscricaoEstadualEmitente := '102640394'; c16_razaoSocialEmitente := 'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX'; // Razão Social c18_enderecoEmitente := 'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX'; // Endereço c20_ufEnderecoEmitente := 'GO'; // Estado c19_municipioEmitente := '08707'; // Codigo do IBGE do Municipio eX: 5208707 devera ser informado somente 08707 c21_cepEmitente := '74375740'; // cep do emitente c22_telefoneEmitente := 'XXXXXXXXXX'; // telefone do emitente if c01_UfFavorecida <> 'BA' then begin // dados do destinatario c34_tipoIdentificacaoDestinatario := 1; // 1 - CNPJ / 2 - cpf c35_idContribuinteDestinatario := '11111111111111'; // cnpj c38_municipioDestinatario := '05300'; // Codigo do IBGE do Municipio eX: 5208707 devera ser informado somente 08707 c37_razaoSocialDestinatario := 'XXXXXXXXXXXXXXXXXXXXXXXX'; // razão social end; if (c01_UfFavorecida = 'MA') Or // MARANHÃO (c01_UfFavorecida = 'MS') Or // MATO GROSSO DO SUL (c01_UfFavorecida = 'MG') Or // MINAS GERAIS (c01_UfFavorecida = 'BA') Or // BAHIA (c01_UfFavorecida = 'CE') Or // CEARÁ (c01_UfFavorecida = 'AM') Or // AMAZONAS (c01_UfFavorecida = 'RR') Or // RIO GRANDE DO NORTE (c01_UfFavorecida = 'PI') Or // PIAUI (c01_UfFavorecida = 'TO') Or // PIAUI (c01_UfFavorecida = 'AC') then // ACRE c26_produto := 33 // Comercio outros não especificados else if c01_UfFavorecida = 'AL' then // ALAGOAS c26_produto := 45 else if (c01_UfFavorecida = 'PE') Or // PERNAMBUCO (c01_UfFavorecida = 'SC') Or // SANTA CATARINA (c01_UfFavorecida = 'CE') then // CEARA c26_produto := 20; if (c01_UfFavorecida = 'MA') Or // MARANHÃO (c01_UfFavorecida = 'MS') Or // MATO GROSSO DO SUL (c01_UfFavorecida = 'MG') Or // MINAS GERAIS (c01_UfFavorecida = 'BA') Or // BAHIA (c01_UfFavorecida = 'CE') Or // CEARÁ (c01_UfFavorecida = 'AM') Or // AMAZONAS (c01_UfFavorecida = 'RR') Or // RIO GRANDE DO NORTE (c01_UfFavorecida = 'PE') Or // PERNAMBUCO (c01_UfFavorecida = 'SC') Or // SANTA CATARINA (c01_UfFavorecida = 'AC') then // ACRE c25_detalhamentoReceita := 12 else if c01_UfFavorecida = 'MT' then // MATO GROSSO c25_detalhamentoReceita := 17 else if c01_UfFavorecida = 'TO' then // TOCANTINS c25_detalhamentoReceita := 5; referencia.mes := '03'; referencia.ano := 2016; // informar numero da nota fiscal eletronica if (c01_UfFavorecida = 'MS') Or // MATO GROSSO DO SUL (c01_UfFavorecida = 'RS') Or // RIO GRANDE DO SUL (c01_UfFavorecida = 'AM') Or // AMAZONAS (c01_UfFavorecida = 'RR') Or // RIO GRANDE DO NORTE (c01_UfFavorecida = 'PE') Or // PERNAMBUCO (c01_UfFavorecida = 'RO') Or // RONDONIA (c01_UfFavorecida = 'SC') Or // SANTA CATARINA (c01_UfFavorecida = 'AP') Or // AMAPA (c01_UfFavorecida = 'TO') Or // AMAPA (c01_UfFavorecida = 'AC') then begin camposExtras.Add; camposExtras.Items[0].campoextra.tipo := 'T'; camposExtras.Items[0].campoextra.valor := '52160374115163000156550010002537011002537011'; if (c01_UfFavorecida = 'MS') then // MATO GROSSO DO SUL camposExtras.Items[0].campoextra.codigo := 27 else if c01_UfFavorecida = 'RS' then camposExtras.Items[0].campoextra.codigo := 74 else if c01_UfFavorecida = 'AM' then camposExtras.Items[0].campoextra.codigo := 12 else if c01_UfFavorecida = 'RR' then camposExtras.Items[0].campoextra.codigo := 36 else if c01_UfFavorecida = 'PE' then begin camposExtras.Items[0].campoextra.codigo := 09; camposExtras.Add; camposExtras.Items[1].campoextra.codigo := 04; camposExtras.Items[1].campoextra.tipo := 'T'; camposExtras.Items[1].campoextra.valor := c16_razaoSocialEmitente; end else if c01_UfFavorecida = 'RO' then camposExtras.Items[0].campoextra.codigo := 83 else if c01_UfFavorecida = 'AC' then begin camposExtras.Items[0].campoextra.codigo := 76; camposExtras.Add; camposExtras.Items[1].campoextra.codigo := 68; camposExtras.Items[1].campoextra.tipo := 'T'; camposExtras.Items[1].campoextra.valor := c16_razaoSocialEmitente; end else if c01_UfFavorecida = 'TO' then begin camposExtras.Items[0].campoextra.codigo := 80; camposExtras.Add; camposExtras.Items[1].campoextra.codigo := 72; camposExtras.Items[1].campoextra.tipo := 'T'; camposExtras.Items[1].campoextra.valor := c16_razaoSocialEmitente; end else if c01_UfFavorecida = 'SC' then camposExtras.Items[0].campoextra.codigo := 84 else if c01_UfFavorecida = 'AP' then camposExtras.Items[0].campoextra.codigo := 47; end else if c01_UfFavorecida = 'MG' then begin camposExtras.Add; camposExtras.Items[0].campoextra.codigo := 45; // 45; // minas gerais, ler o manual gnre camposExtras.Items[0].campoextra.tipo := 'T'; camposExtras.Items[0].campoextra.valor := c16_razaoSocialEmitente; end else if c01_UfFavorecida = 'PR' then begin camposExtras.Add; camposExtras.Items[0].campoextra.codigo := 57; camposExtras.Items[0].campoextra.tipo := 'T'; camposExtras.Items[0].campoextra.valor := c16_razaoSocialEmitente; camposExtras.Add; camposExtras.Items[1].campoextra.codigo := 57; camposExtras.Items[1].campoextra.tipo := 'T'; camposExtras.Items[1].campoextra.valor := c16_razaoSocialEmitente; end else if c01_UfFavorecida = 'AL' then begin camposExtras.Add; camposExtras.Items[0].campoextra.codigo := 65; camposExtras.Items[0].campoextra.tipo := 'T'; camposExtras.Items[0].campoextra.valor := c16_razaoSocialEmitente; camposExtras.Add; camposExtras.Items[1].campoextra.codigo := 65; // 45; // minas gerais, ler o manual gnre camposExtras.Items[1].campoextra.tipo := 'T'; camposExtras.Items[1].campoextra.valor := c16_razaoSocialEmitente; end end; Segue demo completo que estou utilizando Delphi.zip

Fastreport

Marcelo, não tive nenhum problema em nenhum estado, ja fiz as guias nos estados de (PR,MT,MA,MS,AL,AM,RS,RR,ES,RS,AC,PE,RO,SC,BA,AP,PA,PI,TO) e nenhum tive problema. São Paulo e Rio não gera, minhas deu um afalha no xml mas acho que é erro deles. O resto fiz tudo normal, claro que tem alguns estados que tem algumas particularidades, tipo observação obrigatorio, codigo do produto que outro estados não é exigito, numero do danfe, em alguns estado não é obrigatorio e outros são.