01. DATOS GENERALES

Producto:

Línea de producto:

Segmento:

Módulo:

Función:
RutinaNombre Técnico
M486NFXML.PRWGeneración de XML de factura electrónica
País:Perú
Ticket:24902150
Requisito/Story/Issue (informe el requisito vinculado):DMICNS-24862


02. DESCRIPCIÓN

Se requiere que, durante la generación del XML de la factura de venta, el sistema permita personalizar el nodo cac:PaymentTerms, con el fin de que se muestre la información requerida en la forma de pago.

03. INFORMACIÓN ADICIONAL

En la rutina generación de XML de factura electrónica (M486NFXML), se activa los puntos de entrada M486PEFORP para las facturas de venta.

Cabe mencionar que al momento de la ejecución del punto de entrada, se puede acceder a las tablas de Clientes (SA1) y Documentos de Salida(SF2), por lo que se podrán utilizar campos que ya existen de estas tablas o campos nuevos que sean agregados y definir la regla para el armado del nodo

Descripción

Punto de entrada para Permite personalizar la sección cac:PaymentTerms (Formas de Pago) en el XML de factura electrónica de Perú

Rutina:

M486NFXML.PRW

Función

M486PEFORP

Parámetros
ParamIXB[1]Carácter - Moneda del documento
ParamIXB[2]Carácter - Tipo de Pago  (1-Contado,2-Crédito) 
ParamIXB[3] Númerico - Acumulado de saldo de pagos 
ParamIXB[4] Array - Arreglo con identificador, valor y fecha de vencimiento de cada cuota.  
ParamIXB[5] Númerico - Total de Detracciones del documento

ParamIXB[6]

Númerico - Total de Impuestos del documento

Retorno:

Variable del tipo carácter que contiene la estructura del XML correspondiente a los nodos cac:PaymentTerms 
#include 'protheus.ch'
  
User Function M486PEFORP()
	Local cMoeda    := PARAMIXB[1] //Carácter Moneda del documento
	Local cTipoPag  := PARAMIXB[2] //Carácter Tipo de Pago (1-Contado,2-Crédito)
    Local nTotal    := ParamIXB[3] //Numerico Acumulado de saldo de pagos
    Local aFVence   := ParamIXB[4] //Array Arreglo con identificador, valor y fecha de vencimiento de cada cuota.
    Local nDetra    := ParamIXB[5] //Numerico Total de Detracciones del documento
	Local nImp      := ParamIXB[6] //Numerico Total de Impuestos del documento
	Local cXMLRet := ""
    Local nRet:= 0

    nRet:= nTotal *0.03

    cXMLRet := M486FOPAGO(cMoeda,cTipoPag,nTotal-nRet,aFVence,nDetra,nImp)

Return cXMLRet  




04. ASUNTOS RELACIONADOS