Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
25 usuários online :: 1 usuário cadastrado, Nenhum Invisível e 24 Visitantes :: 2 Motores de busca

memarques

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Últimos assuntos
» Ajuda a direcionar
Hoje à(s) 01:17 por miiiih

» Alterar uma palavra num arquivo de texto
5/12/2016, 12:02 por Teseu

» Buscar endereço por CEP
3/12/2016, 19:59 por pedrossian

» USAR WEBSERVICE NO VFP9
2/12/2016, 09:50 por AJC

» BANIMENTO DE USUARIO
17/11/2016, 08:31 por FAF

» Impressora Ticket
15/11/2016, 09:20 por clima238

» Gráfico
9/11/2016, 10:43 por hidroluz

» TRANSPOR TABELA
9/11/2016, 10:34 por hidroluz

» MUDANÇA DO .DBF PARA POTSGREE
9/11/2016, 09:12 por AJC

» Website com videoaulas sobre linguagens de programação
8/11/2016, 09:56 por JLDR

» Parceria para desenvolvimento de template em Wordpress
7/11/2016, 19:15 por mindix

» Data fica invertida na planilha que é gerada via programa.
27/10/2016, 11:00 por Linghston

» Maximizar report direto do menu
21/10/2016, 20:48 por Rosangela Pires

» Fechar form com tempo
21/10/2016, 10:15 por Rosangela Pires

» URGENTE: Ajuda com impressora ELGIN-L42
14/10/2016, 09:53 por megasoft

» Opções para gerar NF-e
10/10/2016, 09:07 por mavsinfo

» Google Maps
8/10/2016, 15:08 por Rosangela Pires

» Mysql
5/10/2016, 11:22 por Marcos Guedes

» Acessando Banco em MYSQL de um projeto WORDPRESS
3/10/2016, 10:58 por Marcos Guedes

» OPTION SELECT MOSTRAR CAMPOS QUASE PRONTO
26/9/2016, 21:09 por BobKuspe

Alterar uma palavra num arquivo de texto

5/12/2016, 12:02 por Teseu

Olá prezados colegas de programação!

Este é eu primeiro post no fórum e gostaria de poder …

Comentários: 0

Buscar endereço por CEP

3/12/2016, 19:59 por pedrossian

Caros amigos, meu código para buscar endereço pelo CEP não funciona mais.
Alguém pode me …

Comentários: 0

USAR WEBSERVICE NO VFP9

2/12/2016, 09:50 por AJC

Pessoal, preciso de um material ou livro que me traga instruções como
usar a consumação de …

Comentários: 0

BANIMENTO DE USUARIO

13/11/2016, 16:21 por FAF

A usuária ROSANGELA PIRES ao tentar acessar o Forum obtem sempre a mensagem de BANIMENTO.
A mesma …

Comentários: 3

Impressora Ticket

15/11/2016, 09:20 por clima238

Bom dia,
Por favor alguém me explique porque o código abaixo imprime no ecrã em vez do printer: …

Comentários: 0

Estatísticas
Temos 6963 usuários registrados
O último usuário registrado atende pelo nome de miiiih

Os nossos membros postaram um total de 17119 mensagens em 2577 assuntos

Arquivos deletados contiuam aparecendo

Página 2 de 2 Anterior  1, 2

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido Arquivos deletados contiuam aparecendo

Mensagem por Julio em 9/8/2010, 11:00

Relembrando a primeira mensagem :

Bom Dia Pessoal

Registros marcados para deleção na tabela DBF contiua aparecendo no formulario quando é aberto.

No inicio.prg tenho varios comando e um dele é SET DELETED ON, para nao mostrar registros deletados.
Neste mesmo form tenho nop metodo INIT os seguintes comandos
Código:
SET TALK OFF
SET ECHO OFF
SET DELETED ON
SET NOTIFY OFF

mas mesmo assim quando abro o form o registro deletado aparece.


