Report
Publicado: Lun Abr 27, 2009 3:04 pm
Hola a todos.
Que estoy haciendo mal. El reporte no muestra ningun registro
METHOD BtnAceptarClick( oSender ) CLASS TFormListaClientes
Local oReport
::oDatos:Gotop()
::oDatos := AppData:oBase:Query( "select codigo,nombre,domicilio from
clientes")
Msgbox( ::oDatos:RecCount() ) // Responde 100
Msgbox( ::oDatos:FIELDGETBYNAME('CODIGO') ) // reponde 1
MsgBox( ::oDatos:NOMBRE ) // responde JUAN
REPORT oReport TITLE "Clientes" PREVIEW
COLUMN OF oReport TITLE "Recno" DATA Recno() ALIGN taRIGHT
COLUMN OF oReport TITLE "Codigo" DATA ::oDatos:CODIGO
COLUMN OF oReport TITLE "Nombre" DATA ::oDatos:NOMBRE
COLUMN OF oReport TITLE "Domicilio" DATA ::oDatos:DOMICILIO
RUN REPORT oReport
Gracias
Juan
Que estoy haciendo mal. El reporte no muestra ningun registro
METHOD BtnAceptarClick( oSender ) CLASS TFormListaClientes
Local oReport
::oDatos:Gotop()
::oDatos := AppData:oBase:Query( "select codigo,nombre,domicilio from
clientes")
Msgbox( ::oDatos:RecCount() ) // Responde 100
Msgbox( ::oDatos:FIELDGETBYNAME('CODIGO') ) // reponde 1
MsgBox( ::oDatos:NOMBRE ) // responde JUAN
REPORT oReport TITLE "Clientes" PREVIEW
COLUMN OF oReport TITLE "Recno" DATA Recno() ALIGN taRIGHT
COLUMN OF oReport TITLE "Codigo" DATA ::oDatos:CODIGO
COLUMN OF oReport TITLE "Nombre" DATA ::oDatos:NOMBRE
COLUMN OF oReport TITLE "Domicilio" DATA ::oDatos:DOMICILIO
RUN REPORT oReport
Gracias
Juan