Ladinilson

Fiz em uma época e funcionou muito bem mas desisti do projeto pois demandava muuuita coisa para trabalhar com DBF junto com SQL. Como era de automação e era para lojas de que tinham matriz e filiais, a internet falhava e ficava complicado atualizar estoque, cadastro de clientes e principalmente o contas a receber porque o cliente podia comprar em uma loja e pagar a parcela em outra liberando assim seu crédito mas hoje em dia existe a replicação e os gatilhos com SQL que resolvem tudo isso. Sugiro que vá nesta direção que terás o êxito pretendido. Abraços

Bom dia senhores, Fiz uma rotina de auditoria para meus sistemas para gravar todas as ações dos usuários no programa (e isso já rendeu alguns dividendos aos donos de empresas rsrs) pois nela tens como comprovar e contradizer alguns funcionários que acham que não estão sendo monitorados. Durante minha vida já vi de tudo o que os funcionários são capazes de fazer em um empresa como o responsável pelas entregas e notas para embarque para o dia seguinte que trocava as datas para o caixa então o patrão não via o dinheiro cair e seu estoque só diminuia. Entendi que aquilo era uma GRANDE FALHA do meu sistema mas fica a lição de que os caras se encontrarem uma brecha, vão fazer, coisa de brasileiro né? E também uma outra maneira é a proteção dos seus DBFs com uma simples rotina que todos do forum conhecem.... PROTEGE(.f.,<nomeDBF.DBF>) // .T. PROTEGE E .F. LIBERA FUNCTION PROTEGE(lProtec, cFile) LOCAL nHandle := 0, cBuffer := space(32) nHandle := FOPEN(cFile, FO_READWRITE + FO_SHARED) IF nHandle # -1 IF FRead(nHandle, @cBuffer, 32) == 32 IF lProtec // Protege IF substr( cBuffer, 1, 1 ) # chr(26) cBuffer := chr(26) + substr( cBuffer, 1, 31) ENDIF ELSE // Desprotege IF substr(cBuffer, 1, 1) == chr(26) cBuffer := substr( cBuffer, 2, 31 ) + Chr( 0 ) ENDIF ENDIF FSEEK( nHandle, 0 ) FWRITE( nHandle, cBuffer, 32 ) ENDIF FCLOSE( nHandle ) ENDIF RETURN( FError() ) Entendemos agora meu caro mas acho que a solução de "catar" o que o meliante digita não seria a correta pois na mesma levada, estaria expondo TODOS da empresa e certamente o dono vai querer isso para outros fins, se é que tu me entendes. Abs

Pensei a mesma coisa pois existem programas que fazem isso mas o antivirus detectam eles e como o João, fiquei em dúvida da finalidade disso e de antemão te peço desculpas pelo nossos questionamentos.

Estou desconfiando que o senhor também não é o Rochinha aqui neste forum kkkk Brincadeira meu nobre mas também não vi problemas lá.

Boa tarde senhores, Como ainda não desenvolvi meu força de vendas, procurei com alguns desenvolvedores e um conhecido nosso me indicou o DEMANDER que achou muito bom e fazem a integração com seu sistema, alguém conhece, usou ou usa? https://www.demander.com.br/ Obrigado

Ele poderia defender o time dele como defende este forum porque o Cássio ta sendo ate ameaçado para sair. kkkkkkkkkkk

Bom dia meus caros, alguém ja desenvolveu algum aplicativo de força de vendas claro em outra linguagem? tenho muitos lugares que podera fazer esta pergunta mas preferi aqui dar este apoio ao senhores que acredito também que o suporte será melhor devido a ligar as vendas como meu programa de automação comercial Podem me chamara pelo whatsapp 91 98054-9339 Obrigado

Boa Mota mas como tenho vários sistemas, alguns não se usa dados de empresas em muitos porções do programa. Tenho a rotina também a autorização pela internet através de uma conexão SQL mas essa então é ainda mais fácial para quem pirateia. Li um artigo que em Delphi que tem esta função e também usando comandos do Windows é possível mas em Clipper/Harbour/xHarbour, nada concreto.

