Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » FoxPro/Visual FoxPro » Funcionamiento de las Impresoras Fiscales

FoxPro/Visual FoxPro - Funcionamiento de las Impresoras Fiscales

Volver
Nuevo Tema
Filtrado por el usuario: Roman Suazo
<<>>
Filtrado por el usuario 'Roman Suazo' (Eliminar fitro)
 
Vista:

Funcionamiento de las Impresoras Fiscales

Publicado por many (127 intervenciones) el 05/05/2015 01:40:19
Saludo a todos lo que integran este foro.

Tengo un duda con las impresoras fiscales, de acuerdo a lo que estuve leyendo en la web creo que a esta impresora solo se le envían los datos de la factura y luego existen procedimientos para sacar los informes que exige la DGII.

A pesar que esta impresora guarda información de cada factura que imprime, yo pensaba que necesariamente el programa debía guardar en tablas información con formato que le permitiera manipularla para sacar los informes que exige la DGII. Se que para historial y uso interno se de deben guardar los datos que puedan generar información a tiempo pero quiero saber si la impresora es capaz de hacerlo.

Agradezco todas la ayuda que puedan dejar sobre este teme,
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 28
Ha disminuido su posición en 3 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Funcionamiento de las Impresoras Fiscales

Publicado por Anabella (33 intervenciones) el 07/05/2015 15:31:59
Hola!!! La impresora fiscal, al finalizar el día debe cerrar sesión haciendo un reporte Z, alli sale el resumen de lo facturado en el día, si vos queres saber lo vendido, debes hacer una tabla aparte y paralela a la información que le pasas a la registradora fiscal y controlar tus ventas.
No se que estas trabajando, ni que registradora estas usando, si queres dame mas datos, yo algo hice y te puedo ayudar.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Funcionamiento de las Impresoras Fiscales

Publicado por many (127 intervenciones) el 08/05/2015 05:20:57
Que tal Anabella y a todos,

De verdad que agradezco infinitamente tu respuesta.

Tengo un sistema de facturación en VISUAL FOXPRO 9, ahora debo cambiar la impresora Epson tm-u220 por una impresora fiscal y quiero saber lo siguiente:

¿Que debo instalar relacionado con la impresora fiscal para comunicarla con mi sistema?
¿Como hago para poder enviar los datos de la factura al controlador fiscal de impresora?

Estuve viendo en internet comando para abrir, cerrar, errores etc sobre la impresora y no parece difícil.

Dame un luz sobre esto por favor, Anabella.

De Manuel Medina J.
Un saludo con mucho cariño.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Funcionamiento de las Impresoras Fiscales

Publicado por andy (56 intervenciones) el 14/05/2015 00:23:39
Para hacer funcionar una impresora fiscal debes instalar la OCX provista GRATUITAMENTE por el fabricante de la impresora fiscal.
Deberás crear un rutina que permita enviar los datos de acuerdo a cada impresora. Si bien son muy parecidas en cuanto a su logica, cada impresora es distinta. Lo mismo para evaluar la respuesta del controlador fiscal.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Funcionamiento de las Impresoras Fiscales

Publicado por andy (56 intervenciones) el 22/09/2015 11:03:59
Si todavía necesitas ayuda puedes contactarme por Facebook
https://www.facebook.com/andres.squire
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Funcionamiento de las Impresoras Fiscales

Publicado por RUBERT (1 intervención) el 03/10/2017 12:02:29
buenas yo tengo un sistema en foxpro para dos futina funciona bien el detalle es con la rutina fiscal a veces me imprime los item completos
a veces deja uno por fuera esta es la rutina si alguien puede ayudar a mejorarla se lo agracesco
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
*** encabezado de la factura ******
PP=fopen( "lpt2",12)
comando =  "i01" + " Cliente: " + left(mdenom ,30)
lrc_comando= lrc( comando + chr(3))
tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
xxx= FWRITE(PP, tramaCompleta )
pp=FCLOSE(PP)
PP=fopen( "LPT2",12)
comando =  "i02" + "C.I./R.I.F. : " + left(mrif,18)
lrc_comando= lrc( comando + chr(3))
tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
xxx=FWRITE(PP, tramaCompleta )
pp=FCLOSE(PP)
PP=fopen( "LPT2",12)
comando =  "i03" + "Direccion: " + left(mdirec,18)
lrc_comando= lrc( comando + chr(3))
tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
xxx=FWRITE(PP, tramaCompleta )
pp=FCLOSE(PP)
******* imprime item factura ****
select 4
go botto
mrecno=recno()
go top
if mrecno>1
 =inkey(.5)
