FINA330 Compensación por cobrar P12

01. VISIÓN GENERAL

Esta transacción permite ejecutar las compensaciones de todos los anticipos ya efectuados y registrados, realizados por los Clientes (títulos tipo RA), además de las notas de crédito por “descontar” (títulos tipo NCC).

Los títulos compensados tendrán sus saldos pendientes disminuidos o incluso puesto en cero, caracterizando una baja del título compensado.

Por medio de la compensación de títulos por cobrar es posible:

• Compensar títulos de un mismo cliente/tienda con anticipos de este mismo cliente/tienda.
• Compensar títulos de un determinado cliente con anticipos de este mismo cliente, sin importar cuál es la tienda del título por compensar. Con ello, el título puede compensarse con cualquier título de anticipo del mismo cliente, pendiente en el registro de títulos, sin importar a qué tienda del cliente pertenezca este título.
• Compensar un título de determinado cliente con anticipos de diversos clientes y puede determinarse una escala de clientes o todos. De esta forma, se puede compensar el título con cualquier título de anticipo pendiente en el archivo de títulos, sin importar el cliente de dicho título.
• Compensar títulos y anticipos entre sucursales, es decir, de clientes con anticipos de este o de otros clientes presentes en las diversas sucursales de la empresa.

Tasa de la moneda

El tratamiento que el Sistema ofrece para la tasa utilizada en la baja de títulos por cobrar se detalla así:

En Brasil, se utiliza la tasa informada en el título.

En los países localizados, se considerada la tasa del día.

Impuestos

El parámetro MV_BR10925 define el momento del descuento de los valores de los impuestos (PIS, COFINS y CSLL). Puede configurarse con 1 = realiza el descuento de los impuestos durante la baja del documento o 2 = el descuento de los impuestos ocurre en la emisión del documento.

Si el parámetro MV_BR10925 fuera configurado con1 (baja), en los casos en que exista compensación con descuento de valores de estos impuestos, los títulos de impuestos se generarán vinculados al título principal y nunca al anticipo.

En el proceso de liquidación de títulos por cobrar, no existe cálculo de impuestos.

Los impuestos PIS, COFINS y CSLL existentes en los títulos generadores, solamente se transferirán a las cuotas en los casos en que la modalidad de los títulos generados por la factura, permita el cálculo de los impuestos. De esta manera, los impuestos de los títulos generadores de la factura por cobrar, tendrán sus valores sumados y ajustados proporcionalmente en cada cuota.

En el escenario donde el parámetro MV_BR10925 esté configurado con el contenido 1 (Baja) y exista una base reducida en el título referente a la factura, en el momento de la compensación, el sistema tomará en consideración la base reducida para el cálculo y generación de los impuestos del PIS, COFINS y CSLL.

02. OPERACIONES 

La parametrización para la operación de compensación está disponible por medio de la opción F12. 

Considera tienda: Indica si la tienda del cliente, cuando la pregunta «Considera cliente» sea igual a Sí, debe considerarse en la selección de los títulos que se compensarán.

Considera cliente: Indica si el cliente del título original debe considerarse en la selección de los títulos que se compensarán, o si se considerarán los clientes informados en la pregunta «Del Cliente» y «Al Cliente"

Del Cliente: Código inicial de los clientes cuyos títulos se compensarán, si la pregunta «Considera cliente» fuera igual a sí.

Al Cliente: Código final de los clientes cuyos títulos se compensarán, si la pregunta «Considera cliente» fuera igual a sí.

Comp. Transferidos: Indica si desea que los títulos transferidos para cobranza se consideran en la selección de los títulos que se facturarán.

Calc.Comis.s/NCC: Indica si desea calcular la comisión sobre títulos de crédito (NCC).

Muestra Asto Contab: Indica si el asiento contable debe mostrarse.

Cons.Descuentos/Impuestos: Indica si del saldo que se compensará deben disminuirse los descuentos y los impuestos. Si no se considerarán, el saldo que se considerará para la operación solamente será el saldo del título.

Contabiliza On Line: Informe si Contabiliza On-Line.

