Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Agro Beneficiamento

Linha de Produto:

Linha Protheus

Segmento:

Agroindústria

Módulo:Gestão de Agronegocio
Função:UBSA040D
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :DAGROOGD-12184


02. SITUAÇÃO/REQUISITO

É necessário disponibilizar um ponto de entrada que permita ser modificado o conteúdo da aba Romaneios da consulta de Rastreabilidade de Sementes disponível no módulo SIGAAGR.

03. SOLUÇÃO

Foi disponibilizado um ponto de entrada que é executado durante a construção da tela de Rastreabilidade de Sementes. Ela recebe um dialog e query de insumos utilizados no beneficiamento. Exemplo:




UB040ROM
User Function UB040ROM()

	//dialog da aba
    Local oDialog := PARAMIXB[1]
	//query de insumos
    Local cQueryINS := PARAMIXB[2]
    Local oBrowse as object

    oBrowse := FWMBrowse():New()
    oBrowse:SetAlias('NK9')
    oBrowse:SetDescription('Teste PE')
    oBrowse:DisableDetails()

	//constrói filtro com a query de insumos
    oBrowse:SetFilterDefault(GetFilter(cQueryINS))

	//ativa browse dentro do dialog enviado
    oBrowse:Activate(oDialog)

Return




Não é esperado nenhum retorno.

04. DEMAIS INFORMAÇÕES

Não há.


05. ASSUNTOS RELACIONADOS