Histórico da Página

...

Informações

title	Informações

Aviso

title	Vale ressaltar

Todos os exemplos utilizados são para fins didáticos e de exemplificação, toda aplicação e uso do ponto de entrada é de responsabilidade do cliente e da regra utilizada com base no propósito do ponto de entrada.

Parâmetros do Ponto de Entrada:

Parâmetro	Tipo	Descrição	Obrigatório
PARAMBIX[1]	Não se aplica	Não se aplica	Não

O que o ponto de entrada deve retornar

Retorno	Tipo	Descrição	Obrigatório

aUsrRotinas

aUsrRotina

Array

Retorna as opções de rotinas de usuário desejadas.

Sim

Bloco de código

language	cpp
theme	RDark
title	Exemplo de Manipulação do PE
linenumbers	true
collapse	true

If ExistBlock( "PCOA0501" )
		If ValType( aUsRotina := ExecBlock( "PCOA0501", .F., .F. ) ) == "A"
			AEval( aUsRotina, { |x| AAdd( aRotina, x ) } )
		EndIf
EndIf

Bloco de código

language	cpp
theme	RDark
title	Exemplo do PE
linenumbers	true
collapse	true

#Include "PROTHEUS.CH"

User Function PCOA0501()

	Private aUsrRotinas := {}

	aAdd(aUsrRotinas,{"Titulo", 'Processa({|| CTBR080() })', 0, 2}) //Exemplo de uma barra com processa para progresso visual chamando por exemplo um relatório.
	aAdd(aUsrRotinas,{"Titulo 4", "U_Teste", 0, 2})					//Exemplo chamando uma função de usuário que exibe um help.

Return aUsrRotinas


User Function Teste()

	Help(" ",1,"Teste",,"teste ´PE passou",1,0)

Return

...

Árvore de páginas

Versões comparadas

Versão antiga 3

Nova versão 4

Chave