Eroni

Bom dia, Eu tenho funcionando para várias cidades de MG, favor me contatar.

Eu uso e xHarbour, e sempre tive essa mesma dúvida, será que vai haver vantagem?

Não, na realidade ia começar a mexer com a 4.0 hoje...rs Por isso perguntei sobre a versão 4.0 agora a pouco, estes campos que você precisa já existiam na 3.10.

Alguém já usa a versão 4.0? Se sim, com classe do Gilmer x Flexdocs? Abraços

<?xml version="1.0" encoding="UTF-8"?> <NFe xmlns="http://www.portalfiscal.inf.br/nfe"><infNFe versao="3.10" Id="NFe42180204075526000191550010000039101000039100"> <ide> <cUF>42</cUF> <cNF>00003910</cNF> <natOp>UF-VENDA MERCADORIA ADQUIRIDA OU RECEBIDA DE TERCEIROS</natOp> <indPag>1</indPag> <mod>55</mod> <serie>1</serie> <nNF>3910</nNF> <dhEmi>2018-02-12T16:01:06-02:00</dhEmi> <dhSaiEnt>2018-02-12T16:01:06-02:00</dhSaiEnt> <tpNF>1</tpNF> <idDest>2</idDest> <cMunFG>4204608</cMunFG> <tpImp>1</tpImp> <tpEmis>1</tpEmis> <cDV>0</cDV> <tpAmb>2</tpAmb> <finNFe>1</finNFe> <indFinal>1</indFinal> <indPres>9</indPres> <procEmi>0</procEmi> <verProc>NF-eletronica.com</verProc> </ide> <emit> <CNPJ>04075526000191</CNPJ> <xNome>LUBRISUL COM. LUBRIFICANTES EIRELI EPP</xNome> <xFant>LUBRISUL COM. LUBRIFICANTES EIRELI EPP</xFant> <enderEmit> <xLgr>ROD. LUIZ ROSSO</xLgr> <nro>135</nro> <xCpl>SALA 01</xCpl> <xBairro>SAO LUIZ</xBairro> <cMun>4204608</cMun> <xMun>Criciuma</xMun> <UF>SC</UF> <CEP>88803470</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> <fone>4834372829</fone> </enderEmit> <IE>254114890</IE> <CRT>3</CRT> </emit> <dest> <CNPJ>01618972000107</CNPJ> <xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome> <enderDest> <xLgr>RUA MONTEIRO LOBATO</xLgr> <nro>48</nro> <xBairro>NOVO ESTEIO</xBairro> <cMun>4307708</cMun> <xMun>Esteio</xMun> <UF>RS</UF> <CEP>93270020</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> <fone>5113473361</fone> </enderDest> <indIEDest>9</indIEDest> <IE>0430075146</IE> </dest> <det nItem="1"> <prod> <cProd>000050</cProd> <cEAN></cEAN> <xProd>LUBRAX ATF TA - 500 ML .</xProd> <NCM>27101932</NCM> <CFOP>6102</CFOP> <uCom>UN</uCom> <qCom>100.0000</qCom> <vUnCom>10.0000</vUnCom> <vProd>1000.00</vProd> <cEANTrib></cEANTrib> <uTrib>UN</uTrib> <qTrib>100.0000</qTrib> <vUnTrib>10.0000</vUnTrib> <indTot>1</indTot> </prod> <imposto> <vTotTrib>0</vTotTrib> <ICMS> <ICMS00> <orig>0</orig> <CST>00</CST> <modBC>3</modBC> <vBC>1000.00</vBC> <pICMS>12.00</pICMS> <vICMS>120.00</vICMS> </ICMS00> </ICMS> <IPI> <cEnq>999</cEnq> <IPITrib> <CST>99</CST> <vBC>0</vBC> <pIPI>0</pIPI> <vIPI>0</vIPI> </IPITrib> </IPI> <PIS> <PISAliq> <CST>01</CST> <vBC>1000.00</vBC> <pPIS>0</pPIS> <vPIS>0</vPIS> </PISAliq> </PIS> <COFINS> <COFINSAliq> <CST>01</CST> <vBC>1000.00</vBC> <pCOFINS>0</pCOFINS> <vCOFINS>0</vCOFINS> </COFINSAliq> </COFINS> <ICMSUFDest> <vBCUFDest>1000.00</vBCUFDest> <pFCPUFDest>2.00</pFCPUFDest> <pICMSUFDest>18.00</pICMSUFDest> <pICMSInter>12.00</pICMSInter> <pICMSInterPart>80.00</pICMSInterPart> <vFCPUFDest>20.00</vFCPUFDest> <vICMSUFDest>48.00</vICMSUFDest> <vICMSUFRemet>12.00</vICMSUFRemet> </ICMSUFDest> </imposto> </det> <total> <ICMSTot> <vBC>1000.00</vBC> <vICMS>120.00</vICMS> <vICMSDeson>0</vICMSDeson> <vFCPUFDest>20.00</vFCPUFDest> <vICMSUFDest>48.00</vICMSUFDest> <vICMSUFRemet>12.00</vICMSUFRemet> <vBCST>0</vBCST> <vST>0</vST> <vProd>1000.00</vProd> <vFrete>0</vFrete> <vSeg>0</vSeg> <vDesc>0</vDesc> <vII>0</vII> <vIPI>0</vIPI> <vPIS>0</vPIS> <vCOFINS>0</vCOFINS> <vOutro>0</vOutro> <vNF>1000.00</vNF> </ICMSTot> </total> <transp> <modFrete>0</modFrete> </transp> <cobr> <dup> <nDup>3910/01</nDup> <dVenc>2018-03-12</dVenc> <vDup>1000.00</vDup> </dup> </cobr> <infAdic> <infCpl>O.C. ;;;Valor aproximado de tributos R$ 314,50 (31,45%) Fonte: IBPT.</infCpl> </infAdic></infNFe> </NFe>

Boa tarde. Capicom e Sha256 não rola.

Na verdade o que eu quero é usar o exemplo de autenticação para desenvolver a NFSe de Floripa.

Boa tarde, seria bom explicar o propósito da implementação, quem sabe teria outras maneiras de ajudar na solução.

Boa tarde, minha recomendação é que abandone macros e outras similaridades. Use bloco de código, tipo assim: bBlock := {|| Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8) >= Str(M->vCodemp,4)+Str(Codigo1,8) .and. Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8)<=Str(M->vCodemp,4)+Str(Codigo2,8) .and. !folfun->(eof()) } do while eval( bBlock ) skip enddo ou então assim: bBlock := {|| Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8) >= Str(M->vCodemp,4)+Str(Codigo1,8) .and. Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8)<=Str(M->vCodemp,4)+Str(Codigo2,8) } do while !eof() if eval( bBlock ) apagar()....... endif skip enddo Já li a muitos atrás ( Rick Spence, 1990 e poucos ) que bloco de código executa milhares de vezes mais rápido do que macro. Mas cada um tem sua maneira, é apenas uma sujestão.

O meu código é bem pequeno e funciona, pelo menos nunca reclamaram: STATIC FUNCTION _StartBaixaSite( oBro ) LOCAL oForm, oActivex, oWnd LOCAL cHtml := "https://www.sefaz.rs.gov.br/SSL_Client/NFE-CER-CON.aspx" LOCAL oClp LOCAL cChave := "123456................" Alert( "Na janela a seguir, clique com o botão direito do mouse e clique em colar para informar a chave da Nfe." ) DEFINE CLIPBOARD oClp oClp:SetText( cChave ) oWnd := TWindow():New( 0,0,10,60, "Download Xml",,,,,,,,,,,, !.F., !.F., !.F., !.F., .F. ) oActiveX := TActiveX():New( oWnd, "Shell.Explorer" ) oActiveX:Do( "navigate", cHtml ) ACTIVATE WINDOW oWnd Valid oWnd:END() oClp:END() Return( nil )

Boa tarde galera, ressuscitando o tópico, sei que não é o mais recomentado, mas...... Estou tentando aproveitar este código: http://forums.fivetechsupport.com/viewtopic.php?f=6&t=25638&hilit=oauth#p139863 Para tentar obter a autenticidade (token) para tentar comunicar com o servidor da prefeitura de Florianópolis que usa o padrão OAuth também, recebo a mensagem ao executar o exemplo: "A execução de código não pode continuar porque LIBCURL.DLL não foi encontrado....." Alguém já...? Grato.

Bom dia, erro 2003 ou o servidor está off, ou as credenciais ( usuário, senha, porta, firewall... )

Bom dia, obrigado Kapiaba, você é o cara, mas... aqui deve ser problema de versão, o código não dá erro, mas não funciona, não mostra.

Aproveitando o tópico, já tem versão que suporta tooltip em radiobutton?

Resolvido, colocado mais tempo no loop enquanto o documento não carrega.

Boa tarde, revivendo o tópico, alguem saberia me dizer se esse codigo acima roda em qualquer Windows, no meu 10 está dando o erro: Código : 1001 Descrição do Erro: ================= Erro InternetExplorer.Application/0 S_OK: EXECWB Código: 1001 Detalhamento: ------------ Arg. 1 Tipo: N Valor: 6 Arg. 2 Tipo: N Valor: 2 Chamada de Pilha ================ Chamado de TOLEAUTO:EXECWB(0) Alguem já passou por isso?

Boa tarde, faz muito tempo que não uso sqllib, mas deve ter alguma forma de você trabalhar com transação, tipo assim: // Comando de Iniciar a transação < seus comandos insert, delete update > // Comando de encerrar a transação Desta forma você garante a integridade de todo o bloco de gravação das informações, ou grava tudo ou não grava. Eu trabalho sempre assim. mas uso outro RDD não sei como é na sqllib. De qualquer fora, o que está faltando no seu código é o commit ao final.

Bom dia , Me parece que você não está usando transação e o mysql está configurado para não dar o autocommit. Reveja estes conceitos, geralmente as instalações em Windows já vem com o padrão autocommit, diferente do Linux. Quando você fecha o sistema, ao desconectar o banco já faz um commit de tudo que está pendente. Você não especificou qual RDD que está usando, se especificar quem sabe posso ajudar mais. Abraço.

Link quebrado, onde se encontra esta tabela? Nos manuais é disponibilizada sempre a versão em pdf.

Boa tarde amigo que eu saiba isto não tem nada a ver com a classe, mas sim com a instalação do certificado.

Boa noite, eu tenho, como faço pra enviar? Pode ser aqui mesmo? Abraço TesteNfe2G.prg

Tenho cliente que faz direto estas operações, posso pegar com ele se não for apenas assunto para o Toya.

Boa pergunta, é o que estou tentando descobrir como fazer. Resolveria todos os problemas de atualização.

A idéia é criar um exe pequeno e um repositorio de fontes, quando precisar atualizar no cliente, atualiza o repositório, com outro nome, sem ninguem sair do sistema e configura aquele usuario tal que precisa da atualização para abrir o repositorio direcionado para o novo. Mas como colocar varios prg de dentro de um mesmo hrb ou outra forma é que não consegui ainda.