MarcioCC

no meu sistema consulta a chave da NF via Icloud no site do sefaz e trago o captcha para meu form para o usuario digitar e fazer a consulta.

Boa noite , qual o endereço correto para pegar a captcha do site da Sefaz?? To usando este endereço com webbrowser http://www.nfe.fazenda.gov.br/scripts/srf/intercepta/captcha.aspx?opt=image esta mostrando uma tela de erro : Server Error in '/' Application. Qual o endereço correto para pegar o captcha?? Obrigado ...

Boa noite amigos , estou importando dados de arquivos xml para dentro de minha tabela esta dando o seguinte mensagem de erro , segue em anexo, por favor alguem ja por isso , me da uma ajuda por favor...Obrigado. Segue o codigo para fazer a importação: // Variaveis dos campos para importação: vid, vnat, vnota, vserie, vcfop, vmodelo, vemissao, vsaida, vuf, vcodmunicipio, vdv: string; vemitente, vdestinatario, vemitente_cnpj, vdestinatario_cnpj: string; vcod_item, vcod_fornecedor, vcod_produto: string; vcidade, vcep, vcomplemento, vtelefone1, vtelefone2, vfax, vcontato1, vcontato2: string; vcelular1, vcelular2, vemail, vhomepage, vcnpj, vie, vbanco, vagencia, vconta: string; vobs1, vobs2, vobs3, vnumero, vim, vcod_municipio_ibge, vibge: string; vnomeprod, vxBairro, vxLgr, vfantasia, vmunemitente, vmundestinatario: string; xvnomeprod, vcadprodnovo, vtipo, vassistencia_tecnica: integer; va: double; vdata: string; vfracao: double; { : // CARREGA O XML PARA O COMPONENTE } ACBrNFe1.NotasFiscais.Clear; { : // ALIMENTA AS VARIAVEIS CONFORME XML } vid := copy(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID, 4, 44); vnat := ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.natOp; vnota := frmprincipal.zerarcodigo (IntToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.nNF), 6); vserie := IntToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.serie); vmodelo := IntToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.modelo); vcfop := ''; vuf := IntToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.cUF); if (DateToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi) <> ' / /') and (DateToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi) <> '30/12/1899') then vemissao := DateToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi) else vemissao := ' / / '; if (DateToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dSaiEnt) <> ' / /') and (DateToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dSaiEnt) <> '30/12/1899') then vsaida := DateToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dSaiEnt) else vsaida := vemissao; vcodmunicipio := IntToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.cMunFG); vdv := IntToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.cDV); vemitente := ACBrNFe1.NotasFiscais.Items[0].NFe.Emit.xNome; vemitente_cnpj := ACBrNFe1.NotasFiscais.Items[0].NFe.Emit.CNPJCPF; vmunemitente := IntToStr(ACBrNFe1.NotasFiscais.Items[0] .NFe.Emit.EnderEmit.cMun); vdestinatario := ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.xNome; vdestinatario_cnpj := ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.CNPJCPF; vmundestinatario := IntToStr(ACBrNFe1.NotasFiscais.Items[0] .NFe.Dest.EnderDest.cMun); { : // ALIMENTA OS CAMPOS DO FORM COM INFORMAÇÕES DO XML } eid.Text := vid; enatureza.Text := vnat; enota.Text := vnota; emodelo.Text := vmodelo; eserie.Text := vserie; ecfop.Text := vcfop; enota_uf.Text := vuf; edata_emissao.Text := vemissao; edata_saida.Text := vsaida; ecod_municipio.Text := vcodmunicipio; edv.Text := vdv; eemitente.Text := vemitente; edestinatario.Text := vdestinatario; ecnpj_emitente.Text := FormatMaskText('99.999.999/9999-99;0;_', vemitente_cnpj); ecnpj_destinatario.Text := FormatMaskText('99.999.999/9999-99;0;_', vdestinatario_cnpj); euf_emitente.Text := ACBrNFe1.NotasFiscais.Items[0].NFe.Emit.EnderEmit.UF; euf_destinatario.Text := ACBrNFe1.NotasFiscais.Items[0] .NFe.Dest.EnderDest.UF; emunicipio_emitente.Text := vmunemitente; emunicipio_destinatario.Text := vmundestinatario; ecod_fornecedor.Text := ''; ecod_destinatario.Text := '000001';

Boa noite , estou usando o componente ACBrECF com LAZARUS quando vou executar a aplicação da a seguinte mensagem: Segue imagem em anexo do erro. Como faço para tirar essa mensagem, estive pesquisando e parece que essa proriedade foi tirada do componente mais nao consigo tirar ela do sistema. Obrigado.. DEUS ABENÇOE !!

Obrigado amigo agora entendi..valew!!

Boa tarde amigos , estou com uma duvida , o certificado digital SAT é usado somente para quem tira NF-e?? no caso no SAT precisa ter tambem o certificado digital?? Pois baixei um manual de orientação do SAT e ele fala assim: 2.2. Conceito do equipamento SAT O equipamento SAT é um dispositivo que gera o CF-e-SAT, documento fiscal de existência exclusivamente digital, emitido e armazenado por meio exclusivamente eletrônico, com o intuito de documentar uma operação de circulação de mercadorias em substituição ao Cupom Fiscal, com validade jurídica garantida pela assinatura digital realizada pelo equipamento SAT com base em Certificado Digital atribuído ao contribuinte. Por que essa duvida, tive em um cliente hoje e ele me disse que o contador dele falou que o certificado é só para quem emite NF-e , é isso mesmo?? Obrigado... DEUS ABENÇOE !!

Nao tem , a unica que tem o nome parecido é a libexslt-0.dll a libxslt-0_.dll nao existe.

Boa noite , pessoal to tentando compilar pelo Lazarus o exemplo ABCBrSAT ele compila e nao da erro algum , só que nao abre o programa , quando vou na pasta ACBrSAT e tento abrir o SATTESTE.EXE ele pede a DLL libxslt-0_.dll , nao consigo achar essa DLL em nenhum lugar , alguem tem essa DLL para me enviar?? Obrigado ...

obrigado amigo vou estudar

Bom dia amigos, to entrando agora no meu sistema na parte de desenvolver o SAT alguem tem um passo a passo ou manual sobre SAT para me ajudar a entender o componente SAT ACBr?? Obrigado !! DEUS ABENÇOE A TODOS !!

OK..obrigado amigo vou instalar.

Bom dia amigos, to tentando instalar o pacote ACBr_TCP no LAZARUS 1.6 compilo e quando peço para instalar ele gera a seguinte mensagem de erro: ACBr_WinHttp.pas(13,8) Error: ENDIF without IF(N)DEF O que devo fazer?? uso o LAZARUS 1.6 64 Bits Desde já agredeço a ajuda...

Bom dia amigos, to tentando instalar o pacote ACBr_TCP no LAZARUS 1.6 compilo e quando peço para instalar ele gera a seguinte mensagem de erro: ACBr_WinHttp.pas(13,8) Error: ENDIF without IF(N)DEF O que devo fazer?? uso o LAZARUS 1.6 64 Bits Desde já agredeço a ajuda...