request("ac");
$request_jrn=$http->request("p_jrn", "string","");
// Check privilege
if ($request_jrn !="" &&
$g_user->check_jrn($request_jrn) != 'W')
{
NoAccess();
exit - 1;
}
$p_msg="";
$post_jrn=$http->post("p_jrn", "string","");
/* if a new invoice is encoded, we display a form for confirmation */
if (isset($_POST['view_invoice']))
{
$Ledger = new Acc_Ledger_Purchase($cn, $post_jrn);
try
{
$Ledger->verify_operation($_POST);
}
catch (Exception $e)
{
alert($e->getMessage());
$p_msg=$e->getMessage();
$correct = 1;
}
// if correct is not set it means it is correct
if (!isset($correct))
{
echo '
';
echo '
';
echo h1(_("Confirmation"));
echo span(_("Vous devez encore confirmer"),' class="notice"');
echo '
';
echo '
';
echo '';
echo '
';
if (DEBUGNOALYSS>1) { echo "";}
return;
}
}
//------------------------------
/* Record the invoice */
//------------------------------
if (isset($_POST['record']))
{
$Ledger = new Acc_Ledger_Purchase($cn, $post_jrn);
try
{
$Ledger->verify_operation($_POST);
}
catch (Exception $e)
{
alert($e->getMessage());
$p_msg=$e->getMessage();
$correct = 1;
}
// record the invoice
if (!isset($correct))
{
echo '
';
$Ledger = new Acc_Ledger_Purchase($cn, $post_jrn);
try {
$internal = $Ledger->insert($_POST);
} catch (\Exception $e) {
if ( $e->getCode()==EXC_BALANCE)
echo_warning(_("enregistrement annulé: balance , voyer le fichier log"));
else
echo_warning($e->getMessage());
return;
}
/* Save the predefined operation */
if ( isset($_POST['opd_name']) && trim($_POST['opd_name']) != "" )
{
$opd = new Pre_operation($cn);
$opd->get_post();
$opd->save();
}
/* Show button */
$jr_id = $cn->get_value('select jr_id from jrn where jr_internal=$1', array($internal));
echo '
'._('Enregistrement').'
';
/* Save the additional information into jrn_info */
$obj = new Acc_Ledger_Info($cn);
$obj->save_extra($Ledger->jr_id, $_POST);
/* save followup */
$Ledger->save_followup($http->request("action_gestion","string",""));
// Feedback
echo $Ledger->confirm($_POST, true);
if (isset($Ledger->doc))
{
echo '
'._('Document').'
';
echo $Ledger->doc;
}
// extourne
if (isset($_POST['reverse_ck']))
{
$p_date=$http->post('reverse_date','string', '');
$p_msg=$http->post("ext_label");
if (isDate($p_date)==$p_date)
{
// reverse the operation
try
{
$Ledger->reverse($p_date,$p_msg);
echo '
';
printf ( _('Extourné au %s'),$p_date);
echo '
';
}
catch (Exception $e)
{
echo '
'.
_('Opération non extournée').
" ".
$e->getMessage().
'
';
}
}
else
{
// warning because date is invalid
echo '
'._('Date invalide, opération non extournée').'';
}
}
echo '
';
echo "- ";
echo $Ledger->button_new_operation();
echo "
";
echo "- ";
echo $Ledger->button_copy_operation();
echo "
";
echo "
";
echo '
';
return;
}
}
// ------------------------------------------------------------
/* Display a blank form or a form with predef operation */
/* or a form for correcting */
// -------------------------------------------------------------
echo '
';
//
$array = (isset($_POST['correct']) || isset($correct)) ? $_POST : null;
$Ledger = new Acc_Ledger_Purchase($cn, 0);
if (!isset($_REQUEST ['p_jrn']))
{
$def_ledger = $Ledger->get_first('ach',2);
if ( empty ($def_ledger))
{
exit(_('Pas de journal disponible'));
}
$Ledger->id = $def_ledger['jrn_def_id'];
}
else if (isset($_REQUEST ['p_jrn']))
$Ledger->id = $request_jrn;
else if (isset ($_REQUEST['p_jrn_predef'])){
$Ledger->id=$http->request('p_jrn_predef');
}
// pre defined operation
//
echo '
';
echo '
';
if ( $p_msg !="" ) echo '
'.$p_msg.'';
try
{
$payment=$http->request("e_mp", "string",0);
$date_payment=$http->request("mp_date", "string","");
$comm_payment=$http->request("e_comm_paiement", "string","");
$acompte=$http->request("acompte", "string",0);
echo "
";
}
catch (Exception $e)
{
alert($e->getMessage());
return;
}
$e_date=$http->request("e_date","string","");
if ($e_date=="" && $g_parameter->MY_DATE_SUGGEST=='Y')
{
echo create_script(" get_last_date()");
}
echo create_script(" update_name()");
echo '
';
return;
// end record invoice
?>