Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


01. 

...

DATOS GENERALES

SolucaoCrossLinha

Línea Protheus

Backoffice

ModulosCrossSegmentos

 

TOTVS Backoffice (

Linha

Línea Protheus) - Compras (SIGACOM)

Story o  
Produto:
Solucoes_totvs_cross

Producto:

TOTVS Backoffice

Linha

Línea de

Produto

producto:

Linhas_totvs
Linha

Segmento:

Segmentos_totvs
Segmento

Módulo:

Modulos_cross_segmentos
Função

Función:

MATA103x/MATA103 - Documento de

Entrada

entrada

País:

Brasil

Ticket:


Requisito/

Story/Issue (informe

el requisito relacionado)

:



02. 

...

DESCRIPCIÓN

O Ponto El Punto de Entrada entrada MT094LOK tem tiene como função validar item a item de uma nota que possuir rateio función validar ítem por ítem una factura que tenga prorrateo por Centro de Custocosto.


03.

...

UBICACIÓN

O Ponto de Entrada é chamado ao incluir rateio El Punto de entrada se activa al incluir prorrateo por Centro de Custo em um Documento através de “Outras Ações” > “Rat. CC” e salvar o rateiocosto en un Documento por medio de “Otras acciones” > “Prorrat. CC” y grabar el prorrateo.


04.

...

PARÁMETROS

Não háNo hay

05.

...

DEVOLUCIÓN

DescriçãoSe Se inválido

Tipo

Descripción

Lógico

·         Si fuera .T. valor válido

·         Si fuera .F. valor

no válido

06.

...

EJEMPLO DE

...

UTILIZACIÓN

Bloco de código
languagevb
themeMidnight
firstline1
titleADVPL
#INCLUDE "PROTHEUS.CH"


User Function MT103ROK
/*/{Protheus.doc} User Function MT103ROK
FunçãoFunción validar ítem itempor aítem itemen noel Documento de Entradaentrada que possuirtenga rateioprorrateo 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])] //nãono deletadaborrada

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

    EndIf

Next

Return lRet

...