FiveTech Software tech support forums

Armando, mira se ayuda:

https://forums.fivetechsupport.com/viewtopic.php?f=6&t=4141&p=18272&hilit=El+valor+de+BOF+o+EOF+es+True&sid=fdf732bd19789fb68e7dee0716c16d70&sid=63a75c395d0fbee47c116d52036b8fa3#p18272

Regards, saludos.

Thanks Mr Rao....

You are right. With RecSet, eof() and bof() do not work. We will try to provide this in future versions. for now you can use this: nRecs := oData:RecCount()nSave := oData:RecNo()do while oData:RecNo() <= nRecs   // ...

What about calling oData:MoveFirst() before starting the Do while Loop ?

Mr Rao You can help me please , I use RecSet, but not work correctly, EOF() and BOF() not workink with RecSet, see you this example: I used MaeiaDb Function ListaUser(oCn)local lOK, cData, oData, aRet := {}lOk := .t.cData := "SELECT nick FROM ...

... DBF DBFFPT DBFBLOB DBFCDX DBFNTX DataBases in use ================ 1: => EMP RddName: DBFNTX ============================== RecNo RecCount BOF EOF 1 1 .F. .F. Indexes in use TagName Relations in use Classes in use: =============== 1 ERROR 2 HBCLASS 3 HBOBJECT 4 TFONT 5 WIN_OLEAUTO 6 TOLEAUTO ...

... DBF DBFFPT DBFBLOB DBFCDX DBFNTX DataBases in use ================ 1: => EMP RddName: DBFNTX ============================== RecNo RecCount BOF EOF 1 1 .F. .F. Indexes in use TagName Relations in use Classes in use: =============== 1 ERROR 2 HBCLASS 3 HBOBJECT 4 TFONT 5 WIN_OLEAUTO 6 TOLEAUTO ...

...  Called from:  => TOLEAUTO:VALUE( 0 )  1007 group of errors occur when accessing a recordset is closed or eof/bof is true or record is deleted. Please check if any situation exists

... n == nil,; ( ::cAlias )->( OrdKeyNo() ),; ( ::cAlias )->( OrdKeyGoto( n ); ) ) },; ::bKeyCount := {|| ( ::cAlias )->( If( eof() .and. bof(), 0, OrdKeyCount() ) ) } Endif :::::: ¿Puede alguien por favor decirme si causará algún error dejarlas comentadas? ¿o cual sería la solución correcta? ...

... _Fe1_:=20220101 _Fe2_:=20220131 Connect_sql(@_Cnx_,'Usuario','Clave') Get_sql_detalle(_Cnx_,@_Rds_,_Fe1_,_Fe2_) Do While !_Rds_:Bof() .And. !_Rds_:Eof() _Imp_:=_Rds_:Fields('Precio'):Value _Tpr_:=_Rds_:Fields('Tipo'):Value _Obs_:=_Rds_:Fields('Observa'):Value Aadd(Arayx,{_Rds_:Fields('Documento'):Value, ...

... not know. Now, let us make this work. Please let me know: What are the methods to 1. GoTop (eg: oTb:GoTop() ) 2. GoBottom 3. GoTo( nthRecord ) 4. Bof() 5. Eof() How do we access and assign field values? Is it similar to other classes like x := oTb:fieldname oTb:fieldname := x ? Thanks Mr Rao 1.- ...

... not know. Now, let us make this work. Please let me know: What are the methods to 1. GoTop (eg: oTb:GoTop() ) 2. GoBottom 3. GoTo( nthRecord ) 4. Bof() 5. Eof() How do we access and assign field values? Is it similar to other classes like x := oTb:fieldname oTb:fieldname := x ?

... DBF DBFFPT DBFBLOB DBFCDX DBFNTX DataBases in use ================ 1: ARQRAM RddName: DBFCDX ============================== RecNo RecCount BOF EOF 6 5 .F. .T. Indexes in use TagName => DESCRICAO DESCRICAO Relations in use 2: CONFCTE RddName: DBFCDX ============================== RecNo ...

... DBI_CHILDCOUNT 22 /* Number of child relations set */ #define DBI_FILEHANDLE 23 /* The data file's OS file handle */ #define DBI_BOF 26 /* Same as bof() */ #define DBI_EOF 27 /* Same as eof() */ #define DBI_DBFILTER 28 /* Current Filter setting */ #define DBI_FOUND 29 /* Same as found() */ #define ...

hi

as James say you are using FILTER on "Skipper" of "Browse"
DbSetFilter() will use hole DBF and "Skipper" will test until EOF() / BOF()

i use DbSetFilter() only with SCOPE
SCOPE will "limit" EOF() / BOF()