Erciley Junior

Realmente Kapiaba, mais um bug da linguagem, vai entender... FUNCTION DECIMAL() a:=30.135 MSGINFO(Round( a , 2 ),'') //RETORNA 30.14 RETURN FUNCTION DECIMAL() qt := 2.0500 preco := 14.7000 a:=qt * preco //2.05 * 14.700000 = 30.135 MSGINFO(Round( a , 2 ),'') //RETORNA 30.13 RETURN

Compilando com xHb 1.1, o primeiro resultado retorna o que deveria, ou seja 30.135 O segundo retorna 30.14, pois nesse caso você fez o Round. Não fazendo ROUND na atribuição, sua declaração vai pro espaço, pelo menos nos testes aqui, ou seja, não percebi nenhum erro.

Fala Luisão. Acho que minha outra conta se perdeu (ou eu perdi ela ^^) quando o fórum foi hackeado e perdeu algumas informações mais antigas. Fiquemos com o "O Rly" mesmo, kkkkkkkkkkkkk

Indico o Luisão aí em cima fácil, pode confiar.

Essa finalidade de criar uma cópia em outro servidor já é uma justificativa para o uso Pode usar isso também para criar uma tabela temporária e trabalhar com dados de um período em específico, etc...

Oi Fladimir, não tinha visto que você respondeu. Já conseguiu resolver? Esse create table dessa forma realmente não cria os índices, você tem que especifíca-los no comando, inclusive o ENGINE. Ficaria assim: CREATE TABLE tabela_teste (KEY seu_indice(seu_campo)) ENGINE = INNODB SELECT * FROM tabela_base; http://fivewin.com.br/index.php?/topic/21854-insert-into-com-array-mysql/ Para facilitar, você pode usar o comando SHOW CREATE TABLE nome_tabela para ver os índices criados, e incrementar no seu CREATE TABLE de forma mais fácil

cSQL:='Create table tab_backup'+; ' SELECT * FROM tabela_normal' sqlExecute(cSQL)

Olá Aprendiz (não sei seu nome vou chamar pelo nick, hehehe) É uma loja na praia certo? Rapaz, é um negócio aparentemente simples e que com certeza dá um bom retorno, principalmente por causa da localização. Deve ser muito bom ter uma oportunidade dessa e não ter que ficar trancado em um escritório..... muito legal mesmo, sonho meu isso aí ^^ (já to até imaginando, eu e a patroa na praia, trabalhando de chinelo e regata, pegando um buguinho pra passear no meio da semana, hahahaha) Abraço

Bom, apesar de achar que uma loja de Havaianas dê MUITO mais dinheiro q Fivewin, te desejo boa sorte, hehehe Tudo de bom

kkkkkkkkkkkk, tive q clicar pra ver oq era ^^ http://www.globo.com.br/vagas/zorratotal/cadastrocurriculo.php

Opa, primeira resposta serve se você quiser duplicar registros em BD´s diferentes, em servidores diferentes, aí terá que criar um backup e restaurá-lo em outra base. Para isso, vá pelo DOS, no diretório onde está instalado o mysql c:\program files\mysql\mysql server xxxx\bin e execute o comando pra backup mysqldump -h <ip_servidor> -u<user> -p[<senha>] <nome_bd> [<tabela>] > c:/teste.sql e depois o comando pra restaurar o backup no outro servidor mysql -h <ip_servidor> -u<user> -p[<senha>] <nome_bd> < c:/tbK3.sql

Bom dia Josehilton. Pergunta: Tenho um arquivo no Servidor que pretendo duplicalo em outro como faco Resposta: CREATE TABLE tabela_teste (KEY seu_indice(seu_campo)) ENGINE = INNODB SELECT * FROM tabela_base; Pergunta: outro situacao seria essa aArray := sqlarray("select * from atupro ",nconn2) ccmd := "insert into atupro_Pdv Values (" aArray ")" ExecuteCmdSql(ccmd,nconn,.f.,.f.,.t.) como funcionaria ambus arquivos tem a mesma estrutura Resposta: cSQL:='INSERT INTO atupro_Pdv SELECT * FROM atu_pro' sqlExecute(cSQL)

Projeto -> Propriedades -> Selecionar Compiladores Do lado direito terá "Versões Instaladas", e aí você seleciona o compilador a usar Um pouco abaixo, terá o checkbox citado pelo aferra "Usar este script durante o processo de desenvolvimento"

Oi Emotta, na verdade o WHEN é uma instrução do comando CASE. Daria pra fazer com IF´s, mas o código ficaria meio poluído ........ e funciona em SQL Server sim. ^^ Uma dica pra quem está em casa e não tem sql server, mysql, oracle instalado, é usar o sqlfiddle é um site que você pode simular uma base de dados em qualquer uma dessas linguagens, entre outras...... tem até um botãozinho Donate pra quem animar, hehehe http://sqlfiddle.com/

Ariston, a única forma que enxergo para fazer isso com apenas um comando, seria como o exemplo abaixo. UPDATE ITENS_DB SET ESTOQUEATUAL = CASE CODIGO WHEN '0001' THEN 0.000 WHEN '0002' THEN 7.000 WHEN '0003' THEN 2.000 WHEN '0004' THEN 5.000 END WHERE CODIGO IN ('0001','0002','0003','0004'); Fazer isso em um LOOP é fácil, mas dependendo o número de dados, pode haver problemas no fivewin, com o tamanho da string ou pode haver problema no banco de dados, com o tamanho do pacote enviado, então seria bom que você tivesse um limite de códigos a atualizar de uma única vez, para não haver nenhum dos 2 problemas citados.