Sei disso, mas segundo alguns sites e até mesmo aqui, o serial de fábrica não muda ou esta informação esta incorreta Vailton?

Ouvi sobre projeto descontinuado do XHarbour e já tenho material para a migração para o Harbour mas quais as vantagens que notaram em performance e recursos e sua continualidade no sentido de que apenas seria nesse horizonte que continuaríamos a usar esta ferramenta? Abraços

Bom dia pessoal Sei que o assunto já foi discutido no tópico... Mas a rotina com a DLL não funcionou e a minha preocupação vem de um que nem conhecimento muito em informática e tampouco de um programador, me levantar esta preocupação quanto a segurança de nossos sistemas pois todos sabem que existem vários programas para burlar isso. Alguém teve realmente a preocupação com isso pois SOMENTE COM O SERIAL DE FÁBRICA nos daria essa segurança porque o nSerialHD() muda este serial ao HD ser formatado e me parece que os programas podem quebrar esta segurança feita por ele. Obrigado

"Funcionando Legal" !!?? Lá no tópico disse que não estava gerando e apresentando o QR Code!

Pensei que era uma contribuição!!! Mas tudo bem amigo, temos que valorizar nossos esforços e trabalho. Abraços

Realmente aparece uma dialog com 3 datas como se fosse nosso famoso "debug" e depois uma dialog sem o qrcode. Amigo Gunafe acho que só criando a figura do QRCode seria suficiente e a dialog de apresentação dele, ficava por nossa conta mas claro amigo não querendo abusar de sua bondade.

Excelente!! Obrigado pela contribuição!

Amigo ele gera um bitmap ou figura que armazena no hd? Qual o retorno da função?

Bom dia meus caros, Algo sobre recebimentos pelo PIX em um sistema de automação comercial? Não se acha nada nem aqui de concreto e em nenhum forum. Abs

achei bacana o "Desculpe mano!" kkkkkk Valeu Kapi!

Fiz já isso meu caro mas mesmo assim podes direcionar para uma impressora tipo MICROSOFT PRINT TO PDF, PDF24 ou Wondershare PDFelement. Lá no botão de impressão tem a lista das impressoras ou a impressora DEFAULT pode ser uma dessas. O cliente não quer que relatórios da empresa possam serem copiados para pen drives e hoje em dia tem muitos programas que editam o PDFs. Esperamos muito para podermos imprimir em PDF agora quero o contrário kkkk

Bom dia meus caros, Existe uma maneira de impedir que o cliente possa criar um arquivo PDF a partir da impressão na RPreview? Pensei e "setar" a impresora pegando o nome e ser for diferente de configurada no sistema, ele trava a operação tipo: ImpAnt := PrnGetName() IF ImpAnt != "EPSON L3150" IF NSGYESNO("Impressora não ativa, setar a mesma?!","Impressão") SetDefaultPrinter( "EPSON L3150" ) ENDIF ENDIF Sendo assim força a imprimir somente para a impressora específica. Abs

Entendi, tem um tópico recente aqui sobre whatsapp veja se alguém ja desenvolveu algo. Abraços

Já que usas sql, faria um banco de dados em nuvens e ao fazer uma venda, enviaria os dados da venda para esse arquivo e na central, uma rotina que a cada 1 minuto ou a gosto, ficasse verificando se tem algum pedido nesse arquivo em nuvem e se caso tivesse, baixava ele para o servidor. Vejo como uma solução simples e eficiente, pois na central separam os produtos, emitem a nf e já fazem a entrega. Sei que precisas apenas do aviso mas serviria da mesma lógica para este caso. Abs

Nesse caso acho que não tem haver o Pelles e sim como disse o colega ai, o tamanho da váriável vazia.

Veja se os Fonts estão iguais nas duas telas.

Show! Assim coitado dos letristas kkkkk Mas ficou muito top mesmo!