Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 4

changes.mady.by.user Usuário desconhecido (mateus.barbosa)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Renata Aparecida Teodoro Santana

Gravado em

Chave

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

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



...