Ariston, pelo que sei, não dá para atualizar registros diferentes, aplicando informações diferentes em um mesmo campo, com condições diferentes ou seja, tem que atualizar "1 a 1" mesmo. O que torna esse tipo de atualização mais rápida, é abrir um TRANSACTION, para não ficar comitando a cada UPDATE realizado, isso dá uma GRAAANDE diferença dependendo a quantia de UPDATES enviados.

Herberson, apesar de eu não ir, como já disse, não há a possibilidade de você fechar um contrato com o SESC com base nos números que você possui? Afinal de contas, fechar com eles para reservar 25 dormitórios, ao meu ver, é um número elevado. Digo isso pois a partir daí, os demais que talvez possam vir a aparecer, terão que dar seu jeitinho para se hospedar (fazer o que?). Bom, não tenho participação nem conhecimento em como funciona, então me desculpe se estiver falando besteira ^^

Olá a todos. Da forma que alguns falam, parece que todos os inscritos do fórum que não se manifestaram, estão em cima do muro, e isso é uma baita mentira. O pessoal da empresa que trabalho por exemplo, incluindo-me, nunca se manifestou para haver encontro e nem nunca dissemos que iríamos, e com certeza isso ocorre com vários outros membros, acredito. Nunca falamos nada, pois a decisão de levar nossa equipe em específico, deveria partir da diretoria caso eles vejam essa necessidade e possível benefício para a empresa, mas isso, acredito que infelizmente, não ocorrerá. Então esse é um dos motivos que eu nunca me manifestei nem a favor, e nem contra, e é um dos motivos que dou que não irei. Agora pessoas que agitam pelo fórum, cobram, reclamam da organização do evento e tudo mais, esses sim vocês devem cobrar uma posição, mas da forma falada, genérica, parece que membros como eu, afirmaram algo em um passado, e agora no presente não se manifesta, e isso não é verdade. Só estou falando isso, pois como disse, deve ser o caso de vários outros, quem sabe. E desejamos que ocorra tudo muito bem com vosso encontro, que acho muito importante, e que nestes 5 anos com Fivewin, ficaria feliz em participar, mas infelizmente, por motivos próprios e outras razões, não acho que cabe a mim esse investimento. E isso não significa que eu não invisto em meu conhecimento ^^

Se não me engano é essa propriedade abaixo: oLbx:aCols[4]:nDataStrAlign := AL_CENTER xBrowse.CH #define AL_LEFT 0 #define AL_RIGHT 1 #define AL_CENTER 2

Olá. Emotta, e eu estava pensando em SQLLIB, onde você pode fazer o SELECT que quiser, criar a coluna que quiser, numerar como quiser através do SELECT, e utilizar com comandos DBF posteriormente, por isso dei esse exemplo. Sempre me confundo com os termos SQLRDD e SQLLIB, talvez foi aí que nos desentendemos. Toda tabela criada pela SQLLIB, é criada com a coluna SQL_ROWID. Vailtom fez isso por compatibilidade/similaridade, com o RECNO, acredito. O exemplo do Evandro, é a forma que falei em "criar uma coluna" e aí testar se é par ou ímpar, para colorir. Isso na SQLLIB funcionaria, fazendo um USE SQL e trabalhando como DBF. Eu particularmente prefiro utilizar tudo como array, salvo raras exceções. O texto é só para esclarecer oq eu estava dizendo. Beijos

Emotta, quanto a isso eu tenho minhas dúvidas, e aposto que não é bem isso. Ou melhor, se abrir a tabela do banco de dados, via LIB, para trabalhar como DBF, onde não haja SQLFILTER nem nada, aí concordo com você Agora se usar USE SQL, filtrando os dados pelo WHERE, para usar como DBF, o RECNO, que na verdade acaba pegando o valor do SQL_ROWID, não se permanece. Mas lembro que percebi uma particularidade no retorno da função RECNO, quando no seu SELECT tem a coluna SQL_ROWID, e quando não tem, mas agora não me lembro exatamente o que era para falar.

Oi Emotta, eu disse isso pensando em um USE SQL por exemplo, que o RECNO fica algo sequencial e diferente do SQL_ROWID..... pelo menos acho que fica diferente ^^ De qualquer forma, dá pra fazer USE SQL criando uma nova coluna, e essa nova coluna você pode numerar sequencialmente e aí testar ela nos blocos do bClr, ou já retornar a cor diretamente..... bom, só explicando ...... o importante seria o sistem informar se conseguiu ^^

Faz testando o RECNO, o que for par eh uma cor, impar outra, dá certo xbrowse array fica mais fácil ainda, ou ainda dá pra fazer isso complicando um pouco, definindo a cor em uma coluna do select que você fizer

Oi Kapiaba, acho que demorei BASTANTE pra ver sua mensagem ^^ Ainda quer esse editor? Me passa teu e-mail qualquer coisa, abraço.

Verdade...... foi dito para usar "antes", para finalizar a transação criada no ID atual, para aí fazer um novo select pegando as informações atualizados no banco.