|
| Como pegar o ID de uma tabela? |
| Iniciado por Marcos Roberto, mar., 02 2015 2:07 AM - 3 respostas |
| |
| | | |
|
| |
Membro registado
11 mensagems |
|
| Publicado em março, 02 2015 - 2:07 AM |
Caros, tenho uma table sobre uma query (filtrada), ocorre q preciso pegar o no. do ID para localiza-la e abrir em uma window de alteracao. Fiz assim:
n is int
vNoSerie is string
vNoIMEI is string
vDataReset is Date
vMarca is string
n = TableSelect(Table_Qry_ControleMobile)
HReadSeekFirst(Mobile,MobileID,n,hKeepFilter)
IF HFound(Mobile) = True THEN
vNoSerie = Qry_ControleMobile.nseriemobile
vNoIMEI = Qry_ControleMobile.NoIMEI
vDataReset = Qry_ControleMobile.reset
vMarca = Qry_ControleMobile.Marca
END
Entaum na tabela eu tenho 3 registros filtrados. Quero pegar o ID do registro selecionado para pesquisa-lo.
Marcos Roberto |
| |
| |
| | | |
|
| | |
| |
Membro registado
535 mensagems |
|
| Publicado em março, 02 2015 - 8:53 AM |
Normalmente eu faço o seguinte, na Tabela eu coloco o id, e se nao quizer que apareca para o usuario o deixo escondido.. e ai faco o seguinte
IF TableSelect(TABLE_cliente)=-1 THEN RETURN
HReadSeekFirst(cliente,cliente.id_cliente,TABLE_cliente.COL_Id_cliente)
IF HFound(cliente) THEN
Open(WIN_Form_cliente)
END
TableDisplay(TABLE_cliente,taCurrentSelection)
mostra_cli_cliente(gnCodigo_representante,gnSituacao)
|
| |
| |
| | | |
|
| | |
| |
Membro registado
11 mensagems |
|
| Publicado em março, 02 2015 - 2:09 PM |
Obrigado Amarildo, deu certinho.
Marcos Roberto. |
| |
| |
| | | |
|
| | |
| |
Membro registado
535 mensagems |
|
| Publicado em março, 02 2015 - 6:08 PM |
MarcosRoberto escreveu:
Obrigado Amarildo, deu certinho.
Marcos Roberto.
Valeu |
| |
| |
| | | |
|
| | | | |
| | |
|