Á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:

MATA103x/MATA103 - Documento de entrada

País:

Brasil

Ticket:


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



02. DESCRIPCIÓN

El Punto de entrada MT094LOK tiene como función validar ítem por ítem una factura que tenga prorrateo por Centro de costo.


03. UBICACIÓN

El Punto de entrada se activa al incluir prorrateo por Centro de costo en un Documento por medio de “Otras acciones” > “Prorrat. CC” y grabar el prorrateo.


04. PARÁMETROS

No hay

05. DEVOLUCIÓN

Tipo

Descripción

Lógico

·         Si fuera .T. valor válido

·         Si fuera .F. valor no válido

06. EJEMPLO DE UTILIZACIÓN

ADVPL
#INCLUDE "PROTHEUS.CH"


User Function MT103ROK
/*/{Protheus.doc} User Function MT103ROK
Función validar ítem por ítem en el Documento de entrada que tenga prorrateo por CC.
@type  Function
@since 30/09/2024
@version P12
@param param_name, param_type, param_descr
@return return_var, return_type, return_description
/*/

Local lRet     := .t.
Local nPPerc   := aScan(aHeader,{|x| AllTrim(x[2]) == "DE_PERC"})

For nX  := 1 To Len(aCols)

    If !aCols[nX][Len(aCols[nX])] //no borrada

        If aCols[nX][nPPerc]<>50
            MsgInfo("Linha "+AllTrim(Str(nX))+" diferente de 50")
            lRet:=.f.
            Exit
        EndIf

    EndIf

Next

Return lRet