Histórico da Página
01. DADOS GERAIS
| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Logística |
| Módulo: | SIGATMS - Gestão de Transportes |
02. DESCRIÇÃO
Através deste ponto de entrada é possível adicionar abas ao cockpit dos clientes.
O ponto de entrada está localizado na função TMSA510 do fonte TMSA510 (Cockpit dos Clientes) e possui seis etapas que devem ser utilizadas em conjunto:
- Execução do ponto de entrada e retorno das informações das novas abas;
- Inclusão dos novos folders;
- Inclusão das novas colunas no objeto Layer;
- Criação dos novos browses;
- Refresh dos novos browses;
- Limpeza das variáveis estáticas na saída do cockpit dos clientes.
| Informações | ||
|---|---|---|
| ||
As novas abas serão sempre incluídas à direita das abas já existentes no padrão. Cada linha do array de retorno refere-se a uma nova aba. Não é possível a retirada de abas do padrão. |
Parâmetros:
Não existem parâmetros de entrada.
Retorno:
- Título da nova aba e do novo browse.
- Nome da nova coluna.
- Array com as propriedades do browse.
- Array com as propriedades do relacionamento entre o novo browse e o browse principal (Clientes).
- Nome do novo objeto browse.
- Nome do novo objeto de relacionamento.
03. EXEMPLO DE UTILIZAÇÃO
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#INCLUDE 'Protheus.ch'
User Function TMA510BRW()
Local aRet := {}
Local aBrowseUS1 := {}
Local aBrowseUS2 := {}
Local aRelacUS1 := {}
Local aRelacUS2 := {}
Aadd(aBrowseUS1,"SetOwner(oFolders:aDialogs[21])")
Aadd(aBrowseUS1,"SetDescription('Teste 1')")
Aadd(aBrowseUS1,"SetMenuDef('TMSA610')")
Aadd(aBrowseUS1,"DisableDetails()")
Aadd(aBrowseUS1,"SetAlias('DV2')")
Aadd(aBrowseUS1,"SetProfileID('22')")
Aadd(aBrowseUS1,"SetMainProc('TMSA610')")
Aadd(aRelacUS1,"AddRelation(oBrowseUp,oBrowseUS1,{{'DV2_FILIAL','" + 'xFilial("DV2")' + "'},{'DV2_CODCLI','A1_COD'},{'DV2_LOJCLI','A1_LOJA'}})")
//--
Aadd(aBrowseUS2,"SetOwner(oFolders:aDialogs[22])")
Aadd(aBrowseUS2,"SetDescription('Teste 2')")
Aadd(aBrowseUS2,"SetMenuDef('TMSAF14')")
Aadd(aBrowseUS2,"DisableDetails()")
Aadd(aBrowseUS2,"SetAlias('DDO')")
Aadd(aBrowseUS2,"SetProfileID('23')")
Aadd(aBrowseUS2,"SetMainProc('TMSAF14')")
Aadd(aRelacUS2,"AddRelation(oBrowseUp,oBrowseUS2,{{'DDO_FILIAL','" + 'xFilial("DDO")' + "'},{'DDO_CODCLI','A1_COD'},{'DDO_LOJCLI','A1_LOJA'}})")
Aadd(aRet,{"Teste 1","COLTST1",aBrowseUS1,aRelacUS1,"oBrowseUS1","oRelacUS1"})
Aadd(aRet,{"Teste 2","COLTST2",aBrowseUS2,aRelacUS2,"oBrowseUS2","oRelacUS2"})
Return aRet
|
04. DEMAIS INFORMAÇÕES
Não há.
05. ASSUNTOS RELACIONADOS
Não há.
| Templatedocumentos |
|---|
| HTML |
|---|
<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> |
Import HTML Content
Visão Geral
Conteúdo das Ferramentas