<?php
class sigesp_cfg_c_empresa
{
  
    var $ls_sql;
	var $io_seguridad;
    var $ls_codemp;


	function sigesp_cfg_c_empresa($conn)//Constructor de la Clase.
	{
      require_once("class_cfg_c_fill_datos.php");  
	  $this->io_sql        = new class_sql($conn);		
	  $this->io_msg        = new class_mensajes();
	  $this->io_funcion    = new class_funciones();
	  $this->io_fill_datos = new class_cfg_c_fill_datos();
	}
 

function uf_insert_empresa() 
{
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	//
	//	Function: uf_insert_empresa()
	//	Access:  public
	//	Description: Este método inserta un registro por defecto dentro de la Tabla sigesp_empresa 
	//               si una vez realizada la busqueda la empresa 0001 "No existe" 
	//               en la Base de Datos seleccionada.
	/////////////////////////////////////////////////////////////////////////////////////////////////////////

    $arr_date = getdate();
	$ls_ano = $arr_date["year"];
	$ls_sql = " INSERT INTO sigesp_empresa                                                                    ". 
	          " (codemp,nombre,nomres,titulo,sigemp,direccion,telemp,faxemp,email,website,m01,m02,m03,m04,    ".
			  " m05,m06,m07,m08,m09,m10,m11,m12,periodo,vali_nivel,esttipcont,formpre,formcont,formplan,      ".
			  " formspi,activo,pasivo,ingreso,gasto,resultado,capital,c_resultad,c_resultan,orden_d,          ". 
			  " orden_h,soc_gastos,soc_servic,activo_h,pasivo_h,resultado_h,                                  ".
			  " ingreso_f,gasto_f,ingreso_p,gasto_p,logo,numniv,nomestpro1,nomestpro2,nomestpro3,             ".
			  " nomestpro4,nomestpro5,estvaltra,estmodape,estdesiva,estprecom,codorgsig,salinipro,salinieje,  ".
			  " numordcom,numordser,numsolpag,estmodest,numlicemp,modageret,socbieser,concomiva,estmodiva,    ".
			  " cedben,nomben,scctaben,diacadche,nroivss,nomrep,cedrep,telfrep,cargorep,estretiva,confinstr,confi_ch,ctaresant,ctaresact,tipo_ente)                                                             ".
			  " VALUES                                                                                        ".
			  " ('0001','SIGESP CA','','Sigesp CA','SIGESP','Urbanizacion Del Este','02512547643',            ".
			  " '02512547643','sigesp@gmail.com','sigespweb@sigesp.com',1,1,1,1,1,1,1,1,1,1,1,1,              ".
			  " '".$ls_ano.'-01-01'."',1,1,'999-99-99-99','999-99-99-99','999-99-99-99','999-99-99-99','1',   ".
			  " '2','3','4','5','7','5010201000000','5010201000000','1','2','10101010101','10101010101',      ".
			  " '11','22','12','1','2','2','1','',3,                                                          ".
			  " 'Proyecto y/o Acciones Centralizadas','Acciones Especificas','Otros.','',                     ".
			  " '',1,0,0,0,'',0,0,0,0,0,1,'0000000000000000000000000','B',1,'',0,'','','','','','','','','','B','N','0','','','INS')";
	$this->io_sql->begin_transaction();
	$rs_data=$this->io_sql->execute($ls_sql);
    if ($rs_data===false)
	   {
		 $this->io_sql->rollback();
         $this->io_msg->message("CLASE->SIGESP_CFG_C_EMPRESA; METODO->uf_insert_empresa;ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));   
	   }
	else
	   {
         $lb_valido=$this->io_fill_datos->uf_main_fill();
		 if($lb_valido)
		   {
			 if($lb_valido)
			 {
			     $this->io_sql->commit();
			 }  
			 else
			 {
				 $this->io_sql->rollback();
			 }  
		   }
		 else
		   {
			 $this->io_sql->rollback();
		   }
       }
}

function uf_update_empresa($ar_datos,$aa_seguridad) 
{
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	//	Function: uf_update_empresa($ar_datos,$aa_seguridad)
	//	Access:  public
	//	Arguments:
	//  ar_datos      Arreglo cargado con la nueva data proveniente de la Interfaz Empresa dentro del 
	//                Módulo de Configuración del sistema. 
	//	Description:  Este método realiza la actualización en la Tabla sigesp_empresa con los valores 
	//                almacenados en el arreglo $ar_datos.
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
    require_once("../shared/class_folder/sigesp_c_seguridad.php");
	$this->io_seguridad= new sigesp_c_seguridad();
	$this->ls_codemp=$_SESSION["la_empresa"]["codemp"];
	$ls_codemp           = $ar_datos["codemp"];
	$ls_nombre           = $ar_datos["nombre"];
	$ls_nomres           = $ar_datos["nomres"];
	$ls_titulo           = $ar_datos["titulo"];
	$ls_direccion        = $ar_datos["direccion"];
	$ls_ciuemp           = $ar_datos["ciuemp"];
	$ls_estemp           = $ar_datos["estemp"];
	$ls_zonpos           = $ar_datos["zonpos"];
	$ls_telefono         = $ar_datos["telefono"];
	$ls_fax              = $ar_datos["fax"];
	$ls_email            = $ar_datos["email"];
	$ls_website          = $ar_datos["website"];
	$ls_nomorgads        = $ar_datos["nomorgads"];
	$li_enero            = $ar_datos["enero"];
	$li_febrero          = $ar_datos["febrero"];
	$li_marzo            = $ar_datos["marzo"];
	$li_abril            = $ar_datos["abril"];
	$li_mayo             = $ar_datos["mayo"];
	$li_junio            = $ar_datos["junio"];
	$li_julio            = $ar_datos["julio"];
	$li_agosto           = $ar_datos["agosto"];
	$li_septiembre		 = $ar_datos["septiembre"];
	$li_octubre			 = $ar_datos["octubre"];
	$li_noviembre		 = $ar_datos["noviembre"];
	$li_diciembre        = $ar_datos["diciembre"];
    $ls_fechaperiodo     = $ar_datos["periodo"];
	$ls_periodo      	 = $this->io_funcion->uf_convertirdatetobd($ls_fechaperiodo);
	$ls_nivel            = $ar_datos["nivelval"];
	$ls_tipocontabilidad = trim($ar_datos["tipocontabilidad"]);
	$ls_formpre          = $ar_datos["pgasto"];
	$ls_formcont         = $ar_datos["contabilidad"];
	$ls_formplan         = $ar_datos["planunico"];
	$ls_formspi          = $ar_datos["pingreso"];
	$ls_activo			 = $ar_datos["activo"];
	$ls_pasivo			 = $ar_datos["pasivo"];
	$ls_ingreso          = $ar_datos["ingreso"];
	$ls_gasto            = $ar_datos["gasto"];
	$ls_resultado        = $ar_datos["resultado"];
	$ls_capital          = $ar_datos["capital"];
	$ls_cresultad        = $ar_datos["resultadoactual"];
	$ls_cresultan        = $ar_datos["resultadoanterior"];
	$ls_ordend           = $ar_datos["ordendeudor"];
	$ls_ordenh           = $ar_datos["ordenacreedor"];
	$ls_socgastos        = $ar_datos["cuentabienes"];
	$ls_socservic        = $ar_datos["cuentaservicios"];
	$ls_activoh          = $ar_datos["haciendaactivo"];
	$ls_pasivoh          = $ar_datos["haciendapasivo"];
	$ls_resultadoh       = $ar_datos["haciendaresul"];
	$ls_ingresof         = $ar_datos["fiscalingreso"];
	$ls_gastof           = $ar_datos["fiscalgasto"];
	$ls_ingresop         = $ar_datos["presupuestoingreso"];
	$ls_gastop           = $ar_datos["presupuestogasto"];
	$ls_logo             = "N/A";
	$li_numnivest        = $ar_datos["numnivest"];
	$ls_nomestpro1       = $ar_datos["desestpro1"];
	$ls_nomestpro2       = $ar_datos["desestpro2"];
	$ls_nomestpro3       = $ar_datos["desestpro3"];
	$ls_nomestpro4       = $ar_datos["desestpro4"];
	$ls_nomestpro5       = $ar_datos["desestpro5"];
	$ls_estvaltra        = $ar_datos["estvaltra"];
	$ls_estmodape        = $ar_datos["estmodape"];
	$li_estdesiva        = $ar_datos["estdesiva"];
	$ls_codorgsig        = $ar_datos["codorgsig"];
	$ls_rifemp           = $ar_datos["rifemp"];
	$ls_nitemp           = $ar_datos["nitemp"];
	$ls_ivss			 = $ar_datos["nroivss"];
	$ld_salinipro        = $ar_datos["salinipro"];
	$ld_salinipro        = str_replace('.','',$ld_salinipro);
	$ld_salinipro        = str_replace(',','.',$ld_salinipro);
	$ld_salinieje        = $ar_datos["salinieje"];
	$ld_salinieje        = str_replace('.','',$ld_salinieje);
	$ld_salinieje        = str_replace(',','.',$ld_salinieje);
	$li_estmodest        = $ar_datos["estmodest"];
	$ls_numordcom        = $ar_datos["numordcom"];
	$ls_numordser        = $ar_datos["numordser"];
	$ls_numsolpag        = $ar_datos["numsolpag"];
	$ls_numlicemp        = $ar_datos["numlicemp"];
	$ls_modgenret        = trim($ar_datos["modgenret"]);
	$ls_concomiva		 = trim($ar_datos["concomiva"]);
	$ls_concommun		 = trim($ar_datos["concommun"]);
	$ls_estmodiva		 = trim($ar_datos["estmodiva"]);
	$ls_cedben		     = trim($ar_datos["cedben"]);	
	$ls_nomben		     = trim($ar_datos["nomben"]);
	$ls_scctaben		 = trim($ar_datos["scctaben"]);	
    $ls_tesoroactivo    = $ar_datos["tesoroactivo"];
    $ls_tesoropasivo    = $ar_datos["tesoropasivo"];
    $ls_tesororesul     = $ar_datos["tesororesul"];
    $ls_ctafinanciera   = trim($ar_datos["c_financiera"]);
    $ls_ctafiscal       = trim($ar_datos["c_fiscal"]);
	$ls_codasiona       = trim($ar_datos["codasiona"]);
	$ls_confich         = $ar_datos["confich"];
	$li_diacadche       = $ar_datos["diacadche"];
	$ls_nomrep       = $ar_datos["nomrep"];
	$ls_cedrep       = $ar_datos["cedrep"];
	$ls_telfrep       = $ar_datos["telfrep"];
	$ls_cargo       = $ar_datos["cargorep"];
	$ls_estretiva       = $ar_datos["estretiva"];
	$ls_clactacont       = $ar_datos["clactacon"];
	$li_chkempcons=$ar_datos["estempcon"];
	$ls_bdconsolida= $ar_datos["basdatcon"];
	$ls_codaltempcon=$ar_datos["codaltemp"];
	$ls_estcamemp=$ar_datos["estcamemp"];
	$ls_estparsindis=$ar_datos["estparsindis"];
	$ls_bdconscomp=$ar_datos["basdatcmp"];
	$ls_confinstr   = $ar_datos["confinstr"];
	$ls_intecred   = $ar_datos["estintcred"];
	$ls_estmanant   = $ar_datos["estmanant"];
	$ls_estpresing   = $ar_datos["estpreing"];
	$ls_estmodpartsep   = $ar_datos["estmodpartsep"];
	$ls_estmodpartsoc   = $ar_datos["estmodpartsoc"];
	$ls_confiva         = $ar_datos["confivaprecon"];
	$li_casconmov       = $ar_datos["casconmov"];
	$li_estmodprog       = $ar_datos["estmodprog"];
	$li_dedconproben       = $ar_datos["dedconproben"];
	$li_contintmovban=$ar_datos["contintmovban"];
	$li_valinimovban=$ar_datos["valinimovban"];
	$ls_scfordenacreedora = $ar_datos["scfordenacreedora"];
	$ls_scfordendeudora = $ar_datos["scfordendeudora"];
	$ls_ctaconrepcajchi = $ar_datos["ctaconrepcajchi"];  
	$ls_estafenc = $ar_datos["estafenc"];
		
	if($li_dedconproben=="")
	{
		$li_dedconproben=0;
	}
	if($li_numnivest==3)
	{
		$li_lonestpro1       = trim($ar_datos["lonestpro1"]);
		$li_lonestpro2       = trim($ar_datos["lonestpro2"]);
		$li_lonestpro3       = trim($ar_datos["lonestpro3"]);
		$li_lonestpro4       = 0;
		$li_lonestpro5       = 0;
	}else
	{
		$li_lonestpro1       = trim($ar_datos["lonestpro1"]);
		$li_lonestpro2       = trim($ar_datos["lonestpro2"]);
		$li_lonestpro3       = trim($ar_datos["lonestpro3"]);
		$li_lonestpro4       = trim($ar_datos["lonestpro4"]);
		$li_lonestpro5       = trim($ar_datos["lonestpro5"]);
		
	}
	if($li_lonestpro4==''){$li_lonestpro4=0;};
	if($li_lonestpro5==''){$li_lonestpro5=0;};
	
	$ls_ctaresact = $ar_datos["ctaresact"];
	$ls_ctaresant = $ar_datos["ctaresant"];
	$ls_estaprsep = $ar_datos["estaprsep"];
	$ls_estaprsoc = $ar_datos["estaprsoc"];
	$ls_estaprcxp = $ar_datos["estaprcxp"];
	$ls_sujpasesp = $ar_datos["sujpasesp"];
	$ls_bloanu = $ar_datos["bloanu"];
	$ls_estretmil = $ar_datos["estretmil"];
	$ls_concommil = $ar_datos["concommil"];
	$li_estintban=$ar_datos["estintban"];
	$ls_cueproacu=$ar_datos["cueproacu"];
	$ls_cuedepamo=$ar_datos["cuedepamo"];
	$ls_valclacon=$ar_datos["valclacon"];
	$ls_valcomrd=$ar_datos["valcomrd"];
    $ls_ctaejeprecie=$ar_datos["ctaejeprecie"];
	$ls_capiva = $ar_datos["capiva"];  
	$ls_parcapiva = $ar_datos["parcapiva"];  
	$ls_estciesem = $ar_datos["estciesem"];  
	$li_estcapiva = $ar_datos["estcapiva"];  
	$ls_codestpro1 = str_pad($ar_datos["codestpro1"],25,'0',0);  
	$ls_codestpro2 = str_pad($ar_datos["codestpro2"],25,'0',0);  
	$ls_codestpro3 = str_pad($ar_datos["codestpro3"],25,'0',0);  
	$ls_codestpro4 = str_pad($ar_datos["codestpro4"],25,'0',0);   
	$ls_codestpro5 = str_pad($ar_datos["codestpro5"],25,'0',0);  
	$ls_estcla = $ar_datos["estcla"];  
	$ls_estspgdecimal = $ar_datos["estspgdecimal"];
	$ls_estnivapro = $ar_datos["estnivapro"];
	$ls_estenvcor = $ar_datos["estenvcor"];
	$ls_estcomobr = $ar_datos["estcomobr"];
	$ls_numrefcarord = $ar_datos["numrefcarord"];
	$tipo_ente = $ar_datos["tipo_ente"];
	
	
	$ls_sql=" UPDATE sigesp_empresa                                                                        ".
			" SET nombre='".$ls_nombre."',nomres='".$ls_nomres."',titulo='".$ls_titulo."',                 ".
			" direccion='".$ls_direccion."', ciuemp='".$ls_ciuemp."', estemp='".$ls_estemp."',             ".
			" zonpos='".$ls_zonpos."', telemp='".$ls_telefono."', faxemp='".$ls_fax."',                    ".
			" email='".$ls_email."', website='".$ls_website."', m01=".$li_enero.", m02=".$li_febrero.",    ".
			" m03=".$li_marzo.", m04=".$li_abril.",m05=".$li_mayo.",m06=".$li_junio.",m07=".$li_julio.",   ".
			" m08=".$li_agosto.",m09=".$li_septiembre.",m10=".$li_octubre.",m11=".$li_noviembre.",         ".
			" m12=".$li_diciembre.",periodo='".$ls_periodo."',vali_nivel=".$ls_nivel.",                    ".
			" esttipcont=".$ls_tipocontabilidad.",formpre='".$ls_formpre."',                               ".
			" formcont='".$ls_formcont."',formplan='".$ls_formplan."',formspi='".$ls_formspi."',           ".
			" activo='".$ls_activo."',pasivo='".$ls_pasivo."',ingreso='".$ls_ingreso."',                   ".
			" gasto='".$ls_gasto."',resultado='".$ls_resultado."',capital='".$ls_capital."',               ".
			" c_resultad='".$ls_cresultad."',c_resultan='".$ls_cresultan."',                               ".
			" orden_d='".$ls_ordend."',orden_h='".$ls_ordenh."',soc_gastos='".$ls_socgastos."',            ".
			" soc_servic='".$ls_socservic."',activo_h='".$ls_activoh."',pasivo_h='".$ls_pasivoh."',        ".
			" resultado_h='".$ls_resultadoh."',ingreso_f='".$ls_ingresof."',                               ".
			" gasto_f='".$ls_gastof."',ingreso_p='".$ls_ingresop."',gasto_p='".$ls_gastop."',              ".
			" logo='".$ls_logo."',numniv=".$li_numnivest.",nomestpro1='".$ls_nomestpro1."',                ".
			" nomestpro2='".$ls_nomestpro2."',nomestpro3='".$ls_nomestpro3."',                             ".
			" nomestpro4='".$ls_nomestpro4."',nomestpro5='".$ls_nomestpro5."',                             ".
			" estvaltra=".$ls_estvaltra.",estmodape='".$ls_estmodape."',estdesiva='".$li_estdesiva."',     ".
			" codorgsig='".$ls_codorgsig."',rifemp='".$ls_rifemp."',nitemp='".$ls_nitemp."',                     ".
			" salinipro=".$ld_salinipro.",salinieje=".$ld_salinieje.",estmodest=".$li_estmodest.",               ".
			" numordcom='".$ls_numordcom."',numordser='".$ls_numordser."',numsolpag='".$ls_numsolpag."',         ".
			" nomorgads='".$ls_nomorgads."',numlicemp='".$ls_numlicemp."',modageret='".$ls_modgenret."',         ".
			" concomiva='".$ls_concomiva."',estmodiva=".$ls_estmodiva.",cedben='".$ls_cedben."',                 ".
			" nomben='".$ls_nomben."',scctaben='".$ls_scctaben."',activo_t='".$ls_tesoroactivo."',               ".
			" pasivo_t='".$ls_tesoropasivo."',resultado_t='".$ls_tesororesul."',   ".
			" c_financiera='".$ls_ctafinanciera."',c_fiscal='".$ls_ctafiscal."',codasiona='".$ls_codasiona."' ,  ".
			" loncodestpro1=".$li_lonestpro1.",loncodestpro2=".$li_lonestpro2.",loncodestpro3=".$li_lonestpro3.",".
			" loncodestpro4=".$li_lonestpro4.",loncodestpro5=".$li_lonestpro5.", diacadche='".$li_diacadche."',  ".
			" nroivss='".$ls_ivss."', "." nomrep='".$ls_nomrep."', "." cedrep='".$ls_cedrep."',                  ".
			" telfrep='".$ls_telfrep."',"." cargorep='".$ls_cargo."',"." estretiva='".$ls_estretiva."',          ".
			" clactacon='".$ls_clactacont ."',"." estempcon='".$li_chkempcons."',"." basdatcon='".$ls_bdconsolida."',  ".
			" codaltemp='".$ls_codaltempcon ."',estcamemp='".$ls_estcamemp."',estparsindis='".$ls_estparsindis."', ".
			" basdatcmp='".$ls_bdconscomp."',confinstr='".$ls_confinstr."',estintcred='".$ls_intecred."',".
			" estmanant='".$ls_estmanant."',estpreing='".$ls_estpresing."',concommun='".$ls_concommun."',".
			" estmodpartsep='".$ls_estmodpartsep."',estmodpartsoc='".$ls_estmodpartsoc."',confiva='".$ls_confiva."',".
			" casconmov='".$li_casconmov."',estmodprog='".$li_estmodprog."',confi_ch='".$ls_confich."',".
			" ctaresact = '".$ls_ctaresact."', dedconproben = '".$li_dedconproben."', ".
			" valinimovban='".$li_valinimovban."',contintmovban='".$li_contintmovban."',".
			" ctaresant = '".$ls_ctaresant."',".
			" estaprsep = '".$ls_estaprsep."',sujpasesp = '".$ls_sujpasesp."',bloanu='".$ls_bloanu."',".
			" estretmil='".$ls_estretmil."',concommil='".$ls_concommil."',estintban='".$li_estintban."', ".
			" cueproacu='".$ls_cueproacu."',cuedepamo='".$ls_cuedepamo."',valclacon='".$ls_valclacon."',valcomrd='".$ls_valcomrd."', ".
			" ctaejeprecie = '".$ls_ctaejeprecie."',estaprsoc = '".$ls_estaprsoc."', estaprcxp = '".$ls_estaprcxp."', ".
			" scforden_d = '".$ls_scfordendeudora."', scforden_h = '".$ls_scfordenacreedora."', repcajchi='".$ls_ctaconrepcajchi."', estafenc='".$ls_estafenc."',".
			" capiva='".$ls_capiva."',parcapiva='".$ls_parcapiva."',estciesem='".$ls_estciesem."',estceniva='".$li_estcapiva."',codestprocen1='".$ls_codestpro1."',".
			" codestprocen2='".$ls_codestpro2."',codestprocen3='".$ls_codestpro3."',codestprocen4='".$ls_codestpro4."',codestprocen5='".$ls_codestpro5."',".
			" esclacen='".$ls_estcla."',estspgdecimal='".$ls_estspgdecimal."',
			  nivapro='".$ls_estnivapro."',envcorsup='".$ls_estenvcor."',estcomobr='".$ls_estcomobr."',numrefcarord='".$ls_numrefcarord."',
			  tipo_ente='".$tipo_ente."',
			  bd_historica='".$ar_datos["bd_historica"]."'
			".
			" WHERE codemp='".$ls_codemp."'";												
	$this->io_sql->begin_transaction();
	$rs_data=$this->io_sql->execute($ls_sql);
	if ($rs_data===false)
	   {
		 $this->io_sql->rollback();
         $this->io_msg->message("CLASE->SIGESP_CFG_C_EMPRESA; METODO->uf_update_empresa;ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
         print $this->io_sql->message;   
	   }
	else
	   {
	     /////////////////////////////////         SEGURIDAD               /////////////////////////////		
			     $ls_evento="UPDATE";
			     $ls_descripcion ="Actualizó en CFG el nivel de validación ".$ls_nivel." y el estatus bloquear generación de partida sin disponibilidad a ".$ls_estparsindis." Asociado a la empresa ".$this->ls_codemp;
			     $ls_variable= $this->io_seguridad->uf_sss_insert_eventos_ventana($aa_seguridad["empresa"],
			     $aa_seguridad["sistema"],$ls_evento,$aa_seguridad["logusr"],
			     $aa_seguridad["ventanas"],$ls_descripcion);
	     /////////////////////////////////         SEGURIDAD               ///////////////////////////// 
		 $this->io_sql->commit();
		 $this->io_msg->message('Registro Actualizado !!!'); 

		 if($ls_variable)
		 {
			 $ls_sql  = " SELECT * FROM sigesp_empresa WHERE codemp='".$ls_codemp."'";
			 $rs_data = $this->io_sql->select($ls_sql);
			 if ($rs_data===false)
			 {
				  $this->io_msg->message($this->io_funcion->uf_convertirmsg($this->io_sql->message));
			 }
			 else
			 {
				  if ($row=$this->io_sql->fetch_row($rs_data))
				  {
					   $_SESSION["la_empresa"]=$row;
				  } 
			 }
		 }	 
     }
} 
		
function uf_select_empresa() 
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////
//	Function:  uf_select_empresa()
//	Access:  public
//	Returns: $lb_existe   // Variable que indica si el Registro fue encontrado o no, 
//                           en la Tabla sigesp_empresa de la Base de Datos seleccionada.
//                           True=Encontrado y False=No Encontrado.             
//	Description:  Este método realiza una búsqueda del Código de Empresa 0001 dentro de la 
//                Tabla sigesp_empresa en la Base de Datos seleccionada.
/////////////////////////////////////////////////////////////////////////////////////////////////////////

	$lb_existe = false;
	$ls_sql    = " SELECT codemp FROM sigesp_empresa WHERE codemp='0001' ";
	$rs_data   = $this->io_sql->select($ls_sql);
    if ($row=$this->io_sql->fetch_row($rs_data))
	   {
		 $lb_existe=true;
	     $this->io_sql->free_result($rs_data);
	   } 
    return $lb_existe;
}

function uf_delete_empresa($as_codemp)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////
//	Function:  uf_delete_empresa($as_codemp)
//	Access:  public
//	Arguments:
//  as_codemp    = Código de la empresa
//	Description:  Este método elimina la empresa de la Tabla sigesp_empresa que viene como parametro.
/////////////////////////////////////////////////////////////////////////////////////////////////////////

  $ls_sql = " DELETE FROM sigesp_empresa WHERE codemp='".$as_codemp."'";	    
  $this->io_sql->begin_transaction();
  $rs_data=$this->io_sql->execute($ls_sql);
  if ($rs_data===false)
	 {
	   $this->io_sql->rollback();
	   $this->io_msg->message('Error en Eliminación !!!');
	   $this->io_msg->message($this->io_funcion->uf_convertirmsg($this->io_sql->message));
	   $lb_valido=false;
	 }
  else
	 {
	   $this->io_sql->commit();
	   $this->io_msg->message('Registro Eliminado !!!'); 
	   $lb_valido=true;
	 } 		 
  return $lb_valido;
}

function uf_existe_apertura($as_codemp,$as_anocur,&$rs_empresa) 
{
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	//	   Function: uf_existe_apertura($as_codemp,$as_anocur,&$rs_empresa)
	//    Arguments: $as_codemp  // codigo de la empresa
	//               $as_anocur  //  fecha ddel periodo
	//               $rs_empresa // ResultSet de referencia 
	//	    Returns: $lb_existe  // Variable que indica si el Registro fue encontrado o no, 
	//                           en la Tabla sigesp_empresa de la Base de Datos seleccionada.
	//                           True=Encontrado y False=No Encontrado.             
	//	Description:  Este método realiza una búsqueda del primer movimiento de apertura .
	/////////////////////////////////////////////////////////////////////////////////////////////////////////

	$ls_sql= " SELECT COUNT(*) as totalaper                ".
			  " FROM   sigesp_cmp                          ".
			  " WHERE  codemp='".$as_codemp."' AND         ".
			  "        procede='SPGAPR'  AND               ".
			  "        comprobante='0000000APERTURA'  AND  ".
			  "        fecha='".$as_anocur."'              ";
   $rs_data=$this->io_sql->select($ls_sql);
   if($rs_data===false)
   {
       $lb_existe=false;
	   $this->io_msg->message("CLASE->sigesp_cfg_c_empresa MÉTODO->uf_existe_apertura ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
   }
   else
   {
     $lb_existe=false;
   }
  return  $lb_existe;
}

function uf_buscar_partida_ingreso($as_codemp) 
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////
//	Function:  uf_buscar_patrtida_ingreso()
//	Access:  public
//	Returns: $lb_existe   // Variable que indica si el Registro fue encontrado o no, 
//                           True=Encontrado ó False=No Encontrado.             
//	Description:  Este método realiza una búsqueda en la tabla spi_cuenta para verificar si ya se 
//  cargaron las partidas presupuestaria de Ingresos.
/////////////////////////////////////////////////////////////////////////////////////////////////////////

	$lb_existe = false;
	//$ls_sql    = " SELECT spi_cuenta,denominacion,sc_cuenta FROM spi_cuentas WHERE codemp='0001' ";
	$ls_sql    = " SELECT * FROM spi_cuentas_estructuras ".
	             " WHERE codemp='".$as_codemp."'".
				 " AND codestpro1 <>'-------------------------'".
				 " AND codestpro2 <>'-------------------------'".
				 " AND codestpro3 <>'-------------------------'".
				 " AND codestpro4 <>'-------------------------'".
				 " AND codestpro5 <>'-------------------------'".
				 " AND estcla <>'-'"; ///print $ls_sql;
	$rs_data   = $this->io_sql->select($ls_sql);
	if($rs_data===false)
	   {
		   $lb_existe=false;
		   $this->io_msg->message("CLASE->sigesp_cfg_c_empresa MÉTODO->uf_existe_apertura ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
	   }
	   else
	   { 
		  if ($row=$this->io_sql->fetch_row($rs_data))
		   {
			 $lb_existe=true;
			 $this->io_sql->free_result($rs_data);
		   } 
		}
    return $lb_existe;
}
function uf_existe_ivaconfigurado($as_codemp,&$ai_totalcargos) 
{
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	//	   Function: uf_existe_ivaconfigurado($as_codemp,&$li_totalcargos)
	//    Arguments: $as_codemp  // codigo de la empresa
	//               $ai_totalcargos  //  total cragos (referencia)
	//	    Returns: $lb_existe  // Variable que indica si el Registro fue encontrado o no, 
	//                           en la Tabla sigesp_empresa de la Base de Datos seleccionada.
	//                           True=Encontrado y False=No Encontrado.             
	//	Description:  Este método realiza una búsqueda del primer movimiento de apertura .
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	$lb_existe=true;
	$ls_sql= " SELECT count(*) as totalcargos  ".
             " FROM   sigesp_cargos            ".
             " WHERE  codemp='".$as_codemp."'  ";
   $rs_data=$this->io_sql->select($ls_sql);
   if($rs_data===false)
   {
       $lb_existe=false;
	   $this->io_msg->message("CLASE->sigesp_cfg_c_empresa MÉTODO->uf_existe_apertura ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
   }
   else
   {
	  if ($row=$this->io_sql->fetch_row($rs_data))
	  {
		 $ai_totalcargos=$row["totalcargos"];
	  }
   }
   return  $lb_existe;
}
function uf_existe_movimientos() 
{
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	//	   Function: uf_existe_ivaconfigurado($as_codemp,&$li_totalcargos)
	//    Arguments: $as_codemp  // codigo de la empresa
	//               $ai_totalcargos  //  total cragos (referencia)
	//	    Returns: $lb_existe  // Variable que indica si el Registro fue encontrado o no, 
	//                           en la Tabla sigesp_empresa de la Base de Datos seleccionada.
	//                           True=Encontrado y False=No Encontrado.             
	//	Description:  Este método realiza una búsqueda del primer movimiento de apertura .
	/////////////////////////////////////////////////////////////////////////////////////////////////////////
	$lb_existe=false;
	$ls_sql="SELECT numsol".
			"  FROM sep_solicitud ";
	$rs_data=$this->io_sql->select($ls_sql);
	if($rs_data===false)
	{
	   $this->io_msg->message("CLASE->sigesp_cfg_c_empresa MÉTODO->uf_existe_movimientos1 ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
	}
	else
	{
		if($row=$this->io_sql->fetch_row($rs_data))
		{
			$lb_existe=true;
		}
		else
		{
			unset($rs_data);
			$ls_sql="SELECT numordcom".
					"  FROM soc_ordencompra ";
			$rs_data=$this->io_sql->select($ls_sql);
			if($rs_data===false)
			{
			   $this->io_msg->message("CLASE->sigesp_cfg_c_empresa MÉTODO->uf_existe_movimientos2 ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
			}
			else
			{
				if($row=$this->io_sql->fetch_row($rs_data))
				{
					$lb_existe=true;
				}
				else
				{
					unset($rs_data);
					$ls_sql="SELECT numrecdoc".
							"  FROM cxp_rd ";
					$rs_data=$this->io_sql->select($ls_sql);
					if($rs_data===false)
					{
					   $this->io_msg->message("CLASE->sigesp_cfg_c_empresa MÉTODO->uf_existe_movimientos3 ERROR->".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
					}
					else
					{
						if($row=$this->io_sql->fetch_row($rs_data))
						{
							$lb_existe=true;
						}
					}
				}
			}
		}
	}
	return  $lb_existe;
}

}//Fin de la Clase...
?>