Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

01. DATOS GENERALES

Línea de producto:

Microsiga Protheus®

Segmento:

Servicios

Módulo:

Fiscal


02. DESCRIPCIÓN

Inclusión del punto de entrada FCIPROC001 en la rutina FISA061 - FCI - Ficha de contenido de importación.

Este punto de entrada tiene por finalidad permitir que se envíen informaciones referentes al valor de la cuota importada, valor de las salidas y si el producto es nuevo o no.

Aplicación: para productos producidos con ítems importados

El punto de entrada se activa durante el cálculo de la FCI y el producto se procesa directamente en la tabla CFD.

03. Especificación

Programa

FISA061.PRW

Sintaxis

FCIPROC001 - Valor de la cuota importada, valor de las salidas y producto nuevo.

Parámetros del punto de entrada:

Nombre

Tipo

Descripción

PARAMIXB[1]

Carácter

Código del producto

PARAMIXB[2]

Fecha

Fecha inicial para procesamiento de los movimientos.

PARAMIXB[3]

Fecha

Fecha final para procesamiento de los movimientos.

Devolución:

El punto de entrada debe devolver un array de 3 posiciones:

Nombre

Tipo

Descripción

Obligatorio

aRet[1]

Número

Valor de la cuota de importación

Sí

aRet[2]

Número

Valor de salida interestatal

Sí

aRet[3]

Boleano

Producto nuevo (.T. o .F.) 




Importante

  • La devolución del punto de entrada obligatoriamente debe ser un array de 3 posiciones, en los tipos especificados anteriormente. Las dos primeras posiciones del array son obligatorias, siendo que en la ausencia de la posición 3 el sistema asumirá que la condición del producto nuevo será falsa.


04. EJEMPLO DE UTILIZACIÓN

El ejemplo siguiente es una simple implementación de ejemplo.


FSA231UND
#include "rwmake.ch"
#include "Topconn.ch"
#include "protheus.ch"

User function FCIPROC001()
	
	Local cProd := ParamixB[1]
	Local dDataDe := ParamixB[2]
	Local dDataAte := ParamixB[3]
	Local aRet := {} 

	// su código de tratamiento aquí
    // Devolución del array con 3 posiciones    
    aAdd(aRet,100) // Valor de la cuota de importación  
    aAdd(aRet,1000) // Valor de salida interestatal  
    aAdd(aRet,.T.) // Si el Producto fuera nuevo (.T.) 

Return aRet


05. OTRAS INFORMACIONES

No hay.

06. ASUNTOS RELACIONADOS