30 require
'../main.inc.php';
31 require_once DOL_DOCUMENT_ROOT.
'/loan/class/loan.class.php';
32 require_once DOL_DOCUMENT_ROOT.
'/core/lib/loan.lib.php';
33 if (!empty($conf->projet->enabled)) {
34 require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
37 $action =
GETPOST(
'action',
'aZ09');
40 $langs->loadLangs(array(
"loan"));
46 $object =
new Loan($db);
47 if ($id > 0) $object->fetch($id);
49 $permissionnote = $user->rights->loan->write;
56 include DOL_DOCUMENT_ROOT.
'/core/actions_setnotes.inc.php';
63 $form =
new Form($db);
65 $title = $langs->trans(
"Loan").
' - '.$langs->trans(
"Notes");
66 $help_url =
'EN:Module_Loan|FR:Module_Emprunt';
74 $totalpaid = $object->getSumPayment();
80 $morehtmlref =
'<div class="refidno">';
82 $morehtmlref .= $form->editfieldkey(
"Label",
'label', $object->label, $object, 0,
'string',
'', 0, 1);
83 $morehtmlref .= $form->editfieldval(
"Label",
'label', $object->label, $object, 0,
'string',
'', null, null,
'', 1);
85 if (!empty($conf->projet->enabled)) {
86 $langs->loadLangs(array(
"projects"));
87 $morehtmlref .=
'<br>'.$langs->trans(
'Project').
' : ';
88 if ($user->rights->loan->write) {
91 if ($action ==
'classify') {
93 $morehtmlref .=
'<form method="post" action="'.$_SERVER[
'PHP_SELF'].
'?id='.$object->id.
'">';
94 $morehtmlref .=
'<input type="hidden" name="action" value="classin">';
95 $morehtmlref .=
'<input type="hidden" name="token" value="'.newToken().
'">';
96 $morehtmlref .= $formproject->select_projects($object->socid, $object->fk_project,
'projectid', $maxlength, 0, 1, 0, 1, 0, 0,
'', 1);
97 $morehtmlref .=
'<input type="submit" class="button valignmiddle" value="'.$langs->trans(
"Modify").
'">';
98 $morehtmlref .=
'</form>';
100 $morehtmlref .= $form->form_project(
$_SERVER[
'PHP_SELF'].
'?id='.$object->id, $object->socid, $object->fk_project,
'none', 0, 0, 0, 1);
103 if (!empty($object->fk_project)) {
105 $proj->fetch($object->fk_project);
106 $morehtmlref .=
'<a href="'.DOL_URL_ROOT.
'/projet/card.php?id='.$object->fk_project.
'" title="'.$langs->trans(
'ShowProject').
'">';
107 $morehtmlref .= $proj->ref;
108 $morehtmlref .=
'</a>';
114 $morehtmlref .=
'</div>';
116 $linkback =
'<a href="'.DOL_URL_ROOT.
'/loan/list.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToList").
'</a>';
118 $object->totalpaid = $totalpaid;
120 dol_banner_tab($object,
'id', $linkback, 1,
'rowid',
'ref', $morehtmlref,
'', 0,
'', $morehtmlright);
122 print '<div class="fichecenter">';
123 print '<div class="underbanner clearboth"></div>';
125 $cssclass =
'titlefield';
126 $permission = $user->rights->loan->write;
127 include DOL_DOCUMENT_ROOT.
'/core/tpl/notes.tpl.php';
GETPOST($paramname, $check= 'alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
loan_prepare_head($object)
Prepare array with list of tabs.
Class to manage projects.
restrictedArea($user, $features, $objectid=0, $tableandshare= '', $feature2= '', $dbt_keyfield= 'fk_soc', $dbt_select= 'rowid', $isdraft=0)
Check permissions of a user to show a page and an object.
print $_SERVER["PHP_SELF"]
Edit parameters.
dol_get_fiche_head($links=array(), $active= '', $title= '', $notab=0, $picto= '', $pictoisfullpath=0, $morehtmlright= '', $morecss= '', $limittoshow=0, $moretabssuffix= '')
Show tabs of a record.
print
Draft customers invoices.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
dol_banner_tab($object, $paramid, $morehtml= '', $shownav=1, $fieldid= 'rowid', $fieldref= 'ref', $morehtmlref= '', $moreparam= '', $nodbprefix=0, $morehtmlleft= '', $morehtmlstatus= '', $onlybanner=0, $morehtmlright= '')
Show tab footer of a card.