🚀 go-pugleaf

Thanks Mark .... Nice approach,
Minor syntactical corrections produce:

    OracleDataSet->Open();
    NewTable->Open();

   while (!OracleDataSet->Eof)
      {  NewTable->Append();
         for (int Index = 0; Index < OracleDataSet->FieldCount; Index++)
                {
NewTable->FieldByName(OracleDataSet->Fields->Fields[Index]->FieldName)->Valu
e
                            = OracleDataSet->Fields->Fields[Index]->Value;
                 }
         NewTable->Post();
         OracleDataSet->Next();
       }






"Mark Cashman" <mcashman@temporaldoorway.com> wrote in message
news:3B4CF967.F62A868C@temporaldoorway.com...
> Hi, Doulas!
>
> It might be better to try something like this...
>
> OracleDataSet->Open();
> NewTable->Open();
>
> OracleDataSet->First();
>
> while (!OracleDataSet->Eof)
> {
>     NewTable->Edit();
>
>     for (int Index = 0; Index < OracleDataSet->FieldCount; Index++)
>     {
>
>
NewTable->FieldByName(OracleDataSet->Fields->Fields(Index)->FieldName)->Valu
e
> =
>             OracleDataSet->Fields->Fields(Index)->Value; // Ensures that
> field is the same by name - does not reply on position
>     };
>
>     NewTable->Post();
>     OracleDataSet->Next();
> };
>
>
> ------
> Mark Cashman (TeamB - C++ Builder), creator of The Temporal Doorway at
> http://www.temporaldoorway.com
> - Original digital art, writing, music and more -
> C++ Builder / JBuilder Tips and The C++ Builder Programmer's Webring
> (Join us!)
> http://www.temporaldoorway.com/programming/index.htm
> ------
>
>