$io_function=new class_funciones();
//-------------------Obteniendo arreglo y variables de datos basicos----------------------------//
$ls_ruta=$_GET["ruta"];
//-----------Obteniedo la data a ser enviada al documento OpenOffice------------------------//
//--------------------------Datos del Contrato------------------------------------------//
$la_contrato=$io_funsob->uf_decodificar($_GET["contrato"]);
$la_unidadmulta=$io_funsob->uf_decodificar($_GET["unidadmulta"]);
$la_unidadgarantia=$io_funsob->uf_decodificar($_GET["unidadgarantia"]);
$CodigoContrato=$la_contrato["codcon"];
$FechaEmisionContrato=$io_function->uf_convertirfecmostrar($la_contrato["feccon"]);
$FechaInicioContrato=$io_function->uf_convertirfecmostrar($la_contrato["fecinicon"]);
$FechaFinalizacionContrato=$io_function->uf_convertirfecmostrar($la_contrato["fecfincon"]);
$PlazoDuracionContrato=$io_funsob->uf_convertir_decimalentero($la_contrato["placon"]);
$ls_unidad=$io_funsob->uf_convertir_letraunidad($la_contrato["placonuni"]);
$PlazoDuracionContrato=$PlazoDuracionContrato." ".$ls_unidad;
$MontoContrato=$io_funsob->uf_convertir_numerocadena($la_contrato["monto"]);
$MontoContratoLetras=$io_funsob->convertir($la_contrato["monto"]);
$li_pos=strpos($MontoContrato,",");
$ls_decimales=substr($MontoContrato,($li_pos+1),2);
$MontoContratoLetras=$MontoContratoLetras." con ".$ls_decimales."/100";
$MontoMultaIncumplimiento=$io_funsob->uf_convertir_numerocadena($la_contrato["mulcon"]);
if($io_funsob->uf_convertir_decimalentero($la_contrato["tiemulcon"])=="0")
{
$TiempoMultaInclumplimiento="---";
}
else
{
$TiempoMultaInclumplimiento=$io_funsob->uf_convertir_decimalentero($la_contrato["tiemulcon"]);
$ls_codproins="";
$ls_codpro="";
$ls_cedresact="";
$ls_civresact="";
$ls_civsup="";
$ls_civinsact="";
}
}
elseif($ls_operacion=="ue_cargarcontrato")
{
$lb_valido=$io_contrato->uf_select_contrato($ls_codcon,$la_data);
if($lb_valido)
{
$ls_fecinicon=$io_function->uf_convertirfecmostrar($la_data["fecinicon"][1]);
$ls_placon=$io_funsob->uf_convertir_decimalentero($la_data["placon"][1]);
$ls_placonuni=$la_data["nomuni"][1];
$ls_contasi=$la_data["nompro"][1];
$ls_moncon=$io_funsob->uf_convertir_numerocadena($la_data["monto"][1]);
$ls_estcon=$io_funsob->uf_convertir_numeroestado($la_data["estcon"][1]);
$ls_codobr=$la_data["codobr"][1];
$ls_codcon=$la_data["codcon"][1];
$lb_valido=$io_obra->uf_select_obra($ls_codobr,$la_data);
if($lb_valido)
{
$ls_desobr=$la_data["desobr"][1];
$ls_estobr=$la_data["desest"][1];
$ls_munobr=$la_data["denmun"][1];
$ls_comobr=$la_data["nomcom"][1];
$ls_parobr=$la_data["denpar"][1];
$ls_dirobr=$la_data["dirobr"][1];
//-----------Obteniedo la data a ser enviada al documento OpenOffice------------------------//
$la_puntodecuenta=$io_funsob->uf_decodificar($_GET["puntodecuenta"]);
$ls_codigopresupuestariomonto=$_GET["codigopresupuestariomonto"];
$ls_cuentamonto=$_GET["cuentamonto"];
$ls_codigopresupuestarioiva=$_GET["codigopresupuestarioiva"];
$ls_cuentaiva=$_GET["cuentaiva"];
$CodigoPuntodeCuenta=$la_puntodecuenta["codpuncue"];
$Fecha=$io_function->uf_convertirfecmostrar($la_puntodecuenta["fecpuncue"]);
$PresentadoA=$la_puntodecuenta["despuncue"] ;
$PresentadoPor=$la_puntodecuenta["rempuncue"] ;
$Asunto=$la_puntodecuenta["asupuncue"] ;
$Concepto=$la_puntodecuenta["desobr"] ;
$Contratista=$la_puntodecuenta["nompro"] ;
$RepresentanteContratista=$la_puntodecuenta["nomreppro"];
$ls_lapso=$io_funsob->uf_convertir_decimalentero ($la_puntodecuenta["lapejepuncue"]);
$ls_lapsoenletras=$io_funsob->convertir ($ls_lapso);
$LapsodeEjecucion=$ls_lapsoenletras." (".$ls_lapso.") ".$la_puntodecuenta["nomuni"];
$MontoNeto=$io_funsob->uf_convertir_numerocadena($la_puntodecuenta["monnetpuncue"]);
$MontoIva=$io_funsob->uf_convertir_numerocadena($la_puntodecuenta["monivapuncue"]);
$PorcentajeIva=$io_funsob->uf_convertir_numerocadena($la_puntodecuenta["porivapuncue"])."%";
$MontoBruto=$io_funsob->uf_convertir_numerocadena($la_puntodecuenta["monbrupuncue"]);
$MontoAnticipo=$io_funsob->uf_convertir_numerocadena($la_puntodecuenta["monantpuncue"]);
$PorcentajeAnticipo=$io_funsob->uf_convertir_numerocadena($la_puntodecuenta["porantpuncue"])."%";
$CodigoPresupuestarioCuentaMonto=$ls_codigopresupuestariomonto;
$CuentaMonto=$ls_cuentamonto;
$CodigoPresupuestarioCuentaIva=$ls_codigopresupuestarioiva;
$CuentaIva=$ls_cuentaiva;
//--------------------------Datos del Punto de Cuenta------------------------------------------//
