WebDev Tabela Alteracao

WebDev Tabela Alteracao

Para alterar dados numa pagina

====================================================================
no botal Alterar colocar o seguinte

IF TableSelect(TABLE_Tecnico)=-1 THEN RETURN

HReadSeek(tecnico,tecnico.chave_empresa_tecnico,[gnEmpresaCodigo,TABLE_Tecnico.COL_Id_empresa_tecnico])
PageDisplay(PAGE_tecnico_cadastro)
mostra_relacao_tecnico()

====================================================================

dentro da pagina de alteracao colocar o seguinte


PAGE_tecnico_cadastro.EDT_Id_tecnico=tecnico.id_tecnico
PAGE_tecnico_cadastro.EDT_Nome=tecnico.nome

===============================================================

no botao salvar colocar o weguinte

//ler a informacao entrada
PageToFile()

IF tecnico..NewRecord = True THEN
    HAdd(tecnico)
ELSE
    //tecnico.nome=PAGE_tecnico_cadastro.EDT_Nome
    HModify(tecnico)
END

// volte para pagina
IF PreviousPage()<>"" THEN
    PageDisplay(PreviousPage)
ELSE
    PageDisplay(PAGE_relacao_tecnico)
END