Ayuda con reporte en fox
Publicado por Pedro Canizales (70 intervenciones) el 08/04/2009 17:53:36
Hola a todos,
muy buenos dias
estoy programando en FoxPro para Windows, pero tengo un problema al momento de ejecutar un reporte ya que me envia un mensaje de error
"UNRECOGNIZED PHRASE/KEYWORD IN COMMAND"
despues me pone 2 botones Cancel y Ignore
en cualquiera de los 2 me manda este mensaje
"Cannot access selected table" o este otro mensaje "alias seg not found"
este es el codigo que tengo en un boton
pero no puedo encontrar el error me podria alguien ayudar?
IF este=1
num=query.control
SELE libera
SEEK num
IF copias=0
REPLA fimp WITH DATE()&&,copias WITH 1
SELE QUERY
SELECT libera.control, ALLTRIM(generador)+" "+ALLTRIM(planta);
FROM libera, opdlab;
WHERE opdlab.control = libera.control;
AND (libera.fimp = { / / };
AND libera.fliber <> { / / };
AND libera.copias = 0;
AND libera.envase <> "Granel";
AND libera.envase <> "Pipa");
ORDER BY libera.control DESCENDING;
INTO TABLE QUERY
dr=0
checa=0
aexcel=" "
bandera=DATE()
checar=' '
*
****************imprime hoja de resumen
*
SELECT confi.*, opdlab.fecha_r, opdlab.obs1, opdlab.obs2, opdlab.residuo;
opdlab.nca,opdlab.tsalvament, opdlab.peso_r, opdlab.horare;
FROM CONFI, opdlab;
WHERE opdlab.control = confi.manif;
AND confi.manif = num;
ORDER BY confi.consec;
INTO TABLE seg
SELE seg
REPORT FORM resum.frx TO PRINTER NOCONSOLE NOEJECT
ENDIF
ELSE
DO liberar.spr
ENDIF
SHOW GETS
_CUROBJ=OBJNUM(mostrar)
muy buenos dias
estoy programando en FoxPro para Windows, pero tengo un problema al momento de ejecutar un reporte ya que me envia un mensaje de error
"UNRECOGNIZED PHRASE/KEYWORD IN COMMAND"
despues me pone 2 botones Cancel y Ignore
en cualquiera de los 2 me manda este mensaje
"Cannot access selected table" o este otro mensaje "alias seg not found"
este es el codigo que tengo en un boton
pero no puedo encontrar el error me podria alguien ayudar?
IF este=1
num=query.control
SELE libera
SEEK num
IF copias=0
REPLA fimp WITH DATE()&&,copias WITH 1
SELE QUERY
SELECT libera.control, ALLTRIM(generador)+" "+ALLTRIM(planta);
FROM libera, opdlab;
WHERE opdlab.control = libera.control;
AND (libera.fimp = { / / };
AND libera.fliber <> { / / };
AND libera.copias = 0;
AND libera.envase <> "Granel";
AND libera.envase <> "Pipa");
ORDER BY libera.control DESCENDING;
INTO TABLE QUERY
dr=0
checa=0
aexcel=" "
bandera=DATE()
checar=' '
*
****************imprime hoja de resumen
*
SELECT confi.*, opdlab.fecha_r, opdlab.obs1, opdlab.obs2, opdlab.residuo;
opdlab.nca,opdlab.tsalvament, opdlab.peso_r, opdlab.horare;
FROM CONFI, opdlab;
WHERE opdlab.control = confi.manif;
AND confi.manif = num;
ORDER BY confi.consec;
INTO TABLE seg
SELE seg
REPORT FORM resum.frx TO PRINTER NOCONSOLE NOEJECT
ENDIF
ELSE
DO liberar.spr
ENDIF
SHOW GETS
_CUROBJ=OBJNUM(mostrar)
Valora esta pregunta


0