...
Punto de entrada que permite modificar las bases de comisión para el vendedor, cuando los títulos no se hayan facturado.
| Nota | ||
|---|---|---|
| ||
El nuevo PE se podrá utilizar utilizarse como alternativa a los PE F440ABAS y F440CBASE, y no de manera complementaria a estos. Los PE F440ABAS e F440CBASE continuarán activos, es decir, no se descontinuaron debido a la creación del PE F440ABA2 |
...
| Tipo | Contenido |
|---|---|
| Operación | Identificador Carácter de operación:
|
| Vector | Vector que contiene con los valores de base de la comisión. |
Estructura del vector 11 posiciones:
Si el vector tuviera su origen en un título por cobrar que no fuera Liquidado, este vector tendrá 11 posiciones con las siguientes informaciones.
| Posición | Contenido |
|---|---|
| 1 | Código del vendedor |
| 2 | Base de la comisión total de la comisión, es decir, la suma de las bases aplicadas a la emisión del título y a la baja del título |
| 3 | Base de la comisión que se aplicará en el momento de emitir el título. |
| 4 | Base de la comisión que se aplicará en el momento de dar baja al título. |
| 5 | Valor de comisión calculado sobre la emisión del título |
| 6 | Valor de comisión calculado sobre la baja del título |
| 7 | % de la comisión (Si es "cero" diversos %) |
| 8 | PIS |
| 9 | COFINS |
| 10 | CSLL |
| 11 | IRRF |
Estructura del vector superior a 13 posiciones:
Si el vector tuviera su origen en un título por cobrar que fue Liquidado, este vector será superior a 13 posiciones con las siguientes informaciones.
| Posición | Contenido |
|---|---|
| 1 | Código del vendedor |
| 2 | Base de la comisión total de la comisión, es decir, la suma de las bases aplicadas a la emisión del título y a la baja del título |
| 3 | Base de la comisión que se aplicará en el momento de emitir el título. |
| 4 | Base de la comisión que se aplicará en el momento de dar baja al título. |
| 5 | Valor de comisión calculados sobre la emisión del título |
| 6 | Valor de comisión calculados sobre la baja del título |
| 7 | % de la comisión (Si es"cero" diversos % |
| ) | |
| 8 | PIS |
| 9 | COFINS |
| 10 | CSLL |
| 11 | IRRF |
| 12 | Valor original del título dado de baja (suma del valor de los títulos dados de baja por liquidación) |
| 13 |
En esta posición se informará un VECTOR con los RECNO de los títulos que se liquidaron. |
Vector que contiene los valores de base de la comisióin personalizados. Debe contener tener la misma estructura del vector de comisión original, recibido como parámetro.
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE 'Protheus.ch'
/*
*** Programa : F440ABA2
Data : 10/01/2023
Descricao : Permite modificar la base de comisión para el vendedor
*/
USER FUNCTION F440ABA2()
LOCAL nX AS NUMERIC
LOCAL cOperation AS CHARACTER
LOCAL aBases AS ARRAY
cOperation := ParamIxb[1]
aBases := ACLONE(ParamIxb[2])
IF cOperation == 'OP_NOLIQFAT' /*Sin origen en Factura/Liquidación*/
FOR nX := 1 TO LEN(aBases)
aBases[nX,4] := aBases[nX,4] - 200
NEXT nX
ELSEIF cOperation == 'OP_LIQFAT' /*Provenientes de Factura/Liquidación*/
FOR nX := 1 TO LEN(aBases)
aBases[nX,4] := aBases[nX,4] - 100
NEXT nX
ENDIF RETURN ACLONE(aBases)
/*
*** Definición de cada posición del array aBase ***
1 - Código del vendedor
2 - Base de la comisión
3 - Base en la emisión
4 - Base en la baja
5 - Valor en la emisión
6 - Valor en la baja
7 - % de la comisión (si el % es cero, contendrá diversos caracteres de porcentaje - %)
8 - PIS
9 - COFINS
10 - CSLL
11 - IRRF
12 - Valor original del título dado de baja (suma del valor de los títulos dados de baja por liquidación)
13 - VECTOR con los RECNO del título Liquidado/Facturado de los títulos que se liquidaron.
*/ |
...