Histórico da Página

...

Não se aplica.

08. EXEMPLO

------

#INCLUDE "PROTHEUS.CH"

User Function OM200AdC()
Local aRet         := {}
Local aArray      := PARAMIXB[1] //-- Conteúdo do campo.
Local aHeaders := PARAMIXB[2] //-- Cabeçalho do campo.
Local bLine       := PARAMIXB[3] //-- Condição para inserir conteúdo no campo.
//-- Objetos de Status.
Local oLiberado := PARAMIXB[4]
Local oCalend    := PARAMIXB[5]
Local oHorario   := PARAMIXB[6]
Local oVeiculo   := PARAMIXB[7]
Local oPedMan  := PARAMIXB[8]

Local oDown      := LoadBitmap( GetResources(), "TRIDOWN" )
Local oUp           := LoadBitmap( GetResources(), "TRIUP" )

Local aAreaPE     := GetArea()
Local nX := 0

...

AAdd(aRet,aArray)
AAdd(aRet, aHeaders)
AAdd(aRet, bLine)
RestArea(aAreaPE)

Return(aRet)

------