aOdata
Posted: Tue Mar 11, 2008 5:17 am
The function aOData does not return all Data of an Object in (x)Harbour. I think this subject was discussed earlier. Is it possible to make the following changes in odata.prg, so that the function aOData is useful to us ?
With this modification I guess the code will work correctly on both Harbour and non-Harbour applications.
By the way, can any one advise whether there is any native function in Harbour or xHarbour which gives a list of all Data like aOData, so that I can use that function instead of aOData ?
Code: Select all
#ifdef __HARBOUR__
if AScan( aInfo, "_" + aInfo[ n ], n + 1 ) != 0
#else
if AScan( aInfo, "_" + SubStr( aInfo[ n ], 1, 9 ), n + 1 ) != 0
#endif
By the way, can any one advise whether there is any native function in Harbour or xHarbour which gives a list of all Data like aOData, so that I can use that function instead of aOData ?
