thiagogobatti

Daniel, boa noite. Eu uso o lazarus para fazer app com dbf, funciona muito bem para windows ce tenho alguns clientes que tem umas raridades do HP iPaqa. Minha grande dificuldade foi fazer uma aplicação que fosse on-line direto com banco de dados mysql na web ou em uma rede wi-fi, hoje ja tem alguma solução para conexao com mysql no windows mobilie? O Projeto Android no lazarus esta evoluindo, tem alguma pagina onde podemos acompanhar teste e evoluções? abraços. Thiago

Italo, boa noite. É muito dificil desenvolver o CT-e sem certificado, entrei em contato com o sefaz de sp, para credenciar minha empresa e nao fui autorizado pelo motivo que minha empresa nao tem cnae de transportadora por isso nao posso credenciar, tenho que sempre testar o soft no cliente, o problema é que o cliente não fica na mesma cidade e atraza todo o serviço nosso e do cliente. Tem alguma outra solução para que possamos desenvolver no amb. homologação? obrigado.

Boa noite. Tenho um cliente que, quer em um ct-e colocar varias notas fiscais de produtos dentro de um ct-e! No meu entendimento cada nf-e tem o seu ct-e, correto? Na impressão da Dacte é possivel aparecer o nome do motorista e caminhão? obrigado, Thiago.

Jean. Consegui instalar o boleto fortes report para o delphi 2007? Instalei RLibWinD2K7vcl meus relatórios são feitos no fortes report e consigo copilar e rodar relatórios quando vou instalar os componentes do acbr usando os fortes da erro pedindo a RLibWinD2K6vcl. Como consegui solucionar?? abraços.

boa noite. tambem tive problema após atualização nos arquivos acbrUtil.pas [Warning] Funcoes.pas(6): Unit 'FileCtrl' is specific to a platform [Warning] ACBrUtil.pas(101): Unit 'FileCtrl' is specific to a platform [Warning] ACBrUtil.pas(237): Unsafe type 'Pointer' [Warning] ACBrUtil.pas(239): Unsafe type 'Pointer' [Warning] ACBrUtil.pas(382): Unsafe code 'String index to var param' [Warning] ACBrUtil.pas(1413): Unsafe code 'String index to var param' [Warning] ACBrUtil.pas(1532): Unsafe code 'ASM' [Warning] ACBrUtil.pas(1672): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1672): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1787): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1789): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1807): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1807): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1808): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1809): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1812): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1812): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1816): Unsafe type 'ConnectCommand: PAnsiChar' [Warning] ACBrUtil.pas(1816): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1817): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1817): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1818): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1819): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1828): Unsafe type 'ConnectCommand: PAnsiChar' [Warning] ACBrUtil.pas(1830): Unsafe type 'PCharStr: PAnsiChar' [Warning] ACBrUtil.pas(1879): Unsafe type 'PChar' [Warning] ACBrUtil.pas(1917): Unsafe type 'PWideChar' [Warning] ACBrUtil.pas(1917): Suspicious typecast of String to PWideChar [Error] ACBrUtil.pas(2057): Expression expected but 'THEN' found [Error] ACBrUtil.pas(2057): ')' expected but ',' found [Warning] ACBrUtil.pas(2061): Unsafe type 'Pointer' [Warning] ACBrUtil.pas(2066): Unsafe type 'Pointer' [Error] ACBrUtil.pas(2070): There is no overloaded version of 'Create' that can be called with these arguments [Warning] ACBrUtil.pas(2079): Unsafe type 'Pointer' [Warning] ACBrUtil.pas(2083): Unsafe type 'LibPointer: Pointer' [Warning] ACBrUtil.pas(2086): Unsafe type 'Pointer' [Warning] ACBrUtil.pas(2090): Unsafe type 'LibPointer: Pointer' [Warning] ACBrUtil.pas(2094): Unsafe type 'PChar' [Warning] ACBrUtil.pas(2097): Unsafe type 'PChar' [Warning] ACBrUtil.pas(2102): Unsafe type 'LibPointer: Pointer' [Warning] ACBrUtil.pas(2102): Unsafe type 'PChar' [Warning] ACBrUtil.pas(2103): Unsafe type 'LibPointer: Pointer' [Warning] ACBrUtil.pas(2123): Unsafe type 'PChar' [Error] ACBrUtil.pas(2191): Ambiguous overloaded call to 'IfThen' [Warning] ACBrUtil.pas(2275): Unsafe type 'PWideChar' [Warning] ACBrUtil.pas(2277): Unsafe type 'PWideChar' [Warning] ACBrUtil.pas(2277): Unsafe type 'PAnsiChar' [Warning] ACBrUtil.pas(2284): Unsafe type 'PAnsiChar' [Warning] ACBrUtil.pas(2286): Unsafe type 'PAnsiChar' [Warning] ACBrUtil.pas(2286): Unsafe type 'PWideChar' [Warning] ACBrUtil.pas(2425): Unsafe code '@ operator' [Warning] ACBrUtil.pas(2428): Unsafe code '@ operator' [Warning] ACBrUtil.pas(2431): Unsafe code '@ operator' [Fatal Error] ACBrDevice.pas(262): Could not compile used unit 'ACBrUtil.pas'

