copiar una tabla a otra

[DOS]

OK, tratemos de ver otra opcion o volver a la original de dos tablas, tal vez sea mas facil aunque no mejor, pasar de una tabla a otra. Me dieron la fecha y lo tengo que entregar el dia 15, pero se me complica un poco ya que trabajo y solo a la noche puedo probar cualquier avance y para colmo el viernes tengo un examen final estoy complicado.

[[AzidRain]]

Está excelente la ayuda que ha estado dando magistralmente Caral. Sin embargo quisiera remitirme a otro aspecto de la consulta que vale la pena sacar a flote:

Nuestro amigo está preparándose para estudiar y ejercer algún día su carrera. No puede cumplir con una tarea y ofrece dinero a quien se la termine porque aduce "no tener tiempo". Me pregunto que haría si estuviera laborando en el mundo real, ¿Subcontratar para cumplir un compromiso con su cliente? ¿Decirle al cliente que no tiene tiempo para sus proyectos, pero que no es falta de conocimiento? ¿Regresar los anticipos ya cobrados?.

Independientemente de sus razones, que seguramente son totalmente válidas para él creo que se aleja de lo que debería aprender..en este caso que no le dedicó el tiempo necesario a un proyecto y que no organizó sus actividades como debía ser. Lo mas honesto sería presentar lo que tenga tal como esté y apegarse a la calificación merecida que le pongan y no autoengañarse tratando de comprarla o peor que alguién como Caral, que tan amablemente lo hace, invierta tiempo en algo que el interesado justamente dice no tener.

Yo me quedaría con mi reprobación, terminaría el proyecto aunque ya no sirva para mejorar la calificación pero si me sirva para aprender y punto. Prefiero sacar 7 en la carrera pero en lo profesional ser siempre de 10 a que sea lo contrario como luego tristemente pasa. Supuestos "eruditos" de 10 en todo pero a la hora de los cocolazos reales nomás no.

Lo siento por mi tono, pero me parece adecuado hacer el comentario para todos los novatos y que inician en esto, sobre todo a los que están estudiando ya que yo igual lo viví en mis años de la uni, toda una mafia que vendía "proyectos hechos" y otros tantos que lo solicitaban, hoy unos y otros están haciendo otras cosas distintas a lo que estudiaron porque al final no sabían tanto como creían.

[[Caral]]

Hola
Amigo AzidRain, justamente comparto tu filosofía, me parece que en la vida hay que romperse la cabeza para aprender, de lo contrario simplemente se pasa.
Una de las razones por las que no he tocado el proyecto es precisamente por eso y he tratado, dentro de mi pobre conocimiento, hacer que el amigo DOS piense y resuelva el mismo los problemas, yo simplemente le marco un camino, o por lo menos eso trato.
Habrás notado que lo hace y lo hace solo y lo hace bien, aveces nos piden y no damos, aveces nos piden y los encaminamos esta en nosotros decidir dar el pescado o enseñar a pescar.
Yo como programador seria un buen albañil pero trato de ponerme en los zapatos del que pide y buscar un punto de equilibrio.
Hay buenas personas todavía no perdamos la esperanza en ellos.
Saludos

[DOS]

AzidRain, tenes razon en tus palabras, pero quisiera dejar mas claro de como es la situacion, he solicitado en varias ocaciones ayuda para realizar algo, mostrando lo que hice y corrigiendome en lo que estaba mal o mal encaminado, de hecho antes de llegar a este punto abri este tread para encontrar la solucion que necesito http://www.clubdelphi.com/foros/showthread.php?t=83824 si esto lo hubiese visto en clases, seguramente revisaria la carpeta y lo resolveria.
Como lo mencione anteriormente no voy a vivir de esto(lamentablemente), esto no es un titulo universitario, seguramente si me presentara a una postulacion de trabajo con mi edad, tendria un centenar de jovenes mejor preparados primero que yo.
Lo mas cercano a desarrollar un sistema, seguramente sera este, tambien tengas razon con lo del tiempo y no haberle dedicado mas, pero cuando uno trabaja todo el dia, a la noche va a estudiar y el fin de semana, uno tiene que poner en la balanza, entre quedarce a estudiar o salir con la familia al cine o a comer, cada uno vera lo que mas le pesa. No es vagancia, doy todo lo que puedo dentro de mi magro conocimiento.
Seguramente como decis esto no es un buen ejemplo, para quien este estudiando, tambien pude haber mentido y disfrazar este pedido de otra manera, opte por la verdad. Quien este estudiando y haga trampas, solo se engaña a si mismo, si quiere realmente lo que hace, debe poner lo mejor. Esto lo tome como un hobby, pero con muchas ganas de aprender y de seguir formandome, pero yo nunca me engañe, se a lo que puedo llegar.
No quiero crear una polemica, sino creamos un nuevo thread, agradesco muchisimo a caral y a todo aquel que alguna vez me ayudo, incluso a casimiro que siempre me recuerda que lea la cara oculta de Delphi.
Gracias.

