nTopLimite superior.
AdvPL GuiaMsGetDB():New(nTop,nLeft,nBottom,nRight,nOpc,[cLinhaOk],[cTudoOk],[cIniCpos],[lDelete],[aAlter],[nFreeze],[lEmpty],[uPar1],cTRB,[cFieldOk],[uPar2],[lAppend],[oWnd],[lDisparos],[uPar3],[cDelOk],[cSuperDel])Mantém um grid legado baseado em tabela temporária.
Classe legada que edita linhas em alias temporário, indicado por cTRB no construtor. Exige Private aRotina e aHeader; a tabela deve seguir o cabeçalho e conter o indicador lógico de exclusão final. Enable e Disable controlam a interação; ForceRefresh atualiza e posiciona na primeira linha. Os callbacks de validação devem ser funções acessíveis, não Static. O trecho cobre somente esses três métodos e não cria a tabela ou o diálogo. (Fontes: refs. 1–1.)
MsGetDB():New(nTop,nLeft,nBottom,nRight,nOpc,[cLinhaOk],[cTudoOk],[cIniCpos],[lDelete],[aAlter],[nFreeze],[lEmpty],[uPar1],cTRB,[cFieldOk],[uPar2],[lAppend],[oWnd],[lDisparos],[uPar3],[cDelOk],[cSuperDel])nTopLimite superior.
nLeftLimite esquerdo.
nBottomLimite inferior.
nRightLimite direito.
nOpcPosição da ação em aRotina.
cTRBAlias temporário da edição.
MsGetDB():New(nTop,nLeft,nBottom,nRight,nOpc,[cLinhaOk],[cTudoOk],[cIniCpos],[lDelete],[aAlter],[nFreeze],[lEmpty],[uPar1],cTRB,[cFieldOk],[uPar2],[lAppend],[oWnd],[lDisparos],[uPar3],[cDelOk],[cSuperDel])Objeto da classe.
oGrid:Enable()oGrid:Disable()oGrid:ForceRefresh()New retorna o objeto; retornos dos demais métodos não são usados no exemplo.
#Include "Protheus.ch"
User Function Ed542()
// Exige objeto ja construido no dialogo correto; bloco nao invocado.
Local bAtualizar := {|oGrid| oGrid:ForceRefresh()}
ConOut(ValType(bAtualizar))
Return NilImprime B. Ao invocar com objeto válido, o refresh pode mudar a linha corrente. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.