FoxPro/Visual FoxPro - AYUDA CON REPORTE

   
Vista:

AYUDA CON REPORTE

Publicado por IDELSY (25 intervenciones) el 19/09/2014 06:08:50
Saludo a todos

Quiero que vean este reporte hecho a codigo ya que debe detenerse cuando termina de imprimir pero hace todo lo contrario, cuando termina de imprimir sigue saliendo papel hasta completar el tamaño de una hoja ocho y medio por once.

Que puede estar pasando con este:

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
SELECT FACTEM
go top
 
set printer on
set device to printer
set console off
 
?
? "          COLMADO VILLA FLORE"
?
?? "Gral. Ant. Duverge Esq. Orlando Martinez"
?
?? "      San Juan de la Maguana, R.D."
?
?? "          TEL.: 809-527-6171"
?
?? "            "
?
??"Fecha: "
?? transform(fecha,"  /  /    ")
??"     Hora: "
?? time()
 
?
?? factem.tipo
 
?
??"Factura: "
?? transform(numfac,"9999999999")
 
?
?? "Cliente: "
?? transform(factem.cliente,"!!!!!!!!!!!!!!!!!!!!!!!!!")
 
?
?? factem.direccion
 
*? chr(14)
?
??"zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz"
?
??"CANT.  DESCRIPCION  PRECIO  VALOR"
?
??"zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz"
 
?
 
m.total = 0
SELECT DETTEM
go top
 
scan
*   ?? " "
   ?? transform(cantidad,"999.99")
 
   ?? " "
   ?? transform(ep,"!!!!!")
 
   ?? " "
   ?? transform(descrip,"!!!!!!!!!!!!!!!!!!!!")
   ?? " "
 
   ?
 
   ?? " Precio:"
   ?? TRANSFORM(venta,"99,999.99")
 
   ?? "   Valor: "
   ?? TRANSFORM(valor,"99,999.99")
 
   ?? "   "
   ?? TRANSFORM(ge,"!")
 
   *??? " "
   ?
 
    m.total = m.total + valor
endscan
 
*WAIT
*RETURN
 
??"zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz"
?
 
?? "         "
??"TOTAL => "
??transform(m.total,"999,999.99")
 
?
??"Gracias por preferirnos"
 
?
?
?
?
 
set printer to
 
set printer off
 
set device to screen
set console on

Gracias a todos por su ayuda.
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

AYUDA CON REPORTE

Publicado por luis horacio horacio.isaza@gmail.com (9 intervenciones) el 19/09/2014 15:55:17
Buenos días, en que tipo de impresora estas mandando la impresion si es en una tmu o impresoras pos debes de configurarla para que termine cuando imprima.

saludos
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

AYUDA CON REPORTE

Publicado por Ernesto Hernandez (4632 intervenciones) el 19/09/2014 16:25:14
Si es una impresora POS necesitas conocer las secuencias de escape de esta para poder mandar ciertas funciones a tu impresora los mas comunes son los que te envio

De hecho necesitas mandar un chr(12) para terminar tu impresion aqui

?
??"Gracias por preferirnos"
?
?
?
? CHR(12)



Te envio esta tabla espero te sirva . si quieres funciones mas especificas de tu impresora busca en la documentacion de la misma


SUERTE!!

Code Character
Chr(9) Tab
Chr(10) Line-feed
Chr(11) Soft return (Shift+Enter)
Chr(12) Page break
Chr(13) Carriage return
Chr(13) + Chr(10) Carriage return/line-feed combination
Chr(14) Column break
Chr(34) Double straight quotation marks ('')
Chr(39) Single straight quote mark/apostrophe (')
Chr(145) Opening single smart quotation mark (')
Chr(146) Closing single smart quotation mark/ apostrophe (')
Chr(147) Opening double smart quotation mark (")
Chr(148) Closing double smart quotation mark (")
Chr(149) Bullet
Chr(150) En dash
Chr(151) Em dash
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