Producto | |||||||
---|---|---|---|---|---|---|---|
Línea de producto: | |||||||
Segmento: | |||||||
Módulo: | SIGAFAT - Facturación | ||||||
Función: |
| ||||||
País: | Perú (PER) | ||||||
Ticket: | 17336421 | ||||||
Requisito/Story/Issue (informe el requisito vinculado): | DMINA-19961 |
Se solicita la activación de Puntos de Entrada que permitan realizar los siguientes ajustes en el XML de Guías de Remisión Electrónicas (GRE) del País Perú:
En la rutina de XML de Guías de Remisión Electrónicas - Perú (M486RNFXML), se realizaron los siguientes ajustes:
Se activó el Punto de Entrada M486RNF:
Para permitir agregar el nodo /DespatchAdvice/cbc:Note de Observaciones (Texto).
Para permitir modificar el nodo /DespatchAdvice/cac:Shipment/cbc:TotalTransportHandlingUnitQuantity de Número de Bultos o Pallets.
El Punto de Entrada M486RNF recibe como parámetro la opción "N", para generación del Nodo de Observaciones y "P" para la generación del nodo de Número de Bultos o Pallets. Utilizando la opción "P" de la generación del nodo de Número de Bultos o Pallets, se pueden generar los nodos de Número de Contenedor y Número de Precinto. Se tiene acceso disponible a los campos de la tabla SF2 - Encabezado de Fact. de Salida por el posicionamiento previo a la tabla, y es importante realizar las bifurcaciones de manera correcta para la generación de los nodos y en caso de requerir utilizar el Motivo de Traslado se puede utilizar el campo Motivo Tras (F2_MODTRAD). |
Se activó el Punto de Entrada M486DETRNF:
Para permitir modificar los datos de Unidad de medida del bien (/DespatchAdvice/cac:DespatchLine/cbc:DeliveredQuantity@unitCode), Cantidad del bien (/DespatchAdvice/cac:DespatchLine/cbc:DeliveredQuantity), Descripción detallada del bien (/DespatchAdvice/cac:DespatchLine/cac:Item/cbc:Description) y Código del bien (/DespatchAdvice/cac:DespatchLine/cac:Item/cac:SellersItemIdentification/cbc:ID).
En el Punto de Entrada M486DETRNF se debe retornar un arreglo con 4 posiciones, se recomienda que se retornen con el valor Nil las posiciones que no se van a actualizar y se reciben como parámetros los datos Filial del Documento, Número de Documento, Serie del Documento, Especie del Documento, Código de Cliente, Loja del Cliente, Número de ítem y Código del Producto. |
|
Ejemplos de los Puntos de Entrada:
#include "protheus.ch" User Function M486DETRNF() Local cFilDoc := PARAMIXB[1] //Filial Local cNumDoc := PARAMIXB[2] //Número de Documento Local cSerDoc := PARAMIXB[3] //Serie de Documento Local cEspDoc := PARAMIXB[4] //Especie de Documento Local cCodCli := PARAMIXB[5] //Codigo de Cliente Local cCodLoj := PARAMIXB[6] //Codigo de la Tienda Local cItem := PARAMIXB[7] //Ítem Local cCodPro := PARAMIXB[8] //Código de Producto Local aDetGRE := {Nil, Nil, Nil, Nil} aDetGRE[1] := Nil //Cantidad aDetGRE[2] := "PC" //Unidad de Medida aDetGRE[3] := Nil //Descripción del Producto aDetGRE[4] := Nil //Código del Producto Return aDetGRE |
#include "protheus.ch" User Function M486RNF() Local cXMLPE := "" Local cCRLF := (chr(13)+chr(10)) //Salto de Línea Local cOpc := PARAMIXB[1] //Opción N - Notas, P - Pallets/Contenedor/Precinto If cOpc == "N" cXMLPE += ' <cbc:Note>Prueba del PE M486RNF</cbc:Note>' + cCRLF ElseIf cOpc == "P" cXMLPE += ' <cbc:TotalTransportHandlingUnitQuantity>80</cbc:TotalTransportHandlingUnitQuantity>' + cCRLF EndIf Return cXMLPE |