Punto de entrada MT120PCOL 

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:

MT120PCOL

País(es):

Brasil

Base(s) de datos:

Todos

Tablas utilizadas:

SC7

Sistema(s) operativo(s):

Windows/Linux

Ponto de Entrada

Descripción:

El punto de entrada MT120PCOL se utiliza para validar la inclusión del pedido de compra (MATA120) antes de validar el módulo SIGAPCO (Validación de bloqueo). 

Ubicación:

Línea por línea de los ítems del pedido.

Eventos:

No permitir la inclusión de línea no validada.

Programa fuente:

MATA120

Función:

A120LINOK

Observaciones:

Este punto de entrada tiene los mismos primeros 8 caracteres del MT120PCOK - Valida Pedido de Compra, esto permite que ambos se ejecuten en puntos distintos. Para tratar este problema sin afectar validaciones del legado, se puso a disposición en el MATA120 con fecha mayor o igual al 29/09/2020 el siguiente parámetro, donde se puede identificar el punto a partir del cual se está ejecutando la llamada del punto de entrada.

Parámetros:

Nombre

Tipo

Descripción

Obligatorio

PARAMIXB[1]

Numérico

Llamada en ejecución (1 = A120LINOK, 2 = A120TUDOK) 

X

 Devolución:

Nombre

Tipo

Descripción

Obligatorio

lRet

Lógico

.T. = Línea validada

.F. = Línea no validada

 X

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

User Function MT120PCOL()
	
	Local lRet := .T.
	Local nOper := PARAMIXB[1]
	
	If nOper == 1 //-- 1 = Llamada a través del A120LINOK, 2 = Llamada a través del A120TUDOK
		//-- Validaciones de usuario
		lRet := .F.
	EndIf

Return lRet