Jorge Andrade

Te passei acima usando somente a dll.

Vou dar um pitaco, embora faz tempo que não mexo com isso, mas posso dizer que, as diferenças entre os bancos, são as informações de agência, conta, carteira, nosso número, código de cliente, convênio e outros, então, o campo livre é o que cada banco usa para a composição da linha digitavel e código de barras, no caso do Itaú, tenho quase certeza que o campo livre é composto por carteira (3) + nosso numero (8) + dac da agencia (1) + agencia (4) + conta (6) + dac da conta (1) + "000" , sendo que o cálculo do dac da agência é módulo 10 de agencia (4) +conta (6) + carteira (3) + nosso numero.(8). Sei que não é isso que vc quer, mas se tem uma aplicação que gera o boleto, então é só implementar sua própria geração de arquivo e por sua vez impressão do boleto. []s,

Boa noite galera. Só pra Pontuar, claro que se o cabo da cpu for desconectado aí não tem jeito, mas, nunca me atentei nas demais versões do windows, porém no 10, na opções de energia, avançado, tem uma opção sobre suspender a USB, que normalmente está em ativado e se desativar, aqueles cochilos por falta de atividade que ela tira para de ocorrer, portanto, não custa nada verificar isso.

Oscar, boa noite, tenho alguns comandos que podem te ajudar usando a DLL direto, embora eu seja um dos difusores da DLL, não a implementei pq estou focando no MOBILE, espero que te ajude. #define STR_LEN 256 #include "hbclass.ch" #include "error.ch" //LOAD NA DLL xLib := LibLoad( "ACBrNFe32.dll" ) //DllLoad("ACBrNFe32.dll") IF xLib == nil ?"erro na carga da dll" INKEY(0) ENDIF //INICIARLIZAR A DLL xInicializarDll := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_Inicializar","\MINHAPASTA\ACBrLib.ini") IF xInicializarDll <> 0 ?"erro Inicializar Ini" INKEY(0) ENDIF //CARREGAR ARQUIVO INI JÁ CRIADO ANTERIORMENTE //inicarregado := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_ConfigLer","\MINHAPASTA\ACBrLib.ini") DETERMIHNAR CERTIFICADO xRetornoStatusCertficado := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_ConfigGravarValor","ArquivoPFX", "\MINHAPASTA\CERTIFICADO.pfx") IF xRetornoStatusCertficado <> 0 ?"erro de certificado" INKEY(0) ENDIF //CARREGAR LOGO xRetornlogo := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_ConfigGravarValor","PathLogo", "MINHAPASTA\LOGO.bmp") //GRAVAR INI xRetorngravar := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_ConfigGravar","") //forma de emissao xRetorn4 := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "FormaEmissao", "0") //FORMA DE AMBIENTE xRetornFormaEmissao := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "Ambiente", "0") //PREPARAR EMISSAO xRetornNFE_Carregar := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_CarregarXML","\MINHAPASTA\nomedoxml.xml") //IMPRIMIR xRetornNFE_Imprimir := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_Imprimir",,1,,,,,) xRetornlimparmemoria := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "LimparLista") xRetornNFE_Finalizar := DllCall( "ACBrNFe32.dll", "DC_CALL_STD" , "NFE_Finalizar") []s,

Normalmente, em qualquer ferramenta que consiga manipular a dll.

Desculpe, andei afastado do grupo, mas se eu fosse vc, partiria pra suar direto a dll e nem precisa usar classe, embora a classe facilita td.

Qual delas.

Beto Boa noite Por favor, entre em contato urgentíssimo comigo. Eu e o Munir estamos tentando falar contigo há dias e vc não retorna mensagens e nem ligação. Se alguém tiver contato com ele, ou souber onde ele mora, por favor, repasse o recado. []s,

Cometi um engano amigo, na verdade o Cassiano (Fladimir aqui no fórum) não desenvolveu para o IDBIO e sim para o CONTROL ID. []S,

