Progress - Como Imprimir un Reporte desde un boton

 
Vista:

Como Imprimir un Reporte desde un boton

Publicado por Alejandro (1 intervención) el 10/05/2006 18:07:59
Hola que tal espero y me puedan ayudar soy nuevo en usar progress porque tengo muy poco material para aprender ya que estan en Ingles pero me han servido mas o menos pero ya me atore porque no se como puedo mandar imprimir un Reporte en Report Builder desde un Boton en un windows.

Se los Agradeceria mucho si me ayudaran a sacarme de este problema Gracias.
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

RE:Como Imprimir un Reporte desde un boton

Publicado por EFM (1 intervención) el 17/05/2006 18:08:09
Te envío un ejemplo de como imprimir una tabla que contiene una serie de rutas:

DEFINE VAR nombre-impresora AS CHAR NO-UNDO.
DEFINE VAR filtro AS CHAR NO-UNDO.
DEFINE VAR Paramdat AS CHAR NO-UNDO.
DEFINE VAR ConectGes AS CHAR NO-UNDO.

Nombre-impresora = SESSION:PRINTER-NAME.

ConectGes = "Dbwges=wquerges.db -H 192.168.0.23 -N tcp -S 2502 "

Filtro = "CliRuta.Empcodig = " + STRING(Emp-activo)
+ " and CliRuta.Rutcodig >= '" + Priruta + "'"
+ " and CliRuta.Rutcodig <= '" + Ultruta + "'".

Paramdat="Fecha=" + STRING(Fechalistado, "99/99/9999")
+ "~n" + "Nempre=" + STRING(emp-activo)
+ "~n" + "Dempre=" + Empresa.EmpDescri
+ "~n" + "Nejerc=" + STRING(eje-activo).

RUN aderb\_printrb.p(
RutaPrl, /* 1 Nombre de la libreria */
"LisRutas", /* 2 RB-REPORT-NAME nombre del listado */
ConectGes, /* 3 RB-DB-CONNECTION */
"O", /* 4 RB-INCLUDE-RECORDS ?=Pregunta */
filtro, /* 5 RB-FILTER */
"", /* 6 RB-MEMO-FILE */
"", /* 7 RB-PRINT-DESTINATION D=pantalla A=Fichero ""=Impresora ?=Pregunta */
Nombre-impresora, /* 8 RB-PRINTER-NAME ?=Pregunta */
"", /* 9 RB-PRINTER-PORT */
"", /*10 RB-OUTPUT-FILE */
num-copias, /*11 RB-NUMBER-COPIES */
0, /*12 RB-BEGIN-PAGE */
0, /*13 RB-END-PAGE */
no, /*14 RB-TEST-PATTERN */
"LISTADO DE RUTAS", /*15 RB-WINDOW-TITLE */
yes, /*16 RB-DISPLAY-ERRORS */
yes, /*17 RB-DISPLAY-STATUS */
YES, /*18 RB-NO-WAIT */
Paramdat). /*19 RB-OTHER-PARAMETERS*/
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