Pontos de Entrada para customizar a tela da rotina
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Agroindústria | ||||
Módulo: | SIGAAGR | ||||
Rotina: |
| ||||
Ponto de Entrada: | OGA245BUT | ||||
País(es): | Todos | ||||
Versões/Release: | 11.80.19 |
Ponto de Entrada
Descrição: | Permite customizar a tela da rotina. | ||||||||
Localização: | ViewDef | ||||||||
Programa Fonte: | OGA245 | ||||||||
Função: | OGA245BUT | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function OGA245BUT()
Local oView := PARAMIXB[1] // View do OGA245
oView:AddField( "VIEW_EXEMPLO2", oStruEXEMPLO2, "EXEMPLOMASTER" )
oView:AddGrid( "VIEW_EXEMPLO3", oStruEXEMPLO3, "EXEMPLODETAIL" )
oView:AddIncrementField( "VIEW_EXEMPLO3", "EXEMPLO3_ITEM" )
oView:CreateVerticallBox( "TELANOVA2" , 100 )
oView:CreateHorizontalBox( "SUPERIOR2" , 50, "TELANOVA2" )
oView:CreateHorizontalBox( "INFERIOR2" , 50, "TELANOVA2" )
oView:SetOwnerView( "VIEW_EXEMPLO2", "SUPERIOR2" )
oView:SetOwnerView( "VIEW_EXEMPLO3", "INFERIOR2" )
oView:EnableTitleView( VIEW_EXEMPLO2" )
oView:EnableTitleView( "VIEW_EXEMPLO3" )
Return ( oView )