691b3a9890
* changes to synhronize RDD code with xHarbour (state of 23.09.2005)
Many, many thanks to Przemek Czerpak for his work.
171 lines
9.3 KiB
C
171 lines
9.3 KiB
C
/*
|
|
* $Id$
|
|
*/
|
|
|
|
/*
|
|
* Harbour Project source code:
|
|
* Default RDD module
|
|
*
|
|
* Copyright 1999 Bruno Cantero <bruno@issnet.net>
|
|
* www - http://www.harbour-project.org
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2, or (at your option)
|
|
* any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this software; see the file COPYING. If not, write to
|
|
* the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
|
|
* Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
|
|
*
|
|
* As a special exception, the Harbour Project gives permission for
|
|
* additional uses of the text contained in its release of Harbour.
|
|
*
|
|
* The exception is that, if you link the Harbour libraries with other
|
|
* files to produce an executable, this does not by itself cause the
|
|
* resulting executable to be covered by the GNU General Public License.
|
|
* Your use of that executable is in no way restricted on account of
|
|
* linking the Harbour library code into it.
|
|
*
|
|
* This exception does not however invalidate any other reasons why
|
|
* the executable file might be covered by the GNU General Public License.
|
|
*
|
|
* This exception applies only to the code released by the Harbour
|
|
* Project under the name Harbour. If you copy code from other
|
|
* Harbour Project or Free Software Foundation releases into a copy of
|
|
* Harbour, as the General Public License permits, the exception does
|
|
* not apply to the code that you add in this way. To avoid misleading
|
|
* anyone as to the status of such modified files, you must delete
|
|
* this exception notice from them.
|
|
*
|
|
* If you write modifications of your own for Harbour, it is your choice
|
|
* whether to permit this exception to apply to your modifications.
|
|
* If you do not wish that, delete this exception notice.
|
|
*
|
|
*/
|
|
|
|
#ifndef HB_RDDWRK_H_
|
|
#define HB_RDDWRK_H_
|
|
|
|
#include "hbapirdd.h"
|
|
|
|
HB_EXTERN_BEGIN
|
|
|
|
/*
|
|
* -- METHODS --
|
|
*/
|
|
|
|
extern ERRCODE hb_waBof( AREAP pArea, BOOL * pBof );
|
|
extern ERRCODE hb_waEof( AREAP pArea, BOOL * pEof );
|
|
extern ERRCODE hb_waFound( AREAP pArea, BOOL * pFound );
|
|
#define hb_waGoBottom hb_waUnsupported
|
|
#define hb_waGoTo ( DBENTRYP_UL ) hb_waUnsupported
|
|
#define hb_waGoToId ( DBENTRYP_I ) hb_waUnsupported
|
|
#define hb_waGoTop hb_waUnsupported
|
|
#define hb_waSeek ( DBENTRYP_BIB ) hb_waUnsupported
|
|
extern ERRCODE hb_waSkip( AREAP pArea, LONG lToSkip );
|
|
extern ERRCODE hb_waSkipFilter( AREAP pArea, LONG lUpDown );
|
|
#define hb_waSkipRaw ( DBENTRYP_L ) hb_waUnsupported
|
|
extern ERRCODE hb_waAddField( AREAP pArea, LPDBFIELDINFO pFieldInfo );
|
|
#define hb_waAppend ( DBENTRYP_B ) hb_waUnsupported
|
|
extern ERRCODE hb_waCreateFields( AREAP pArea, PHB_ITEM pStruct );
|
|
#define hb_waDeleteRec hb_waUnsupported
|
|
#define hb_waDeleted ( DBENTRYP_BP ) hb_waUnsupported
|
|
extern ERRCODE hb_waFieldCount( AREAP pArea, USHORT * uiFields );
|
|
#define hb_waFieldDisplay ( DBENTRYP_VF ) hb_waUnsupported
|
|
extern ERRCODE hb_waFieldInfo( AREAP pArea, USHORT uiIndex, USHORT uiType, PHB_ITEM pItem );
|
|
extern ERRCODE hb_waFieldName( AREAP pArea, USHORT uiIndex, void * szName );
|
|
#define hb_waFlush hb_waUnsupported
|
|
#define hb_waGetRec ( DBENTRYP_PP ) hb_waUnsupported
|
|
#define hb_waGetValue ( DBENTRYP_SI ) hb_waUnsupported
|
|
#define hb_waGetVarLen ( DBENTRYP_SVL ) hb_waUnsupported
|
|
#define hb_waGoCold hb_waUnsupported
|
|
#define hb_waGoHot hb_waUnsupported
|
|
#define hb_waPutRec ( DBENTRYP_P ) hb_waUnsupported
|
|
#define hb_waPutValue ( DBENTRYP_SI ) hb_waUnsupported
|
|
#define hb_waRecall hb_waUnsupported
|
|
#define hb_waRecCount ( DBENTRYP_ULP ) hb_waUnsupported
|
|
#define hb_waRecInfo ( DBENTRYP_ISI ) hb_waUnsupported
|
|
#define hb_waRecNo ( DBENTRYP_ULP ) hb_waUnsupported
|
|
#define hb_waRecId ( DBENTRYP_I ) hb_waUnsupported
|
|
extern ERRCODE hb_waSetFieldExtent( AREAP pArea, USHORT uiFieldExtent );
|
|
extern ERRCODE hb_waAlias( AREAP pArea, BYTE * szAlias );
|
|
extern ERRCODE hb_waClose( AREAP pArea );
|
|
/* Like in Clipper map CREATE() method at work area level to OPEN() */
|
|
#define hb_waCreate hb_waOpen
|
|
extern ERRCODE hb_waInfo( AREAP pArea, USHORT uiIndex, PHB_ITEM pItem );
|
|
extern ERRCODE hb_waNewArea( AREAP pArea );
|
|
extern ERRCODE hb_waOpen( AREAP pArea, LPDBOPENINFO pInfo );
|
|
extern ERRCODE hb_waRelease( AREAP pArea );
|
|
extern ERRCODE hb_waStructSize( AREAP pArea, USHORT * uiSize );
|
|
extern ERRCODE hb_waSysName( AREAP pArea, BYTE * pBuffer );
|
|
extern ERRCODE hb_waEval( AREAP pArea, LPDBEVALINFO pEvalInfo );
|
|
#define hb_waPack hb_waUnsupported
|
|
#define hb_waPackRec ( DBENTRYP_LSP ) hb_waUnsupported
|
|
#define hb_waSort ( DBENTRYP_VS ) hb_waUnsupported
|
|
extern ERRCODE hb_waTrans( AREAP pArea, LPDBTRANSINFO pTransInfo );
|
|
extern ERRCODE hb_waTransRec( AREAP pArea, LPDBTRANSINFO pTransInfo );
|
|
#define hb_waZap hb_waUnsupported
|
|
extern ERRCODE hb_waChildEnd( AREAP pArea, LPDBRELINFO pRelInfo );
|
|
extern ERRCODE hb_waChildStart( AREAP pArea, LPDBRELINFO pRelInfo );
|
|
#define hb_waChildSync ( DBENTRYP_VR ) hb_waUnsupported
|
|
extern ERRCODE hb_waSyncChildren( AREAP pArea );
|
|
extern ERRCODE hb_waClearRel( AREAP pArea );
|
|
#define hb_waForceRel hb_waUnsupported
|
|
extern ERRCODE hb_waRelArea( AREAP pArea, USHORT uiRelNo, void * pRelArea );
|
|
extern ERRCODE hb_waRelEval( AREAP pArea, LPDBRELINFO pRelInfo );
|
|
extern ERRCODE hb_waRelText( AREAP pArea, USHORT uiRelNo, void * pExpr );
|
|
extern ERRCODE hb_waSetRel( AREAP pArea, LPDBRELINFO pRelInfo );
|
|
#define hb_waOrderListAdd ( DBENTRYP_OI ) hb_waUnsupported
|
|
#define hb_waOrderListClear hb_waUnsupported
|
|
#define hb_waOrderListDelete ( DBENTRYP_OI ) hb_waUnsupported
|
|
#define hb_waOrderListFocus ( DBENTRYP_OI ) hb_waUnsupported
|
|
#define hb_waOrderListRebuild hb_waUnsupported
|
|
extern ERRCODE hb_waOrderCondition( AREAP pArea, LPDBORDERCONDINFO param );
|
|
#define hb_waOrderCreate ( DBENTRYP_VOC ) hb_waUnsupported
|
|
#define hb_waOrderDestroy ( DBENTRYP_OI ) hb_waUnsupported
|
|
/* #define hb_waOrderInfo ( DBENTRYP_OII ) hb_waNull */
|
|
extern ERRCODE hb_waOrderInfo( AREAP pArea, USHORT index, LPDBORDERINFO param );
|
|
extern ERRCODE hb_waClearFilter( AREAP pArea );
|
|
extern ERRCODE hb_waClearLocate( AREAP pArea );
|
|
#define hb_waClearScope hb_waUnsupported
|
|
#define hb_waCountScope ( DBENTRYP_VPLP ) hb_waUnsupported
|
|
extern ERRCODE hb_waFilterText( AREAP pArea, PHB_ITEM pFilter );
|
|
#define hb_waScopeInfo ( DBENTRYP_SI ) hb_waUnsupported
|
|
extern ERRCODE hb_waSetFilter( AREAP pArea, LPDBFILTERINFO pFilterInfo );
|
|
extern ERRCODE hb_waSetLocate( AREAP pArea, LPDBSCOPEINFO pScopeInfo );
|
|
#define hb_waSetScope ( DBENTRYP_VOS ) hb_waUnsupported
|
|
#define hb_waSkipScope ( DBENTRYP_VPL ) hb_waUnsupported
|
|
ERRCODE hb_waLocate( AREAP pArea, BOOL fContinue );
|
|
extern ERRCODE hb_waCompile( AREAP pArea, BYTE * pExpr );
|
|
extern ERRCODE hb_waError( AREAP pArea, PHB_ITEM pError );
|
|
extern ERRCODE hb_waEvalBlock( AREAP pArea, PHB_ITEM pBlock );
|
|
#define hb_waRawLock ( DBENTRYP_VSP ) hb_waUnsupported
|
|
#define hb_waLock ( DBENTRYP_VL ) hb_waUnsupported
|
|
#define hb_waUnLock ( DBENTRYP_I ) hb_waUnsupported
|
|
#define hb_waCloseMemFile hb_waUnsupported
|
|
#define hb_waCreateMemFile ( DBENTRYP_VP ) hb_waUnsupported
|
|
#define hb_waGetValueFile ( DBENTRYP_SVPB ) hb_waUnsupported
|
|
#define hb_waOpenMemFile ( DBENTRYP_VP ) hb_waUnsupported
|
|
#define hb_waPutValueFile ( DBENTRYP_SVPB ) hb_waUnsupported
|
|
#define hb_waReadDBHeader hb_waUnsupported
|
|
#define hb_waWriteDBHeader hb_waUnsupported
|
|
|
|
#define hb_rddInit (DBENTRYP_R) NULL
|
|
#define hb_rddExit (DBENTRYP_R) NULL
|
|
#define hb_rddDrop (DBENTRYP_RVV) hb_waRddUnsupported
|
|
#define hb_rddExists (DBENTRYP_RVV) hb_waRddUnsupported
|
|
extern ERRCODE hb_rddInfo( LPRDDNODE pRDD, USHORT uiIndex, ULONG ulConnection, PHB_ITEM pItem );
|
|
|
|
#define hb_waWhoCares ( DBENTRYP_SVP ) hb_waUnsupported
|
|
|
|
HB_EXTERN_END
|
|
|
|
#endif /* HB_RDDWRK_H_ */
|