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

28/11/2018

Version

1.6 - 1.78

Add: Se agregó una mejora en la reimpresión de documentos, con las nuevas versiones de firmware

Date

25/10/2018

Version

1.5 - 1.77

- Soporta Clarion 11
- Se agregó para setear el BaudRate en el método SetPort(Port,BaudRate)
- Se corrigió un bug en la generación de los CTD, cortaba el tamaño del contenido.
- Se mejoró la performance del Template
- Se generó un nuevo ejemplo con más funciones para Clarion 10 y Clarion 11
- Se generó un ejemplo nuevo para Clarion 6, con más funciones, pero se completará en la próxima actualización

Date

09/08/2018

Version

1.4 - 1.76

Se corrigieron los siguientes métodos:
-GetEstablecimiento(EPEstaG)
-SetEstablecimiento(EPEstaG)

Date

02/08/2018

Version

1.3 y 1.75

Se agregaron los siguientes métodos:
-ObtenerID()
-InformacionEquipo()
-InformacionCertificados()
-ObtenerEstado()
-GetEstablecimiento(EPEstaG)
-SetEstablecimiento(EPEstaG)
-EmitirDuplicado(EPDupDocG)
-Se agrego dentro del método Informacion la propiedad InformacionJornadaEnCurso
-Se corrigió un desplazamiento de datos en InformacionEnCurso

Date

13/06/2018

Version

1.2 y 1.74

Se agregaron los siguientes métodos:
-SetEncabezado(EPEncabezadoG)
-GetEncabezado()
-GetFiscalizacion()
-GetSerializacion()
-AbrirCajon()
-AuditoriaFecha(EPAFechaG)
-AuditoriaZeta(EPAZetaG)

Date

26/04/2018

Version

1.1

-Para la versión de Spooler se deberá cambiar en la tabla Request el campo template por CSTRING 100

Date

26/04/2018

Version

1.1

-Se cambió la instalación en AccesoryDeveloperteam

Date

26/04/2018

Version

1.1

Se agregaron los siguientes métodos:
DescargarReportezeta PROCEDURE(*GROUP pReporteZeta),STRING
DescargarReporteFecha PROCEDURE(*GROUP pReporteFecha),STRING
InformacionMemoria PROCEDURE(),STRING

Locate (Contains) Version: