Pessoal Preciso de mais uma ajudinha dos amigos,quero clicar no campo Equipamento do primeiro subformulario, e esse fazer uma cópia desse equipamento no segundo sub,tipo clico em celular e esse nome ir para o segundo sub no IDReparo 3 se clico em computador ir para o IdReparo 4.
3 participantes
[Resolvido]Copiar campo de sub para sub
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº1
[Resolvido]Copiar campo de sub para sub
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº2
Re: [Resolvido]Copiar campo de sub para sub
Desisti.
scandinavo- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1059
Registrado : 11/11/2009
- Mensagem nº3
Re: [Resolvido]Copiar campo de sub para sub
desistiu tão rapido, veja ai coloquei o codigo em um botão.
na realidade voçe adiciona o registro na tabela que alimenta o sub formulario e faz uma atualização.
não sei se foi intencionar mas reveja a vinculação entre os dois subformularios, acredito que esteja errada.
criei mais um campo na tabela para registrar o nome do equipamento, campo desvinculado no sub formulario só da trabalho.
Dim rs As DAO.Recordset
'Abre a tabela para receber os dados copiados
Set rs = CurrentDb.OpenRecordset("TblReparo")
'Depois adiciona os dados a tabela
rs.AddNew
rs!IDEquipamento = Me!IdOrdServico 'Precisa arrumar isto. Este campo cria o vinculo entre as tabelas
rs!DescReparos = Me!Defeito
rs!Equip = Me!DescEquipamento
rs.Update
rs.Close
Set db = Nothing
MsgBox "Dados copiados...", vbInformation, "Duplicação de vendas"
'*******************************************
Forms!FrmPrincipal![TblReparo subformulário].SetFocus
Forms!FrmPrincipal![TblReparo subformulário].Requery
MInha mensagem de 999.
https://www.dropbox.com/s/o2tl7qoopvrr8sh/maximo.zip?dl=0
na realidade voçe adiciona o registro na tabela que alimenta o sub formulario e faz uma atualização.
não sei se foi intencionar mas reveja a vinculação entre os dois subformularios, acredito que esteja errada.
criei mais um campo na tabela para registrar o nome do equipamento, campo desvinculado no sub formulario só da trabalho.
Dim rs As DAO.Recordset
'Abre a tabela para receber os dados copiados
Set rs = CurrentDb.OpenRecordset("TblReparo")
'Depois adiciona os dados a tabela
rs.AddNew
rs!IDEquipamento = Me!IdOrdServico 'Precisa arrumar isto. Este campo cria o vinculo entre as tabelas
rs!DescReparos = Me!Defeito
rs!Equip = Me!DescEquipamento
rs.Update
rs.Close
Set db = Nothing
MsgBox "Dados copiados...", vbInformation, "Duplicação de vendas"
'*******************************************
Forms!FrmPrincipal![TblReparo subformulário].SetFocus
Forms!FrmPrincipal![TblReparo subformulário].Requery
MInha mensagem de 999.
https://www.dropbox.com/s/o2tl7qoopvrr8sh/maximo.zip?dl=0
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº4
Re: [Resolvido]Copiar campo de sub para sub
Perfeito Scandinavo,é isso mesmo felizmente vc resolveu essa pra mim,muito obrigado amigo,agora vou poder continuar essa lida.
Valeu mesmo.
Valeu mesmo.
scandinavo- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1059
Registrado : 11/11/2009
- Mensagem nº5
Re: [Resolvido]Copiar campo de sub para sub
valeu
substitua estas duas linhas
Forms!FrmPrincipal![TblReparo subformulário].SetFocus
Forms!FrmPrincipal![TblReparo subformulário].Requery
por esta
Forms!FrmPrincipal![TblReparo subformulário].Form.Requery
substitua estas duas linhas
Forms!FrmPrincipal![TblReparo subformulário].SetFocus
Forms!FrmPrincipal![TblReparo subformulário].Requery
por esta
Forms!FrmPrincipal![TblReparo subformulário].Form.Requery
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº6
Re: [Resolvido]Copiar campo de sub para sub
scandinavo- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1059
Registrado : 11/11/2009
- Mensagem nº7
Re: [Resolvido]Copiar campo de sub para sub
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº8
Re: [Resolvido]Copiar campo de sub para sub
esse
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº9
Re: [Resolvido]Copiar campo de sub para sub
Gente como faz esse vinculo pra dar certo.
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3501
Registrado : 13/12/2016
- Mensagem nº10
Re: [Resolvido]Copiar campo de sub para sub
Kaynan,
Estou elaborando um exemplo de Ordem de Serviço e assim que eu finalizar, disponibilizo.
Att,
Alexandre Fim
Estou elaborando um exemplo de Ordem de Serviço e assim que eu finalizar, disponibilizo.
Att,
Alexandre Fim
.................................................................................
Marcar tópico como Resolvido: clique aqui
Postar anexos no fórum: clique aqui
Sistemas e Tecnologia Ltda
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº11
Re: [Resolvido]Copiar campo de sub para sub
Legal Alexandre,que de pra vincular varios equipamentos a mesma OS.
Alexandre Fim gosta desta mensagem
scandinavo- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1059
Registrado : 11/11/2009
- Mensagem nº12
Re: [Resolvido]Copiar campo de sub para sub
veja
https://www.dropbox.com/s/sr3s8xaljb8jbgc/maximo2.accdb?dl=0
https://www.dropbox.com/s/sr3s8xaljb8jbgc/maximo2.accdb?dl=0
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº13
Re: [Resolvido]Copiar campo de sub para sub
Perfeito amigo,mais uma vez obrigado,valeu mesmo.
Quero ver o exemplo do Alexandre.
Quero ver o exemplo do Alexandre.
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3501
Registrado : 13/12/2016
- Mensagem nº14
Re: [Resolvido]Copiar campo de sub para sub
Kaynan,
O exemplo que estou elaborando contempla 1 ou mais equipamentos por OS, e cada equipamento também terá 1 ou mais serviços, incluindo também valor da peça/servico a ser realizado.
Ao gerar o orçamento para o cliente, constará o valor de cada item separadamente e o total de todo o serviço/manutenção de cada equipamento, e também o total geral da OS.
A modelagem das tabelas está pronta e o formulário de OS está 70% concluído, e assim que eu terminar, disponibilizo uma versão.
Valeu
Att,
Alexandre Fim
O exemplo que estou elaborando contempla 1 ou mais equipamentos por OS, e cada equipamento também terá 1 ou mais serviços, incluindo também valor da peça/servico a ser realizado.
Ao gerar o orçamento para o cliente, constará o valor de cada item separadamente e o total de todo o serviço/manutenção de cada equipamento, e também o total geral da OS.
A modelagem das tabelas está pronta e o formulário de OS está 70% concluído, e assim que eu terminar, disponibilizo uma versão.
Valeu
Att,
Alexandre Fim
.................................................................................
Marcar tópico como Resolvido: clique aqui
Postar anexos no fórum: clique aqui
Sistemas e Tecnologia Ltda
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº15
Re: [Resolvido]Copiar campo de sub para sub
Ansiado pra ver amigo véio...
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº16
Re: [Resolvido]Copiar campo de sub para sub
Opaa Alexandre quase pronto a OS.
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3501
Registrado : 13/12/2016
- Mensagem nº17
Re: [Resolvido]Copiar campo de sub para sub
Fala ai Kaynan,
Elaborei este modelo e acredito que vc consiga caminhar nas demais implementações do sistema.
Estão faltando algumas validações e tmb codificar alguns botões, mas de modo geral, está funcionando.
A tela de Ordem de Serviços ficou assim:
Para atribuir uma manutenção, é necessário clicar no equipamento desejado na listbox da guia equipamentos, em seguida clicar em "Novo" na guia Manutenção:
Após finalizar a OS, clicar qum imprimir para visualizar o relatório, onde os serviços são agrupados pro equipamentos:
É isso
Espero ter ajudado
Boa sorte
Att,
FIM
Elaborei este modelo e acredito que vc consiga caminhar nas demais implementações do sistema.
Estão faltando algumas validações e tmb codificar alguns botões, mas de modo geral, está funcionando.
A tela de Ordem de Serviços ficou assim:
Para atribuir uma manutenção, é necessário clicar no equipamento desejado na listbox da guia equipamentos, em seguida clicar em "Novo" na guia Manutenção:
Após finalizar a OS, clicar qum imprimir para visualizar o relatório, onde os serviços são agrupados pro equipamentos:
É isso
Espero ter ajudado
Boa sorte
Att,
FIM
- Anexos
- SysOS.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (172 Kb) Baixado 23 vez(es)
.................................................................................
Marcar tópico como Resolvido: clique aqui
Postar anexos no fórum: clique aqui
Sistemas e Tecnologia Ltda
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº18
Re: [Resolvido]Copiar campo de sub para sub
Grande Alexandre,muito bem elaborado esse exemplo e com certeza vou começar a usar ele,estive analizando e que talcolocar um código na list box para a gente possa editar uma manutenção.
Alexandre Fim- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3501
Registrado : 13/12/2016
- Mensagem nº19
Re: [Resolvido]Copiar campo de sub para sub
Sim, Kaynan, essa é a ideia.
Aprimorando e melhorando cada vez mais as funcionalidades do sistema.
Como disse, é apenas um exemplo, e as melhorias fica por sua conta....kkkk
Abraço e boa sorte!
Sucesso
Att,
Alexandre Fim
Aprimorando e melhorando cada vez mais as funcionalidades do sistema.
Como disse, é apenas um exemplo, e as melhorias fica por sua conta....kkkk
Abraço e boa sorte!
Sucesso
Att,
Alexandre Fim
.................................................................................
Marcar tópico como Resolvido: clique aqui
Postar anexos no fórum: clique aqui
Sistemas e Tecnologia Ltda
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº20
Re: [Resolvido]Copiar campo de sub para sub
Muito bém,vai dar pra colocar varias coisas a mais no sistema e o que não souber fazer vou pregar o grito.Muito obrigado amigo véio.
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº21
Re: [Resolvido]Copiar campo de sub para sub
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº22
Re: [Resolvido]Copiar campo de sub para sub
Opa,Alexandre coloca em manutenção após gravar o que foi feito para fazer o conserto do equipamento,os campos são limpos,qual código coloco na list pra ao clicar duas vzs aparecer.
Kaynan- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 2992
Registrado : 09/04/2012
- Mensagem nº23
Re: [Resolvido]Copiar campo de sub para sub
Aì pessoal este tópico ja deu né rsrs obrigado gente abençoada.
» [Resolvido]Copiar informação de um campo no formulário e jogar para outro campo.
» [Resolvido] Copiar campo de um Formulário para uma tabela de um SubFormulário
» [Resolvido]Copiar de um campo para outro campo
» [Resolvido]Copiar valor para outro campo do subformulario
» [Resolvido]Copiar dados para um campo variável de outro form
» [Resolvido] Copiar campo de um Formulário para uma tabela de um SubFormulário
» [Resolvido]Copiar de um campo para outro campo
» [Resolvido]Copiar valor para outro campo do subformulario
» [Resolvido]Copiar dados para um campo variável de outro form