diff options
author | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2022-12-07 13:17:14 +0100 |
---|---|---|
committer | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2022-12-07 13:17:14 +0100 |
commit | 4875a3dd9b183dcd2256e2abfc4ccf7484c233b4 (patch) | |
tree | 0abbea881ded030851014ffdd60fbf71fead8f65 /src/utils/xb_pack.cpp | |
parent | daf17154bf13139d9375f48525d19d6aaba08155 (diff) |
New upstream version 4.0.2upstream/4.0.2
Diffstat (limited to 'src/utils/xb_pack.cpp')
-rwxr-xr-x | src/utils/xb_pack.cpp | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/src/utils/xb_pack.cpp b/src/utils/xb_pack.cpp new file mode 100755 index 0000000..ba61837 --- /dev/null +++ b/src/utils/xb_pack.cpp @@ -0,0 +1,55 @@ +/* xb_pack.cpp + +XBase64 Software Library + +Copyright (c) 1997,2003,2014,2017 Gary A Kunkel + +The xb64 software library is covered under +the terms of the GPL Version 3, 2007 license. + +Email Contact: + + xb64-devel@lists.sourceforge.net + xb64-users@lists.sourceforge.net + +*/ + +#include <xbase.h> +using namespace xb; + +int main(int ac,char** av) +{ + if (ac <= 1) { + std::cout << + "\nUsage: xb_pack filename...\n" + "\nThis program does not automatically reindex any NDX indexes." + "\nUse the reindex program to reindex any indexes associated" + "\nwith the database, or build your own program which executes " + "\nthe Pack() method after opening all the index files " + "\nassociated with the database.\n\n"; + return 1; + } + + xbXBase x; + xbInt16 iRc; + xbDbf * MyFile = NULL; + if(( iRc = x.OpenHighestVersion( av[1], "", &MyFile )) != XB_NO_ERROR ){ + std::cout << "Could not open file iRc = " << iRc << " file = " << av[1] << std::endl; + x.DisplayError( iRc ); + return 0; + } + + if(( iRc = MyFile->Pack()) != XB_NO_ERROR ) { + std::cout << "\nError packing DBF database ==> " << av[1] << std::endl; + std::cout << " Return Code = " << iRc << std::endl; + } + + MyFile->Close(); + delete MyFile; + + std::cout << "\nPack Database complete...\n\n"; + return 0; +} + + + |