ABRIR REPORTE SIN PROBLEMAS
Publicado por Edin (75 intervenciones) el 29/11/2007 17:29:39
Hola a todos, he hecho un programa para almacenar datos, uso unicamente una "tabla simple" para ir gurdando los registros, en mi programa hice una rutina para que elimine los registros especificos de la tabla, todo fucniona bien, despues que compilo el programa a ejecutable, este corre de maravilla, agrego registros nuevos, modifico lo registros existentes... etc, pero cuado ejecuto la rutina para que me elimine el registro que he especificado me da el siguiente error: "File must be opened exclusively", el codigo que utilicé es el siguiente:
codelim=UPPER(Thisformset.Form5.Text1.Value)
LOCATE FOR codelim=codigo
Eliminar= MESSAGEBOX("Realmente desea eliminar el registro: "+alltrim(codelim)+" "+ALLTRIM(producto),289,"Eliminar")
IF Eliminar=1
DELETE
PACK
ENDIF
--------------------------------------------------------------------------------┐
▼
Aprovechando, tambien hice un reporte simple (con el reporteador de Fox) para imprimir los registros almacenados, lo previsualizo bien con el unico incoveniente que cuando se abre el reporte se queda dentro del "Form", ¿Cómo hago para que el reporte sea una ventana independiente?, Gracias, saludos....
codelim=UPPER(Thisformset.Form5.Text1.Value)
LOCATE FOR codelim=codigo
Eliminar= MESSAGEBOX("Realmente desea eliminar el registro: "+alltrim(codelim)+" "+ALLTRIM(producto),289,"Eliminar")
IF Eliminar=1
DELETE
PACK
ENDIF
--------------------------------------------------------------------------------┐
▼
Aprovechando, tambien hice un reporte simple (con el reporteador de Fox) para imprimir los registros almacenados, lo previsualizo bien con el unico incoveniente que cuando se abre el reporte se queda dentro del "Form", ¿Cómo hago para que el reporte sea una ventana independiente?, Gracias, saludos....
Valora esta pregunta


0