Reading time: 1 minute
A função RestArea é utilizada para devolver a situação do ambiente salva através da função GetArea, ou seja, restaurar o ambiente salvo por ela. A última área restaurada é a área que ficará ativa para a aplicação. Ela é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.
Sintaxe:
RestArea(aArea)
Parâmetro(s):
Exemplo da função RestArea em ADVPL:
Suponhamos que o ambiente ativo seja do alias SA2(Alias()), índice 1(IndexOrd())e registro 320(Recno()) e salvamos esse ambiente com GetArea, depois selecionamos a área SC7(Pedido de Compras) com DBSelectArea e ao final restauramos o ambiente da SA2(Fornecedores) com RestArea:
#include 'protheus.ch'
#INCLUDE "TBICONN.CH"
/*{Protheus.doc} User Function PARestAr
(Essa função tem por finalidade mostrar a Funções de Acesso a Banco de Dados / SQL no Protheus RestArea em ADVPL)
@type Function
@author Adilio Costa
@since 05/12/2023
@version 1.0
@Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@Conheça os Cursos do ProtheusAdvpl:
https://hotmart.com/pt-br/club/protheusadvpl
|Se esse conteúdo foi útil pra você nos ajude divulgando
ele e nossas redes sociais!!|
*/
User Function PARestAr()
/*
A variável aArea conterá os dados:
aArea[1]:O alias SA2(Alias()), aArea[2]:O Índice 1(IndexOrd()) e aArea[3]:O registro 320(Recno())*/
Local aArea := GetArea() //Salvando a área atual
//Definindo a tabela SC7(Pedido de Compras) como à área de trabalho ativa
DBSelectArea("SC7")
SC7->(DBSetOrder(1))
//Restaura o ambiente anterior, ou seja, as informações do alias SA2.
RestArea(aArea)
Return
É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.
Link(s) de referência(s):