julio

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo


Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Julio em 9/8/2010, 19:55

Marcelo

Não quero excluir da tabela os registros marcados para deleção, é como o Hugo disse caso queira restaurar algum registro eles estarão lá, se utilizar o comando PACK ira excluir fisicamente da tabela e eu não quero isso.
So quero que NÃO apareça na visualização.

Mas como citei acima a "gambiarra" que fiz solucionou momentaneamente o problema. Até que eu altere o form para os padrões do VFP.

Marcelo

Neste caso espificico deste form eu so abro a tabela quando vou gravar, ou pesquisar não estou utilizando cursor temporario nenhum.

Julio

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por lardecristo em 9/8/2010, 19:58

Olá Julio,

Faz o seguinte:
SET DELETE ON
THISFORM.Limpa....não lembro...rsrsrs
GO TOP
THISFORM.Ativar...também não lembro....rssrs
THISFORM.Refresh

Me diz o que deu?

Abraços,


Última edição por lardecristo em 9/8/2010, 19:59, editado 1 vez(es)

lardecristo
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por m@r<3|o em 9/8/2010, 19:58

Julio Parabens se resolveu ,

eu acho que voce deve programar como vc achar melhor

Não precisa seguir o que digo , como vc vem acompanhando pelo forum, é defasado programar procedural

a questao seria mesmo, que somente quis alertar sobre o Pack caso desconheça

Caso Pack nao é a resposta , leve como uma opiniao de novato
e não necessariamente desmerecer respostas de membros
principalmente qdo o problema é de quem posto

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Julio em 9/8/2010, 20:02

Marcelo

Fiz este procedimento de gravar em um cursor temporario em um form espeficico que criava um cursor temporaria gravava e mostrava o resultado em outro form. Mas nao faço isso por padrão.

Pode dar como resolvido.

PS:
Pessal!
Deem uma olhada como faço meu form de cadastro não coloquei banco de dados quem quizer dar uma olhada abra o form e veja os metodos como eu faço.

[Você precisa estar registrado e conectado para ver este link.]

Sei que e a maneira errada de estar programando em VFP mas aos poucos estou alterando os forms para as dicas e ajuda que tive aqui no forum.

julio

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por lardecristo em 9/8/2010, 20:04

Sobre a questão procedural Marcelo, no meu entender, quando estamos programando dentro de um Form e em seu método, eu não diria que é procedural, porque o código está dentro de uma classe Form e utilizando o seu método, por exemplo, Init.

Se você for em visualizar como classe verá isso.


Abraços,

lardecristo
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Julio em 9/8/2010, 20:09

Marcelo

De uma olhada no form que postei, tenho alguns vicios em trazer sempre algum codigo do clipper para o VFP sei que nao precisa, mas estou alterando aos poucos, quando o form esta funcionando eu não altero e deixo como esta. Mas os novos estou tentando programar da forma correta passad aqui pelos colegas.
Sei o que faz o comando PACK, mas neste caso eu tambem acho que nao se aplica.
Aceito bem as criticas sei que é para melhorar e sempre que alguem posta um codigo como exemplo ou da uma dica, estou sempre modificado meu metodo pois sei que alguem ja passou por isso e encontrou a solução.


Obrigado pessoal

julio


Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por m@r<3|o em 9/8/2010, 20:15

Julio voce nao desmerece ninguem vc é bacana
ocupa seu tempo com seu sistema

quem desmerece é quem tem tempo sobrando e se julga experiente .......

um forum ao meu ver pra ser organizado,
tem que somente 1 postar as postar perguntas

e outros somente escrever a resposta ,
brincar elogiar até é legal ,
mais criticar , ai já vira debate

[MODERADO]
Sr. usuario, nao utilize caixa alta! Leia as normas do forum!


o unico que me ajuda a nivel de resolver é o Marcos Guedes
e nem por isso desmereci ninguem ate hoje

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Julio em 9/8/2010, 20:22

