Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Gestão de Serviços
Função:TECA190D.PRW - Mesa Operacional
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-6414


02. SITUAÇÃO/REQUISITO

Ponto de Entrada para alteração do ModelDef no TECA190D.

03. SOLUÇÃO

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

Exemplo de Utilização.

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

User Function AT190DMODE()

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

For nX := 1 To Len(aSubMdls)

aSubMdls:SetDescription('Model ' + Str(nX) )

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.

  

Nome da Estrutura

Nome da Tabela

oStrAA1AA1
oStrDTSDTS
oStrABBABB
oStrMANMAN
oStrTGYTGY
oStrALCALC
oStrTFLTFL
oStrLOCLOC
oStrHOJHOJ
oStrDTRDTR
oStrDTADTA
oStrPRJPRJ

04. DEMAIS INFORMAÇÕES

Para alteração da estrutura do Model, utilize o ponto de Entrada AT19DCPO.

05. ASSUNTOS RELACIONADOS

  • Não há.