FiveTech Software tech support forums

... Endif RETURN NIL ELSE oVMenu5:lOpened :=.F. oVMenu5:Switch() oRighe:= TRigheReserva():New() oRighe:OrdScope( TOPSCOPE, nInvoice ) oRighe:OrdScope( BOTTOMSCOPE, nInvoice ) oRighe:gotop() DO while !oRighe:eof() aadd(aItems,{oRighe:ico,oRighe:Desc,oRighe:Qta,oRighe:dataini,oRighe:datafin} ) oRighe:Skip() ...

... la unica modificacion es agregarle las primeras lineas: #include "FiveWin.ch" #include "xbrowse.ch" #DEFINE TOPSCOPE 0 #DEFINE BOTTOMSCOPE 1 Desde ya muchos Saludos. Antonio En este link, se encuentra el Prg y la Dbf.: https://drive.google.com/drive/folders/1kyAdySJ7wQiFk8zXXFxXT2wsr_yvdlJJ

Buenas Sabeis si existe algun límite al confeccionar la variable que nos indique Topscope o Bottomscope ? Me explico: Tengo una dbf llamada albaran con su indice CDX indexado por : index on _field->Conductor+dtos(_field->fecha)+STR(_field->Tipo) tag "Conductor" ...

Silvio, a sample : from ORD.CH : #define TOPSCOPE 0 #define BOTTOMSCOPE 1 set order to tag dates // set range dates->(ordScope(0, dtos(Start) )) // set top scope dates->(ordScope(1, dtos(End) )) // set bottom scope dates->(dbgotop()) dates->(ordScope(0, ...

... internos te filtra y se queda sólo con lo que le interesa, es decir, el Scope, hace un SoftSeek al TOPSCOPE y otro SoftSeek al BOTTOMSCOPE y como la tabla está ordenada lo que hace es quedarse con lo que queda entre esos dos "SoftSeeks" y el resto lo descarta. El set ...

Yo lo hago asi.... el archivo está indexado asi.... str(CODIINT,10)+str(EM_PARE,2) #Include 'xbrowse.ch' #define TOPSCOPE 0 #define BOTTOMSCOPE 1 @ 0.875,1 XBROWSE oBrwGRU ; FIELDS (EMPLEGRU)->EM_NOMB , ; HEADERS 'Nombre' ; SIZES 200 ; SIZE 200 ; ALIAS EMPLEGRU OF oFol:aDialogs[3] oBrwGRU:nRowDividerStyle ...

... utile2.dbf. For each record in utile1 there are one or more record in utile2. When I open utile2.dbf, I use ordscope(topdcope, cJoin) and ordscope(bottomscope, cJoin), where in cJoin put the value join. Can I use other functions?

Si estás usando índices CDX sería algo tan sencillo como esto para establecer el rango que quieres:
//
VENTA->(ordscope(TOPSCOPE, "FA"))
VENTA->(ordscope(BOTTOMSCOPE, "FA"))

y para ihabilitarlo:

VENTA->(ordscope(TOPSCOPE, NIL))
VENTA->(ordscope(BOTTOMSCOPE, NIL))
//

... 03 España enrique 01 Brasil Ramiro 06 Chile Carlos 05 Perú si aplico ordscope Tabla->(OrdScope(TOPSCOPE,"04") ) Tabla->(OrdScope(BOTTOMSCOPE,"06") ) solo saldrán en los resultados juan 04 Uruguay Carlos 05 Perú Ramiro 06 Chile Este ejemplo es lo mas básico , yo trabajo ...

Estimados Estoy realizando un filtro con OrdScope de esta forma: eFiltro := {|| DBSELECTAREA(MOVISTO) ,; OrdScope(BOTTOMSCOPE,str(mPROD,8)+str(mCOIN,6)) ,; OrdScope(TOPSCOPE,str(mPROD,8)+str(mCOIN,6)) ,; oLbxMovSto:Refresh() } la pregunta: Como hago para el Listbox o información ...

... ORDSCOPE(<nScope>, [<expNewValue>]) --> uCurrentValue Arguments <nScope> is a number specifying the top (TOPSCOPE) or bottom (BOTTOMSCOPE) boundary. Note: To use the TOPSCOPE and BOTTOMSCOPE constants, you must include (#include) the Ord.ch header file in your application. ...

... := VROL XFILTR:=XFAM_PRO + VC_PILAR + 15->MATRIC SELECT 16 // WCM_MACO.DBF DBGOTOP() 16->(ORDSCOPE( TOPSCOPE,NIL ) ) 16->(ORDSCOPE( BOTTOMSCOPE,NIL ) ) DBGOTOP() 16->(ORDSCOPE( TOPSCOPE ,XFILTR ) ) 16->(ORDSCOPE( BOTTOMSCOPE,XFILTR ) ) DBGOTOP() SELECT 16 DO WHILE !EOF() IF ...

... Código: oLBXPrzAlt:bGotFocus := {|| prz_alt->( ordSetFocus(4) ),; prz_alt->( ordScope( TOPSCOPE, cCodCpc ) ),; prz_alt->( ordScope( BOTTOMSCOPE, cCodCpc ) ),; prz_alt->( dbGoTop() ) } pero me es util solo cuando pierde el focus y luego lo retoma, no cuando redimensiono la columna ...

... muestro los registros que cumplen una condición elegida desde un COMBOBOX. Según la opción elegida cambio el índice activo y con TOPSCOPE Y BOTTOMSCOPE filtro los registro a mostrar. Todo funciona perfectamente menos cuando no existen registros según la condición especificada. En este caso ...

... ctienda + Dtos(dFecha ) ) ) ; VentaSuc->(DbGotop()) format: ORDSCOPE(0,yourFirstRecord) //topscope ORDSCOPE(1,yourEndRecord) //bottomscope yourDBf->(DbGotop())