Punto de entrada MT120RES

Línea de producto:

Microsiga Protheus

Segmento:

Backoffice

Módulo:

Compras (SIGACOM)

Rutina:

Rutina

Nombre técnico

Pedidos de Compra / Autorizaciones de Entrega

MATA120

Punto de entrada:

MT120RES

País(es):

Brasil

Base(s) de datos:

Todos

Tablas utilizadas:

SC7

Sistema(s) operativo(s):

Windows/Linux

Punto de entrada

Descripción:

El punto de entrada MT120RES tiene como finalidad permitir o no la eliminación del pedido de compras vinculados a ítems de solicitud de compras que tienen eliminación por residuos, que por estándar no se permite.

Ubicación:

Función principal de mantenimiento de pedidos de compra.

Eventos:

Permitir o no la eliminación de pedidos de compra vinculados a ítems de solicitud que tienen eliminación por residuo.

Programa fuente:

MATA120

Función:

A120PEDIDO

Observaciones:

Este punto de entrada solamente se activará si:

1.    El pedido de compra estuviera eliminado

2.    El pedido de compras tuviera vínculo con la solicitud de compras

3.    Algunos de los ítems vinculados a la solicitud de compras estuviera con eliminación de residuo.

Parámetros:

Nombre

Tipo

Descripción

Obligatorio

PARAMIXB[1]

Numérico

Operación elegida en el menú principal de la rutina de pedido de compras (nOpc). 

X

 Devolución:

Nombre

Tipo

Descripción

Obligatorio

lRet

Lógico

.T. = Permite eliminar

.F. = No permite eliminar

 X

Exemplo:
Ejemplo de utilización
#INCLUDE "PROTHEUS.CH"

User Function MT120RES()
	
	Local lRet 		 := .F.
	Local aArea		 := GetArea()
	Local aAreaSC1   := SC1->(GetArea())
	Local nOpc 	 	 := PARAMIXB[1]
	
	//-- Inicio de las validaciones de usuario
	
	If !lRet .And. nOpc == 5
		lRet := .T.
	Endif

	//-- Fin de las validaciones de usuario

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

Return lRet