Histórico da Página

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

Ponto de Entrada para alteração da VIEW no TECA190D.

03. SOLUÇÃO

Ponto de entrada na função ViewDef para alteração da mesma. Passado como parâmetro por referência, estrutura da ViewDef e estrutura das tabelas.

Exemplo de Utilização.

#INCLUDE "protheus.ch"
#INCLUDE "parmtype.ch"
#INCLUDE "FWMVCDEF.CH"

User Function AT190DVIEW()

Local oView := PARAMIXB[1]  // Estrutura da View, passado por referência
Local aSubMdls := PARAMIXB[2] // Estrutura das tabelas, passado por referência
Local nX := 0

For nX := 1 To Len(aSubMdls)

If aSubMdls[nX,2] == "ABB"

aSubMdls[nX,1]:AddField("TFF_ESCALA","10","Código Escala","Código Escala",{},"C","@!",Nil,Nil,.T.,"",Nil,Nil,Nil,Nil,.T.,Nil)

Endif

Next nX

Return .T.

A estrutura das tabelas é composta por um array de 12 posições onde cada uma delas contem outro array de 2 posições:

A primeira posição carrega a estrutura da tabela e a segunda posição carrega o nome.

04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

• Não há.

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>