$pdf = new Report_template();
$pdf->setVars($admin_aziend,$title);
$pdf->setFooterMargin(22);
$pdf->setTopMargin(43);
$pdf->setRiporti('');
$pdf->AddPage();
$paymov = new Schedule;
$paymov->setScheduledPartner($admin_aziend['mascli']);
if (sizeof($paymov->Partners) > 0) {
$anagrafica = new Anagrafica();
foreach ($paymov->Partners as $p){
$anagrafica = new Anagrafica();
$prt = $anagrafica->getPartner($p);
$pdf->SetFont('helvetica','B',10);
$pdf->SetFillColor(200,255,200);
$pdf->Ln(2);
$pdf->Cell(186,5,$prt['ragso1']." ".$prt['ragso2']." tel:".$prt['telefo']." fax:".$prt['fax']." mob:".$prt['cell']." ",1,1,'',1,'',1);
$pdf->SetFont('helvetica','',9);
$paymov->getPartnerStatus($p,substr($_GET['date'],0,10));
foreach ($paymov->PartnerStatus as $k=>$v){
$pdf->SetTextColor(255,0,0);
$pdf->SetFillColor(230,255,230);
$pdf->Cell(56,5,"REF: ".$k,1,0,'',1,'',1);
$pdf->SetTextColor(0);
$pdf->Cell(130,5,
$paymov->docData[$k]['descri'].' n.'.
$paymov->docData[$k]['numdoc'].'/'.
$paymov->docData[$k]['seziva'].' '.
$paymov->docData[$k]['datdoc']
,1,1);
foreach ($v as $ki=>$vi){
$pdf->setRiporti('');
$pdf->AddPage();
$config = new Config;
$paymov = new Schedule;
$ctrl_pm=0;
$pdf->SetFont('helvetica','',10);
$pdf->Cell(100,6,$d['d'][1]['descri'],1,1,'L',1,'',1);
while (list($k, $mv) = each($d['d'])) {
if ($ctrl_pm <> $mv["id_tesdoc_ref"]){
}
$pdf->Cell(30,6,$mv['id_tesdoc_ref'],'LTB',0,'L',0,'',1);
$pdf->Cell(70,6,$mv['t']['descri'],1,0,'L',0,'',1);
$pdf->Cell(25,6,$mv['t']["numdoc"].'/'.$mv['t']['seziva'],1,0,'C',0);
$pdf->Cell(25,6,gaz_format_date($mv['t']["datdoc"]),1,0,'C',0);
$pdf->Cell(36,6,gaz_format_number($mv['amount']),1,1,'R',0);
$ctrl_pm=$mv["id_tesdoc_ref"];
}
$pdf->Ln(10);
$pdf->SetFont('helvetica','B',10);
$pdf->Cell(150,6,$script_transl['tot'].': ','LTB',0,'R');
$pdf->Cell(36,6,'€ '.gaz_format_number($d['d'][1]['import']),'RTB',1,'R',1,'',1);
$pdf->Ln(10);
$pdf->SetFont('courier','',8);
$pdf->Cell(100,6,'');
$pdf->Cell(60,6,$admin_aziend['Nome'].' '.$admin_aziend['Cognome'],0,1,'C');
$pdf->Cell(100,6,'');
$pdf->Cell(60,20,'____________________________',0,0,'C');
$pdf->setRiporti('');
$pdf->Output();
?>
$totrom=0.00;
}
if($totlet > 0) $stampaval = gaz_format_number($totlet); else $stampaval = "(".gaz_format_number(-$totlet).")";
$pdf->SetFont('helvetica','B',8);
$pdf->Cell(145,4,"Totale ".$keylet,'LB',0,'R');
$pdf->Cell(10,4,$admin_aziend['curr_name'],1,0,'C');
$pdf->Cell(31,4,$stampaval,1,1,'R');
$pdf->SetFont('helvetica','',8);
$totlet=0.00;
}
$pdf->SetFont('helvetica','B',12);
$pdf->SetTextColor(0,0,255);
$pdf->Cell(155,6,"TOTALE DELL'ATTIVO ",1,0,'R');
$pdf->Cell(31,6,gaz_format_number($totale),1,1,'R');
$totale=0.00;
$pdf->Ln(6);
$pdf->SetTextColor(127,64,64);
$pdf->Cell(186,6,'PASSIVO','LTR',1,'C');
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('helvetica','',8);
foreach ($passivo as $keylet => $vallet) {
if (! key_exists($keylet,$pasdesc)) $keylet = "non class.";
$pdf->SetFont('helvetica','B',8);
$pdf->Cell(186,4,$keylet.$pasdesc[$keylet]['Titolo'],'LR',1);
$pdf->SetFont('helvetica','',8);
foreach ($vallet as $keyrom => $valrom) {
$pdf->Cell(15,4,'','LR');
$pdf->Cell(50,4,$nromani[intval($keyrom)].@$pasdesc[$keylet][intval($keyrom)],'R',0,'R');
$pdf->Cell(121,4,'','LR',1);
foreach ($valrom as $key => $value) {
$conto = substr($key,4,3);
$aRiportare['bot'][5]['nam'] += $totale;
$pdf->setRiporti($aRiportare);
$pdf->Cell(8,3,'','LB');
$pdf->Cell(20,3,$value['persona_fisica'],'B');
$pdf->Cell(30,3,$value['Codice_Fiscale'],'B');
$pdf->Cell(20,3,$value['Partita_IVA'],'B',0,'C');
$pdf->Cell(10,3,$value['Num_Documenti'],'B',0,'R');
$pdf->Cell(18,3,gaz_format_number($value['operazioni_imponibili']),'B',0,'R');
$pdf->Cell(18,3,gaz_format_number($value['imposte_addebitate']),'B',0,'R');
$pdf->Cell(18,3,gaz_format_number($value['operazioni_esente']),'B',0,'R');
$pdf->Cell(19,3,gaz_format_number($value['operazioni_nonimp']),'B',0,'R');
$pdf->Cell(20,3,gaz_format_number($totale),'B',0,'R');
$pdf->Cell(6,3,'','B',1);
}
}
$pdf->Ln(1);
$pdf->SetFont('helvetica','B',8);
$aRiportare['bot'][0]['nam'] = ' TOTALI : ';
foreach ($aRiportare['bot'] as $key=>$value){
if ($key > 0 and $key < 6) {
$value['nam']= gaz_format_number($value['nam']);
}
$pdf->Cell($value['lun'],4,$value['nam'],1,0,'R');
}
$pdf->setRiporti('');
$pdf->setPageTitle($script_transl[4].' '.$script_transl[3].' - '.$script_transl[5].' '.$_GET['anno']);
$pdf->AddPage();
if ($_GET['partner'] == 2 or $_GET['partner'] == 3){
$aRiportare['top'][1]['nam'] = 0;
$aRiportare['bot'][1]['nam'] = 0;
$aRiportare['top'][2]['nam'] = 0;