Italo, mil desculpas mesmo. Comi bola, a CCe com NF-e 100%, misturei os programas, tem dia que fico doido como hoje. desculpa. Minha duvida ainda esta toda sobre o CT-e estou com banco de dados encaminhado e muitas telas, como cadastro de emitente, remetente, funcionario, seguradora, funcionario, porem achei muita informação para enviar o conhecimento, ja coloquei boa parte do codigo txt na minha estrutura, mais acho que nao consigo enviar em ambiente de homologação com meu certificado credenciado para NFE?!!? desculpe novamente pela troca de siglas. rsrs

Italo, boa tarde. Estou desenvolvendo para um cliente o CCE, montei minha tela me baseando nas informações do manual para envio rodoviario, porem achei muito informação, voce teria como me enviar o print da tela para me basear? Outra duvida monte o codigo pelo seu txt porem ainda nao consegui enviar. meu ceritificado digital é para emissao de NFE eu consegui no ambiente de teste enviar CCE para o desenvolvimento? abraços.

Amigos, consegui resolver. segue o codigo que usei no demo do acbrnfe. procedure TForm1.btnCartadeCorrecaoClick(Sender: TObject); var Chave, idLote, CNPJ, nSeqEvento, Correcao : string; begin if not(InputQuery('WebServices Eventos: Carta de Correção', 'Chave da NF-e', Chave)) then exit; Chave := Trim(OnlyNumber(Chave)); idLote := '1'; if not(InputQuery('WebServices Eventos: Carta de Correção', 'Identificador de controle do Lote de envio do Evento', idLote)) then exit; CNPJ := copy(Chave,7,14); if not(InputQuery('WebServices Eventos: Carta de Correção', 'CNPJ ou o CPF do autor do Evento', CNPJ)) then exit; nSeqEvento := '1'; if not(InputQuery('WebServices Eventos: Carta de Correção', 'Sequencial do evento para o mesmo tipo de evento', nSeqEvento)) then exit; Correcao := 'Correção a ser considerada, texto livre. A correção mais recente substitui as anteriores.'; if not(InputQuery('WebServices Eventos: Carta de Correção', 'Correção a ser considerada', Correcao)) then exit; ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Clear; ACBrNFe1.EnvEvento.EnvEventoNFe.idLote := StrToInt(idLote) ; with ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Add do begin infEvento.chNFe := Chave; infEvento.CNPJ := CNPJ; infEvento.dhEvento := now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := StrToInt(nSeqEvento); infEvento.detEvento.xCorrecao := Correcao; end; ACBrNFe1.EnviarEventoNFe(StrToInt(idLote)); MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetWS); memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetornoWS); LoadXML(MemoResp, WBResposta); MemoDados.Lines.Clear; MemoDados.Lines.Add('Status: '+ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo); MemoDados.Lines.Add('Chave Nf-e: '+ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe); MemoDados.Lines.Add('Evento: '+ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xEvento); MemoDados.Lines.Add('N Protocolo: '+ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt);

Boa noite, amigos. Estou pesquisando aqui no forum uma forma de recuperar o N do Protocolo, a Data e Motivo da carta de correção vi o post do colega que usou o seguinte codigo: Protocolo AcbrNFe.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[i].RetInfEvento.nProt Status (Do evento) AcbrNFe.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[i].RetInfEvento.cStat Não deu certo, estou o usando o demo do AcbrNFe para testar a CCe, ate o momento tem dado certo o envio, só nao estou conseguindo recuperar estas informaçoes para mostrar para o usuario que esta ok ou deu erro. Demo acbrnfe [i] ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Clear; ACBrNFe1.EnvEvento.EnvEventoNFe.idLote := StrToInt(idLote) ; with ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Add do begin infEvento.chNFe := Chave; infEvento.CNPJ := CNPJ; infEvento.dhEvento := now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := StrToInt(nSeqEvento); infEvento.detEvento.xCorrecao := Correcao; end; ACBrNFe1.EnviarEventoNFe(StrToInt(idLote)); MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetWS); memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetornoWS); LoadXML(MemoResp, WBResposta);[/i] Alguem tem uma ideia? obrigado.

