';
$Ledger=new Acc_Ledger_Sold($cn,$_POST['p_jrn']);
$internal=$Ledger->insert($_POST);
/* Save the predefined operation */
if ( isset($_POST['opd_save']))
{
$opd=new Pre_op_ven($cn);
$opd->get_post();
$opd->save();
}
/* Show button */
echo '
'.$Ledger->get_name().'
';
$jr_id=$cn->get_value('select jr_id from jrn where jr_internal=$1',array($internal));
echo "
"._('Opération sauvée');
if ( $Ledger->pj != '') echo ' Piece : '.h($Ledger->pj);
echo "
";
if ( strcmp($Ledger->pj,$_POST['e_pj']) != 0 )
{
echo '
'._('Attention numéro pièce existante, elle a du être adaptée').'
';
}
printf ('
%s
',
$jr_id,dossier::id(),$internal);
/* Show link for Invoice */
if (isset ($Ledger->doc) )
{
echo $Ledger->doc;
echo '
';
}
/* Save the additional information into jrn_info */
$obj=new Acc_Ledger_Info($cn);
$obj->save_extra($Ledger->jr_id,$_POST);
echo HtmlInput::button_anchor(_('Nouvelle vente'),$href.'?p_action=ven&sa=n&'.dossier::get());
echo '
';
echo "
";
echo '
';
echo '
';
$own=new Own($cn);
/* if we suggest the pj n# the run the script */
if ( $own->MY_PJ_SUGGEST=='Y')
{
echo '';
}
echo '';
echo '
';
// Check privilege
if ( isset($_REQUEST['p_jrn']) &&
$User->check_jrn($_REQUEST['p_jrn']) == 'X')
{
NoAccess();
exit -1;
}
$Ledger=new Acc_Ledger_Sold($cn,0);
if ( !isset($_REQUEST['p_jrn']))
{
$Ledger->id=-1;
}
else
$Ledger->id=$_REQUEST['p_jrn'];
echo $Ledger->display_search_form();
//------------------------------
// UPdate the payment
//------------------------------
if ( isset ( $_GET ['paid']))
{
$Ledger->update_paid($_GET);
}
$p_array=$_GET;
/* by default we should the default period */
if ( ! isset($p_array['date_start']))
{
$period=$User->get_periode();
$per=new Periode($cn,$period);
list($date_start,$date_end)=$per->get_date_limit();
$p_array['date_start']=$date_start;
$p_array['date_end']=$date_end;
}
/* compute the sql stmt */
list($sql,$where)=$Ledger->build_search_sql($p_array);
$max_line=$cn->count_sql($sql);
$step=$_SESSION['g_pagesize'];
$page=(isset($_GET['offset']))?$_GET['page']:1;
$offset=(isset($_GET['offset']))?$_GET['offset']:0;
$bar=jrn_navigation_bar($offset,$max_line,$step,$page);
echo '
';
/*
* Export to csv
*/
$r=HtmlInput::get_to_hidden(array('l','date_start','date_end','desc','amount_min','amount_max','qcode','accounting','unpaid','gDossier','ledger_type','p_action'));
if (isset($_GET['r_jrn'])) {
foreach ($_GET['r_jrn'] as $k=>$v)
$r.=HtmlInput::hidden('r_jrn['.$k.']',$v);
}
echo '
';
echo '
';
// Check privilege
if ( isset($_REQUEST['p_jrn']) &&
$User->check_jrn($_REQUEST['p_jrn']) == 'X')
{
NoAccess();
exit -1;
}
$Ledger=new Acc_Ledger_Sold($cn,0);
if ( !isset($_REQUEST['p_jrn']))
{
$Ledger->id=-1;
}
else
$Ledger->id=$_REQUEST['p_jrn'];
echo $Ledger->display_search_form();
//------------------------------
// UPdate the payment
//------------------------------
if ( isset ( $_GET ['paid']))
{
$Ledger->update_paid($_GET);
}
$p_array=$_GET;
/* compute the sql stmt */
list($sql,$where)=$Ledger->build_search_sql($p_array);
if ( trim($where) != '')
$sql .= ' and '.SQL_LIST_UNPAID_INVOICE;
else
$sql .= ' where '.SQL_LIST_UNPAID_INVOICE;
$max_line=$cn->count_sql($sql);
$step=$_SESSION['g_pagesize'];
$page=(isset($_GET['offset']))?$_GET['page']:1;
$offset=(isset($_GET['offset']))?$_GET['offset']:0;
$bar=jrn_navigation_bar($offset,$max_line,$step,$page);
echo '
';
echo '