Productos

Error in site JavaScript

Productos

General
FAQ &Tips
Historial

Template Controlador Fiscal 2G Epson

Descripcion

Template para Clarion, para conectar de forma transparente con la impresora Fiscal 2G Epson TM-T900FA.

El template viene con dos versiones incluidas:

- Para Clarion 9.1 al 11 Directo con el Template; (Requiere:StringTheory)
- Para Clarion 5 al 11 trabaja con un Spooler y Template
- Con Clarion para DOS y/o culquier otro lenguaje con Spooler directamente.

Viene con ejemplos muy prácticos y sencillos para la puesta en marcha, en ambas versiones.

El precio del producto incluye 1 año de soporte y acutalizaciones.

Last Update

Price

Moneda

Tips & FAQ

Imprimir Generico No Fiscal Multilineas

! ......./- Documentos NFH Genericos / Uso Interno [Mult. lineas] -/

EPAbrirG.TipoDocumento = 0
!===========================================
! Abrir DNFGUI
EPAbrirG:Ext0a1 = 0 ! Rollo
EPAbrirG:ImprimeDocumentoGenerico = 1 ! 0 = Generico / 1 = Uso Interno
EPAbrirG:ImprimeEncabezados = 0 ! 0 = Imprime / 1 = No Imprime
SendRequest(AbrirDocumento,EPAbrirG)
DebugGetAnswer()
!===========================================
! Carga Multiples lineas
CLEAR(EPDNFGVariasLineasG)
EPDNFGVariasLineasG.LineaTexto[01] = 'Línea de texto 01'
EPDNFGVariasLineasG.LineaTexto[02] = 'Línea de texto 02'
EPDNFGVariasLineasG.LineaTexto[08] = 'Línea de texto 08'
EPDNFGVariasLineasG.LineaTexto[17] = 'Línea de texto 17'
EPDNFGVariasLineasG.LineaTexto[23] = 'Línea de texto 23'
SendRequest(ImprimirVariasLineas,EPDNFGVariasLineasG)
DebugGetAnswer()
!===========================================
! Informar Cerrar y cortar papel
EPDNFHCerrarG.CortarPapel = 1

SendRequest(CerrarDocumento,EPDNFGVariasLineasG)
DebugGetAnswer()

Ejemplo consulta estados Impresora por Spooler

SendRequest(ErrorMessage)
LOC:ErrorMessage = DebugGetAnswer()

SendRequest(StatusFiscalMessage)
LOC:StatusFiscalMessage = DebugGetAnswer()

SendRequest(PrinterFiscalMessage)
LOC:PrinterFiscalMessage = DebugGetAnswer()

Ejemplo Solicitar Infomracion Usando Clase y Spooler

Usando Clase

Respuesta=FiscalE.Informacion(83,InformacionContadores)

Usando Spooler

SendRequest(Informacion,'83,InformacionContadores')
Respuesta=DebugGetAnswer()

Impresora Nueva

Si tiene una impresora recién comprada, deberá cargarles los datos de encabezado y otros, para poder hacer que funcione en modo testing.

Ingreso en Modo Demostración

Para una mejor distribución del producto, Ud. deberá dentro del archivo AJEFiscal.INI tener la siguiente información:
[EPSON]
USER=Nombre
SERIAL=SerialAsignado

Imprimir Duplicado

!=== Ésta función sólo se puede ejecutar en modo Fiscal===

CLEAR(EPDupDocG)
EPDupDocG.TipoDocumento = L:TipoDeDocumento
EPDupDocG.NumeroDocumento = L:NroDeDocumento
SendRequest(EmitirDuplicado,EPDupDocG)

ShowGetAnswer()

Ejemplo Imprimir Nota de Debito

! ......./- Nota de Debito-/........

EPAbrirG.TipoDocumento=116
EPAbrirG.FCNDD = 1

FiscalE.AbrirDocumento(EPAbrirG) ! Clase

SendRequest(AbrirDocumento,EPAbrirG) !Spooler