else
 =inkey(1)
endif
PP=fopen( "LPT2",12)
xtasa=mtasa
DO WHILE .NOT. EOF()
 MPRECIO=pvp
 mcant=CANTIDAD
 mdescri=DESCRIP
 if isv="N"
  mtasa=" "
 else
  mtasa=xtasa
 endif
 *************** item factura********
 ** " " EXCENTO
 ** "!" TASA A
 ** '"' TASA B

 ** "#" TASA C
 cara=CHR(34)
 comando= mtasa+right("0000000000"+alltrim(str(mprecio*100)),10) ;
+ right("00000000"+alltrim(str(mcant*1000)),8) ;
+ left(mdescri+space(40),40)
 lrc_comando= lrc( comando + chr(3))
 tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando )
 xxx= FWRITE(PP, tramaCompleta )
 pp=FCLOSE(PP)
 if mrecno>1
  =inkey(.5)
 else
  =inkey(1)
 endif
 PP=fopen( "LPT2",12)
 SKIP
ENDDO
**** IMPRIME SUB TOTAL ****
pp=FCLOSE(PP)
PP=fopen( "LPT2",12)
comando =  "3"
lrc_comando= lrc( comando + chr(3))
tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
xxx=FWRITE(PP, tramaCompleta )
pp=FCLOSE(PP)
****DESCUENTO
*PP=fopen( "LPT2",12)
*comando="p"+"-"+"0300"
*lrc_comando= lrc( comando + chr(3))
*tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
*xxx= FWRITE(PP, tramaCompleta )
*pp=FCLOSE(PP)
*=inkey(1)
***** IMPRIME TIPO DE PAGO ******
PP=fopen( "LPT2",12)
comando="1"+right("0000"+alltrim(str(fp)),2)
lrc_comando= lrc( comando + chr(3))
tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
xxx= FWRITE(PP, tramaCompleta )
pp=FCLOSE(PP)
PP=fopen( "LPT2",12)
**** CIERRA LA FACTURA  ******
comando =  "101"
lrc_comando= lrc( comando + chr(3))
tramaCompleta= chr(2) + comando + chr(3) + chr(lrc_comando)
xxx=FWRITE(PP, tramaCompleta )
pp=FCLOSE(PP)
*////////////////////// FIN
 
 
FUNCTION Xd0bit
PARAMETER Bitno, A
PRIVATE Remainder, I, Highord
Highord = INT(IIF(A>1,LOG(A)*1.442695041,0))
IF Bitno>Highord
RETURN .F.
ENDIF
FOR I = 0 TO Highord
IF I=Bitno
RETURN IIF(IIF(A=1,1,MOD(A,2))=1,.T.,.F.)
ENDIF
IF A=0
RETURN .F.
ENDIF
A = INT(A/2)
NEXT
return a
 
 
FUNCTION BITXOR
PARAMETER A, B
IF INT(A)#A .OR. INT(B)#B

?? CHR(7)
WAIT WINDOW "XOR error: arguments must be integers!"
RETURN -1
ENDIF
PRIVATE Retval, Highord, I
Retval = 0
Highord = ;
MAX(INT(IIF(A>1,LOG(A)*1.442695041,0)),INT(IIF(B>1,LOG(B)*1.442695041,0)))
FOR I = 0 TO Highord
Retval = Retval+IIF(Xd0bit(I,A)#Xd0bit(I,B),2**I,0)

NEXT
RETURN Retval
 
 
 
*/*/*/*/*/*/*/* FUNCIONES LISTA PARA USAR
 
FUNCTION LRC
parameter cadena
a=left( cadena,1)
a_asc= asc(a)
for t= 2 to len(cadena)
	b= substr( cadena,t,1)
	b_asc= asc(b)
	acumulado= bitxor( a_asc, b_asc )
	a_asc= acumulado
endfor
return acumulado
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar