01. DATOS GENERALES

Producto:

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Servicios

Módulo:

Contabilidad de gestión - SIGACTB

Función:

Grupo de prorrateo - CTBA276

País:

Brasil

Ticket:

Interno

Requisito/Story/Issue :

DSERCTR1-29624


02. SITUACIÓN/REQUISITO

Manejar la validación del porcentaje en el registro del grupo de prorrateo de acuerdo con los parámetros

03. SOLUCIÓN

Se creó el punto de entrada CTB276CW1, que permite validar el porcentaje de prorrateo si el total fuera diferente del 100%, para definir si el grupo de prorrateo se grabará bloqueado o liberado, modificando la validación estándar, aunque el porcentaje sea diferente del 100%.

Observe que para grabar el grupo liberado, debe devolver .T.


IMPORTANTE

La utilización del punto de entrada es de total autoría de quien lo utiliza y los efectos resultantes de este son de responsabilidad del cliente.

04. OTRAS INFORMACIONES


Devolución 

Nombre

Tipo

Descripción

Obligatorio

 lRet

Lógico

Si fiera .T., no bloquea el grupo de prorrateo, permitiendo digitar porcentajes mayores o iguales(>=) a 100 en cada línea, y no valida el total del prorrateo para bloquear si fuera diferente de 100 como en el estándar.

Si fuera .F. Mantiene el estándar.


Parámetros

Nombre

Tipo

Descripción

Obligatorio

 cTpVld

Carácter

Tipo de validación (L = Línea, T = Total)

cCw1_Tipo

Carácter

Tipo del grupo de prorrateo (1 = Origen, 2 = Destino)

cCw1_Entidade

Carácter

Ente contable (1 = Cuenta contable, 2 = Centro de costo, 3 = Ítem contable, 4 = Clase valor, 5 = Combinado)

nTotRat

Número

Porcentaje total del prorrateo

nLinRat

Número

Porcentaje de la Línea digitada (si cTpVld = T, este parámetro será NIL)

NO



Ejemplo de manejo del PE
// Graba el grupo de prorrateo liberado, si el tipo fuera Origen y porcentaje total >= 100
#Include "Protheus.ch"

User Function CTB276CW1()

    Local aArea := GetArea()
    //Local cTpVld := PARAMIXB[1]
    Local cCw1_Tipo := PARAMIXB[2]
    //Local cCw1_Entidade := PARAMIXB[3]
    Local nTotRat := PARAMIXB[4]
    //Local nLinRat := PARAMIXB[5]
    Local lRet := (cCw1_Tipo == "1" .AND. nTotRat >= 100)

    RestArea(aArea)

Return lRet



05. ASUNTOS RELACIONADOS

  • No se aplica.