Ejemplo Descargar CDT por Spooler

! ......./- Reporte por Zetas F.8010 -/

Spooler
!===========================================
CLEAR(EPDZetaG)
EPDZetaG.Ext1a2 = '0000' ! Descarga cinta testigo digital. (CTD)
EPDZetaG.ZInicial = L:ZDsd
EPDZetaG.ZFinal = L:ZHst
SendRequest(DescargarReportezeta,EPDZetaG)

ShowGetAnswer()

! ......./- Reporte por Fechas F.8010 -/

Spooler
Formato Fecha DDMMAA

CLEAR(EPAFechaG)
EPAFechaG.Ext1a2 = '0000' ! Descarga cinta testigo digital. (CTD)
EPAFechaG.FechaInicial = L:ZDsd
EPAFechaG.FechaFinal = L:ZHst
SendRequest(DescargarReporteFecha,EPAFechaG)

ShowGetAnswer()

Ejemplo consultar estados Impresora por Clase

IF FiscalE.ErrorCode <> 0
MESSAGE(CLIP(L:Comando)&'Estado: '&CLIP(FiscalE.ErrorMessage))
END
IF FiscalE.StatusFiscalCode <> 0
MESSAGE(Clip(L:Comando)&'Estado Fiscal: '&CLIP(FiscalE.StatusFiscalMessage))
END
IF FiscalE.PrinterFiscalCode <> 0
MESSAGE(Clip(L:Comando)&'Estado Impresora: '&CLIP(FiscalE.PrinterFiscalMessage))
END

Ejemplo Descuentos através del Spooler

CLEAR(EPItemDescuentoG)
EPItemDescuentoG.Ext0a1 = 0
EPItemDescuentoG.Descripcion ='Prueba'
EPItemDescuentoG.MontoDescuentoAjuste = 100
EPItemDescuentoG.CodigoInterno = 'CodInterno'

SendRequest(ImprimirDescuento,EPItemDescuentoG)
DebugGetAnswer()

Historial de Versiones

Locate (Contains) Version:

Date

Version

Date

6/10/2019

Version

1.67

Estructura Grupos TributosG y CompradoresG

TributosG GROUP,TYPE
CodigoFactura STRING(255)
Id STRING(255)
Descripcion STRING(255)
BaseImponible STRING(255)
Alicutoa STRING(255)
Importe STRING(255)
END

CompradoresG GROUP,TYPE
CodigoFactura STRING(255)
DocumentoTipo STRING(255)
DocumentoNumero STRING(255)
Porcentaje STRING(255)
END

Date

6/10/2019

Version

1.67

-Se agrega los métodos FETributos y FECompradores;
-Se agregaron dos tablas Tributos y Compradores;
-Se agregaron dos grupos TributosG y CompradoresG como type y TRIG y COMPG

Date

1/10/2019

Version

1.66

Se agregaron nuevos campos en la tabla de Facturas, Iva 0,Iva25,Iva5,Iva27,Neto0,Neto25,Neto27

Date

1/10/2019

Version

1.66

ConsultarComprobanteG GROUP,TYPE
PuntoVenta STRING(255)
IDComp STRING(255)
Numero STRING(255)
END

ImprimirG GROUP,TYPE
CodigoFactura STRING(255)
Email STRING(255)
Print STRING(1)
Original STRING(1)
END
OpcionalG GROUP,TYPE
CodigoFactura STRING(255)
Id STRING(255)
Valor STRING(255)
END
ComprobantesAsociadosG GROUP,TYPE
CodigoFactura STRING(255)
Tipo STRING(255)
PtoVta STRING(255)
Nro STRING(255)
END

Date

16/08/2019

Version

1.65

Se agregaron los siguientes métodos:
- FEOpcional;
- FEComprobanteAsociado;
- Reporte StimulSoft con diseñador propio

Se modificó la tabla Factura, por lo que se deberá agregar los campos que están en el diccionario.

Locate (Contains) Version:

DeveloperTeam Software Solutions