Tempo aproximado para leitura: 00:05:00 min
Duda
¿Para que sirve el punto de entrada M486PENC?
Ambiente
Cross Segmento - TOTVS Backoffice (Linea Protheus) MI - Facturación (SIGAFAT) - Todas las versiones
Solución
Este Punto de Entrada permite la generación personalizada de XML de Nota de Crédito.
Ejemplo:
#Include 'Protheus.ch'
User Function M486PENC()
Local cXML := ""
Local cCRLF := (chr(13)+chr(10) )
Local cFilDoc := PARAMIXB[1] // Sucursal que emitió el documento.
Local cNumDoc := PARAMIXB[4] // Número de Documento
Local cCodCli := PARAMIXB[3] // Código de Cliente
Local cCodLoj := PARAMIXB[4] // código de tienda
Local cSerieDoc := PARAMIXB[2] // Serie
Local cEspDoc := PARAMIXB[5] // Especie
cXML := '<?xml version="1.0" encoding="UTF-8"?>' + cCRLF
cXML += '<CreditNote>' + cCRLF
// Código necesario para creación del XML
cXML += '</CreditNote>' + cCRLF
Return cXML
0 Comentarios