";
$r.='
Actions
';
$r.='
';
$r.="";
$r.=" | ";
$r.="code | ";
$r.="Dénomination | ";
$r.="Description | ";
$r.="Montant | ";
$r.=' Op. Concerné | ';
$r.="
";
// Parse each " tiers"
for ($i=0; $i < $p_item; $i++) {
$tiers=(isset(${"e_other".$i}))?${"e_other".$i}:"";
$tiers_label="";
$tiers_amount=(isset(${"e_other$i"."_amount"}))?round(${"e_other$i"."_amount"},2):0;
$tiers_comment=(isset (${"e_other$i"."_comment"}))?${"e_other$i"."_comment"}:"";
// If $tiers has a value
if ( $tiers != "" )
{
// retrieve the tva label and name
$a_fiche=GetFicheAttribut($p_cn, $tiers);
if ( $a_fiche != null ) {
$tiers_label=$a_fiche['vw_name'];
}
}
${"e_other$i"."_amount"}=(isset (${"e_other$i"."_amount"}))?${"e_other$i"."_amount"}:0;
$W1=new widget("js_search");
$W1->label="";
$W1->name="e_other".$i;
$W1->value=$tiers;
$W1->extra='cred'; // credits
$W1->extra2=$p_jrn;
$W1->readonly=$pview_only;
$r.="".$W1->IOValue()."";
// label
$other=new widget("span");
$r.="| ";
$r.=$other->IOValue("e_other$i"."_label", $tiers_label);
// Comment
$wComment=new widget("text");
$wComment->table=1;
$wComment->SetReadOnly($pview_only);
$r.=$wComment->IOValue("e_other$i"."_comment",$tiers_comment);
// amount
$wAmount=new widget("text");
$wAmount->table=1;
$wAmount->size=7;
$wAmount->SetReadOnly($pview_only);
$r.=$wAmount->IOValue("e_other$i"."_amount",$tiers_amount);
// concerned
${"e_concerned".$i}=(isset(${"e_concerned".$i}))?${"e_concerned".$i}:"";
$wConcerned=new widget("js_concerned");
$wConcerned->SetReadOnly($pview_only);
$wConcerned->extra=0;
$wConcerned->table=1;
$wConcerned->extra2='paid';
$r.=$wConcerned->IOValue("e_concerned".$i,${"e_concerned".$i});
$r.=' |
';
// if not recorded the new amount must be recalculate
// if recorded the old amount is recalculated
if ( $pview_only == true)
$new_solde=($p_save==false)?$new_solde+$tiers_amount:$new_solde-$tiers_amount;
}
$r.="
";
if ( $pview_only==true && $p_save==false) {
// check for upload piece
$file=new widget("file");
$file->table=1;
$r.="
";
$r.= "
";
$r.="".$file->IOValue("pj","","Pièce justificative")."
";
$r.="
";
$r.="
";
$chk=new widget('checkbox');
$chk->selected=true;
$r.="Sauvez l'opération ?";
$r.=$chk->IOValue('opd_save');
$name=new widget('text');
$r.='nom de l\' opération ?'.$name->IOValue('predef');
}
// Set correctly the REQUEST param for jrn_type
$h=new widget('hidden');
$h->name='jrn_type';
$h->value='FIN';
$r.=$h->IOValue();
$r.=$p_submit;
$r.="