(Resolvido) Inserir dados de um formulário em outro

[leonardo_r_mota]

Ola Amigos, sou bem leigo no assunto, vejam se podem me ajudar.

É o seguinte, eu tenho um programinha q eu uso aki na minha gráfica para controle de serviços, tenho um formuários onde eu cadastro as Ordem de Serviço nela eu coloco detalhes como valores e etc é tipo um registro do meu serviço, oque eu gostaria de fazer era inserir esses dados no meu formulario de pedidos, tipo como se fosse uma nota fiscal tipo um botão onde aparece uma tela com os serviços do meu determinado cliente e eu ir tipo selecionando eles para ser inserido no meu formulário de pedidos.

sera q alguém pode me ajudar?

[Iceguy]

Tudo depende da sua estrutura, mas se tiver algo do tipo:

TabelaClientes: id, nome, etc...

TabelaProdutos: id, nome, etc...

TabelaPedidos: id, id_cliente, id_produto, quantidade, etc...

Você pode criar um form que tem algo como isso:

<Número do pedido>

<Informações do cliente>

Cód. Produto <TextBox> Nome Produto <ComboBox> Quantidade <TextBox> <Button Adicionar>

e logo abaixo você coloca um subformulário de uma consulta na tabela de pedidos que seria algo como

SELECT TP.id AS [Cód.], TP.nome AS [Descrição], TPd.quantidade AS Qtde
FROM TabelaPedidos AS TPd, TabelaProdutos AS TP
WHERE TPd.id = [Formulários]!seuForm!SeuTextBoxPedido.Valor;

Ou pode usar JOIN também, daí toda vez que você pressiona o botão Adicionar ele da um INSERT na tabela pedidos passando o id do pedido, do cliente, do produto, quantidade, etc... e da um Requery no subformulário

[leonardo_r_mota]

Ola Iceguy!

Conseguiu ver aquele caso pra mim???

de inserir os itens de outra tabela??

[leonardo_r_mota]

Ola Amigos, postei o meu Bd e um prints creen com um pequeno explicativo +/- do q eu preciso

Tb tem outros dois posts meu

http://scriptbrasil.com.br/forum/index.php?showtopic=158553 (gerar .txt)

e

http://scriptbrasil.com.br/forum/index.php?showtopic=158550 (problemas com casas decimais)

q são todos do mesmo bd, caso possam me ajudar nisso tb fico agradecido!

Segue o link do Bd e do arquivo .jpg explicativo:

http://www.4shared.com/file/wlVj71ox/Contr...da_Grafica.html

Agradeço ao Amigo Iceguy q me ajudou numa outra questão!! ;)

[leonardo_r_mota]

alguém tem alguma novidade??

[MrMALJ]

Fera para inserir varios itens no seu pedido dê uma olhada no banco de de dados de exemplos do próprio access o northwind lá você encontrará entre outros um modelo de pedido.

[leonardo_r_mota]

Ola MrMALJ!

já verifiquei, e não encontrei nada relacionado.

fico no aguardo de uma ajuda!!

[leonardo_r_mota]

Ainda aguardando....

[leonardo_r_mota]

Ola Amigos!

Ainda não consegui resolver esta questão!

Estou no aguardo!

Obrigado! :unsure:

[Iceguy]

Postei uma alternativa aqui cara

http://scriptbrasil.com.br/forum/index.php...mp;#entry621955

[leonardo_r_mota]

Ola Ice Guy!

Obrigado pela ajuda.

Cara, meu caso, as ordens de serviço não estão numa listbox.

Sera q pelo bd q eu postei você não consegue adaptar pra mim?

Obrigado mais uma vez..

[leonardo_r_mota]

Ainda no aguardo de uma solução!!

[MrMALJ]

Veja bem colega, crie uma tabela com os dados principais do pedido, como numero, cliente... e outro com os subitens do pedido como produto,quantidade, valorUnitario, ainda nessa segunda tabela crie um campo numero pedido que irá se relacionar com o numero do pedido principal, assim você poderá cadastrar varios itens para um mesmo pedido, conforme exemplificado no northwind.

[leonardo_r_mota]

Ola MrMALJ!

Obrigado.

Mas meu caso é diferente, eu não cadastro prudotos com preços padrão como uma loja. Preciso importar de uma outra consulta filtrada pelos clientes e inserir no meu pedido.

fico no aguardo!

[MrMALJ]

