rendered paste body// Remove items from SQL Table
clsTableAltering.taTableAlteringType = "DeleteRow"; // DeleteRow , UpDate, Select, Insert
clsTableAltering.taTableName = "VendorAuthorization";
clsTableAltering.taTableWhere = " ( " + " CompanyID > " + "'" + 0 + "'" + " ) ";
clsTableAltering.clsTableUpDate();
// open Paradox Table
clsParadox.PaTableLocation = ParadoxFileLocation.Text;
clsParadox.PaAlteringType = "Select"; // DeleteRow , UpDate, Select, Insert
clsParadox.PaName = "VendorAuth";
clsParadox.PaWhere = ""; // "(CompanyID = " + CompNo + ")";
clsParadox.PaOrderedBy = "vaCompanyNo";
clsParadox.PaSelectCol = "vaCompanyNo,VendorNo,AuthorizationNo, VendorAuth.No AS NewNo,VContact ,VDescription";
try
{
clsParadox.clsPaUpDate(); iCount = 0; paoRd = clsParadox.PaODcmd.ExecuteReader( CommandBehavior.CloseConnection );
if ( paoRd.HasRows )
{
while ( paoRd.Read() )
{
iCount += 1;
// Insert items into SQL Table
clsTLTableLookup.TLAlteringType = "Insert"; // DeleteRow , UpDate, Select, Insert
clsTLTableLookup.TLName = "VendorAuthorization";
clsTLTableLookup.TLSelectCol = "( CompanyID, VendorID, vaAuthorizationNo, vaRecNo, vaContact, vaDescription, vaCreatedDate, vaCreatedBy )";
//CustomerStatus , BilltoSameAs, BillToContactID, BillToContactName, ContractPriceID, ContractPriceExpiryDate, , StatementDelivery, CustomerGroup, LastStatementDate
clsTLTableLookup.TLSelectColValues = " ('" +
paoRd[ "vaCompanyNo" ].ToString() + "','" +
paoRd[ "VendorNo" ].ToString() + "','" +
paoRd[ "AuthorizationNo" ].ToString() + "','" +
paoRd[ "NewNo" ].ToString() + "','" +
paoRd[ "VContact" ].ToString() + "','" +
paoRd[ "VDescription" ].ToString() + "','" +
DT + "','" +
UN + "')";
clsTLTableLookup.clsTLUpDate();
}
}
btnVendorAuthorizationTXT.Text = Convert.ToString( iCount );
paoRd.Close();
}
catch ( SqlException ex )
{
MessageBox.Show( "Paradox Database error has occurred: " + clsTLTableLookup.TLName + "\n" + ex.ToString() );
}