FiveTech Software tech support forums

Silvio: En el metodo Report de Xbrowse, oRep:bSkip lo sobreescribe con esto: if Len( ::aSelected ) > If( ::lMultiSelect, 1, 0 )       Eval( ::bBookMark, ::aSelected[ 1 ] )      ...

I have to use a particular bsetup for my printouts when I compile it does not accept the line that I put in bold how can I fix it? bSetUp := < |oRep, Brw, n | bImage := {|oRep| oRep:SayBitmap(0.5, 7, cLogo)} bStart := {|oRep| oRep:bStartPage := bImage} bInit := {|| oBrw:oDbf:GoTop()} bSkip := ...

to make a report I use easy oBrw:Report("Stampa elenco", nil, nil, bSetup) where bSetup is bSetUp   := < |oRep, Brw, n |      if n == 2         oRep:CellView()         return nil      endif      return 2      > If I wish add fonts ? If I wish add aGroupby ? ...

... Antonio, I Tried with local bSetUp := {|oRep| oRep:CellView()} @ 100,10 BUTTON oBtnPrint PROMPT "Stampa" of oDlg; SIZE 80,22 ; ACTION oBrw:Report( cTitle, .t., , bSetUp ) but I see ...

Very kind, as always. and wich is the command I not understood oBrw:Report( 'Stampa elenco ', , , ; { |oRep, oBrw | MySetUp( oRep, oBrw, lLandscape ) } ) I not want make report with ziziz zipizizi or another bullshit you did when you saw that I was doing something to print ...

and wich is the command I not understood oBrw:Report( 'Stampa elenco ', , , ; { |oRep, oBrw | MySetUp( oRep, oBrw, lLandscape ) } ) I not want make report with ziziz zipizizi or another bullshit you did when you saw that I was doing something to print I ask for ...

... Best regards, Otto Otto, I use a xbrowse and call report class from it, no prn bSetUp := {|oRep, oBrw, n, llandscape| MyRepSetup( oRep, oBrw, n,llandscape )} oBrw:Report("Elenco Categorie",.T.,,bSetUp )

... SIZE 120,26 of oDlgStampa ACTIVATE DIALOG oDlgStampa CENTER IF oDlgStampa:nresult == IDOK ?llandscape // here is .t. bSetUp := {|oRep, oBrw, n, llandscape| MyRepSetup( oRep, oBrw, n,llandscape )} oBrw:Report("Elenco Categorie",.T.,,bSetUp ) Endif function MyRepSetup( ...

PERHAPS YOU NOT READ THE QUESTION.
I make

oBrw:Report( 'Stampa elenco ', , , ;
{ |oRep, oBrw | MySetUp( oRep, oBrw, lLandscape ) } )

I know how make the orientation if i must use the prg you wrote, but I call report() from oBrw directly

José: Podría forzar a que el reporte se vaya abajo y luego poner los finales de línea ACTIVATE REPORT oRep WHILE !oQry:EOF() ON INIT CursorArrow() ;         ON STARTPAGE oRep:SayBitmap(.1,.1,"LOGO.BMP",.5,.5);         ON END (oRep:nRow ...

... Me ahorraste mi proxima consulta. Quiero imprimir el logo de la empresa en el encabezado del reporte, ya vi esto que colocaste alli: ON STARTPAGE oRep:SayBitmap(.1,.1,"LOGO.BMP",.5,.5) ahora mi duda es: ¿se comporta igual en todas las impresoras sin importar su resolucion? y en caso ...

the user can select lLandscape for the orientation of report oBrw:Report( 'Test', , , ; { |oRep, oBrw | MySetUp( oRep, oBrw, lLandscape ) } ) MySetUp( oRep, oBrw, lLandscape ) If lLandscape oRep:SetLanscape() Else oRep:SetPortrait() endif return nil How I can make to ...

... es la consulta en la función principal: cQuery := 'select * from reporte where mes_fantasma = ' + Str( nMes ) + ' order by fecha DESC' oQry := o : oRep : RowSet( cQuery ) En las funciones siguientes es donde quiero invertir el orden, de DESC a ASC oQry:Sort := "FECHA ASC"

Amigo:

cQuery := 'select * from reporte where mes_fantasma = ' + Str( nMes ) + ' order by fecha DESC'
oQry := o : oRep : RowSet( cQuery )

// Después de crear el record set (oQry)
oQry:SORT := "CAMPO1,CAMPO2,etc ASC" // o DESC
oQry:MoveFirst()

Saludos

Qué es el record set?

Esta es la consulta en la función principal:

cQuery := 'select * from reporte where mes_fantasma = ' + Str( nMes ) + ' order by fecha DESC'

oQry := o : oRep : RowSet( cQuery )


En las funciones siguientes es donde quiero invertir el orden, de DESC a ASC