Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas


01. DATOS GENERALES


Producto:

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Backoffice

Módulo:

 

TOTVS Backoffice (Línea Protheus) - Compras (SIGACOM)

Función:

MATA120

País:

Brasil

Ticket:


Requisito/Story/Issue (informe el requisito relacionado) :



02. DESCRIPCIÓN

Función responsable por imponer una condición a cada ítem del GetDados del Pedido de compras / Autorización de entrega.


03. UBICACIÓN

Function A120LinOk() responsable por la validación de cada línea de la GetDados del Pedido de compras / Autorización de entrega.


04. PARÁMETROS

No hay

05. DEVOLUCIÓN

Tipo

Descripción

Lógico

  • Si .T. línea validada, sigue el proceso
  • Si .F. interrumpe el proceso

06. EJEMPLO DE UTILIZACIÓN

ADVPL
#INCLUDE "TOTVS.ch"
 
/*/{Protheus.doc} User Function MT120LOK    
   Función responsable por imponer una condición a cada ítem del GetDados del Pedido de compras / Autorización de entrega.    
    @type Function
    @since 01/10/2025
    @author user
/*/
 
User Function  MT120LOK()
    Local nConta    := aScan(aHeader, {|x| AllTrim(x[2]) == "C7_CONTA"})
    Local cConta    := ""
    Local lValido   := .T.
     
 
    If nConta > 0
        cConta := aCols[n][nConta]
    EndIf
 
    If AllTrim(cConta) == "CONTA01"
        lValido := .F.
    EndIf
 
Return(lValido)