[Resolvido]Inclusao de Dados Automaticamente

Amigos Boa tarde!

Tenho um tabela onde existe um campo chamado Status onde tem a seguinte informação.
Pendente
Em Analise
Finalizado
Existe a possibilidade de quando eu virar esse mesmo campo para em analise na coluna da frente aparecer a data e o horario que foi alterado. Isso vale tambem para quando for virado para Finalizado.

Aguardo retorno, Muito obrigado

A coluna deverá ser do tipo data,

no form após atualizar da caixa texto onde fica o status

If Me.CampoStatus = "Finalizado" or Me.CampoStatus = "Em análise" Then
Me.CampoData = Now()
End If

Cumprimentos.

Harysohn
boa tarde!

Criei 2 novas colunas.
Data de alteração(Em Analise)
Data de Alteração(Finalizada)
Onde em coloco essa condição que vc me passou...
me desculpe o incomodo..

abraços..

Boas HdCruz...

Para que duas colunas quando pode ser apenas em uma.. anterando apenas o texto

e no form que adiciona os valores uma combo com lista de opção (em análise e finalizada)
Esta combo seria acoplada no campo status da tabela...

e o codigo que te passei acima no evento após atualizar desta combo.


Cumprimentos.

então.....mas preciso saber o tempo que ficou de em analise para finalizado...
abraços

podes criar um outro campo texto para receber a quantidade de dias decorridos.

If Me.CampoStatus = "Em análise" Then
Me.CampoData = Now()
ElseIf Me.CampoStatus = "Finalizado"
Me.NovoCampoData = "Dias decorridos da análise: " & DateDiff("d", Me.CampoData, Now)
End If

Cumprimentos.

Amigo boa tarde!

Desculpe mais ainda sou meio iniciante no access 2010...
Onde coloco a condição abaixo ? em qual parte do access.

If Me.CampoStatus = "Em análise" Then
Me.CampoData = Now()
ElseIf Me.CampoStatus = "Finalizado"
Me.NovoCampoData = "Dias decorridos da análise: " & DateDiff("d", Me.CampoData, Now)
End If

Muito obrigado pela ajuda.

Um pequeno exemplo:

https://dl.dropbox.com/u/26441349/HdCruz.rar

Cumprimentos.

Nao conseguir abrir pois meu access é o 2010....
pode me ajudar?

Importe para o seu... esse e 2007 o 2010 o abre sim....

Cumrprimentos.

Nao deu certo..informa que o documento nao é reconhecido...

Veja agora:

https://dl.dropbox.com/u/26441349/HdCruz.rar

Caramba nao conseguir ainda...

E amigão... o problema é por ai... O Seu access nao ta abrindo nem 2003 nem 2007..

Não sei o que pode ser pois nunca trabalhei com o 2010.

Faca assim, crie uma tabela com o campo Código e o CpData, CpStatus, CpDiasDecorridos

Adicione alguns registros no CpData e cpStatus

No evento apos atualizar da combo

If Me.CpStatus = "Em análise" Then
Me.cpData = Now()
ElseIf Me.CpStatus = "Finalizado" Then
Me.CpDiasDecorridos = "Dias decorridos da análise: " & DateDiff("d", Me.cpData, Now)
End If

Cumprimentos.

Entao é assim..
Tenho uma tabela que tem as seguintes coluna...

Customer||| Numero da OS|Motivo do acionamento|||Analista||| STATUS|||DATA DE ALTERAÇÃO PARA EM ANALISE|||DATA DE ALTERAÇÃO PARA FINALIZADO.

A coluna STatus ja virá como pendente.... quando o analista for tratar o caso e virar para em analise, eu quero que apareça na coluna Data de alteração para em analise, a data e hora que ele alterou o status para em analise.

Quando ele alterar o status desse mesmo caso para Finalizado, eu quero que apareca a data e a hora na coluna data de alteração para finalizado.
Entao..preciso de 2 informação...
a data e hora de alteração para em analise, e a data e hora de alteração para finalizado. do mesmo caso.
Pode me ajudar por favor....preciso de mais detalhes...pois aindo sou aprendiz...
muito obrigado pela paciência...

Amigão... eu fiz dois exemplos... um em 2007 e outro em 2003, nao adianta eu pegar os teus campos e fazer outro exemplo sendo que voce nao está conseguindo inportá-lo.

Tente importar este exemplo para sua base de dados.

Crie uma BD novo.
Na barra de ferramentas la acima vá em Dados Externos...
No segundo ícone (Access) clique
Vá em procurar e busque pelo exemplo que lhe enviei

importe tudo para o teu e observe o funcionamento.

Caso não consiga. siga as dicas que lhe dei na mensagem anterior e crie a tabela, crie um form, coloque os campos desta tabela no form..

No campo status crie uma combo, e nesta nas propriedades, na segunda aba, em tipo de origem coloque listas de valores
- Na origem da linha coloque os dados como quer dessa maneira: Finalizado;Pendente;Em análise

Salve.

No evento após atualizar desta combo aplique os codigos que lhe enviei...


Cumprimentos.

em qual parte do access eu aplico os codigos...a condição?

