Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

#Include 'protheus.ch'
#Include 'parmtype.ch'
 
/*/{Protheus.doc} M486VLDCMP
Punto de Entrada utilizado para definir que en la rutina MATA410
se deshabilitarán las validaciones de Facturación Electrónica.
 
@type User function
@author TOTVS ERP
@return cVldEnRut, String, Nombre de la rutina de Pedidos de Venta
/*/
User function M486VLDCMP()
    Local cVldEnRut := ""
     
    cVldEnRut := "MATA410"
     
Return cVldEnRut

c) Caracteres especiales documentos electrónicos

  • Se activa el Punto de Entrada M486FECVEN, el cual permite la generación del nodo cbc:DueDate para informar la Fecha de Vencimiento (nodo que sólo aplica para Factura de Venta). Ejemplo del Punto de Entrada:

Se debe retornar valor de tipo carácter con el nodo de acuerdo a lo definido por la SUNAT.

Nota: Las actualizaciones presentadas a continuación son compatibles con versiones mayor o igual a 12.1.17

1. Se recomienda realizar un respaldo del repositorio de objetos (RPO) antes de aplicar el paquete de actualización (patch).

2. Aplicar el paquete de actualización (patch), el cual contiene las siguientes rutinas:

Rutina

Nombre Técnico

Fecha

M486CBXMLXML para Comunicado de Baja.08/07/2020
M486NCCXMLXML para Nota de Crédito.17/07/2020
M486NDCXMLXML para Nota de Débito.17/07/2020
M486NFXMLXML para Factura/Boleta de Venta.17/07/2020
M486RNFXMLXML para Guía de Remisión.08/07/2020
M486XFUNFunciones genéricas para Facturación Electrónica.22/07/2020


M486FECVEN

1
2
3
4
5
6
7
8
9

#include 'protheus.ch'
 
User Function M486FECVEN()
      Local cXMLVen := ""
      Local cFecVen := "2020-07-31" + Alltrim(SF2->F2_SERIE) + "-" + Alltrim(SF2->F2_DOC)
      Local cCRLF  := (chr(13)+chr(10))
 
      cXMLVen += ' <cbc:DueDate>' + cFecVen + '</cbc:DueDate>' + cCRLF
Return cXMLVen

Image Added

  • Se activa la generación del nodo cbc:ElectronicMail para informar el email al cual se hará el envío de documentos electrónicos una vez realizada la transmisión con el OSE denominado RSM, el dato informado corresponde al campos Email (A1_EMAIL) configurado en el Cliente.

Image Added

Se activa el Punto de Entrada M486PEREF para definir la regla de negocio que aplicará para la generación del nodo cac:BillingReference en las Notas de Crédito de Cliente cuando el documentos origen no existe en Protheus:

NOTA:  Se debe retornar un arreglo con la Serie, Folio, Tipo de Documento (Catálogo N.° 01 de la SUNAT) y Fecha de Emisión del documento que será relacionado a la nota de Crédito.
M486PEREF

1
2
3
4
5
6
7
8
9
10
11
12
13
14

#include 'protheus.ch'
 
User Function M486PEREF()
    Local cEs := PARAMIXB[1] //Especie
    Local cDc  := PARAMIXB[2] //Documento
    Local cSe  := PARAMIXB[3] //Serie
    Local cCl  := PARAMIXB[4] //Cliente
    Local cLo  := PARAMIXB[5] //Loja
    Local cSero := "F009"
    Local cDocO := RTRIM(cNFOri)
    Local cTpDocu  := "01"
    Local cDtEmisi := "2020-07-31"
     
Return {cSero,cDocO,cTpDocu,cDtEmisi}

Image Added

Procedimiento de Utilización

1. En el módulo Facturación (SIGAFAT) ir al menú Actualizaciones | Facturación | Documentos Electrónicos (MATA486)

2. Ejecutar la acción Transmitir.

3. Informar en los parámetros las Serie y Folio de la Factura de Venta generada previamente, presionar Ok.

4. Validar que la transmisión haya sido exitosa.

5. Desde Otras acciones ejecutar la acción Imprimir PDF,y validar que en la representación gráfica del documentos en la razón social del cliente se visualicen correctamente los caracteres especiales.

2.4 Documentos electrónicos UBL 2.1 con TCI

...

3.2 Descripción del producto en el XML

Se activa el punto de Entrada MT486AGDES  en la rutina Funciones genéricas de documentos electrónicos (M486XFUN), para definir la cadena de caracteres que será mostrada en el nodo cbc:Description del XML (Ubicación: //Invoice/cac:InvoiceLine/cac:Item/cbc:Description).


El Punto de Entrada MT486AGDES recibe como parámetro de entrada el código del producto informado en el ítem del documentos (D1_COD/D2_COD).

Ejemplo del nodo cbc:Description (Tamaño 250 caracteres):

Image Modified


En los anexos 1,2,3 y 4 10. Normas legales - Factura Electrónica se define en la sección Detalle por cada ítem la regla para la Descripción detallada del servicio prestado, bien vendido o cedido en uso, indicando las características.

Nota: Las actualizaciones presentadas a continuación son compatibles con versiones mayor o igual a 12.1.17

...

2. Aplicar el paquete de actualización (patch), el cual contiene las siguientes rutinas:

Rutina(s)Nombre TécnicoFecha
M486XFUNFunciones genéricas de documentos electrónicos.17/02/2020
M486RNFXMLGeneración de XML para trasmisión electrónica.19/02/2020


Procedimiento de Utilización 

  • Desde el módulo Facturación (SIGAFAT) desde el menú Actualizaciones | Facturación | Facturaciones, registrar una Factura de Venta 
  • Activar la funcionalidad de facturación electrónica.
  • Compilar en el repositorio el punto de entrada MT486AGDES.


Ejemplo del punto de Entrada MT486AGDES:

#include "Protheus.ch"

User Function MT486AgDes()

local cCodPro := PARAMIXB[1]

local cDesProd := ""

dbSelectArea("SB1")

SB1->(dbSetOrder(1))

If SB1->(dbSeek(xFilial("SB1") + cCodPro))

cDesProd := alltrim(SB1->B1_DESC) + " -MODIF PE MT486AGDES"

EndIf

Return cDesProd


  1. Ingresar al módulo de SIGAFAT "Actualizaciones | Facturacion | Documentos Electronicos" (MATA486).
  2. Seleccionar el tipo de Documentos (Factura) y la Serie utilizada en la Factura.
  3. Dar clic en el botón Transmitir y colocar el rango de número del Documento de la Factura transmitir. 
  4. Visualizar el XML y validar que la Descripción detallada del servicio prestado, bien vendido o cedido en uso, indicando las características sea correcta de acuerdo a lo definido en el PE (nodo cbc:Description).

...