";
print "close();";
print "";
}
//ini_set('memory_limit','2048M');
//ini_set('max_execution_time','0');
function error($tipo,$msj){
switch($tipo){
case 'tamaño_fila':
$mensaje = 'ERROR DE TABLA: El tamaño de la fila es mas grande que el de la página.';
break;
}
print "";
exit();
}
function columna($id,$dato,$prop,$textalign='L',$valign='T'){
global $pdf,$margen_tabla,$ancho,$altura;
// MultiCell($w, $h, $txt, $border=0, $align='J', $fill=0, $ln=1, $x='', $y='', $reseth=true, $stretch=0, $ishtml=false, $autopadding=true, $maxh=0, $valign='T', $fitcell=false,opciones_adicionales)
$pdf->MultiCell($ancho[$id], $prop['alturamaxima'], utf8_encode($dato), 1, $textalign, 1, 0, '', '', true, 0, true, false, 0, $valign,false,$prop);
if($pdf->saltopag){return false;}
$altura[$id]=$pdf->altura_celda;
return $altura;
}
function procesar_fila($datos){
global $pdf,$margen_tabla,$ancho;
$altura_pagina = $pdf->getPageHeight();
$prop['alturamaxima']=3;
$prop['check_pagebreak']=0;
$pdf->startMultipleTransaction();
$prop['alturamaxima'] = fila($datos,$prop);
if($prop['alturamaxima']>$altura_pagina){error('tamaño_fila');}
$salto = $pdf->saltopag;
$pdf = $pdf->rollbackMultipleTransaction();
if($salto){
$pdf->AddPage();
encabezado();
$pdf->startMultipleTransaction();
$prop['alturamaxima'] = fila($datos,$prop);
$pdf = $pdf->rollbackMultipleTransaction();
$salto = 0;
}
$pdf->startMultipleTransaction();
$pagina = $pdf->getPage();
fila($datos,$prop);
$pagina2 = $pdf->getPage();
if($pagina!=$pagina2){
$pdf = $pdf->rollbackMultipleTransaction();
$pdf->AddPage();
encabezado();
fila($datos,$prop);
}
else{
$pdf->commitMultipleTransaction();
}
}
/*
$ruta = '../../';
require_once("../clases/covensol_fop_c_formulacion.php");
$objcxc=new covensol_fop_c_formulacion($propiedades);
$objcxc->cargar_seguridad("FOP","covensol_fop_d_dt_ep3.php");
*/
$ruta = '../../';
include($ruta."cxc/clases/covensol_cxc_c_cuentasxcobrar.php");
$propiedades['habilitar_json'] = 'no';
$objcxc = new covensol_cxc_cuentasxcobrar($propiedades);
$valido = $objcxc->cargar_seguridad("CXC","covensol_cxc_rpp_contable_factura.php");
if($valido===false){exit();}
$fecha_actual = date("d/m/Y");
if(!$_GET['id_doc']){
print "";
exit();
}
$param = $_GET;
$param['criterio']='por_codigo';
require_once('../../shared/tcpdf_new/config/lang/ita.php');
require_once('../../shared/tcpdf_new/tcpdf_rep.php');
$parametros = array();
//$objcxc->io_conexiones->decodificar_get();
$parametros = $objcxc->io_conexiones->asignar_get();
$datos_encabezado = ' '.'FECHA Y HORA: '.date('d/m/Y').' - '.date('H:i').'
USUARIO: '.$_SESSION["la_logusr"].'
';
$pdf = new TCPDFREP('PORTRAIT', PDF_UNIT, 'LETTER', true, 'UTF-8', false);
$pdf->SetMargins(PDF_MARGIN_LEFT, 15, PDF_MARGIN_RIGHT);
$pdf->setHeaderFont(array('', '', 8));
$pdf->ancho_logo = $_SESSION["ls_width"]*0.5;
$pdf->alto_logo = $_SESSION["ls_height"]*0.3;
$pdf->SetHeaderData('../../shared/imagebank/'.$_SESSION["ls_logo"], $_SESSION["ls_width"], '', $datos_encabezado);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
$pdf->setFooterFont(array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
$pdf->SetAutoPageBreak(TRUE, 10);
$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
$pdf->setPrintHeader(true);
$pdf->AddPage();
$pdf->Ln();
$pdf->SetLineStyle(array('width' => 0.1, 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(200, 200, 200)));
$objcxc->RepParam=array();
$objcxc->RepParam['ancho'][1] = 80;
$objcxc->RepParam['ancho'][2] = 100;
$objcxc->RepParam['ancho'][3] = 310;
$objcxc->RepParam['ancho'][4] = 50;
$objcxc->RepParam['ancho'][5] = 120;
$objcxc->RepParam['ancho']['total'] = array_sum($objcxc->RepParam['ancho']);
$objcxc->RepParam['encabezado']['color_fondo'] = '#000066';
$objcxc->RepParam['encabezado']['color_letra'] = '#FFFFFF';
$objcxc->RepParam['encabezado']['tamaño'] = 10;
$objcxc->RepParam['encabezado2']['color_fondo'] = '#E8F3FD';
$objcxc->RepParam['encabezado2']['color_letra'] = '#000000';
$objcxc->RepParam['fila']['color_fondo'] = '#FFFFFF';
$objcxc->RepParam['fila']['color_letra'] = '#000000';
$objcxc->RepParam['fila']['tamaño'] = 8;
$paramrep=array();
$paramrep['color_tit']="#FFFFFF";
$paramrep['color_dato']="#000000";
$paramrep['color_etiqueta']="#000055";
$paramrep['fondo_tit']="#000066";
$paramrep['fondo_tit2']="#E1F0FF";
$paramrep['color_tit2']="#000000";
$paramrep['ancho_total'] = 660;
$paramrep['fondo_dato']="#FFFFFF";
$paramrep['ancho_etiqueta']="150";
$paramrep['ancho_dato']=$paramrep['ancho_total']-$paramrep['ancho_etiqueta'];
$paramrep['tamano_letra']="8";
$paramrep['ancho_tit']=$paramrep['ancho_total'];
$paramrep['ancho_etiqueta_numcor']="440";
$paramrep['ancho_dato_numcor']="110";
$paramrep['tamano_letra_numcor']="8";
$paramrep['color_numcor']="#0000AA";
$paramrep['color_etiqueta_numcor']="#000000";
$paramrep['fondo_numcor']="#FFFFFF";
$ancho_firma = $paramrep['ancho_total']/3;
$prop['criterio']='por_id';
$prop['id_doc']=$_GET['id_doc'];
$RsDoc = $objcxc->extraerdatos_documento($prop);
if($RsDoc===false){exit();}
if(!$RsDoc['rs']->RecordCount()){
error('','No se encontro información de la Nota de Crédito');
exit();
}
$objcxc->DatosDocBD = $RsDoc['rs']->fields;
$DatosDoc = $RsDoc['rs']->fields;
//SEGURIDAD DE LA SUCURSAL
$objcxc->codintper = $DatosDoc['codsuc'];
if(!$objcxc->obtSegCxc()){$objcxc->MensajeReporte("No tiene permisos para la Sucursal"); $objcxc->CerrarVentana();}
//SEGURIDAD DE LA CAJA
$objcxc->codintper = $DatosDoc['codsuc'].' - '.$DatosDoc['codcaj'];
if(!$objcxc->obtSegCxc()){$objcxc->MensajeReporte("No tiene permisos para la Caja"); $objcxc->CerrarVentana();}
$objcxc->CargarMonedaLocal=$_GET['forzarlocal'];
$resp=$objcxc->ConfPresentMoneda($DatosDoc);
if($resp===false){exit();}
$DatosDoc = $objcxc->FormatDatosDocPresent($DatosDoc);
if($DatosDoc===false){exit();}
if($DatosDoc['abrmon']=='E'){$DatosDoc['abrmon']='€';}
function datos_resumen($parametro=array()){
global $paramrep,$DatosDoc,$objcxc,$parametros;
$tabla="";
//$datosenc = $objcxc->FormatLonCodEstPro($parametros);
$tabla = '
| DETALLE CONTABLE DE LA NOTA DE CRÉDITO |
';
$tabla = $tabla.'
| SUCURSAL: |
'.'('.$DatosDoc['codsuc'].') - '.$DatosDoc['nomsuc'].' |
CAJA: |
'.'('.$DatosDoc['codcaj'].') - '.$DatosDoc['nomcaj'].' |
';
$tabla = $tabla.'
| NOTA DE CRÉDITO: |
'.$DatosDoc['numdoc'].' |
FECHA: |
'.$DatosDoc['fecdoc'].' |
';
$tabla = $tabla.'
| SUB TOT NC: |
'.$DatosDoc['subtot_doc'].' |
BASE IMP NC: |
'.$DatosDoc['baseimp_doc'].' |
';
$tabla = $tabla.'
| IVA NC: |
'.$DatosDoc['iva_doc'].' |
TOTAL NC: |
'.$DatosDoc['total_doc'].' |
';
$tabla .= '
';
$tabla .= '';
$tabla = $tabla.'
| FACTURA: |
'.$DatosDoc['numfact'].' |
CLIENTE: |
'.$DatosDoc['nombre_cliente'].' |
';
$tabla = $tabla.'
| RIF: |
'.$DatosDoc['rif_completo'].' |
COND. PAGO: |
'.$DatosDoc['desccondpago'].' |
';
$tabla = $tabla.'
| FECHA FACT: |
'.$DatosDoc['fecfact'].' |
N° CONT FACT: |
'.$DatosDoc['numcont'].' |
';
$tabla = $tabla.'
| SUB TOT: |
'.$DatosDoc['subtot'].' |
BASE IMP: |
'.$DatosDoc['baseimp'].' |
';
$tabla = $tabla.'
| IVA: |
'.$DatosDoc['iva'].' |
TOTAL: |
'.$DatosDoc['total'].' |
';
if($objcxc->MonedaExtranjera){
$tabla = $tabla.'
| MONEDA: |
'.$DatosDoc['denmon'].' ('.$DatosDoc['abrmon'].') |
TASA DE CAMBIO: |
'.$DatosDoc['tascam'].' |
';
}
$tabla = $tabla.'
| DESC./OBS.: |
'.trim($DatosDoc['descripfact']).' |
';
return $tabla;
}
$y_actual = $pdf->GetY();
function Firnas(){
global $ancho_firma;
$FirmaSello = '
| ELABORADO |
VERIFICADO |
AUTORIZADO |
|
|
|
|
';
return $FirmaSello;
}
$pdf->writeHTML(utf8_encode(datos_resumen()), true, false, false, false, '');
$pdf->Ln();
//$InfoSpi = $objcxc->RepInfoSpi($parametros);
$InfoSpi = $objcxc->RepDocInfoSpi($DatosDoc);
$pdf->writeHTML(utf8_encode($InfoSpi), true, false, false, false, '');
$pdf->Ln();
$objcxc->RepParam['ancho']=array();
$objcxc->RepParam['ancho']['total']=0;
$objcxc->RepParam['ancho'][1] = 120;
$objcxc->RepParam['ancho'][2] = 360;
$objcxc->RepParam['ancho'][3] = 90;
$objcxc->RepParam['ancho'][4] = 90;
$objcxc->RepParam['ancho']['total'] = array_sum($objcxc->RepParam['ancho']);
$InfoScg = $objcxc->RepDocInfoScg($DatosDoc);
$pdf->writeHTML(utf8_encode($InfoScg), true, false, false, false, '');
$pdf->Ln();
//$pdf->Ln();
$objcxc->RepParam['ancho']=array();
$objcxc->RepParam['ancho']['total']=0;
$objcxc->RepParam['ancho'][1] = 40;
$objcxc->RepParam['ancho'][2] = 250;
$objcxc->RepParam['ancho'][3] = 120;
$objcxc->RepParam['ancho'][4] = 40;
$objcxc->RepParam['ancho'][5] = 100;
$objcxc->RepParam['ancho'][6] = 100;
$objcxc->RepParam['ancho']['total'] = array_sum($objcxc->RepParam['ancho']);
$DatosDoc['codproceso']='NOTCRE';
$InfoCar = $objcxc->RepInfoCargos($DatosDoc);
$pdf->writeHTML(utf8_encode($InfoCar), true, false, false, false, '');
$pdf->Ln();
/*
$pdf->AddPage('LANDSCAPE','LEGAL');
$objcxc->RepParam['ancho']=array();
$objcxc->RepParam['ancho']['total']=0;
$objcxc->RepParam['ancho'][1] = 30;
$objcxc->RepParam['ancho'][2] = 45;
$objcxc->RepParam['ancho'][3] = 50;
$objcxc->RepParam['ancho'][4] = 115;
$objcxc->RepParam['ancho'][5] = 65;
$objcxc->RepParam['ancho'][6] = 65;
$objcxc->RepParam['ancho'][7] = 65;
$objcxc->RepParam['ancho'][8] = 65;
$objcxc->RepParam['ancho'][9] = 65;
$objcxc->RepParam['ancho'][10] = 40;
$objcxc->RepParam['ancho'][11] = 65;
$objcxc->RepParam['ancho'][12] = 65;
$objcxc->RepParam['ancho'][13] = 65;
$objcxc->RepParam['ancho'][14] = 65;
$objcxc->RepParam['ancho'][15] = 65;
$objcxc->RepParam['ancho'][16] = 65;
$objcxc->RepParam['ancho'][17] = 65;
$objcxc->RepParam['ancho'][18] = 65;
$objcxc->RepParam['encabezado']['color_fondo'] = '#000066';
$objcxc->RepParam['encabezado']['color_letra'] = '#FFFFFF';
$objcxc->RepParam['encabezado']['tamaño'] = 6;
$objcxc->RepParam['encabezado2']['color_fondo'] = '#E8F3FD';
$objcxc->RepParam['encabezado2']['color_letra'] = '#000000';
$objcxc->RepParam['fila']['color_fondo'] = '#FFFFFF';
$objcxc->RepParam['fila']['color_letra'] = '#000000';
$objcxc->RepParam['fila']['tamaño'] = 6;
$objcxc->RepParam['ancho']['total'] = array_sum($objcxc->RepParam['ancho']);
$ancho_firma=$objcxc->RepParam['ancho']['total']/3;
$objcxc->RepParamTotal['ancho'][1]=200;
$objcxc->RepParamTotal['ancho'][2]=80;
$objcxc->RepParamTotal['ancho'][3]=80;
$objcxc->RepParamTotal['ancho'][4]=80;
$objcxc->RepParamTotal['ancho']['total'] = array_sum($objcxc->RepParamTotal['ancho']);
$objcxc->codtipmov='REGFAC';
$DatosDoc['criterio']='por_fact';
$InfoLibVent = $objcxc->RepLibVent($DatosDoc);
$pdf->writeHTML(utf8_encode($InfoLibVent), true, false, false, false, '');
$pdf->Ln();
$y = $pdf->GetY();
if($y>100){$pdf->AddPage();}
$pdf->writeHTML(utf8_encode($objcxc->HTMLTotalesRepLibVent), true, false, false, false, '');
*/
$y = $pdf->GetY();
//225
if($y>175){$pdf->AddPage();}
$pdf->SetY(175);
$pdf->SetLineStyle(array('width' => 0.85 / $pdf->getScaleFactor(), 'cap' => 'butt', 'join' => 'miter', 'dash' => 0, 'color' => array(0, 0, 0)));
$pdf->writeHTML(utf8_encode(Firnas()), true, false, false, false, '');
$pdf->Output('Informacion_contable_factura_'.$_GET['numfact'].'_'.date('dmY').'.pdf', 'I');
?>