Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada MT120RES

Linha de Produto:

Microsiga Protheus

Segmento:

Backoffice

Módulo:

Compras (SIGACOM)

Rotina:

Rotina

Nome Técnico

Pedidos de Compra / Autorizações de Entrega

MATA120

Ponto de Entrada:

MT120RES

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas utilizadas:

SC7

Sistema(s) operacional(is):

Windows/Linux

Ponto de Entrada

Descrição:

O ponto de entrada MT120RES tem como finalidade permitir ou não a exclusão de pedido de compras associados a itens de solicitação de compras que possuem eliminação por resíduos, que por padrão não é permitido.

Localização:

Função principal de Manutenção de Pedidos de Compra.

Eventos:

Permitir ou não a exclusão de pedidos de compra associados a itens de solicitação que possuem eliminação por resíduo.

Programa Fonte:

MATA120

Função:

A120PEDIDO

Observações:

Este ponto de entrada somente será acionado:

  1. O pedido de compra estiver sendo excluído;
  2. O pedido de compras possuir associação com solicitação de compras
  3. Alguns dos itens associados a solicitação de compras estiver com eliminação de resíduo.

Parâmetros:

Nome

Tipo

Descrição

Obrigatório

PARAMIXB[1]

Numérico

Operação escolhida no Menu Principal da rotina de Pedido de Compras (nOpc) 

X

 Retorno:

Nome

Tipo

Descrição

Obrigatório

lRetLógico

.T. = Permite exclusão

.F. = Não permite exclusão

 X
Exemplo:
Exemplo de utilização
#INCLUDE "PROTHEUS.CH"

User Function MT120RES()
	
	Local lRet 		 := .F.
	Local aArea		 := GetArea()
	Local aAreaSC1   := SC1->(GetArea())
	Local nOpc 	 	 := PARAMIXB[1]
	
	//-- Início das validações de usuário
	
	If !lRet .And. nOpc == 5
		lRet := .T.
	Endif

	//-- Fim das validações de usuário

	SC1->(RestArea(aAreaSC1))
	RestArea(aArea)

Return lRet