Hasa boa noite Eu acho que o Cassiano tem, ficou de me passar e deve ter esquecido. Pq eu ganhei um desses qdo do evento do ACBRDAY 1, mas até hoje não tive tempo de testar. Mas, acho que ele fez pra windev, mas ia me passar e ajudar com o xharbour. Vou perguntar a ele qual o nick dele aqui. []s,

Justamente amigo, o problema está no tipo de código (EBCDIC e ASCII), conforme citado, pois em DB2 vc pode usar os 2 caracteres, e no ASCII está trucando um quotes simples, como se fosse fechamento da instrução, embora eu acho que deveria dar erro na instrução, mas como vc postou que ela fica com aspas dupla, então pode, o correto e fazer igual ao colega.

Não vejo muito como contornar isso, exceto se vc puder utilizar o código EBCDIC http://ascii-table.com/ebcdic-table.php, onde há diferenças entre aspas simples = quotes e apóstrofe, que acredito deve dar problemas por não ser reconhecido pelo ASCII. Veja que num terminal IBM 3070 vc não teria este problema, mas na micro informática sim. Lembro que quando comecei com micro informatica e via o pessoal chamar o caracter "_" de underline (Linha baixa), eu ficava injuriado ahahahah, por mais que explicasse que era underscore (Carater baixo). Acho que vc vai ter que fazer como o amigo citou, trocar o caracter pelo acento agudo, isso se não provocar erro na instrução. []s, Puts, sem erro fica dificil, mas substitui todos os dados ou cria vários registros iguais?

Crisvam, boa noite. Todas alternativas foram automáticas, ou seja, vc de posse da chave no seu sistema e melhor ainda do xml, vc consegue estas informações. Exceto se vc não armazena a chave de acesso e o xml, para poder reaver estas informações. []s, []s,

Calma velhinho, olha o coraçãozinho ahahahahah.

Até onde eu sei amigo, tributos com exceção de ST e IPI, demais não somam no total da nota. Tentando lembrar aqui se mais algum é feita a cobrança na fonte e não na apuração, inclusive o destaque deste é informado nos dados adicionais.

Mas vc tem a chave e o arquivo? pq na consulta pelo ACBR, ele é gravado no xml. Espero em breve postar algumas pesquisas e testes com as DLL's do ACBR, e isso irá facilitar esta consulta sem a necessidade de ter instalado o monitor.

Não conseguia ver quem era, tive que clicar no citar. Puts mano, perda terrível. Ele foi um lutador, brigou com a enfermidade até o fim, mas infelizmente ela venceu, porém se foi a vontade de DEUS, que ELE o acolha e conforte a dor da família. []s,

Com im put e pesquisa somente um uma tabela? Ou comparando duas tabelas, como se fosse um RELATION?

Giovany, Boa tarde, por favor, seria possível postar aqui ao menos a lógica de gravar o PFX na base de dados? []s,

Eu acho que o amigo acima, matou a charada, na verdade deve ser origem 5 e cst 90 = 590, que em simples nacional seria origem 5 e csosn = 900. []s.

É que as Dll's estão disponíveis para usuários SAC, leia msg em off. Quem quiser baixar as dll's usar este link: https://www.projetoacbr.com.br/forum/files/category/36-acbrlib/ []s,

Pessoal é interessante que divulguem os testes que obtiveram sucessos ao utilizar as libs, pq assim outros poderão ajudar no processo e podem também divulgar no fórum acbr. []s,

No link abaixo deve ter td o que vc precisa. http://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/Harbour/ []s,

Com relação a função ela realmente não existe no xHb e vc fez certo, porém eu não uso/compilo o debugger. Outra coisa amigo, não é parceria, está a disposição de todos e como é um código aberto, quem manja de Lazarus e Delphi, pode pegar os fontes e compilar, mas agradeço ao Gilmer permitir a divulgação. []s,

Pessoal bom dia Já saiu a CLASSE AcbrNFe e já está disponível para download no SVN. []s,