Example #1
0
$langs->load("categories");
$langs->load("withdrawals");
// Security check
if ($user->societe_id > 0) {
    accessforbidden();
}
// Get supervariables
$prev_id = GETPOST('id', 'int');
$page = GETPOST('page', 'int');
/*
 * View
 */
llxHeader('', $langs->trans("WithdrawalsReceipts"));
if ($prev_id) {
    $bon = new BonPrelevement($db, "");
    if ($bon->fetch($prev_id) == 0) {
        $head = prelevement_prepare_head($bon);
        dol_fiche_head($head, 'statistics', $langs->trans("WithdrawalsReceipts"), '', 'payment');
        print '<table class="border" width="100%">';
        print '<tr><td width="20%">' . $langs->trans("Ref") . '</td><td>' . $bon->getNomUrl(1) . '</td></tr>';
        print '<tr><td width="20%">' . $langs->trans("Date") . '</td><td>' . dol_print_date($bon->datec, 'day') . '</td></tr>';
        print '<tr><td width="20%">' . $langs->trans("Amount") . '</td><td>' . price($bon->amount) . '</td></tr>';
        // Status
        print '<tr><td width="20%">' . $langs->trans('Status') . '</td>';
        print '<td>' . $bon->getLibStatut(1) . '</td>';
        print '</tr>';
        if ($bon->date_trans != 0) {
            $muser = new User($db);
            $muser->fetch($bon->user_trans);
            print '<tr><td width="20%">' . $langs->trans("TransData") . '</td><td>';
            print dol_print_date($bon->date_trans, 'day');
Example #2
0
require_once DOL_DOCUMENT_ROOT . "/compta/prelevement/class/bon-prelevement.class.php";
$langs->load("bills");
$langs->load("categories");
// Security check
$socid = 0;
$id = GETPOST('id', 'int');
$ref = GETPOST('ref', 'alpha');
if ($user->societe_id) {
    $socid = $user->societe_id;
}
$result = restrictedArea($user, 'prelevement', $id);
llxHeader('', 'Bon de prelevement');
$form = new Form($db);
if ($id > 0 || !empty($ref)) {
    $object = new BonPrelevement($db, "");
    if ($object->fetch($id) == 0) {
        $head = prelevement_prepare_head($object);
        dol_fiche_head($head, 'preview', 'Prelevement : ' . $object->ref);
        print '<table class="border" width="100%">';
        print '<tr><td width="20%">' . $langs->trans("Ref") . '</td><td>' . $object->ref . '</td></tr>';
        print '<tr><td width="20%">' . $langs->trans("Amount") . '</td><td>' . price($object->amount) . '</td></tr>';
        print '<tr><td width="20%">' . $langs->trans("File") . '</td><td>';
        $relativepath = 'bon/' . $object->ref;
        print '<a href="' . DOL_URL_ROOT . '/document.php?type=text/plain&amp;modulepart=prelevement&amp;file=' . urlencode($relativepath) . '">' . $object->ref . '</a>';
        print '</td></tr>';
        print '</table><br>';
        $fileimage = $conf->prelevement->dir_output . '/receipts/' . $object->ref . '.ps.png.0';
        $fileps = $conf->prelevement->dir_output . '/receipts/' . $object->ref . '.ps';
        // Conversion du PDF en image png si fichier png non existant
        if (!file_exists($fileimage)) {
            if (class_exists("Imagick")) {
Example #3
0
    }
}
/*
 * View
 */
llxHeader('', $langs->trans("StandingOrder"));
$h = 0;
$head[$h][0] = DOL_URL_ROOT . '/compta/prelevement/ligne.php?id=' . $id;
$head[$h][1] = $langs->trans("Card");
$hselected = $h;
$h++;
if ($id) {
    $lipre = new LignePrelevement($db, $user);
    if ($lipre->fetch($id) == 0) {
        $bon = new BonPrelevement($db);
        $bon->fetch($lipre->bon_rowid);
        dol_fiche_head($head, $hselected, $langs->trans("StandingOrder"));
        print '<table class="border" width="100%">';
        print '<tr><td width="20%">' . $langs->trans("WithdrawalReceipt") . '</td><td>';
        print '<a href="fiche.php?id=' . $lipre->bon_rowid . '">' . $lipre->bon_ref . '</a></td></tr>';
        print '<tr><td width="20%">' . $langs->trans("Date") . '</td><td>' . dol_print_date($bon->datec, 'day') . '</td></tr>';
        print '<tr><td width="20%">' . $langs->trans("Amount") . '</td><td>' . price($lipre->amount) . '</td></tr>';
        print '<tr><td width="20%">' . $langs->trans("Status") . '</td><td>';
        print $lipre->LibStatut($lipre->statut, 1) . '</td></tr>';
        if ($lipre->statut == 3) {
            $rej = new RejetPrelevement($db, $user);
            $resf = $rej->fetch($lipre->id);
            if ($resf == 0) {
                print '<tr><td width="20%">' . $langs->trans("RefusedReason") . '</td><td>' . $rej->motif . '</td></tr>';
                print '<tr><td width="20%">' . $langs->trans("RefusedData") . '</td><td>';
                if ($rej->date_rejet == 0) {
Example #4
0
}


/*
 * View
 */

llxHeader('',$langs->trans("WithdrawalReceipt"));

$html = new Form($db);

if ($id)
{
	$bon = new BonPrelevement($db,"");

	if ($bon->fetch($id) == 0)
	{
		$head = prelevement_prepare_head($bon);
		dol_fiche_head($head, 'prelevement', $langs->trans("WithdrawalReceipt"), '', 'payment');

		if (GETPOST("error")!='')
		{
			print '<div class="error">'.$bon->ReadError(GETPOST("error")).'</div>';
		}

		if ($action == 'credite')
		{
			$ret=$html->form_confirm("fiche.php?id=".$bon->id,$langs->trans("ClassCredited"),$langs->trans("ClassCreditedConfirm"),"confirm_credite",'',1,1);
			if ($ret == 'html') print '<br>';
		}
Example #5
0
    $bon->fetch($id);
    $dt = dol_mktime(12, 0, 0, GETPOST('remonth', 'int'), GETPOST('reday', 'int'), GETPOST('reyear', 'int'));
    $error = $bon->set_infocredit($user, $dt);
    if ($error) {
        header("Location: card.php?id=" . $id . "&error={$error}");
        exit;
    }
}
/*
 * View
 */
$bon = new BonPrelevement($db, "");
$form = new Form($db);
llxHeader('', $langs->trans("WithdrawalsReceipts"));
if ($id > 0) {
    $bon->fetch($id);
    $head = prelevement_prepare_head($bon);
    dol_fiche_head($head, 'prelevement', $langs->trans("WithdrawalsReceipts"), '', 'payment');
    if (GETPOST('error', 'alpha') != '') {
        print '<div class="error">' . $bon->ReadError(GETPOST('error', 'alpha')) . '</div>';
    }
    /*if ($action == 'credite')
    	{
    		print $form->formconfirm("card.php?id=".$bon->id,$langs->trans("ClassCredited"),$langs->trans("ClassCreditedConfirm"),"confirm_credite",'',1,1);
    
    	}*/
    print '<table class="border" width="100%">';
    print '<tr><td width="20%">' . $langs->trans("Ref") . '</td><td>' . $bon->getNomUrl(1) . '</td></tr>';
    print '<tr><td width="20%">' . $langs->trans("Date") . '</td><td>' . dol_print_date($bon->datec, 'day') . '</td></tr>';
    print '<tr><td width="20%">' . $langs->trans("Amount") . '</td><td>' . price($bon->amount) . '</td></tr>';
    // Status