Ir para conteúdo
  • Cadastre-se

johnbh3

Membros
  • Total de ítens

    703
  • Registro em

  • Última visita

Tudo que johnbh3 postou

  1. Ola Povo boa tarde No demo esta como Tomador.AtualizaTomador := snNao; Tomador.TomadorExterior := snNao; <DPS xmlns="http://www.sped.fazenda.gov.br/nfse" versao="1.00"> <infDPS Id="DPS310620020803010700019400900000000000000001"> <tpAmb>2</tpAmb> <dhEmi>2023-06-11T13:27:50-03:00</dhEmi> <verAplic>ACBrNFSeX-1.00</verAplic> <serie>900</serie> <nDPS>1</nDPS> <dCompet>2023-06-11</dCompet> <tpEmit>1</tpEmit> <cLocEmi>3106200</cLocEmi> <prest> <CNPJ>08030107000194</CNPJ> <IM>12506890019</IM> <xNome>EMPRESA TESTE</xNome> <end> <endNac> <cMun>3106200</cMun> <CEP>31950280</CEP> </endNac> <xLgr>RUA GENERAL ZERBINE</xLgr> <nro>26</nro> <xBairro>GOIANIA</xBairro> </end> <fone>1633224455</fone> <email>[email protected]</email> <regTrib> <opSimpNac>1</opSimpNac> <regEspTrib>1</regEspTrib> </regTrib> </prest> <toma> <CPF>12345678901</CPF> <IM>123</IM> <xNome>INSCRICAO DE TESTE E TESTE</xNome> <end> <endNac> <cMun>3106200</cMun> <CEP>31950280</CEP> </endNac> <xLgr>RUA PRINCIPAL</xLgr> <nro>100</nro> <xCpl>APTO 11</xCpl> <xBairro>CENTRO</xBairro> </end> <fone>1622223333</fone> <email>[email protected]</email> </toma> <serv> <locPrest> <cLocPrestacao>3106200</cLocPrestacao> </locPrest> <cServ> <cTribNac>010201</cTribNac> <xDescServ>discriminacao I; discriminacao II</xDescServ> <cNBS>123456789</cNBS> </cServ> </serv> <valores> <vServPrest> <vServ>100.35</vServ> </vServPrest> <trib> <tribMun> <tribISSQN>1</tribISSQN> <tpRetISSQN>1</tpRetISSQN> </tribMun> <tribFed> <piscofins> <CST>01</CST> <vBCPisCofins>100.35</vBCPisCofins> <pAliqPis>1.65</pAliqPis> <pAliqCofins>7.60</pAliqCofins> <vPis>1.66</vPis> <vCofins>7.63</vCofins> <tpRetPisCofins>2</tpRetPisCofins> </piscofins> </tribFed> <totTrib> <vTotTrib> <vTotTribFed>1.66</vTotTribFed> <vTotTribEst>0.00</vTotTribEst> <vTotTribMun>7.63</vTotTribMun> </vTotTrib> </totTrib> </trib> </valores> </infDPS> </DPS> XML Parâmetros de Retorno Data de Envio : 11/06/2023 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : E0206 Mensagem: O grupo de informações de endereço no exterior deve ser informado obrigatoriamente quando o tomador for identificado pelo NIF. Correção: ---------
  2. Deu certo povo ! Não sabia que precisaria reinstalar Se puderem fechar o topico
  3. Vou fazer isto! reinstalar aqui. E reporto aqui.
  4. Eh queria evitar ter reinstalar todo acbr hahaha mas pelo visto n vai rolar. Deveria estar atualizado. Afinal o update não tem mais nada pra descer e nada pra reverter. Sendo assim a unica saida e remover toda pasta e baixar novamente. Estranho demais, eu trabalho com git e isso seria banal, pull, revert,
  5. Estranho ! não tem nada em vermelho pra da o revert.
  6. <DPS xmlns="http://www.sped.fazenda.gov.br/nfse" versao="1.00"> <infDPS Id="DPS310620020803010700019400900000000000000001"> <tpAmb>2</tpAmb> <dhEmi>2023-06-11T13:27:50-03:00</dhEmi> <verAplic>ACBrNFSeX-1.00</verAplic> <serie>900</serie> <nDPS>1</nDPS> <dCompet>2023-06-11</dCompet> <tpEmit>1</tpEmit> <cLocEmi>3106200</cLocEmi> <prest> <CNPJ>08030107000194</CNPJ> <IM>12506890019</IM> <xNome>EMPRESA TESTE</xNome> <end> <endNac> <cMun>3106200</cMun> <CEP>31950280</CEP> </endNac> <xLgr>RUA GENERAL ZERBINE</xLgr> <nro>26</nro> <xBairro>GOIANIA</xBairro> </end> <fone>1633224455</fone> <email>[email protected]</email> <regTrib> <opSimpNac>1</opSimpNac> <regEspTrib>1</regEspTrib> </regTrib> </prest> <toma> <CPF>12345678901</CPF> <IM>123</IM> <xNome>INSCRICAO DE TESTE E TESTE</xNome> <end> <endNac> <cMun>3106200</cMun> <CEP>31950280</CEP> </endNac> <xLgr>RUA PRINCIPAL</xLgr> <nro>100</nro> <xCpl>APTO 11</xCpl> <xBairro>CENTRO</xBairro> </end> <fone>1622223333</fone> <email>[email protected]</email> </toma> <serv> <locPrest> <cLocPrestacao>3106200</cLocPrestacao> </locPrest> <cServ> <cTribNac>010201</cTribNac> <xDescServ>discriminacao I; discriminacao II</xDescServ> <cNBS>123456789</cNBS> </cServ> </serv> <valores> <vServPrest> <vServ>100.35</vServ> </vServPrest> <trib> <tribMun> <tribISSQN>1</tribISSQN> <tpRetISSQN>1</tpRetISSQN> </tribMun> <tribFed> <piscofins> <CST>01</CST> <vBCPisCofins>100.35</vBCPisCofins> <pAliqPis>1.65</pAliqPis> <pAliqCofins>7.60</pAliqCofins> <vPis>1.66</vPis> <vCofins>7.63</vCofins> <tpRetPisCofins>2</tpRetPisCofins> </piscofins> </tribFed> <totTrib> <vTotTrib> <vTotTribFed>1.66</vTotTribFed> <vTotTribEst>0.00</vTotTribEst> <vTotTribMun>7.63</vTotTribMun> </vTotTrib> </totTrib> </trib> </valores> </infDPS> </DPS> Debugando o XML gerado não consegui tb entender o motivo do erro.
  7. sobre o erro Parâmetros de Envio Numero do Lote: 1 Parâmetros de Retorno Data de Envio : 11/06/2023 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : E0206 Mensagem: O grupo de informações de endereço no exterior deve ser informado obrigatoriamente quando o tomador for identificado pelo NIF. Correção: --------- Código : X203 Mensagem: Não foi retornado nenhuma NFSe. Correção: --------- No demo esta como Tomador.AtualizaTomador := snNao; Tomador.TomadorExterior := snNao; Confesso que estou completamente confuso sem entender este erro. O demo do Acbr no alimentarNFSe da todo sinal que a nota de exemplo e toda em territorio nacional.
  8. Ola Atualizei o componente e ta dando erro ACBR Demo NFSe x dando erro Undeclared identifier: 'proPrescon' no demo
  9. Deu certo aqui, agora deu um erro O grupo de informações de endereço no exterior deve ser informado obrigatoriamente quando o tomador for identificado pelo NIF. usando o demo. Sabem oque e?
  10. Ola Usando o demo ele da o erro nenhum provedor selecionado AcbrNFSe padrão proPadraoNacional erro nenhuma provedor selecionado, mas esta setado proPadraoNacional . O que to fazendo de errado? Pessoal este proPadraoNacional seria esta nova NFSe do governo mesmo? nacional?
  11. para o padrão nacional qual propriedade devo setar em layoutNFse tem : lnfsPadraoNacionalv1 porém em provedor não tem nacional. Pessoal desconsiderar atualizar o componente e apareceu proPadraoNacional
  12. johnbh3

    ACBrNFSeX e nacional?

    Ola ACBrNFSeX e nacional? parece que ja esta funcionando a NFSe nacional?
  13. Ajuda não estou entendendo uma coisa, quando dou o post da um erro Cannot open file "C:\demos\idHttp\Win32\Debug\[ { "id": 0, "NOME": "NENHUMA", var reqBody: string; idHttp: TIdHTTP; idSSL: TIdSSLIOHandlerSocketOpenSSL; response: string; begin idSSL := TIdSSLIOHandlerSocketOpenSSL.Create(nil); idHttp := TIdHTTP.Create(nil); try idHttp.IOHandler := idSSL; reqBody := '[' + ' {' + ' "ID": 0,' + ' "NOME": "NENHUMA"' + ' }' + ']'; idHttp.Request.ContentType := 'application/json'; response:=idHttp.Post('https://brasil-api-interna-producao.azurewebsites.net/api/licenciamento/', reqBody); ShowMessage(response);
  14. procedure SetDefaultPrinter(PrinterName: String); var I: Integer; Device : PChar; Driver : Pchar; Port : Pchar; HdeviceMode: Thandle; aPrinter : TPrinter; begin Printer.PrinterIndex := -1; getmem(Device, 255); getmem(Driver, 255); getmem(Port, 255); aPrinter := TPrinter.create; for I := 0 to Printer.printers.Count-1 do begin if Printer.printers[i] = PrinterName then begin aprinter.printerindex := i; aPrinter.getprinter (device, driver, port, HdeviceMode); StrCat(Device, ´,´); StrCat(Device, Driver ); StrCat(Device, Port ); WriteProfileString(´windows´, ´device´, Device); StrCopy( Device, ´windows´ ); SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, Longint(@Device)); end; end; Freemem(Device, 255); Freemem(Driver, 255); Freemem(Port, 255); aPrinter.Free; end; Pessoal boa noite, peguei este código no google, ele funciona. Só que eu tenho um pequeno problema; Eu tenho windows impressoras com nome PDF24, Fax, Daruma Esta PDF24 se eu faço SetDefaultPrinter('PDF24) - OK funciona Porém em nosso sistema temos um cadastro de impressora onde colocamos as portas Então nome do compartilhamento da impressora PDF24 e DANFE_PDF, então eu queria saber se existe algum funcao que retorne o nome das impressoras com seus compartilhamentos, dai eu conseguiria aplicar a SetDefaultPrinter.
  15. ! ----------------------------------------! ! SEM VALOR FISCAL ! ! ----------------------------------------! ! ! E CONFERENCIA TESTEE ! ! ---------------------------------------- ESTE e E TIPO EXPANDIDO
  16. Ola Pessoal tenho um TXT que falamos direto com a porta da impressora. Tem opção de enviar direito ou regrar um TXT Quando gerado o TXT ele fica assim ! ----------------------------------------! ! SEM VALOR FISCAL ! ! ----------------------------------------! ! ! E CONFERENCIAE ! ! ---------------------------------------- Eu consigo pegar o conteúdo deste TXT e jogar de volta pro Fortes ou outro de forma que ele fica negrito automático baseado no que esta no TXT?
  17. Pessoal, eu já vi uma configuração antes que consegue por edits abaixo da coluna do cxGrid para pesquisa, embaixo de cada coluna. Alguém sabe qual propriedade?
  18. Bom dia Eu até tenho, pensei que existisse um emulador pra cenário com suporte, essas coisas. Mas obrigado pessoal! Se quiserem fechar o post.
  19. Olá Bom dia, Pessoal existe emulador de impressora não fiscal?
  20. Pessoal Boa tarde Estou mechendo com Horse e estou tendo um retorno do seguinte: ESTE ERRP >>>> Microsoft MSXML is not installed Passo este JSON { "teste1": 1, "teste2": "01244553107", "teste3": 1, "teste3": "M", "xmlPagamentos":"<?xml version='1.0' standalone='yes' ?> <FINALIZADORES> <ITEM> <FIN_CODIGO>1</FIN_CODIGO> <VFI_VALOR>43,89</VFI_VALOR> </ITEM> </FINALIZADORES>", "quantidade": "1" } e dentro do JSON estou como pode ver na xmlPagamentos eu pago um XML. No delphi basicamente pego assim XMLDoc := TXMLDocument.Create(Application); XMLDoc.XML.Text := (XML); // no XML eu pego o conteudo da TAG xmlPagamentos senhores
  21. top isso mesmo, eu fiz com case ficou maior kkkk
  22. Ola Bom dia duvida em SQL/Firebird Pessoal, seguinte eu tenho uma tabela EXEMPLO: PEDIDO E o seguinte campos: ID, DATA, NUM_PEDIDO, NUM_PREP Ocorre que dependendo do cenário NUM_PREP pode estar NULL Então quero seguinte quando NUM_PREP não estiver vazio exiba ele num ALIAS NUM_PEDIDO, quando ele (NUM_PREP )estiver VAZIO (Null) eu exiba ele buscando do campo NUM_PEDIDO como alias NUM_PEDIDO No final quero que retorno em : NUM_PEDIDO sempre isto pq tem um APP que ja espera este NUM_PEDIDO e n quebra ele CASE WHEN VD.NUM_PREP IS NULL THEN VD.NUM_PEDIDO ELSE VD.NUM_PREP Fiz isso ta errado?
  23. Olá, E possivel gerar relatorio do fortes em imagem? Se sim podem me da uma dica?
  24. Pessoal fortes Exporta para imagem? Sabem me dizer como faz?
  25. Ola, pessoal duas dúvidas básicas o ACBrTEFAPI e comunicado rest? Outra dúvida posso usar o Tef com uma venda não fiscal(sem o nfce) ?
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...