Linha Microsiga Protheus

Árvore de páginas

A740GrdV_Adiciona grid a view do modelo de dados.

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

ViewDef()



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


Ponto de Entrada

Descrição:

A740GrdV - Adiciona grid ao modelo de dados MVC.


Localização:

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

Eventos:

ViewDef()->oView

Programa Fonte:

TECA740.PRW; TECA740F

Função:

ViewDef()

Retorno:

Nome

Tipo

Descrição

Obrigatório

 Nulo

Nulo

Ponto de entrada não tem retorno.

Adiciona grid a view do modelo de dados MVC.

Não

 

Exemplo 1:

User function a740GrdV()

Local oView  :=   PARAMIXB[1] //Viewdef

Local aAbas       :=  PARAMIXB[2] //Array com as abas disponiveis para inserção de sheet

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


oView:AddGrid('VIEW_ADICIO', oStrTEV, 'TEV_ADICIO')

oView:AddSheet( "ABAS", "ABAPE", 'TESTE PE')  // 'Locais de Atendimento'

oView:CreateHorizontalBox( "ID_ABAPE", 100,,, "ABAS", "ABAPE" )


oView:SetOwnerView( "VIEW_ADICIO"  , "ID_ABAPE"      )     // Grid Cobrança de Alocação

oView:EnableTitleView( 'VIEW_ADICIO', 'TESTE PE')  // 'Cobrança da Locação'

oView:AddIncrementField( 'VIEW_ADICIO', 'TEV_ITEM' )


Return


Exemplo 2:

User function a740GrdV()

Local oView := PARAMIXB[1] //Viewdef
Local aAbas := PARAMIXB[2] //Array com as abas disponiveis para inserção de sheet
Local oStrZPP := FWFormStruct(2,'ZPP')

oView:AddGrid('VIEW_ADD', oStrZPP, 'ZPP_TESTE')
oView:AddSheet( "ABAS", "ABA_ADD", "Seu Título Aqui" )
oView:CreateHorizontalBox( "ID_ABA_ADD" , 100,,, "ABAS", "ABA_ADD" )
oView:SetOwnerView( "VIEW_ADD", "ID_ABA_ADD" )

Return