FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para CA-Clipper Paso de parametros con el R&R
Posts: 2
Joined: Thu Feb 01, 2007 03:16 PM

Paso de parametros con el R&R

Posted: Thu Feb 01, 2007 11:15 PM

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

Continue the discussion