FoxPro/Visual FoxPro - Falla en Cursor

   
Vista:

Falla en Cursor

Publicado por Raomon (81 intervenciones) el 28/04/2009 16:15:45
Hola buenos dias... estoy tratando de cargar un cursor con ciertos campos de una tabla... pero no me fuciona... y es como sigue...

campos de la tabla creditos
folio n(10), cant n(10) articulo c(35), precio n(12,2), total n(12,2),;
cliente c(35), fechavta d(8), estado l(1),;
fechapago d(8), vLinea n(10)

pero solo quiero cargar el cursor solo con: folio, cant, articulo, precio y total. asi:
CREATE CURSOR temp(folio n(10), cant n(10),;
articulo c(35), precio n(12,2), total n(12,2))

WITH Thisform.Grid1
.ReadOnly=.t.
.Highlightstyle=0
.RecordMark=.f.
.DeleteMark=.f.
.ScrollBars=2
.RecordSourcetype=1
.RecordSource='temp'
.FontName='Tahoma'
.FontSize=9
.GridLines=2
.Column1.ControlSource='temp.folio'
.Column1.Width=60
.......ETC... ETC.
EndWith

posteriormente jalar de la tabla creditos solo lo del cursor asi...

SELECT temp
APPEND FROM Creditos FIELDS folio, cant,;
articulo, precio, total FOR ALLTRIM(cliente)==ALLTRIM(cCliente)

pero no funciona ya que en el cursor no se menciona al Cliente... pero este campo no lo necesito en el cursor solo validar el campo CLIENTE de la tabla con la variable cCliente resultado del contenido un combo1 Ligado a la tabla clientes...

Gracias... Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Falla en Cursor

Publicado por Mario (199 intervenciones) el 28/04/2009 17:10:08
En lugar de crear el cursor y luego hacer un append, probá lo sig:
Select folio, cant, articulo, precio, total from creditos where ALLTRIM(cliente)==ALLTRIM(cCliente) into cursor temp readwrite
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Falla en Cursor

Publicado por Ramon (81 intervenciones) el 28/04/2009 18:02:29
Hola amigo... ya funciona muy bien....muchas gracias...
saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar