Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 4

changes.mady.by.user Matheus Lando Raimundo

Gravado em

comparado com

Nova versão 5

changes.mady.by.user Matheus Lando Raimundo

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
a740GrdM

A740GrdM_Adiciona grid ao modelo de dados MVC

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Gestão de Serviços

Rotina:

Rotina

Nome Técnico

TECA740;

TECA740F

ModelDef()



O ponto de entrada é indicado para adicionar grid's ao modelo de dados das rotinas TECA740 e TECA740F (Orçamento de serviço)


Ponto de Entrada

Descrição:

a740GrdM A740GrdM - Adiciona grid ao modelo de dados MVC.


Localização:

Atualizações>>Oportunidades>>Proposta Comercial->Orçamento de serviços

Eventos:

ModelDef()->oModel

Programa Fonte:

TECA740.PRW; TECA740F

Função:

ModelDef()

Retorno:

Nome

Tipo

Descrição

Obrigatório

 Nulo

Nulo

Ponto de entrada não tem retorno.

Adiciona grid ao modelo de dados MVC.

Não

 

Exemplo:


User function a740GrdM()                  

Local oModel  :=  PARAMIXB[1] //Modelo de dados

Local aModels     :=  PARAMIXB[2] //Array com todos submodelos do objeto {id, descrição}

Local oStrTEV     := FWFormStruct(1,'TEV')


oModel:addGrid('TEV_ADICIO','TFI_LE',oStrTEV)

oModel:SetRelation('TEV_ADICIO', { { 'TEV_FILIAL', 'xFilial("TEV")' }, { 'TEV_CODLOC', 'TFI_COD' } }, TEV->(IndexKey(1)) )

oModel:GetModel( 'TEV_ADICIO' ):SetUniqueLine( { 'TEV_MODCOB' } )


oModel:getModel('TEV_ADICIO'):SetDescription('TESTE PE')  // 'Cobrança da Locação'


oModel:getModel('TEV_ADICIO'):SetNoUpdateLine(.T.)

Return



...