Amigao... tente importar isso novamente... ele tem que aceitar...

O codigo é aplicado no form, no objeto Combo

COm o form aberto em modo Design, clique em F4, abrira as propriedades

Clque na combo, veras que teras disponiveis as propriedades da mesma

Na Aba eventos, em após atualizar...

Ai deves aplicar o codigo.


Cumprimentos.

Mano...nao conseguir....
Existe a possibilidade de vc fazer a formula baseado nas colunas que passei....
por favor...

Muito obrigado pela paciência

Descreva os campos da tabela (o nome do campo) e que tipo de dados é cada campo.

Aguardo.

Cumprimentos.

Segue abaixo.....
Nº do registro|Codigo do cliente|Numero da OS|Status|Data alteração Em analise|Data alteração Finalizado

Amigo essas sao as colunas e seus tipos....
a pessoa coloca o Codigo do cliente o registro aparece automatico isso ja fiz.. depois coloca o numero da OS, depois o status que será pendente.

Quando forem tratar esse registro...ele iram alterar o status para Em Analise...ai eu queria que automaticamente aparecesse na coluna data de alteração para em analise a data e hora da mudança. e depois quando esse mesmo registro for alterado para finalizado. que aparecesse a data e hora da mundança na coluna de data de alteração para finalizado.
Lembrando que ao final ficaria a data e hora que alterou para em analise e data e hora que alterou para finalizado.

Me ajude Por favor..
abraços...

Amigo só uma sugestão.

Pelo que eu entendi você quer uma análise futura que eu entendo por "processos".

Você deve criar uma tabela de processos, usando campos como "tipo de processo" com

data e hora "inicial" e "final".

Com isso você pode iniciar um processo, e ao finalizá-lo passa para outro, e assim

sucessivamente.

Reveja como pode fazer isso.

Sds,

Vamos la amigão..
1 - Criei uma tabela conforme vossa descrição
2 - Criei um form baseado nesta tabela
3 - no form a campo Status é uma combox, do tipo lista de valores, tendo na origem da linha: Finalizado;Em analise

No evento após atualizar desta combo o seguinte código:

Private Sub CpStatus_BeforeUpdate(Cancel As Integer)
If Me.CpStatus = "Em análise" Then
Me.Data_Alteracao_em_analise = Now()
ElseIf Me.CpStatus = "Finalizado" Then
Me.Data_alteracao_finalizado = Now()
End If
End Sub


Observe os Print's abaixo

Amigao Veja o erro que deu...

Não veio nada amigao...

que erro foi esse?

apareceu assimm..

o MICROSOF ACCESS NAO PODE LOCALIZAR O OBJETO "PRIVATE SUB CPSTATUS_BEFOREUPDATE(CANCEL AS INTEGER) IFME..

SE PRIVATE SUB CPSTATUS_BEFOREUPDATE(CANCEL AS INTEGER)
IF ME FOR UM NOVA MACRO OU UM GRUPO DE MACRO, VERIFIQUE SE VC SALVOU COM O NOME CORRETO.

apareceu isso.....fiz exatamente o que pediu....

o que será?
obrigado.

Amigao.. cada objeto no form tem um nome... Esse ai é o nome que dei a minha combo que fica o Status...

Se criou ai no seu e nao deu um nome a ela, deve estar assim: combinacaoXX.....

Quando cria um evento para o objeto.. o proprio access ja da eesse nome para o evento BeforeUpadete

No meu caso o nome da minha combo é CpStatus

0 código é este amigao:


if Me.CpStatus = "Em análise" Then
Me.Data_Alteracao_em_analise = Now()
ElseIf Me.CpStatus = "Finalizado" Then
Me.Data_alteracao_finalizado = Now()
End If

Observe que Me.CpStatus, em vermelho é o nome da mimha combo, tem que substituir pelo nome da tua...

Cumprimentos.

Amigão,
muito obrigado pelo retorno....

Acontece o seguinte, eu quero alterar um campo da tabela, por exemplo na propria tabela eu altero um registro da coluna "Status" que estava como "PENDENTE" para "Em analise"...

Quando faço isso, quero que na coluna "Data alteração em analise" apareca a data de Agora(), ou seja a data que eu alterei este registro...

Lembrando que estou mexendo na propria tabela e não no formulario...

Voce consegue me ajudar novamente?

Valeu!!!
e obrigado pela paciencia....

Amigo, infelizmente este código é para utilizar em forms. como quer não dá pra fazer diretamente na tabela...
Tabelas são receptáculos de dados, e sua função é limitada ao que pretente.
Tratamento, codigos... tens que utilizar um formulãrio.

Se tivesse falado isso desde o começo não estariamos a dar voltas...

Infelizmente não sei mais o que fazer para ajudá-lo.

Ei o exemplo pronto... Basta importa-lo para o seu bd e verás como é feito.

http://dl.dropbox.com/u/26441349/HdCruz.rar


Cumprimentos.

Amigo...
muito obrigado pela paciência....
nao tinha se atentado a esse detalhe...

vc foi muito bom....

abraços..

O Fórum agradece o Retorno.

Só faltou o resolvido, desta vez eu coloco.

Cumprimentos.