Otavio, boa noite. Acontece comigo quando o cliente usa certificado A3 e o windows nao esta reconhecendo o cartao, tem que testar a porta usb, a leitora e verificar se esta lendo corretamente. Quando o cliente me liga, mando ele entrar no site e-cac e verificar se ele consegue se logar com o certificado digital. Tenho esse problema com as leitoras da certsign. Tenta reinstalar as dll da capicom. abraços

Italo, Obrigado deu super certo. abraços

Boa tarde. Consigo copilar todos os componentes agora menos os que tem o quickreport como o danfe e dacte, estao dando erro "QRPDFFilt", comentei a linha QRPDFFilt e o que foi dando erro, porem nao consigo mais visualizar a danfe em quickreport. Uso o delphi 7 e quick 3. obrigado,

Italo, muito obrigado pela ajuda. a contabilidade do meu cliente nao sabe nada sobre o cte, isso esta atrazando muito e pra ajudar o cliente ta mais perdido do que cego em tiroteio, ate pro credenciamento a contabilidade pediu ajuda pra fazer no posto fiscal eletronico, tem que rebolar. abraços.

boa tarde. Estou implementando em nosso sistema a opção de usar o CT-e, porem ao estudar o manual e o demo sugiram algumas duvidas. 1) Quando é lançado a Nota Fiscal(papel) é necessario informar os produtos? 2) Quando é lançado a Nota Fiscal Eletronica, digito o pin e a chave de acesso tenho que digitar o dados do destinatario e remetente? ou posso usar a importao do XML para isso. O Contador nao soube me responder, informar impostos, como ICMS, ST, CST e CFOP, para o CTE, o contador ficou de levantar. Existe uma tabela para cada tipo de empresa, (Simples, Super, Lucro Real, etc..) para que posso informar o cliente ou é trabalho mesmo do contador? Obrigado.

felipeiw e amigos. Tenho a seguinte informação, dede de 02 de abril de 2012 o Posto fiscal nao aceitara mais noa fiscal de CNPJ com restrição na União (varios motivos). Tenho fornecedor que antes de vender, fazer um pedido consulta a situação da empresa se vai poder emitir nota fiscal eletronica. Hoje um cliente ligou, que ao passar a NF-e para um cliente dele daria esta msg, porem os outros clientes dele esta saindo as notas fiscais semproblema. Orientei a procurar a empresa e pergutar o que estaria acontecendo com este CNPJ e informaram ao meu cliente que a empresa esta com problemas de documentação e dividas. Estou tentando achar um jeito de tirar uma certidão antes de emitir a nota ou ate mesmo de cadastrar um pedido ou cliente. Fontes: PORTARIA CAT - 161, de 05-12- 2011 Link: http://info.fazenda.sp.gov.br/NXT/gatew ... ia:vtribut abraços, Thiago Gobatti

obrigado deu certo. vou ver se consigo resgatar o IE. abraços

bom dia, amigos. Gostei muito do projeto ajuda muito na hora de cadastrar um cliente. preciso saber se os amigos sabem como instalar no delphi 7. esta pedindo "Winapi.Windows" -> "Winapi.Windows.dcu" alguem teria este arquivo para que possa copilar o componente? abraços

Boa noite, É possivel, enviar o boleto em html no corpo da msg? abraços

