Page 1 of 1

Paso de parametros con el R&R

Posted: Thu Feb 01, 2007 11:15 pm
by tere
Hola:
Necesito ayuda para pasar parametros (encabezado de reportes)
en R&R.

ya generé la variable empresa con el riparam("nombre") dentro del reporte e inserté el campo empresa
pero no se como mandar el parámetro
tengo la variable public nombre="CASTA" en el menu.prg

mando llamar el reporte con la funcion

Mostrar2("FACTURA", cruta, "D")



FUNCTION Mostrar2(repname, xRutadbf, tipsal)

local oRRw
local xRutaryr:=".\R&R\"
local xReport:=repname+".RRW"
local xPagIni:=1
local xPagFin:=999
// local xRutadbf:=".\Datos"
local xCopias:=1
local xPrev:=tipsal
local xSalida:=" "
local lquery:=.f.
local xPrint:="REPORTES"
local xRutarun:=".\Runtime\RRWRUN /T"
Local cPath :=(CurDrive() + ":\" + GetCurDir() + "\Datos")
oRRw:= RRWNEW():NEW("",xRutaryr+xReport,xPagIni,xPagFin,xRutadbf)

oRRw:SetPrinter("REPORTES")
oRRw:SetMaster(xRutadbf)
oRRw:SetCop( xCopias )
oRRw:SetOutPut(xPrev,xSalida,xPrint)
oRRw:Print(xRutarun)
oRRw:End()

Return nil