Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Serviços

Módulo:

TOTVS Backoffice (Linha Protheus) - Ativo Fixo (SIGAATF)

Função:ATFA012
País:Brasil
Ticket:Interno
Requisito/Story/IssueDSERCTR1-46829

02. DESCRIÇÃO

O ponto de entrada A012ALTG permite a atualização e salvamento dos arrays aHeader e aCols sempre que ocorre uma alteração no grupo selecionado. Ele é utilizado para customizar a estrutura de exibição dos dados, ajustando colunas e cabeçalhos conforme as mudanças no grupo, garantindo que a visualização reflita as especificidades de cada grupo configurado.

03. DEMAIS INFORMAÇÕES


Manipulação de PE no sistema
If l012AltGr
	//PONTO DE ENTRADA PARA GUARDAR AHEADER / ACOLS ATUAL
	ExecBlock("A012ALTG",.F.,.F.,{oAux:aHeader, oAux:aCols})
EndIf
Exemplo de PE
#include "Protheus.ch"
Static aHeadx
Static aColx
Static lSalvei := .F.

User Function A012ALTG()
	
	Local nx

	aHeadx := ParamIxb[1]
	aColx := ParamIxb[2]
	lSalvei := .T.

	MsgAlert("Entrei no Ponto de Entrada A012ALTG")

	//exibe 3 primeiros campos do aHeadx
	For nX := 1 TO 3
		MsgAlert( "Campo " +Alltrim(Str(nX))+": "+aHeadx[nX,2])
	Next

Return

//acols pode ser manipulado pelo ponto de entrada baixo
User Function A012RCOL()

	Local nx
	MsgAlert("Entrei no Ponto de Entrada A012RCOL")

	If lSalvei
		//exibe 3 primeiros campos do aHeadx
		For nX := 1 TO 3
			MsgAlert("Campo "+Alltrim(Str(nX))+": "+aHeadx[nX,2])
		Next
	EndIf

Return

Importante !!

  • Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
  • Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.

04. ASSUNTOS RELACIONADOS

  • Não se aplica.