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:


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:

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 

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()                  

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

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:

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

Eventos:

TEC800RL()->Nil

Programa Fonte:

TECA800.PRW

Função:

At800RetLib()

Retorno:

Nome

Tipo

Descrição

Obrigatório

 Nulo

Nulo

Ponto de entrada não tem retorno.

Executa as regras especificas do usuário

Não

 

Exemplo:

#Include 'Protheus.ch'

User Function TEC800RL()

MsgAlert("Executou o ponto de entrada TEC800RL")

Return