740GrdM_Adiciona grid ao modelo de dados MVC

Características do Requisito

Microsiga Protheus

Serviços

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

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

a740GrdM_Adiciona grid ao modelo de dados MVC

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Rotina:

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 

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.

User function a740GrdM()                  

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

// 'Cobrança da Locação'

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

Return

Não

Exemplo:

a740GrdM_Adiciona grid ao modelo de dados MVC

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Rotina:

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>>Locação>>Movimentações->Retorno de locação

Eventos:

TEC800RL()->Nil

Programa Fonte:

TECA800.PRW

Função:

At800RetLib()

Retorno:

Exemplo:

#Include 'Protheus.ch'

User Function TEC800RL()

MsgAlert("Executou o ponto de entrada TEC800RL")

Return