tengo el siguiente problema, creo un indice compuesto por tres valores
quiero por medio de este filtrar informacion en un browse, y utilizo OrdScope(), pero no me muestra nada codigo es el siguiente
(nDSerD)->( OrdScope( 0, nKey ))
(nDSerD)->( OrdScope( 1, nKey ))
(nDSerD)->( DbGoTop() )
REDEFINE LISTBOX dbServi ;
FIELDS (nDSerD)->Servicio ;
HEADER " Servicio" ;
SIZES 95 ;
ID 102 OF oDlt UPDATE ;
ALIAS (nDSerD)->( ALIAS() )
dbServi:nLineStyle := 5
dbServi:nHeaderHeight := 30
dbServi:nLineHeight := 20
dbServi:aHJustify := { 0, 0, 0 }
dbServi:lAdjLastCol := .F.
dbServi:lAdjBrowse := .T.
dbServi:lCellStyle := .T.
nkey es la llave compuesta, alguna otra manera pero sin el set filter, que estoy haciendo mal
ayuda en indices
-
- Posts: 122
- Joined: Wed Oct 12, 2005 1:03 pm
- Location: Cuernacava, Morelos Mexico
-
- Posts: 122
- Joined: Wed Oct 12, 2005 1:03 pm
- Location: Cuernacava, Morelos Mexico
Tomafa, yo lo hago asi :
Select MAEREMIS
DbGoBottom()
Select DETREMIS
OrdSetFocus(1) // Este es mi indice
Set Scope To MAEREMIS->NUMERO,MAEREMIS->NUMERO
DbGoTop()
// Este es mi lisbox y funciona muy bien
REDEFINE LISTBOX oBrowD Fields DETREMIS->PRODUCTO,Transform(DETREMIS->CANTIDAD,"9,999"),Transform(DETREMIS->PRECIO,"99,999.99"),Transform(DETREMIS->IMPORTE,"9,999.99"),DETREMIS->NOMBRE Header "Producto","Cantidad","Precio","Importe","Nombre" ID 102 OF oDlg UpDate Alias "DETREMIS"
Select MAEREMIS
DbGoBottom()
Select DETREMIS
OrdSetFocus(1) // Este es mi indice
Set Scope To MAEREMIS->NUMERO,MAEREMIS->NUMERO
DbGoTop()
// Este es mi lisbox y funciona muy bien
REDEFINE LISTBOX oBrowD Fields DETREMIS->PRODUCTO,Transform(DETREMIS->CANTIDAD,"9,999"),Transform(DETREMIS->PRECIO,"99,999.99"),Transform(DETREMIS->IMPORTE,"9,999.99"),DETREMIS->NOMBRE Header "Producto","Cantidad","Precio","Importe","Nombre" ID 102 OF oDlg UpDate Alias "DETREMIS"