Запрос на изменение логической величины

[Fyrklod]

Здравствуйте уважаемые! Помогите плиз с реализацией запроса...
У меня курсовой по БД на тему "Кредитование". Ну так вот, имеется таблица сожержащее поле в котором данные логического типа... погасил чел месячный долг или нет(true/false) ...false разумеется стоит по умолчанию, т.е. он еще должен погасить ... если чувак погашает долг(определенную сумму) до определеной даты в месяце, то false должен меняться на true

я сделал запрос:

код C++ Builder

void __fastcall TVipl::Button2Click(TObject *Sender)
{
String str = ComboBox1->Text;
MyQuery2->SQL->Clear();
MyQuery2->SQL->Add("Select Pasport, DataVip, SumProm, Pog from viplata where DataVip >= '"+DateTimePicker1->Date+"' and Pog = false and SumProm = '"+LabeledEdit1->Text +"';");
MyQuery2->Open();
while(!MyQuery2->Eof)
{
if(MyTable1->FieldByName("Pasport")->Value == str && MyTable1->FieldByName("Pog")->Value != 1 && double(MyTable1->FieldByName("DataVip")->Value) < double(DateTimePicker1->Date)) //MyTable1->FieldByName("Pasport")->Value
{
MyQuery3->SQL->Clear();
MyQuery3->SQL->Add("UPDATE viplata SET Pog = true WHERE DataVip >= '"+DateTimePicker1->Date+"' and Pog = false and SumProm = '"+ LabeledEdit1->Text +"' and Pasport ='"+MyQuery1->FieldByName("Pasport")->Value+"';");
MyQuery3->Execute();
}
MyQuery2->Next();
}
}

но увы!! при компиляции не показывает ошибки, при нажатии кнопки (при нужных условиях) ошибка не выскакивает, НО ничего не меняет...(((

ПОМОГИТЕ ПЛИЗ.... либо этот поправить, либо подскажите что-нибудь другое... зранее спасибо

 

[Fyrklod]

Тема закрыта.