Ponto de entrada convencional e PARAMIXB
ExecBlock(cPE,...,uParams) -> xReturn; PARAMIXBConfere o chamador, o conteúdo recebido e o retorno de cada PE.
Visão geral
No exemplo oficial, ExistBlock verifica a customização e ExecBlock passa um array como quarto argumento; o PE lê esses elementos em PARAMIXB. Isso não impõe array a todos os PEs: o formato depende da chamada concreta. Antes de indexar, conferir tipo, tamanho e significado de cada posição; não supor que PARAMIXB[1] seja sempre outro array. O retorno precisa ser o consumido pelo chamador, não um .T. ou NIL universal. A demonstração abaixo inspeciona apenas um array sintético, sem registrar um PE ou executar ExecBlock. (Fontes: refs. 1–2.)
Sintaxe
ExecBlock(cPE,...,uParams) -> xReturn; PARAMIXBExemplo comentado
#Include "Protheus.ch"
User Function Ed572()
Local uEntrada := {"ED01",3}
// Simulacao de envelope; nao sobrescrever PARAMIXB no PE real.
If ValType(uEntrada) == "A"
If Len(uEntrada) >= 2
ConOut(ValType(uEntrada[1])+" "+ValType(uEntrada[2]))
EndIf
EndIf
Return NilImprime C N para o array sintético. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
- Verificar release e ramo do chamador, transação, área, reentrada e consumo do retorno. Não capturar tokens, documentos ou dados pessoais em logs de diagnóstico.
- Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.