[[Caral]]

Hola
No creo que AzidRain te guizgue, me parece que lo dice en general.
Yo en lo personal te entiendo perfectamente, tal vez la edad nos de esa visión.
De todos modos ya sabes, aqui siempre estamos para tratar de ayudar amigo.
Saludos

[DOS]

Bueno la otra materia (Visual C#) aprobe con 9, esta quedara para diciembre, asi que si quieren seguir ayudandome, les cuento como sigue esto.
con el siguiente codigo y la ayuda de ozswizzard casi funciona, osea realiza lo que quiero pero lo almacena todo de forma temporal, cuando salgo se borra todo.

Código Delphi [-]
procedure TForm14.BitBtn1Click(Sender: TObject);  // copia una factura a la otra 
begin
 with Query1 do 
begin
         Close;
         SQL.Clear;
    SQL.Add('INSERT INTO detfacturafinal');
    SQL.Add('SELECT * FROM detfactura');
    ExecSQL;
 end;
 end;
  procedure TForm14.SpeedButton3Click(Sender: TObject);//limpia la tabla detfactura
 begin
 with Query1 do
 begin
   Close;
   SQL.Clear;
   SQL.Add('DELETE FROM detfactura');
   ExecSQL;
 end;
 end;

Asi que me acosnsejo esto

Código Delphi [-]
procedure TForm14.BitBtn1Click(Sender: TObject);  // copia una factura a la otra
 begin
    Database1.StartTransaction;
    try
       with Query1 do
       begin
               Close;
               SQL.Clear;
          SQL.Add('INSERT INTO detfacturafinal');
          SQL.Add('SELECT * FROM detfactura');
          ExecSQL;
       end;
       DataBase1.Commit;
    except
                   on E:Exception do 
begin
          DataBase1.Rollback;
                   MessageDlg('Error:' + E.Message, mtError, [mbOK], 0);
       end;
    end;
 end;
  procedure TForm14.SpeedButton3Click(Sender: TObject);//limpia la tabla detfactura
 begin
    Database1.StartTransaction;
    try
       with Query1 do
       begin
          Close;
          SQL.Clear;
          SQL.Add('DELETE FROM detfactura');
          ExecSQL;
       end;
       DataBase1.Commit;
    except
             on E:Exception do
 begin          
DataBase1.Rollback;                   
MessageDlg('Error:' + E.Message, mtError, [mbOK], 0);
       end;
    end;
 end;

El asunto como le mencione nunca habia utilizado un Tdatabase, asi que buscando llegue a colocar un Tdatabase en el formulario y lo configure de la siguiente manera en el DataBase Editor:
Name: Facturacion
Alias name: ArgOs
Parameter overrides:
PATH=C:\ITM\Tablas
ENABLE BCD=FALSE
DEFAULT DRIVER=PARADOX

En las propiedades
AliasName ArgOs
connected False
DatabaseName Facturacion //el nombre inventado

El Database ArgOs lo cree con estas caracteristicas
type STANDAR
defaul driver PARADOX
enable BCD FALSE
path C:\tablas

las tablas y el Query
DatabaseName Facturacion



Ahora cuando lo hago correr me tira el siguiente error:
Database1: the transaction isolation level be dirty read local databases...
a ver si logran identificar que estoy haciendo mal o me falta hacer. gracias.

[[Caral]]

Hola
Creo que usas paradox y componentes dbe, sera que estos componentes no tienen el comit ?.
No lo se.
Saludos