Considera siguientes sucursales: Informe si debe considerarse un intervalo de sucursales que se informará en los próximos parámetros. (Parámetro descontinuado, sustituido por la opción Sucursales en la pantalla de selección del título principal)

De Sucursal: Informe la sucursal inicial que se considerará en los intervalos de sucursales. (Parámetro descontinuado, sustituido por la opción Sucursales en la pantalla de selección del título principal)

A Sucursal: Informe la sucursal final que se considerará en los intervalos de sucursales. (Parámetro descontinuado, sustituido por la opción Sucursales en la pantalla de selección del título principal)

Calc.Comis.s/RA: Indica si desea calcular la comisión sobre títulos de crédito (RA).

Reutiliza tasa informada: Indica si se reutiliza la tasa informada para otras compensaciones.

Cons.Interés comisión: Indica si debe considerarse el valor de los intereses en el cálculo de la comisión.

#INCLUDE "TOTVS.ch"
#Include "PROTHEUS.ch"    
#Include "PRTOPDEF.CH"
#INCLUDE "TBICONN.CH" 

User FUNCTION COMPCR()

    Local lRetOK := .T.
    Local aArea := GetArea()
    Local nTaxaCM := 0
    Local aTxMoeda := {}
    Local cCliente := "001   "
    Local cLoja := "01"
    Local cPrefixo := "TIT"
    Local cNumDoc := '00001    '
    Local cParcela := " "
    Local cTipoDoc := "RA "
    Private nRecnoNDF
    Private nRecnoE1

    dbSelectArea("SE1")
    dbSetOrder(2) // E1_FILIAL, E1_CLIENTE, E1_LOJA, E1_PREFIXO, E1_NUM, E1_PARCELA, E1_TIPO, R_E_C_N_O_, D_E_L_E_T_

    IF dbSeek(XFILIAL("SE1") + cCliente + cLoja + cPrefixo + cNumDoc + cParcela + cTipoDoc)
        nRecnoRA := RECNO() 

        cTipoDoc := "NF"
        IF dbSeek(XFILIAL("SE1") + cCliente + cLoja + cPrefixo + cNumDoc + cParcela + cTipoDoc)
            nRecnoE1 := RECNO()
            
            PERGUNTE("AFI340",.F.)
            lContabiliza := .F.
            lAglutina := .F.
            lDigita := .F.

            SE1->(dbSetOrder(1)) //E1_FILIAL+E1_PREFIXO+E1_NUM+E1_PARCELA+E1_TIPO+E1_FORNECE+E1_LOJA
            aRecRA := { nRecnoRA }
            aRecSE1 := { nRecnoE1 }

            nSaldoComp := 2000 // Valor de la compensación en moneda fuerte

            nTaxaCM := 2 // Tasa considerada en la compensación

            aAdd(aTxMoeda, {SE1->E1_MOEDA, nTaxaCM} ) // Tasas de las monedas utilizadas

            If !MaIntBxCR(3, aRecSE1,,aRecRA,,{lContabiliza,lAglutina,lDigita,.F.,.F.,.F.},,,,,nSaldoComp,,,, nTaxaCM, aTxMoeda)
                Help("XAFCMPAD",1,"HELP","XAFCMPAD","No fue posible la compensación"+CRLF+" del título del anticipo",1,0)
                lRetOK := .F.
            Else
                Alert("Compensación realizada.")
            ENDIF
        ENDIF
   ENDIF

   RestArea(aArea)

Return lRetOK

03.  CONTABILIDAD

04.  PARÁMETROS

05. PREGUNTAS FRECUENTES

¿Cómo considerar el descuento financiero en la compensación?

Los descuentos financieros no se consideran en el estándar. Para que se consideren es necesario utilizar el punto de entrada F330DES. Más información en: : F330DESC - Descuento en la compensación cuentas por cobrar

06. OTRAS DOCUMENTACIONES

• Tratamiento de impuestos sobre Nota de Crédito del Cliente (NCC)
• MaIntBxCR - Rutina automática de compensación por cobrar
• FIN0003 - Variables de contabilidad de la compensación por cobrar (online y off-line)