PE MT120PCOL - Valida item a item no Pedido de Compras

01. DADOS GERAIS

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

02. DESCRIÇÃO

O ponto de entrada tem como função validar a inclusão do pedido de compra (MATA120) antes da validação do módulo SIGAPCO (validação de bloqueio).

03. LOCALIZAÇÃO

MATA120 - “Pedido de Compras.” Após salvar a inclusão do Pedido.

04. PARAMETROS

Nome	Tipo	Descrição
PARAMIXB[1]	Numérico	Chamada em Execução (1 = A120LINOK, 2 = A120TUDOK)

05. RETORNO

Nome

Tipo

Descrição

lRet

Logico

.T. = Linha validada

.F. = Linha invalidada

06. EXEMPLO DE UTILIZAÇÃO

ADVPL

#INCLUDE "PROTHEUS.CH"
/*/{Protheus.doc} MT120PCOL
Função validar item a item do Pedido de Compras.
@type     function
@author      
@since       24/09/2024
/*/
User Function MT120PCOL()
     
    Local lRet := .T.
    Local nOper := PARAMIXB[1]
     
    If nOper == 1 //-- 1 = Chamada via A120LINOK, 2 = Chamada via A120TUDOK
        //-- Validações de usuário
        lRet := FWAlertYesNo("Deseja prosseguir com a inclusão desse PC? Sim / Não", "ATENÇÃO!")
    EndIf
 
Return lRet

Árvore de páginas