Linha Microsiga Protheus

Árvore de páginas

CONTEÚDO

  1. Dados gerais
  2. Descrição
  3. Localização
  4. Exemplo de utilização
  5. Retorno

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Backoffice
Módulo:Compras
Função:

COMXFUN - Função Genérica

MATA150 - Atualizar Cotações

02. DESCRIÇÃO

        Este ponto de entrada permite mostrar ou ocultar itens da Cotação na rotina Atualizar Cotações (MATA150).

03. LOCALIZAÇÃO

O Ponto de Entrada se encontra antes da apresentação das telas das opções "Atualizar" e "Novo Particip.".

04.  EXEMPLO DE UTILIZAÇÃO


Exemplo
#include "totvs.ch"

/*/{Protheus.doc} User Function MTALTCOT
   Permite bloquear a edição de produtos na rotina Atualizar Cotações.
   @type Function
   @since 01/01/2024
   @author user
/*/
User Function MTALTCOT()

Local cAliasMem := Paramixb[1] // Alias que controla os registros das Cotações.
Local cOpcao    := Paramixb[2] // Opção escolhida pelo usuário.
Local aRet      := {}
Local lOk       := .T.
Local cMensagem := ""

If (cAliasMem)->C8_PRODUTO <> "COM000000000000000000000000002"
   lOk       := .F.
   cMensagem := "Alteração não permitida para este produto."
EndIf

AAdd(aRet, lOk) // [1] = .T. para mostrar o item e permitir a edição; .F. = para ocultar o item e não permitir a edição.
AAdd(aRet, cMensagem) // [2] = Mensagem de aviso que será apresentada ao usuário.

FWAlertInfo("Alteração do produto " + AllTrim((cAliasMem)->C8_PRODUTO) + IIf(lOk, " liberada", " bloqueada") + ". Opção escolhida pelo usuário " + cValToChar(cOpcao) + ".", "P.E. MTALTCOT")

Return aRet


05. RETORNO

Retorno: Array