Tempo aproximado para leitura: 00:05:00 min
Ocurrencia
En la rutina de Documentos Electrónicos (MATA486), se tiene habilitado el Punto de Entrada M486PDFGEN, que permite la impresión gráfica personalizada de los Documentos Eelctrónicos en formato PDF, pero este no es considerado cuando se utiliza la opción "Otras acciones >> Recupera XML/PDF".
Ambiente
Cross Segmentos - TOTVS Backoffice (Linea Protheus) - Facturacion (SIGAFAT) - Todas las versiones
Causa
El Punto de Entrada M486PDFGEN, está habilitado desde la opción Otras acciones | Imprimir PDF, y para la acción Recuperar PDF y XML es necesario tener actualizada la rutina de Documentos Electrónicos (MATA486) con una fecha mayor o igual a 05/07/2024.
Solución
Para solucionar este incidente, es necesario tener actualizada la rutina de Documentos Electrónicos (MATA486) con una fecha mayor o igual a 05/07/2024. Ver más en https://tdn.totvs.com/pages/viewpage.action?pageId=856446884
Ejemplo del Punto de Entrada:
M486PDFGEN
User Function M486PDFGEN() Local cSerieR := PARAMIXB[1] // Sucursal que emitió el documento. Local cDocIniR := PARAMIXB[2] // Número de Documento Local cDocFinR := PARAMIXB[3] // Número de Documento Local cPerg := "M486PDF" Private cSerie := "" Private cDocIni := "" Private cDocFin := "" Private cFormato := "" Private cPath := &(SuperGetmv( "MV_CFDDOCS" , .F. , "'cfd\recibos\'" )) + "\Autorizados\" Private oXML := Nil Private nTotPag := 0 Private oFont1 := TFont():New( "ARIAL", , 7, .F., .F.) Private oFont2 := TFont():New( "ARIAL", , 8, .F., .F.) Private oFont3 := TFont():New( "ARIAL", , 10, .T., .T.) Private oFont4 := TFont():New( "ARIAL", , 8, .F., .T.) //Negrita - 8 Private nLinea := 0 Private cPicture := "999,999,999,999.99" cPath := Replace( cPath, "\\", "\" ) If (!Empty(cSerieR) .Or. !Empty(cDocIniR) .Or. !Empty(cDocFinR)) Pergunte(cPerg,.T.) EndIf cSerie := IIf(!Empty(cSerieR),cSerieR,MV_PAR01) cDocIni := IIf(!Empty(cDocIniR),cDocIniR,MV_PAR02) cDocFin := IIf(!Empty(cDocFinR),cDocFinR,MV_PAR03) cFormato:= IIf(!Empty(cSerieR) .Or. !Empty(cDocIniR) .Or. !Empty(cDocFinR),1,MV_PAR04) Processa({|| PRINTPE(cEspecie)},"Espere..", "Imprimiendo documento autorizado desde PE")Return Nil
0 Comentarios