PE MT140LOK - Valida item a item na rotina de pré-documento de entrada

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	TOTVS Backoffice (Linha Protheus) - Compras (SIGACOM)
Função:	MATA140 - Pré-nota de Entrada
País:	Brasil
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :

02. DESCRIÇÃO

O Ponto de Entrada MT140LOK tem como objetivo, validar as informações preenchidas no aCols de cada item do pré-documento de entrada.

03. LOCALIZAÇÃO

Function Ma140LinOk() - Função responsável pela validação de cada item do pré-documento de entrada que está sendo cadastrado.

04. PARAMETROS

Nome	Tipo	Descrição
PARAMIXB[1]	Array of Record	Variável lógica que valida o conteúdo da linha do aCols para prosseguir ou impedir que prossiga adiante.
PARAMIXB[2]	Array of Record	Vetor de valores contendo os totais calculados no pré-documento de entrada
PARAMIXB[3]	Array of Record	Vetor de valores contendo as desepsas calculadas no pré-documento de entrada.

05. RETORNO

Tipo	Descrição
Lógico	Variável lógica de retorno para continuar a alteração da linha ou impedir o sistema de prosseguir com a operação.

06. EXEMPLO DE UTILIZAÇÃO

ADVPL

#INCLUDE "PROTHEUS.CH"


User Function MT140LOK
/*/{Protheus.doc} User Function MT140LOK
Função validar item a item no Pré-Documento de Entrada.
@type  Function
@since 30/09/2024
@version P12
@param param_name, param_type, param_descr
@return return_var, return_type, return_description
/*/
Local lRet   := ParamIXB[1]
Local aTotais:= ParamIXB[2]
//aTotais[1] Vlr unit.
//aTotais[2] Desconto
//aTotais[3] Vlr Total
Local aDesp  := ParamIXB[3] // Validações específicas a serem realizadas
//aDesp[2] // desconto
//aDesp[4] // vlr de frete
//aDesp[6] // seguro
//aDesp[8] // despesa


If aTotais[2] > 0
    lRet:=.T.
Else
    MsgInfo("Peencher valor do desconto","DESCONTO ZERADO!")
    lRet:=.F.
EndIf
Return lRet

Árvore de páginas