busqueda de articulo

Moderator: carles

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

busqueda de articulo

Post by wilsongamboa » Sun Jan 05, 2020 9:43 am

Charly buenos dias
Estoy con genesis tratando de hacer algo como lo que indicaste en la ultima charla
es decir recojo un dato y busco en una tabla y lo muestro en en browse
tengo una tabla llamada producto con registros y unos campos llamados descrip y precio1
he implementado un view de este forma
//inicio View
<!--------------------------------------------------
Test de code (VIEW)
Autor : wilson gamboa
Description : Test editor Genesis
Date : 04-01-2020 02:01:41
--------------------------------------------- -->
<style>
.main { margin: 10px; }
</style>

<h3>JoseWeb 1.0 Consulta de Precios</h3>
<hr> {$ time() $}
<br>

<?prg
#include 'genesis.ch'

local oDlg
local c := ''
local cBuscar := 'ABRO'
local oCol

DEFINE WEBFORM oDlg ID 'precios'

INIT FORM oDlg

ROW oDlg
COL oDlg GRID 6
ROW GROUP oDlg
GET 'nombre' VALUE cBuscar LABEL 'Buscar' GRID 8 OF oDlg
GET 'total' VALUE '' GRID 2 LABEL 'Total' READONLY ALIGN 'center' OF oDlg
BUTTON 't3' LABEL 'Search' GRID 2 OF oDlg ACTION 'buscarProducto()'
END oDlg
END oDlg
END oDlg


ROW GROUP oDlg
DEFINE BROWSE oBrw ID 'ringo' HEIGHT 400 OF oDlg
ADD oCol TO oBrw ID 'nombre' HEADER 'Producto' SORT ALIGN 'left'
ADD oCol TO oBrw ID 'precio' HEADER 'PVP' SORT ALIGN 'right'
END BROWSE oBrw
END oDlg

END FORM oDlg


return c ?>

<script>

var oWnd;
var oBrw = new Browse( 'ringo' );
//oBrw.bClick = MyClick
//oBrw.bDblClick = MyDblClick

function buscarProducto() {
var oParam = new Object() ;
oParam[ 'nombre' ] = $( '#nombre').val() ;
oWnd = MsgLoading() ;
MsgServer( 'task', 'seekProd', oParam, postCargaProductos );
}

function postCargaProductos( dat ){
oWnd.modal('hide');
var hValue = dat[ 'value' ] ;
var rows = hValue[ 'rows'] ;
$( '#total' ).val( hValue[ 'len' ] );
oBrw.SetData( rows ); }

$(document).ready( function () {
oBrw.Init(); } )

</script>

<hr>
//final View

asi mismo un task asi

//Inicio task
/* ----------------------------------------------
Autor : wilson gamboa
Description : Task Genesis
Date : 05-01-2020 00:41:15
--------------------------------------------- */

#include 'genesis.ch'

function main( hSeek )

local aRows := {}
local cAlias := 'producto'
local cSeek

if valtype( hSeek ) <> 'H'
return ''
end

cSeek := hSeek['nombre'] //aca viene el parametro

if !empty( cSeek )

cSeek = upper( alltrim( cSeek ) )

//use producto index prod1x, prod2x new shared alias ( cAlias )
use producto new shared alias ( cAlias )

dbgotop()
locate for cSeek $ upper( alltrim( producto->descrip ) )
while found()

aadd( aRows, { '_recno' => ( cAlias )->( recno() ) ,;
'nombre' => ( cAlias )->descrip ,;
'precio' => ( cAlias )->precio1 } )
continue
end
( cAlias )->( dbclosearea() )
else
cSeek = ''
end


return { 'rows' => aRows, 'nombre' => cSeek, 'len' => len( aRows ) }
//Final task

pero no me presenta los datos , tampoco me da error
De antemano gracias si le puedes echar un vistazo
Recien inicio y seguramente estare haciendo ....
gracias

Wilson

carles
Posts: 20
Joined: Thu Dec 19, 2019 7:08 pm

Re: busqueda de articulo

Post by carles » Sun Jan 05, 2020 10:37 am

Wilson,

Iremos por partes.

Primero has de verificar que tu task funciona bien. Ejecutala parcheando

Code: Select all

/*
if valtype( hSeek ) <> 'H'
return ''
end

cSeek := hSeek['nombre'] //aca viene el parametro
*/
Y pon un codigo a pelo para asegurarte que lee bien la tabla. Es lo primero que se ha de chequear. Pruebalo a ver si te aprecen datos por pantalla


Saludos.

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Sun Jan 05, 2020 1:28 pm

buenos dias
ya lo probe pero no funciona le di un valor
cSeek = 'BICICLETA'

pero no lo toma
saludos

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Sun Jan 05, 2020 11:37 pm

Charly probando solo la task
si funciona
puse ?( cAlias )->descrip y si envia a una especie de MsgInfo los datos
me parece que no esta llamando el view a la task
voy a seguir revisando

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Mon Jan 06, 2020 12:11 am

revisando mas no funciona por alguna razón la parte de javascript
puse un Alert para mirar peron no ejecuta esto
<script type="text/javascript">

var oWnd;
var oBrw = new Browse( 'ringo' );
//oBrw.bClick = MyClick
//oBrw.bDblClick = MyDblClick
Alert('hola');

function buscarProducto() {
var oParam = new Object() ;
oParam[ 'nombre' ] = $( '#nombre').val() ;
Alert( oParam[ 'nombre' ] );
oWnd = MsgLoading() ;
MsgServer( 'task', 'seekProd', oParam, postCargaProductos );
}

function postCargaProductos( dat ){
oWnd.modal('hide');
var hValue = dat[ 'value' ] ;
var rows = hValue[ 'rows'] ;
$( '#total' ).val( hValue[ 'len' ] );
oBrw.SetData( rows ); }

$(document).ready( function () {
oBrw.Init(); } )

</script>

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Mon Jan 06, 2020 12:27 am

Charly probando ya me funciona la Task me devuelve datos pero lo que aun no me funciona es el browse me parece que ni siquiera lo inicializa, me funciono con MsgTask y no con MsgServer
bueno saludos

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Mon Jan 06, 2020 11:07 pm

Estimado Charly no doy con mi error seria mucho pedir publiques el codigo de esa busqueda que mostraste en la ultima reunion
gracias
Wilson

carles
Posts: 20
Joined: Thu Dec 19, 2019 7:08 pm

Re: busqueda de articulo

Post by carles » Wed Jan 08, 2020 7:30 am

Wilson,
wilsongamboa wrote:
Mon Jan 06, 2020 12:27 am
Charly probando ya me funciona la Task me devuelve datos pero lo que aun no me funciona es el browse me parece que ni siquiera lo inicializa, me funciono con MsgTask y no con MsgServer
Entiendo que la Task te funciona no ?

Siguiente paso -> Llamar desde la vista la task. Como lo haces ? Has mirado en el inspector si te devuelve algo ?

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Thu Jan 09, 2020 2:19 pm

Charly buenos dias
YA FUNCIONO !!!
juro que no tope nada !!
esta brutal Charly me has alegrado el dia
tomare una cervecita a tu nombre!!

wilsongamboa
Posts: 16
Joined: Tue Nov 26, 2019 1:38 pm

Re: busqueda de articulo

Post by wilsongamboa » Thu Jan 09, 2020 2:51 pm

Image

Post Reply