Pra isso basta você colocar o campo no detalhe do pedido e não no cadastro do produto, pelo que vi você não está conseguindo entender a logica da coisa, e sendo assim disponibilize seu bd para download para que alguém tentar fazer algo.

[leonardo_r_mota]

Ola Amigo MrMALJ!

Eu já upei o meu bd logo no inicio do tópico, inclusive mandei tb até uma imagem explicativa do que eu preciso.

Fico no aguardo!

Obrigado!

[MrMALJ]

Os dois formularios vão sempre estar abertos ao mesmo tempo?

[leonardo_r_mota]

na verdade não...queria tipo um botão, onde ele abre essa lista de ordens de serviço do cliente e eu selecionasse e inserisse no formulário de pedidos

[MrMALJ]

Exatemente o que perguntei.... pois tudo bem que você queira fazer isso até é simples utilizar o docmd:

docmd.runsql "insert into suaTabela......"

Mas pra isso eu preciso informa por exemplo em qual pedido será inserido isso, são coisas lógicas que com um pouco de analise se percebe, por isso preciso saber de onde vou pega certos dados se o form de pedidos estiver sempre aberto quando isso for necessário poderia ser facilmente pego o númeo do pedido que está na tela... tente passar a maior quantidade de detalhes possivel, senão fica dificil lhe ajudar.

[leonardo_r_mota]

ENTENDO....

Desculpe minha ignorância, é q na verdade sou designer, linguagem de programação eu sou só um curioso mesmo...rsrs

então ele seria inserido no pedido atual q eu estou formalizando. Seria um tipo de botão onde ele abre as ordens de serviço por clientes (isso já tem), e inseri os itens q eu selecionar no meu pedido atual. mas seria somente uma cópia de dados pra eu não ficar tendo q usa ctrl+c e depois ctrl+v.

você conseguiu baixar o meu bd?

[MrMALJ]

crie uma nova consulta no modo SQL e cole esse código lá:

INSERT INTO [Tbl_Detalhes do Pedido de Vendas] ( Quantidade, Unidade, Descrição, [Valor Total], CódigoPedidodevendas )
SELECT [Tbl_Ordem de Serviço].Quantidade, [Tbl_Ordem de Serviço].Unidade, [Tbl_Ordem de Serviço].[Descrição do Serviço], [Tbl_Ordem de Serviço].[Valor Total], [Formulários]![FRM_PEDIDO DE VENDAS]![Número do Pedido] AS NrPedido
FROM [Tbl_Ordem de Serviço]
WHERE ((([Tbl_Ordem de Serviço].CÓDIGODOCLIENTE)=[Formulários]![FRM_PEDIDO DE VENDAS]![Tbl_Clientes.CÓDIGODOCLIENTE]) AND (([Tbl_Ordem de Serviço].Selecionar)=Yes));

Depois salve a com o nome de qryAddDetalhe, e no botão que você criou no OS coloque esse código na sua propriedade de evento "Ao clicar":

DoCmd.SetWarnings = False
DoCmd.OpenQuery "qryAddDetalhe", acViewNormal
DoCmd.Close acQuery, "qryAddDetalhe"
DoCmd.SetWarnings = True

[leonardo_r_mota]

Como eu crio uma consulta no modo sql?

[leonardo_r_mota]

Ola ...

Ta dando erro.

Upei um printscreen da minha tela pra você entender melhor.

Fico no aguardo

http://www.4shared.com/photo/pmGBXGMd/errro.html

[MrMALJ]

Desculpe fera deixei um sinal de igualdade na frente do setwarnings basta retirar que essa mensagem de erro sai.

[leonardo_r_mota]

Ola Bom Dia!

Tirei o sinal de igual do setwarnings=false mas não deu certo, dai tentei tirar do SetWarnings=true mas tb nau deu certo e apareceu a mensagem

Erro de tempo de execução '3126':

Colchetes inválidos no nome 'Formulários![FRM_Pedido de Vendas]![[Tbl_Clientes.CÓDIGODOCLIENTE]'.

FICO NO AGUARDO

[MrMALJ]

Estranho montei essa expressão tentando entender seu banco e deveria ter funcionado. Você testou rodar a tabela sem executar a partir do botão, tipo abra os dois forms selecione as coisas e em vez de clicar no botão clique na consulta pra ver se da esse erro mesmo. A única coisa que fiz que num estou acostumado a fazer é trabalhar com espaços e acentuação nos nomes de campos, tabelas e consultas.