dbinfo.ch header file
Posted: Sun Oct 23, 2022 12:41 am
Hello friends,
I only discovered this file today.
Best regards,
Otto
I only discovered this file today.
Best regards,
Otto
Code: Select all | Expand
include "fivewin.ch"
REQUEST DBFCDX
REQUEST DBFFPT
function main
? "nInfoType determines the type of information, as specified by the constants below. Note, however, that not all constants are supported for all RDDs. These constants are defined in the dbinfo.ch header file, which must be included (#include) in your application."
use ("customer2.dbf") new
? rddInfo(10)
? rddInfo(14)
GOTO 1
? "DBRI_RAWRECORD " + DBRECORDINFO( 7 )
? "DBRI_RAWMEMOS " + DBRECORDINFO( 8 )
? "DBRI_RAWDATA " + DBRECORDINFO( 9 )
return
INIT PROCEDURE PrgInit
SET CENTURY ON
SET EPOCH TO YEAR(DATE())-98
SET DELETED ON
SET EXCLUSIVE OFF
REQUEST HB_Lang_DE
HB_LangSelect("DE")
SET DATE TO GERMAN
rddsetdefault( "DBFCDX" )
EXTERN DESCEND
RETURN
//----------------------------------------------------------------------------//