Árvore de páginas

Versões comparadas

Chave

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

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 - 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 1:


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


Exemplo 2 - Com adição de aba:


User function a740GrdM()

Local oModel := PARAMIXB[1] //Modelo de dados
Local aModels := PARAMIXB[2] //Array com todos submodelos do objeto {id, descrição}
Local oStrZPP := FWFormStruct(1,'ZPP')

oModel:addGrid('ZPP_TESTE','TFF_RH',oStrZPP)
oModel:SetRelation('ZPP_TESTE', { { 'ZPP_FILIAL', 'xFilial("ZPP")' }, { 'ZPP_CODTFF', 'TFF_COD' } }, ZPP->(IndexKey(1)) )

oModel:getModel('ZPP_TESTE'):SetDescription('Descricao Teste')

Return


Obs.: Pra preenchimento 'manual' do grid aconselhamos usar o bloco de load do addGrid.

Ex:

oModel:addGrid( 'XXXDETAIL', 'YYYMASTER', oStrXXX,,,,,{|oGrid|funcaoload(oGrid)})

Mais informações em:

http://tdn.totvs.com/display/public/mp/MPFormModel



...