Seguindo o que lardeCristo postou alterei meu metodo ativarcampos colocando no inicio dele o seguinte
Código:
 SET DELETED ON
 SELECT Cadastro
 GO TOP
 Thisform.label23.Caption    = anilha
 Thisform.txtAnilhageral.value=anilha
 Thisform.txtControle.value  = controle
 Thisform.txtAnilha.value    = nrocompl
 Thisform.txtAnelfil.Value  = anelso
...
...
O GO TOP acho que foi este go top que resolveu

Mais uma ves obrigado


julio

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por hugo em 9/8/2010, 20:53

Topico Bloqueado e Resolvido!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Marcos Guedes em 9/8/2010, 21:10

Como o tópico foi moderado pelo Hugo, não posso voltar atrás pois ele estar no direito, visto que o escolhi para nos ajudar com a organização do fórum.

Mais vai aí uma última resposta para o colega Marcelo, referente sua última resposta (a qual foi moderada).


Marcelo, desculpe-me mas tenho que discordar.
Se é um fórum e dúvidas são postadas, então é bem provável que nós que tentamos ajudar também erremos. (Isto é comum.)

As vezes aprendemos algo que pode ser melhorado, mas requer humildade.

Já melhorei muitas coisas que costumava fazer "errado" sendo corrigido por colegas.

Diferente das outras áreas, a nossa (informática) está sempre mudando com coisas novas aparecendo. Com isto... quem para de estudar (ou pesquisar) fica parado no tempo.

Mas voltando ao assunto...
Sua dica me chamou a atenção e precisei fazer uns testes.

Você citou que o Julio deveria dar um PACK no cursor. Mas ele afirmou, antes de sua postagem (respondendo a uma pergunta minha) que não trabalha com cursor, neste exemplo. Logo o PACK não se aplica a este exemplo de forma alguma. (Corrija-me se eu estiver errado pois quero aprender como...)

Aqui vai o teste que fiz:

Código:
ON ERROR trataerro()

SET DELETED OFF
SET SAFETY OFF

*!* Teste com tabela FREE *!*

IF USED("teste2") THEN
   USE IN SELECT("teste2")
ENDIF

CREATE TABLE teste2 (campo c(7), sequencia i AUTOINC NEXTVALUE 1 STEP 1)
INSERT INTO teste2(campo) VALUE('valor1')
INSERT INTO teste2(campo) VALUE('valor2')
INSERT INTO teste2(campo) VALUE('valor3')
INSERT INTO teste2(campo) VALUE('valor4')
INSERT INTO teste2(campo) VALUE('valor5')
INSERT INTO teste2(campo) VALUE('valor6')
INSERT INTO teste2(campo) VALUE('valor7')
INSERT INTO teste2(campo) VALUE('valor8')
INSERT INTO teste2(campo) VALUE('valor9')
INSERT INTO teste2(campo) VALUE('valor10')

DELETE FROM teste2 WHERE sequencia=1 OR sequencia=2 OR sequencia=3

SELECT teste2
BROWSE

SELECT teste2
PACK
BROWSE


*!* Teste com tabela de banco nativo *!*

IF DBUSED("dbTeste") THEN
   SET DATABASE TO dbteste
   CLOSE DATABASES

   DELETE DATABASE dbteste DELETETABLES
ENDIF

CREATE DATABASE dbteste
SET DATABASE TO dbteste


CREATE TABLE teste3 (campo c(7), sequencia i AUTOINC NEXTVALUE 1 STEP 1)
INSERT INTO teste3(campo) VALUE('valor1')
INSERT INTO teste3(campo) VALUE('valor2')
INSERT INTO teste3(campo) VALUE('valor3')
INSERT INTO teste3(campo) VALUE('valor4')
INSERT INTO teste3(campo) VALUE('valor5')
INSERT INTO teste3(campo) VALUE('valor6')
INSERT INTO teste3(campo) VALUE('valor7')
INSERT INTO teste3(campo) VALUE('valor8')
INSERT INTO teste3(campo) VALUE('valor9')
INSERT INTO teste3(campo) VALUE('valor10')

