1
0
Fork 0
mirror of https://github.com/YunoHost-Apps/noalyss_ynh.git synced 2024-09-03 19:46:20 +02:00
noalyss_ynh/sources/include/class/stock_goods.class.php
dudjima 3a905a4a87 Update sources 7.01
Update files from sources with last update on noalyss.eu
2018-04-13 18:58:28 +02:00

274 lines
8.9 KiB
PHP

<?php
/*
* This file is part of NOALYSS.
*
* NOALYSS is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* NOALYSS is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with NOALYSS; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
// Copyright Author Dany De Bontridder danydb@aevalys.eu
/**
* @file
* @brief Manage the goods
*
*/
require_once NOALYSS_INCLUDE.'/database/stock_goods_sql.class.php';
class Stock_Goods extends Stock_Goods_Sql
{
/**
* if an array if receive the keys are
* p_date
* p_depot
* f_idX f_id
* sg_codeX
* sg_type0
*
* @remark $cn database connx
* @param $p_array
* if an array if receive the keys are
* p_date
* p_depot
* f_idX f_id
* sg_codeX
* sg_type0
* @param $p_readonly true or false
*/
function input($p_array = null, $p_readonly = false)
{
global $cn;
if ($p_array != null)
{
extract($p_array, EXTR_SKIP);
}
else
{
$p_date = '';
$p_motif = '';
$p_depot = 0;
}
$date = new IDate('p_date', $p_date);
$date->setReadOnly($p_readonly);
$motif = new IText('p_motif', $p_motif);
$motif->setReadOnly($p_readonly);
$motif->size = 80;
$idepo = HtmlInput::select_stock($cn, "p_depot", "W");
$idepo->setReadOnly($p_readonly);
if (count($idepo->value) == 0)
{
NoAccess();
die();
}
$idepo->selected = $p_depot;
if ($p_readonly ) {
$nb=$row;
} else {
if (isset ($row ) )
{
$nb=($row > MAX_ARTICLE_STOCK)?$row:MAX_ARTICLE_STOCK;
}else {
$nb=MAX_ARTICLE_STOCK;
}
}
for ($e = 0; $e < $nb; $e++)
{//ATTR_DEF_STOCKfiche_
$sg_code[$e] = new ICard('sg_code' . $e);
$sg_code[$e]->extra = "[sql] fd_id = 500000";
$sg_code[$e]->set_attribute("typecard", $sg_code[$e]->extra);
$sg_code[$e]->set_attribute("label", "label" . $e);
$sg_code[$e]->value = (isset(${'sg_code' . $e})) ? ${'sg_code' . $e} : '';
$sg_quantity[$e] = new INum('sg_quantity' . $e);
$sg_quantity[$e]->value = (isset(${'sg_quantity' . $e})) ? ${'sg_quantity' . $e} : '';
$label[$e] = new ISpan("label$e");
$label[$e]->style="vertical-align:top;";
if (trim($sg_code[$e]->value) != '')
{
$label[$e]->value = $cn->get_value("select vw_name from vw_fiche_attr where quick_code=$1", array($sg_code[$e]->value));
}
$sg_code[$e]->setReadOnly($p_readonly);
$sg_quantity[$e]->setReadOnly($p_readonly);
if ( isset (${'sg_type'.$e})) {
$sg_type[$e]=(${'sg_type'.$e}=='c')?'OUT':'IN';
}
if ( isset (${'f_id'.$e})) {
$fiche[$e]=new Fiche($this->cn,${'f_id'.$e});
}
}
$select_exercice=new ISelect('p_exercice');
$select_exercice->value=$cn->make_array('select distinct p_exercice,p_exercice from parm_periode order by 1 desc');
require_once NOALYSS_TEMPLATE.'/stock_inv.php';
}
function record_save($p_array)
{
global $cn;
try
{
if (isDate($p_array['p_date']) == null)
throw new Exception('Date invalide');
$cn->start();
$ch = new Stock_Change_Sql($cn);
$ch->setp("c_comment", $p_array['p_motif']);
$ch->setp("r_id", $p_array['p_depot']);
$ch->setp("c_date", $p_array['p_date']);
$ch->setp('tech_user', $_SESSION['g_user']);
$ch->insert();
$per = new Periode($cn);
$periode = $per->find_periode($p_array['p_date']);
$exercice = $per->get_exercice($periode);
$nb=$p_array['row'];
for ($i = 0; $i < $nb; $i++)
{
$a = new Stock_Goods_Sql($cn);
if ($p_array['sg_quantity' . $i] != 0 &&
trim($p_array['sg_code' . $i]) != '')
{
$stock= strtoupper(trim($p_array['sg_code' . $i]));
$fiche=new Fiche($cn);
$fiche->get_by_qcode($p_array['sg_code' . $i]);
/*
* check if code stock does exist
*/
$count=$cn->get_value('select count(*) from fiche_detail where ad_id=$1 and ad_value=$2',
array(ATTR_DEF_STOCK,$stock));
if ( $count==0) {
throw new Exception(_("Code stock inutilisé").h($stock));
}
$a->f_id=$fiche->id;
$a->sg_code = $stock;
$a->sg_quantity = abs($p_array['sg_quantity' . $i]);
$a->sg_type = ($p_array['sg_quantity' . $i] > 0) ? 'd' : 'c';
$a->sg_comment = $p_array['p_motif'];
$a->tech_user = $_SESSION['g_user'];
$a->r_id = $p_array['p_depot'];
$a->sg_exercice = $exercice;
$a->c_id = $ch->c_id;
$a->sg_date=$p_array['p_date'];
$a->insert();
}
}
$cn->commit();
}
catch (Exception $exc)
{
record_log( $exc->getTraceAsString());
echo $exc->getMessage();
throw $exc;
}
}
/**
* Insert into stock_goods from ACH and VEN
* @param type $p_array KEY : db => database conx, j_id => jrnx.j_id,goods=> f_id of the goods
* 'quant' => quantity ,'dir'=> d or c (c for sales OUT and d for purchase IN),'repo'=>r_id of the
* repository (stock_repository.r_id
*/
static function insert_goods(&$p_cn,$p_array)
{
global $g_user;
extract ($p_array, EXTR_SKIP);
if ($g_user->can_write_repo($repo) == false)
return false;
// Retrieve the good account for stock
$code = new Fiche($p_cn);
$code->get_by_qcode($goods);
$code_marchandise = $code->strAttribut(ATTR_DEF_STOCK);
if ($code_marchandise == NOTFOUND || $code_marchandise=='')
return false;
$exercice = $g_user->get_exercice();
if ($exercice == 0)
throw new Exception('Annee invalide erreur');
$Res = $p_cn->exec_sql("insert into stock_goods (
j_id,
f_id,
sg_code,
sg_quantity,
sg_type,sg_exercice,r_id ) values ($1,$2,$3,$4,$5,$6,$7)", array(
$p_array['j_id'],
$code->id,
$code_marchandise,
$p_array['quant'],
$p_array['dir'],
$exercice,
$p_array['repo']
)
);
return $Res;
}
/**
* Return an array, used by Stock_Goods::input
* @remark type $cn
* @param type $p_array
* @throws Exception
*/
function take_last_inventory($p_array)
{
global $cn;
$year=HtmlInput::default_value("p_exercice", "", $p_array);
$depot=HtmlInput::default_value("p_depot", "", $p_array);
if ($year=="")
throw new Exception(_('Inventaire invalide'), 10);
if ($depot=="")
throw new Exception(_('Dépôt invalide'), 20);
// compute state_exercice
$periode=new Periode($cn);
$periode->p_id=$cn->get_value("select min(p_id) from parm_periode where p_exercice=$1", array($year));
$first_day=$periode->first_day();
// compute array for stock
$array['state_exercice']=$first_day;
$stock=new Stock($cn);
$rowid=$stock->build_tmp_table($array);
// compute first day of the next year
$next_year=$year+1;
$periode=new Periode($cn);
$periode->p_id=$cn->get_value("select min(p_id) from parm_periode where p_exercice=$1", array($next_year));
if ($periode->p_id=="")
$array['p_date']="";
else
$array['p_date']=$periode->first_day();
// Compute an array compatible with Stock_Goods::input
$array['p_motif']=_('Inventaire ').$year;
$array['p_depot']=$depot;
$result=$cn->get_array("
select sg_code,sum(coalesce(s_qin,0)-coalesce(s_qout,0)) tot_
from tmp_stockgood_detail
where
s_id=$1 and r_id=$2
group by sg_code",
array($rowid,$depot));
for ($e=0;$e< count($result);$e++) {
$array['sg_code'.$e]=$result[$e]['sg_code'];
$array['sg_quantity'.$e]=$result[$e]['tot_'];
}
$array['row']=$e;
return $array;
}
}
?>