NF-e 2G Vem aí a segunda geração da Nota Fiscal Eletrônica A dinâmica de implantação da Nota Fiscal Eletrônica (NF-e) não dá trégua. Às vésperas do fim do prazo para que empresas de mais 54 atividades econômica migrem definitivamente do papel para o meio eletrônico, aumentando para quase uma centena o número de segmentos obrigados à escrituração digital, surge agora uma nova demanda: a NF-e de Segunda Geração. Se na primeira fase o sistema reuniu informações sobre o eminente e o destinatário, discriminando produtos, valores e impostos para fornecer a autorização legal em arquivo eletrônico, agora a idéia é documentar todos os eventos que ocorrem durante o ciclo de vida do documento fiscal, o que inclui do registro de saída do produto à confirmação do recebimento da mercadoria, passando por devolução, registro de roubo de carga, carta de correção e outras ocorrências. “O governo está fechando o cerco e refinando o controle de forma a prevenir fraudes”, observa Marco Antonio Zanini, diretor-geral da NFe do Brasil, do Grupo TBA. Ele explica que a segunda geração amplia a transparência das transações, impedindo malabarismos como artifício de emitir a nota fiscal para uma localidade com menor alíquota de imposto e, e de lá simular o envio da mercadoria a um novo destino. “Não se poderá mais fazer a movimentação apenas no papel. A carga terá de obrigatoriamente transitar entre os pontos, sendo que o efetivo recebimento da mercadoria deverá ser reportado de forma oficial ao Fisco.” Novos Ajustes A NF-e 2G teve seus parâmetros definidos pelo governo na versão 3.0 do Manual de integração do Contribuinte. No link http://www.nfe.fazenda.gov.br/PORTAL/integracao.aspx , é possível conhecer o conteúdo na integra, com detalhes sobre as especificações e os critérios técnicos para a integração entre os sistemas de informação das empresas e os portais das Secretarias da Fazenda dos Estados. Já na introdução o texto avisa que, devido à complexidade do projeto, outros ajustes podem vir a ser propostos, além dos já validados no documento. “A segunda geração da NF-e contempla novidades que resultam da evolução do modelo e dos aprendizados adquiridos desde a implantação do projeto. Trata-se de um avanço que abrangerá todos os contribuintes que já estão emitindo o documento eletronicamente e também aqueles que passarão a fazê-lo de agora em diante”, afirma Jorge Campos, especialista fiscal e tributário da Aliz Inteligência Sustentada. Empresas que optaram por soluções próprias terão de fazer algum investimento para se adequar ao novo layout, enquanto a atualização é automática para as que utilizam alternativas como Software as a Service (SaaS). Qual a melhor opção? Depende do caso. O que há de certo, no entanto, é que a curva de aprendizado do mercado será útil para orientar os contribuintes listados no recém-divulgado Protocolo 42/09, que especifica o calendário de 2010. Para os novos entrantes, a mensagem é clara: a escrituração digital é um caminho sem volta, e o aperfeiçoamento do sistema será constante, não deixando espaço para soluções improvisadas e sem planejamento. Fonte: http://www.nfedobrasil.com.br/BlogNfe/i ... a/nf-e-2g/ NFe 2G (Segunda Geração) by NFe do Brasil on Jul 01, 2010 2,508 views * Adequação da NF-e para registrar as operações do SIMPLES NACIONAL; * Novas Regras de Validações: * Total da NF-e x Total dos Itens da NF-e; * Total da Base de Cálculo x Somat Fonte: http://www.slideshare.net/NFedoBrasil/n ... unda-gerao

Bom dia. Alguem sabe o prazo da NFE 2g para entrar em produção? O AcbrNFE esta preparado para essa nova geração de Nota? Obrigado, Thiago Gobatti

Amigos, Desmarquei a opção de atualização do relógio e diminui o fusorario -2 e instalei a nova versão dos certificados ICP. Para o ambiente de produção deu certo a consulta, nao cheguei a enviar nota porque não tenho, no ambiente de teste esta dando o mesmo erro dos colegas. Consultando outros webservice de outros estados no ambiente de homologação esta certo só o de SP que não. abraços a todos. Thiago Gobatti

Ta muito confuso isso, na minha maquina quando mudo o estado para qualquer estado diferente de sp, consigo consultar o serviço do servidor, agora sao paulo, nada. Em dois clientes que acompanhei hoje estao fazendo o envio de NFE sem problema.

Sera que ainda tem algum problema, relacionado ao ataque? Hoje domingo esta impossivel de gerar Nota pelo ambiente de homologação e o de produção nao consigo nem fazer consulta de serviço, derepente volta ao normal. abraços e uma ótima semana.

Obrigado, amigo pela ajuda. Estou ficando doido com a remessa do santander, so recebo a seguinte msg. Layout do Cliente nao confere. Eu te add no msn - thiago - TA Sistemas

Obrigado pela ajuda. O Boleto consegui gerar e pagar no banco Itaú sem problema agora resta saber se vai cair na conta do Santander ou vai devolver para o Itaú. O Arquivo de remessa esta gerando CNAB400 mais lendo o manual vi que o layout do arquivo seria CNAB240 no AcbrBoleto fala que esta função CNAB240 não esta implementada para o Banco Santander. Você teria o fonte do AbrboletoSantander.pas para gerar remessa? Estou migrando do Itaú que estava 100% Remessa e Retorno agora parece que estou começando do zero com o Santander. Rsrsrss Voce saberia me dizer quanto tempo demora pro santander indentificar que o titulo foi pago e quanto tempo demora pra creditar na conta? O Itau Funciona Assim: Vencimento dia 13/12/11 cliente pagou nesta data. NO dia 14/12/11 ja consigo indentificar quais titulos o banco recebeu, dai e demorado + dois dias uteis para desbloquear o dinheiro na conta corrente. Com o santander nao consegui achar o boleto pago ontem ainda. Outra duvida, no itau fica programado automaticamente protesto em 5 dias corridos, no santander tem como ou tem que especificar no arquivo de remessa? Desculpe mais o suporte do banco é horrivel. abraços