Abre a tela de pesquisar registro
Exemplo da Rotina:
1 | AxPesqui() |
Exemplo 1- Pegando a quantidade de uma tabela:
1 2 3 4 5 6 7 8 9 10 | //Abre o cadastro de produtos, e chama a pesquisa DbSelectArea( "SB1" ) nPesq := AxPesqui() //Se a Pesquisa foi confirmada, mostra o produto escolhido If nPesq == 1 Alert( "Produto escolhido foi " + SB1->B1_COD) EndIf |
Observações:
– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;
Referências:
– TDN