DELETE FROM teste3 WHERE sequencia=4 OR sequencia=5 OR sequencia=6

SELECT teste3
BROWSE

SELECT teste3
PACK
BROWSE

USE IN SELECT('teste1')
USE IN SELECT('teste2')
USE IN SELECT('teste3')

SET DATABASE TO dbteste
CLOSE DATABASES

DELETE DATABASE dbteste DELETETABLES




*!* Teste com CURSOR *!*
CREATE CURSOR teste1 (campo c(7), sequencia i AUTOINC NEXTVALUE 1 STEP 1)
INSERT INTO teste1(campo) VALUE('valor1')
INSERT INTO teste1(campo) VALUE('valor2')
INSERT INTO teste1(campo) VALUE('valor3')
INSERT INTO teste1(campo) VALUE('valor4')
INSERT INTO teste1(campo) VALUE('valor5')
INSERT INTO teste1(campo) VALUE('valor6')
INSERT INTO teste1(campo) VALUE('valor7')
INSERT INTO teste1(campo) VALUE('valor8')
INSERT INTO teste1(campo) VALUE('valor9')
INSERT INTO teste1(campo) VALUE('valor10')

DELETE FROM teste1 WHERE sequencia=1 OR sequencia=2 OR sequencia=3

SELECT teste1
BROWSE

SELECT teste1
PACK && Erro
BROWSE


PROCEDURE trataerro AS STRING
   MESSAGEBOX(MESSAGE())
ENDPROC



Desejando continuar este assunto, sobre o comando PACK, o espaço está aberto para abrirem um novo tópico.

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por hugo em 9/8/2010, 21:18

Topico liberado para consideracoes!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por m@r<3|o em 10/8/2010, 00:27

Marcos, o problema real do topico
Não tem a ver com Pack
estou sem comentarios + para este topico

Não sei se voce fez uma pergunta ,e espera uma resposta
se confundi , ZAP com Delete Não sei

To sem Respostas e comentarios , a parte importante do topico foi moderada
sem sentido minha resposta
sem sentido eu continuar escrever nesse topico

OK ??

Abs
Marcelo




m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por lardecristo em 10/8/2010, 12:22

Olá Julio, foi o comando GO TOP que resolveu o seu problema, veja acho que isto é um bug do nosso amado VFP, quando você abre a tabela ele naturamente se posiciona no primeiro registro, mesmo que o SET DELE esteja ON, para aplicar o mesmo é necessário mover o ponteiro de registros e assim o VFP faz a execução do SET, isto não ocorre com os demais registro, a partir do segundo, porque para o mesmo você já move o ponteiro de registro.

Por favor se alguém souber de algo mais sobre a movimentação do ponteiro para este caso, post aqui....

Abraços,

lardecristo
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por hugo em 10/8/2010, 14:11

Este problema citado nunca passei por ele!

De qualquer forma, acredito que a explicacao acima sobre o "go top/set dele on/vfp" do Lar explica o problema e nos da solucao!

Grande abraco galera!


Última edição por hugo em 15/8/2010, 10:21, editado 1 vez(es)

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Julio em 13/8/2010, 12:50

Tambem não sei ate onde este GO TOP resolve, mas se retiro ele, valta tudo como antes.

Ate que nao encontremos outra solução fico com esta ainda.


Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por hugo em 15/8/2010, 10:22

julio, entao esta confirmado

a solucao do lar resolveu

abraco!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Julio em 17/8/2010, 11:07

Ok, Hugo


Resolvido

Julio
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Arquivos deletados contiuam aparecendo

Mensagem por Conteúdo patrocinado Hoje à(s) 15:17


Conteúdo patrocinado


Voltar ao Topo Ir em baixo

Página 2 de 2 Anterior  1, 2

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum