-
Total de ítens
65 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que alessandro pancotte postou
-
DbCtrlGrid bloquear campos DbEdit
um tópico no fórum postou alessandro pancotte Object Pascal - Delphi & Lazarus
Olá, Estamos usando uma dbctrlgrid com alguns dbedits e dbcheckbox, estou precisando bloquear o dbcheckbox quando alguns desses dbedits é preenchido, ou se o dbcheckbox for preenchido bloquear os dbedits. Tentei fazer isso no evento panelpaint da grid, porem ele bloqueia o campo de todas as linhas/registros da grid. E eu preciso bloquear somente da linha/registro que estou manipulando. Se alguem tiver alguma orientação eu agradeço. -
AcbrPosPrinter com impressora perto printer.
alessandro pancotte replied to nicolasbraz's tópico in ACBrSerial
Amigo, Você consegui fazer funcionar a impressora Perto. Atenciosamente, -
Olá, Descobri o problema ja Uses do meu urotinas precisa estar declarada SSL_OpenSSL. Porém nos outros dois projetos que eu uso esta mesma rotina de envio de mail nao precisei colocar na uses. uses windows, IBQuery, SysUtils, Forms, Classes, Dialogs, Controls, types, SSL_OpenSSL, SMTPSend, MimePart, MimeMess; Fica a dica para caso alguem tenha este pequeno problema.
-
smtp error: Login: other undefined status
um tópico no fórum postou alessandro pancotte Dúvidas Gerais sobre o ACBr
Olá amigos, Estou com este problema smtp error: Login: other undefined status. Ocorre que num outro projeto esta funcionando. Eu fiz a rotina de envio de email exatamente igual, porem neste projeto da esta mensagem. Os 02 executaveis ficam na mesma pasta. Debugando, o que notei de diferenca entre os dois é que no que da erro quando chega neste pont procedure TTCPBlockSocket.SSLDoConnect; begin ResetLastError; if not FSSL.Connect then -> no que esta funcionando ele executa a funcao function TSSLOpenSSL.Connect: boolean; /// no que da erro ele não entra nesta funcao, mesmo colocando stop nao aceita FLastError := WSASYSNOTREADY; ExceptCheck; end; segue minha função anexe não cole -
Nfc-E Em Contingencia
alessandro pancotte replied to FlavioSaikoo's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
Italo, Só para explicar um exemplo que nos aconteceu recentemente. Já aconteceu aqui conosco de o cliente emitir uma NFe onde o remetente estava com restrição na receita. Ai neste caso orientamos o cliente a inutilizar caso a situação não se resolva no prazo apropriado. -
Componente De Envio De Sms Via Gateway
alessandro pancotte replied to Sergioguedes's tópico in ACBrTCP
Olá Sergio, Você fez mais alguma implementação neste componente. Grato -
Mercado Livre - Recuperar pedido
alessandro pancotte replied to Edson.pol's tópico in Dúvidas não relacionadas ao ACBr
Pessoal, Estou vendo a discussão sobre integracao com mercadolivre, voces conseguiram fazer? Fizeram de que maneira? Um programa a parte que fica de tempo em tempo lendo o webservice do mercado livre e baixando os pedidos e clientes? Com relação aos produtos teria uma tela para selecionar os produtos que quero enviar para a integracao? Com relação ao saldo de estoque, como fizeram? Grato -
Bom dia, Veja os passos que fizemos: 1) Cadastramos uma nota e mandamos gerar a nfce 2) Da esta mensagem Cannot create file "D:\DOMYNUS\Envio e Resposta\cnpj do emisso\nome do arquivo xxxxx-ped-sit.xml". O arquivo já está sendo usado por outro processo 3) Ai nos apagamos este da pasta envio e resposta e tambem o arquivo 0-env-lot e o 0-rec 4) Mandamos gerar novamente e deu a mensagem Cannot create file d:\nome do sistema\NFCe\XML\cnpj do emissor\yyyymm\nome arquivo xxxxxx-nfe.xml". Acesso negado 5) Neste arquivo que da erro de acesso negado o inicio do xml aparece assim <?xml version="1.0" encoding="UTF-8"?> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> 6) Apagamos o arquivo XXXX-nfe.xml e os arquivos da pasta envio resposta 7) Mandamos gerar a nota novamente e deu certo No arquivo que da certo aparece assim <?xml version="1.0" encoding="UTF-8"?> -<nfeProc xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10"> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> Depois fizemos um outro teste: 1- Apagamos todas as pasta de nfe e nfce do sistema e a envio e resposta 2- Entramos no sistema e mandamos gerar uma nota, a primeira nota da certo a segunda volta os erros citados acima. Esta executando como administrador Foi dado permissao de acesso para todos os usuarios O estranho é que aqui na nossa empresa se eu criar uma pasta do sistema do zero (como se fosse uma instalacao nova) e so colocar o banco de dados deste cliente e tentar emitir nota da certo Nos pegamos deste cliente a pasta inteira do sistema (zipamos tudo), trouxemos para cá e aqui tambem deu erro.
-
No arquivo com erro aparece esta linha <?xml version="1.0" encoding="UTF-8"?> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> No arquivo que da certo aparece assim <?xml version="1.0" encoding="UTF-8"?> -<nfeProc xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10"> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> Eu tenho que apagar os arquivos com erro e gerar novamente ai funciona...
-
Cannot Create file NFCE
um tópico no fórum postou alessandro pancotte NFC-e - Nota Fiscal do Consumidor Eletrônica
Pessoal, Estou com um problema (não ocorre em todos os clientes). Ao tentar emitir uma nfce da a seguinte mensagem "Cannot create file d:\nome do sistema\NFCe\XML\cnpj do emissor\yyyymm\nome arquivo xxxxxx-nfe.xml". Acesso negado Hoje deu uma mensagem diferente Cannot create file "D:\DOMYNUS\Envio e Resposta\cnpj do emisso\nome do arquivo xxxxx-ped-sit.xml". O arquivo já está sendo usado por outro processo Já foram liberados todas as permissões Windows 7 instalado (antes estava com o XP, e foi pedido para formatar) Certificado valid As vezes no arquivo fica faltando esta linha quando da a mensagem de acesso negado infNFe versao="3.10" Id="NFe nome do arquivo Alguem tem alguma outra sugestao... -
Impressao Codigo de Barras Argox via Terminal Server TS
um tópico no fórum postou alessandro pancotte Object Pascal - Delphi & Lazarus
Pessoal Vi alguns relatando problemas ao imprimir na impressora argox que esta instalada num pc mas acessando o sistema via terminal server TS. No nosso caso testamos a impressao da etiqueta de codigo de barras na argox OS 214 pelo reportbuilder. Consegui imprimir a etiqueta mas o codigo de barras simplesmente nao bipa, se eu imprimir usando o sistema local imprime e bipa. Alguem tem alguma sugestao... -
Firebird Server Control Stop Desabilitado
alessandro pancotte replied to alessandro pancotte's tópico in Banco de Dados
Barbosa, Obrigado por sua atenção, eu realmente nao sabia disso. Porem formatei minha maquina faz 02 meses e até antes de baixar as dll do firebird embarcado, este painel estava funcionando normal. Eu desinstalei e instalei novamente com usuario administrador e continua o problema. Parece que esta opção embarcado afetou algo no meu windows (digo, "parece" porque ja desintalei, apaguei a pasta do firebird e instalei novamente umas 5 vezes e nada) Eu acabei de fazer um teste agora, tenho uma instalacao do meu sistema do C:\sistema, dentro desta pasta tem a gds32.dll que era a fbembed.dll que foi renomeada para gds32.dll como eu vi em algum forum. Fui abrir a base de dados que esta nesta pasta e o caminho no client library file do ibexpert estava apontando somente gds32.dll, assim ele nao abri a base, da mensagem que esta sendo usada em outro processo, tive que mudar para c:\sistema\gds32.dll para abrir, as duas gds32 (padrao e a embarcada acabam conflitando). Mas vou fazer conforme esta orientacao, nao vou me preocupar com o panel, só achei que tivesse um por que de nao aparecer mais o botao stop/start desabilitado. Abraço. -
Firebird Server Control Stop Desabilitado
um tópico no fórum postou alessandro pancotte Banco de Dados
Pessoal, Estive esta semana testando o firebird embarcado, para testa-lo desinstalei o firebird na minha maquina. Hoje fui instalar o firebird, e não sei por qual motivo o botao stop/start estao desabilitados no painel de controle Firebird Server Control. Ja desinstalei, apaguei as pastas do firebird, instalei como admin, e não resolve, tambem não achei nada na net dizendo o pq e como corrigir. O firebird esta funcionando normalmente mas, o botao fica desabilitado... firebird.bmp -
Versão Demonstração do Sistema
um tópico no fórum postou alessandro pancotte Object Pascal - Delphi & Lazarus
Pessoal, Estou montando uma versão demo do meu sistema, o usuário vai baixar do site, vai instalar (fiz o instalador pelo INNO Setup com firebird embarcado) e a partir do momento que executar o sistema, eu gravo no banco a data de validade(30) criptografada. Porém eu queria ter um controle sobre quem instalou meu sistema, para isso eu pensei em colocar uma tela para o usuario preencher os dados da empresa, embora acredite que muitos vao colocar qualquer coisa. Alguém tem alguma sugestão simples para trabalhar com versão demo? Grato -
Case não considera campo double precision
alessandro pancotte replied to alessandro pancotte's tópico in Banco de Dados
Paulo consegui resolver é bem simples, mas nao vi em lugar nenhum explicando que o cast ou o sum tem que ficar fora do case CAST(sum( case when m.vltotalbruto = 0 then 0 when m.vltotalbruto < 0 then 0 else ((mi.qtde * mi.vlunitario) + coalesce(mi.vlipi, 0) + ((mi.qtde * mi.vlunitario)*(((coalesce(nf.vloutrasdespesas,0) * 100) / m.vltotalbruto) / 100)) + ((mi.qtde * mi.vlunitario)*(((coalesce(nf.vlseguro,0) * 100) / m.vltotalbruto) / 100)) + ((mi.qtde * mi.vlunitario)*(((coalesce(m.vlfrete,0) * 100) / m.vltotalbruto) / 100)) + coalesce(mi.valoricmsst, 0) - coalesce(mi.vldesconto, 0)) end) AS NUMERIC(11,2)) as vltotal, pronto resolvido -
Case não considera campo double precision
um tópico no fórum postou alessandro pancotte Banco de Dados
Pessoal, Tenho este sql abaixo, onde o campo VLTOTALBRUTO esta dando erro de arithimetic por estar zerado em alguns casos. Tentei usar um case para tratar quando for zero nao executar a sentensa do cast, porem ele nao passa pelo case. Ele deveria jogar para a variavel vltotal = 0 qdo o vltotalbruto for 0, caso contrario executar executar o cast, mas mesmo usando o case ele da erro de arithimetic SELECT p.cnpj_cpf, SUBSTRING(p.insc_rg FROM 1 FOR 14), p.tpinsc, m.dataemissao, nf.uf, cast(lpad (m.numdocumento, 6, '0') as varchar(06)), mi.percicms as aliquota, Case When m.vltotalbruto = 0 then 0 else CAST((sum((mi.qtde * mi.vlunitario) + coalesce(mi.vlipi, 0) + ((mi.qtde * mi.vlunitario)*(((coalesce(nf.vloutrasdespesas,0) * 100) / m.vltotalbruto) / 100)) + ((mi.qtde * mi.vlunitario)*(((coalesce(nf.vlseguro,0) * 100) / m.vltotalbruto) / 100)) + ((mi.qtde * mi.vlunitario)*(((coalesce(m.vlfrete,0) * 100) / m.vltotalbruto) / 100)) + coalesce(mi.valoricmsst, 0) - coalesce(mi.vldesconto, 0))) AS NUMERIC(11,2)) end as vltotal, CAST((sum((coalesce(mi.baseicms, 0)))) AS NUMERIC(11,2)) as baseicms, CAST((sum(mi.vlicms)) AS NUMERIC(11,2)) as vlicms, m.situacao, SUBSTRING(nf.modelo from 1 for 2), mi.cfop FROM mov_movimento m JOIN mov_nf nf on (m.cod= nf.cod) JOIN pes_pessoas p on (m.codclifor = p.cod) join g_tpmovimento tp on (m.codtpmovimento = tp.cod) join mov_movitens mi on (m.cod = mi.codmovimento) WHERE m.dataemissao >= :INICIO AND m.dataemissao <= :fim and m.codempresa = :codempresa GROUP BY p.cnpj_cpf, p.insc_rg, p.tpinsc, m.dataemissao, nf.uf, m.numdocumento, mi.percicms, m.situacao, nf.modelo,mi.cfop, m.vltotalbruto -
Xyberx, Vou baixa-la e estudar.. Excelente iniciativa, se precisar de algo que eu possa ajudar, estou a disposição.
- 10 replies
-
- cliente/servidor
- banco de dados
- (e 1 mais)
-
Carlos, Item 1 eu ja trabalho assim em uma aplicacao minha, uso o zeos para conectar o banco de dados mysql em nuvem, eu tenho um unico exe que ao inves de conectar o bd local conecta no bd em nuvem Item 2 ainda nao compreendo direito, imaginando que no pc do cliente teria um exe, eu imagino o seguinte, se tenho um exe server rodando na maquina do cliente, nao vai ficar pesado esse exe server, ficar acessando um banco de dados em nuvem. Agora se o exe server rodar no proprio servidor, como ficaria para um acessar o outro. E se eu tivesse 100 banco de dados no meu servidor, teria 1 unico exe server acessando estes 100 bancos, ai o cliente que usa o banco de dados 01, manda uma requisicao, o exe server conecta no banco faz a requisicao e retorna algum resultado, ja imaginou ficar abrindo e fechando cada banco de dados cada vez que tem uma requisicao. Nao parece muito pratico
- 10 replies
-
- cliente/servidor
- banco de dados
- (e 1 mais)
-
App Client/Servidor Banco Nuvem e App Local
um tópico no fórum postou alessandro pancotte Object Pascal - Delphi & Lazarus
Olá pessoal estou com algumas duvidas, e gostaria de algumas orientações caso alguém já tenha feito algo do genero. Sempre trabalhei com aplicação desktop, com banco de dados Firebird local. Uso IBdatabase e IBtransaction. Não tenho pratica com multicamadas, embora conheça na teoria e sei que existe muito exemplo. Estou querendo iniciar um novo projeto, onde eu teria o seguinte contexto; O banco de dados ficaria hospedado no servidor da desenvolvedora de software (no caso a empresa onde trabalho), seja na propria empresa ou num datacenter, a responsabilidade de gerir os dados seria da software house No usuário teria uma aplicação (exe) rodando na(s) maquina(s) do cliente e acessando o banco de dados e hospedado neste servidor acima. Ai vem minhas duvidas. Considerando que vou continuar desenvolvendo em delphi, e usando BD (mysql ou postgree), como ficaria aplicativos que preciso desenvolver. Imagino que teria que desenvolver uma aplicação cliente que seria o EXE instalado na maquina do cliente Teria que desenvolver uma aplicacao server. Esta aplicacão server, tem que ficar rodando na maquina do cliente ou no meu servidor? O que teria que ficar rodando ou instalado no servidor? Se a aplicação server estiver instalada no meu servidor como seria o acesso a ela do lado do cliente. Veja o exemplo, acabo de fechar negocio com um cliente que tem uma loja e vai usar 1 ou mais computadores para acessar o sistema. Eu crio o banco de dados para ele, coloco o meu exe nos computadores da empresa, faco as devidas configuracoes, ai teria um bano de dados mysql onde dele iria informar informar o cnpj da empresa ou email ou qualuqer outra informacao, se for pelo cnpj teria uma tabela de empresa com cnpj e caminho do banco de dados EX: cnpj 11111111111 caminho: meuip.com.br/cliente111111111/empresa.fdb. Apos ele selecionar esta empresa o sistema iria pedir usuario e senha e iria logar no sistema Eu poderia ter no mesmo banco de dados varias empresas cadastradas, vai que fecho um negocio onde o cliente tem varias lojas, OK meu sistema vai ser multiempresa e o cliente iria acessar seu banco de dados, vai selecionar a empresa e informar o usuario e senha Eu vi um software concorrente que trabalha desse jeito, eles tem um servidor na propria software house, nas maquinas do cliente fica o EXE e quando o usuario vai abrir o sistema, primeiro aparece uma tela para ele selecionar a empresa e depois o usuario e senha. Mas nao vi se na maquina tinha alguma aplicacao server rodando. Se a aplicacao server ficar no meu servidor, ela vai a cada requisicao, abrir o banco que a requisicao esta mandando, ou seja ela recebe uma requisicao, abre o banco, faz a requisicao e retorna a resposta, ou eu teria que ter uma aplicacao servir rodando para cada banco de dados. Parece meu boba a pergunta mas realmente nao sei qual a maneira mais inteligente de se trabalhar. Caso alguem ja trabalhe assim e puder me dar um help eu agradeco- 10 replies
-
- cliente/servidor
- banco de dados
- (e 1 mais)
-
Arquem, Conseguiu resolver o problema, tambem baixei o acbr hoje e estou com o mesmo problema. Baixei o acbr numa pasta nova Executei o apaga...bat Executei o instalador do trunk2 como administrador e da o mesmo erro Usando o Delphi 2007 log_Delphi_2007.txt Eu tinha outras pastas mais antigas do acbr, mandei para a lixeira todos os demais acbr_comum.res mesmo assim da a mensagem de erro. Eu vi em posts de 2013 alguem orientando a retirar a linha {$R *.res} do acbr_comum.dpk. O que fazer neste caso....
-
Impressora nao encontrada no PosPrinter
alessandro pancotte replied to alessandro pancotte's tópico in ACBrSerial
ok VOU TESTAR