1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
|
/* xb_deletall.cpp
XBase64 Software Library
Copyright (c) 1997,2003,2014,2017,2019,2023 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
This program sets the delete flag on all records in a dbf file
*/
#include <xbase.h>
using namespace xb;
void PrintHelp();
void PrintHelp(){
std::cout << "Usage: xb_deleteall [-h] [-?] [--help] [-v] [--version] -i myfile" << std::endl << std::endl;
std::cout << "This program flags all the records in a DBF table for deletion. To physically remove the deleted records, see program xb_pack.";
std::cout << std::endl << std::endl;
}
void PrintVersion();
void PrintVersion(){
std::cout << "Xbase64 Version: " << xbase_VERSION_MAJOR << "." << xbase_VERSION_MINOR << "." << xbase_VERSION_PATCH << std::endl;
}
int main(int argc, char *argv[])
{
xbXBase x;
xbDbf *MyFile = NULL;
xbFile f( &x );
xbInt16 iRc = 0;
xbString sParm;
if (argc < 2 || x.GetCmdLineOpt( argc, argv, "-h", sParm ) ||
x.GetCmdLineOpt( argc, argv, "-?", sParm ) ||
x.GetCmdLineOpt( argc, argv, "--help", sParm )){
PrintHelp();
return 1;
}
if ( x.GetCmdLineOpt( argc, argv, "-v", sParm ) ||
x.GetCmdLineOpt( argc, argv, "--version", sParm )){
PrintVersion();
return 1;
}
if( !x.GetCmdLineOpt( argc, argv, "-i", sParm ) || sParm == "" ){
PrintHelp();
return 1;
}
if(( iRc = x.OpenHighestVersion( sParm.Str(), "", &MyFile )) != XB_NO_ERROR ){
std::cout << "Could not open file RC = " << iRc << " file = " << sParm.Str() << std::endl;
x.DisplayError( iRc );
return 1;
}
iRc = MyFile->DeleteAllRecords();
if( iRc != XB_NO_ERROR ) {
std::cout << "Error Deleting all records - database ==> " << sParm.Str() << "\n";
std::cout << "Return Code = " << iRc;
x.DisplayError( iRc );
return 1;
}
MyFile->Close();
delete MyFile;
return 0;
}
|
