pretienda

This commit is contained in:
mynah
2019-04-04 19:45:51 -06:00
parent 49b1256e27
commit 567e991278
10 changed files with 256 additions and 11 deletions

View File

@@ -0,0 +1,14 @@
select
id,
objeto,
nombre,
precio,
subnombre,
promocion,
opcion,
descripcion,
imagenb as "imagen",
existencia,
entrega_id "entrega_id"
from tienda where id=? and activo =1;

View File

@@ -62,6 +62,11 @@ sub store{
return _read ($data_path->child("/store/qStore.q")->slurp);
}
sub store_id{
my ($self,$id)=@_;
return _read ($data_path->child("/store/qIdStore.q")->slurp,$id)->[0];
}
sub _read{
my ($q,@bind)=@_;
my (@empty,$arr);