";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
$li_diasem = date('w');
switch ($li_diasem){
case '0': $ls_diasem='Domingo';
break;
case '1': $ls_diasem='Lunes';
break;
case '2': $ls_diasem='Martes';
break;
case '3': $ls_diasem='Miércoles';
break;
case '4': $ls_diasem='Jueves';
break;
case '5': $ls_diasem='Viernes';
break;
case '6': $ls_diasem='Sábado';
break;
}
?>
Registro de Proveedores
Sistema de Proveedores y Beneficiarios
uf_conectar ();
$la_emp = $_SESSION["la_empresa"];
$io_msg = new class_mensajes(); //Instanciando la clase mensajes
$io_sql = new class_sql($conn); //Instanciando la clase sql
$io_dspro = new class_datastore(); //Instanciando la clase datastore
$io_funcion = new class_funciones(); //Instanciando la clase datastore
$io_funciondb = new class_funciones_db($conn);
$io_fecha = new class_fecha();
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
require_once("../shared/class_folder/sigesp_c_seguridad.php");
$io_seguridad= new sigesp_c_seguridad();
$arre = $_SESSION["la_empresa"];
$ls_empresa = $arre["codemp"];
$ls_logusr = $_SESSION["la_logusr"];
$ls_sistema = "RPC";
$ls_ventanas = "sigesp_rpc_d_proveedor.php";
$ls_conrecdoc=$_SESSION["la_empresa"]["conrecdoc"];
$la_seguridad["empresa"]=$ls_empresa;
$la_seguridad["logusr"]=$ls_logusr;
$la_seguridad["sistema"]=$ls_sistema;
$la_seguridad["ventanas"]=$ls_ventanas;
if (array_key_exists("permisos",$_POST)||($ls_logusr=="PSEGIS"))
{
if($ls_logusr=="PSEGIS")
{
$ls_permisos="";
}
else
{
$ls_permisos =$_POST["permisos"];
$la_accesos["leer"] =$_POST["leer"];
$la_accesos["incluir"] =$_POST["incluir"];
$la_accesos["cambiar"] =$_POST["cambiar"];
$la_accesos["eliminar"] =$_POST["eliminar"];
$la_accesos["imprimir"] =$_POST["imprimir"];
$la_accesos["anular"] =$_POST["anular"];
$la_accesos["ejecutar"] =$_POST["ejecutar"];
}
}
else
{
$la_accesos["leer"]="";
$la_accesos["incluir"]="";
$la_accesos["cambiar"]="";
$la_accesos["eliminar"]="";
$la_accesos["imprimir"]="";
$la_accesos["anular"]="";
$la_accesos["ejecutar"]="";
$ls_permisos=$io_seguridad->uf_sss_load_permisos($ls_empresa,$ls_logusr,$ls_sistema,$ls_ventanas,$la_accesos);
}
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
$ls_codemp = $ls_empresa;
$ls_disabled = 'disabled';
if (array_key_exists("operacion",$_POST))
{
$ls_operacion = $_POST["operacion"];
$ls_codigo = $_POST["txtcodigo"];
$ls_nombre = $_POST["txtnombre"];
$ls_direccion = $_POST["txtdireccion"];
$ls_tiporg = $_POST["cmbtiporg"];
$ls_telefono = $_POST["txttelefono"];
$ls_fax = $_POST["txtfax"];
$ls_nacionalidad = $_POST["cmbnacionalidad"];
$ls_especialidad = $_POST["cmbespecialidad"];
$ls_tipconpro = $_POST["cmbcontribuyente"];
$ls_tipperpro = $_POST["cmbtipopersona"];
$lr_datos["codpro"] = $ls_codigo;
$lr_datos["nompro"] = $ls_nombre;
$lr_datos["dirpro"] = $ls_direccion;
$lr_datos["tiporg"] = $ls_tiporg;
$lr_datos["telpro"] = $ls_telefono;
$lr_datos["faxpro"] = $ls_fax;
$lr_datos["nacpro"] = $ls_nacionalidad;
$lr_datos["esppro"] = $ls_especialidad;
$lr_datos["tipconpro"] = $ls_tipconpro;
$lr_datos["tipperpro"] = $ls_tipperpro;
}
else
{
$ls_operacion = "NUEVO";
$ls_codigo = "";
$ls_nombre="";
$ls_direccion="";
$ls_tiporg="00";
$ls_telefono="";
$ls_fax="";
$ls_nacionalidad="";
$ls_especialidad="---";
$lr_datos["especialidad"]=$ls_especialidad;
$ls_tipconpro = '';
$ls_tipperpro = '-';
$lr_datos["tipconpro"] = $ls_tipconpro;
$lr_datos["tipperpro"] = $ls_tipperpro;
}
if (array_key_exists("cmbtipperrif",$_POST))
{
$ls_tipperrif = $_POST["cmbtipperrif"];
$lr_datos["tipperrif"] = $ls_tipperrif;
}
else
{
$ls_tipperrif = "J";
}
$ls_seljur = $ls_selgub = $ls_selven = $ls_selext = "";
if ($ls_tipperrif=='J')
{
$ls_seljur = "selected";
}
elseif($ls_tipperrif=='G')
{
$ls_selgub = "selected";
}
elseif($ls_tipperrif=='V')
{
$ls_selven = "selected";
}
else
{
$ls_selext = "selected";
}
if (array_key_exists("txtnumpririf",$_POST))
{
$ls_numpririf = $_POST["txtnumpririf"];
$lr_datos["numpririf"] = $ls_numpririf;
}
else
{
$ls_numpririf = "";
}
if (array_key_exists("txtnumterrif",$_POST))
{
$ls_numterrif = $_POST["txtnumterrif"];
$lr_datos["numterrif"] = $ls_numterrif;
}
else
{
$ls_numterrif = "";
}
if (array_key_exists("txtnit",$_POST))
{
$ls_nit=$_POST["txtnit"];
$lr_datos["nit"]=$ls_nit;
}
else
{
$ls_nit="";
}
if (array_key_exists("txtcapital",$_POST))
{
$ld_capital=$_POST["txtcapital"];
$lr_datos["capital"]=$ld_capital;
}
else
{
$ld_capital="";
}
if (array_key_exists("txtmonmax",$_POST))
{
$ld_monmax=$_POST["txtmonmax"];
$lr_datos["monmax"]=$ld_monmax;
}
else
{
$ld_monmax="";
}
if (array_key_exists("cmbbanco",$_POST))
{
$ls_banco=$_POST["cmbbanco"];
$lr_datos["banco"]=$ls_banco;
}
else
{
$ls_banco="---";
$lr_datos["banco"]=$ls_banco;
}
if (array_key_exists("txtcuenta",$_POST))
{
$ls_cuenta=$_POST["txtcuenta"];
$lr_datos["cuenta"]=$ls_cuenta;
}
else
{
$ls_cuenta="";
}
if (array_key_exists("txtdencuenta",$_POST))
{
$ls_denocuenta=$_POST["txtdencuenta"];
}
else
{
$ls_denocuenta="";
}
if (array_key_exists("txtdenocuentarecdoc",$_POST))
{
$ls_denocuentarecdoc=$_POST["txtdenocuentarecdoc"];
}
else
{
$ls_denocuentarecdoc="";
}
if (array_key_exists("cmbmoneda",$_POST))
{
$ls_moneda=$_POST["cmbmoneda"];
$lr_datos["moneda"]=$ls_moneda;
}
else
{
$ls_moneda="000";
$lr_datos["moneda"]=$ls_moneda;
}
//Clase de Ubicación Geográfica
if (array_key_exists("cmbpais",$_POST))
{
$ls_pais=$_POST["cmbpais"];
$lr_datos["pais"]=$ls_pais;
}
else
{
$ls_pais="---";
$lr_datos["pais"]=$ls_pais;
}
if (array_key_exists("cmbestado",$_POST))
{
$ls_estado=$_POST["cmbestado"];
$lr_datos["estado"]=$ls_estado;
}
else
{
$ls_estado="---";
$lr_datos["estado"]=$ls_estado;
}
if (array_key_exists("cmbmunicipio",$_POST))
{
$ls_municipio=$_POST["cmbmunicipio"];
$lr_datos["municipio"]=$ls_municipio;
}
else
{
$ls_municipio="---";
$lr_datos["municipio"]=$ls_municipio;
}
if (array_key_exists("cmbparroquia",$_POST))
{
$ls_parroquia=$_POST["cmbparroquia"];
$lr_datos["parroquia"]=$ls_parroquia;
}
else
{
$ls_parroquia="---";
$lr_datos["parroquia"]=$ls_parroquia;
}
//Fin de Ubicación Geográfica
if (array_key_exists("txtcontable",$_POST))
{
$ls_contable=$_POST["txtcontable"];
$lr_datos["contable"]=$ls_contable;
}
else
{
$ls_contable="";
}
if (array_key_exists("txtcontablerecdoc",$_POST))
{
$ls_contablerecdoc=$_POST["txtcontablerecdoc"];
$lr_datos["contablerecdoc"]=$ls_contablerecdoc;
}
else
{
$ls_contablerecdoc="";
}
if (array_key_exists("txtctaant",$_POST))
{
$ls_ctaant=$_POST["txtctaant"];
$lr_datos["ctaant"]=$ls_ctaant;
}
else
{
$ls_ctaant="";
}
if (array_key_exists("txtdenctaant",$_POST))
{
$ls_denctaant=$_POST["txtdenctaant"];
}
else
{
$ls_denctaant="";
}
if (array_key_exists("txtobservacion",$_POST))
{
$ls_observacion=$_POST["txtobservacion"];
$lr_datos["observacion"]=$ls_observacion;
}
else
{
$ls_observacion="";
}
/*Datos del Registro*/
if (array_key_exists("txtcedula",$_POST))
{
$ls_cedula=$_POST["txtcedula"];
$lr_datos["cedula"]=$ls_cedula;
}
else
{
$ls_cedula="";
}
if (array_key_exists("txtnomrep",$_POST))
{
$ls_nomrep=$_POST["txtnomrep"];
$lr_datos["nomrep"]=$ls_nomrep;
}
else
{
$ls_nomrep="";
}
if (array_key_exists("txtcargo",$_POST))
{
$ls_cargo=$_POST["txtcargo"];
$lr_datos["cargo"]=$ls_cargo;
}
else
{
$ls_cargo="";
}
if (array_key_exists("txtnumregRNC",$_POST))
{
$ls_numregRNC=$_POST["txtnumregRNC"];
$lr_datos["numregrnc"]=$ls_numregRNC;
}
else
{
$ls_numregRNC="";
}
if (array_key_exists("txtregistro",$_POST))
{
$ls_registro=$_POST["txtregistro"];
$lr_datos["registro"]=$ls_registro;
}
else
{
$ls_registro="";
}
if (array_key_exists("txtfecreg",$_POST))
{
$ls_fecreg=$_POST["txtfecreg"];
$ls_fecregistro=$io_funcion->uf_convertirdatetobd($ls_fecreg);
$lr_datos["fecreg"]=$ls_fecregistro;
}
else
{
$ls_fecreg="";
}
if (array_key_exists("txtnumero",$_POST))
{
$ls_numero=$_POST["txtnumero"];
$lr_datos["numero"]=$ls_numero;
}
else
{
$ls_numero="";
}
if (array_key_exists("txttomo",$_POST))
{
$ls_tomo=$_POST["txttomo"];
$lr_datos["tomo"]=$ls_tomo;
}
else
{
$ls_tomo="";
}
if (array_key_exists("txtfecregRNC",$_POST))
{
$ls_fecregRNC=$_POST["txtfecregRNC"];
$ls_fecregRNContrataciones=$io_funcion->uf_convertirdatetobd($ls_fecregRNC);
$lr_datos["fecregrnc"]=$ls_fecregRNContrataciones;
}
else
{
$ls_fecregRNC="";
}
if (array_key_exists("txtfecregmod",$_POST))
{
$ls_fecregmod=$_POST["txtfecregmod"];
$ls_fecregmodificado=$io_funcion->uf_convertirdatetobd($ls_fecregmod);
$lr_datos["fecregmod"]=$ls_fecregmodificado;
}
else
{
$ls_fecregmod="";
}
if (array_key_exists("txtregmod",$_POST))
{
$ls_regmod=$_POST["txtregmod"];
$lr_datos["regmod"]=$ls_regmod;
}
else
{
$ls_regmod="";
}
if (array_key_exists("txtnummod",$_POST))
{
$ls_nummod=$_POST["txtnummod"];
$lr_datos["nummod"]=$ls_nummod;
}
else
{
$ls_nummod="";
}
if (array_key_exists("txttommod",$_POST))
{
$ls_tommod=$_POST["txttommod"];
$lr_datos["tommod"]=$ls_tommod;
}
else
{
$ls_tommod="";
}
if (array_key_exists("txtnumfol",$_POST))
{
$ls_numfol=$_POST["txtnumfol"];
$lr_datos["numfol"]=$ls_numfol;
}
else
{
$ls_numfol="";
}
if (array_key_exists("txtnumfolmod",$_POST))
{
$ls_numfolmod=$_POST["txtnumfolmod"];
$lr_datos["numfolmod"]=$ls_numfolmod;
}
else
{
$ls_numfolmod="";
}
if (array_key_exists("txtnumlic",$_POST))
{
$ls_numlic=$_POST["txtnumlic"];
$lr_datos["numlic"]=$ls_numlic;
}
else
{
$ls_numlic="";
}
//Check
if (array_key_exists("cbinspector",$_POST))
{
$ls_inspector=$_POST["cbinspector"];
$lr_datos["inspector"]=$ls_inspector;
}
else
{
$ls_inspector=0;
$lr_datos["inspector"]=$ls_inspector;
}
//Checked
if (array_key_exists("chkestpro",$_POST))
{
$ls_proveedor=$_POST["chkestpro"];
$lr_datos["estpro"]=$ls_proveedor;
}
else
{
$ls_proveedor="0";
$lr_datos["estpro"]=$ls_proveedor;
}
//Checked
if (array_key_exists("chkestcon",$_POST))
{
$ls_contratista=$_POST["chkestcon"];
$lr_datos["estcon"]=$ls_contratista;
}
else
{
$ls_contratista="0";
$lr_datos["estcon"]=$ls_contratista;
}
//CAMPOS NUEVOS
if (array_key_exists("txtpagweb",$_POST))
{
$ls_pagweb=$_POST["txtpagweb"];
$lr_datos["pagweb"]=$ls_pagweb;
}
else
{
$ls_pagweb="";
}
if (array_key_exists("txtemail",$_POST))
{
$ls_email=$_POST["txtemail"];
$lr_datos["email"]=$ls_email;
}
else
{
$ls_email="";
}
if (array_key_exists("estprov",$_POST))
{
$ls_estprov=$_POST["estprov"];
$lr_datos["estatus"]=$ls_estprov;
}
else
{
$ls_estprov="";
}
if (array_key_exists("txtfecvenRNC",$_POST))
{
$ls_fecvenRNC=$_POST["txtfecvenRNC"];
$ls_fecvencimiento=$io_funcion->uf_convertirdatetobd($ls_fecvenRNC);
$ld_hoy=date('Y')."-".date('m')."-".date('d');
if($io_fecha->uf_comparar_fecha($ld_hoy,$ls_fecvencimiento))
{
$ls_registronacional="VIGENTE";
}
else
{
$ls_registronacional="VENCIDO";
}
$lr_datos["fecvenrnc"]=$ls_fecvencimiento;
}
else
{
$ls_fecvenRNC="";
$ls_registronacional="";
}
if (array_key_exists("txtregSSO",$_POST))
{
$ls_regSSO=$_POST["txtregSSO"];
$lr_datos["regsso"]=$ls_regSSO;
}
else
{
$ls_regSSO="";
}
if (array_key_exists("txtfecvenSSO",$_POST))
{
$ls_fecvenSSO=$_POST["txtfecvenSSO"];
$ls_fecvenSeguro=$io_funcion->uf_convertirdatetobd($ls_fecvenSSO);
$lr_datos["fecvensso"]=$ls_fecvenSeguro;
}
else
{
$ls_fecvenSSO="";
}
if (array_key_exists("txtregINCE",$_POST))
{
$ls_regINCE=$_POST["txtregINCE"];
$lr_datos["regince"]=$ls_regINCE;
}
else
{
$ls_regINCE="";
}
if (array_key_exists("txtfecvenINCE",$_POST))
{
$ls_fecvenINCE=$_POST["txtfecvenINCE"];
$ls_fecINCE=$io_funcion->uf_convertirdatetobd($ls_fecvenINCE);
$lr_datos["fecvenince"]=$ls_fecINCE;
}
else
{
$ls_fecvenINCE="";
}
//****************************************
if (array_key_exists("cmbgraemp",$_POST))
{
$ls_graemp=$_POST["cmbgraemp"];
$lr_datos["graemp"]=$ls_graemp;
}
else
{
$ls_graemp="";
}
if (array_key_exists("txtemailrep",$_POST))
{
$ls_emailrep=$_POST["txtemailrep"];
$lr_datos["txtemailrep"]=$ls_emailrep;
}
else
{
$ls_emailrep="";
}
if (array_key_exists("cmbgraemp",$_POST))
{
$ls_select=$_POST["cmbgraemp"];
$lr_datos["cmbgraemp"]=$ls_select;
}
else
{
$ls_select="";
}
if (array_key_exists("cmbgraemp",$_POST))
{
$ls_selectuno=$_POST["cmbgraemp"];
$lr_datos["cmbgraemp"]=$ls_selectuno;
}
else
{
$ls_selectuno="";
}
if (array_key_exists("cmbgraemp",$_POST))
{
$ls_selectdos=$_POST["cmbgraemp"];
$lr_datos["cmbgraemp"]=$ls_selectdos;
}
else
{
$ls_selectdos="";
}
if (array_key_exists("cmbnacionalidad",$_POST))
{
$ls_selectven=$_POST["cmbnacionalidad"];
$lr_datos["cmbnacionalidad"]=$ls_selectven;
}
else
{
$ls_selectven="";
}
if (array_key_exists("cmbnacionalidad",$_POST))
{
$ls_selectext=$_POST["cmbnacionalidad"];
$lr_datos["cmbnacionalidad"]=$ls_selectext;
}
else
{
$ls_selectext="";
}
if (array_key_exists("hidestatus",$_POST))
{
$ls_estatus=$_POST["hidestatus"];
}
else
{
$ls_estatus="NUEVO";
}
if (array_key_exists("txtcodbancof",$_POST))
{
$ls_codbancof = $_POST["txtcodbancof"];
$lr_datos["codbancof"] = $ls_codbancof;
}
else
{
$ls_codbancof="";
}
if (array_key_exists("txtnombancof",$_POST))
{
$ls_nombancof = $_POST["txtnombancof"];
}
else
{
$ls_nombancof="";
}
$ls_readonly="";
if (array_key_exists("chkageviapro",$_POST))
{
$ls_ageviapro=$_POST["chkageviapro"];
$lr_datos["ageviapro"]=$ls_ageviapro;
}
else
{
$ls_ageviapro="0";
$lr_datos["ageviapro"]=$ls_ageviapro;
}
if (array_key_exists("chkaerolipro",$_POST))
{
$ls_aerolipro=$_POST["chkaerolipro"];
$lr_datos["aerolipro"]=$ls_aerolipro;
}
else
{
$ls_aerolipro="0";
$lr_datos["aerolipro"]=$ls_aerolipro;
}
if (array_key_exists("comprobante",$_POST))
{
$li_comprobante=$_POST["comprobante"];
}
else
{
$li_comprobante="0";
}
function uf_load_tipo($as_codemp)
{
global $io_sql;
$ls_tipo = "";
$ls_sql = "SELECT value FROM sigesp_config WHERE codemp='".$as_codemp."' AND codsis='RPC' AND seccion='RPC'";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$lb_valido = false;
}
else
{
if ($row=$io_sql->fetch_row($rs_data))
{
$lb_valido = true;
$ls_tipo = $row["value"];
}
else
{
$lb_valido = false;
}
}
return $ls_tipo;
}
function uf_limpiar_variables()
{
global $ls_nombre;
global $ls_direccion;
global $ls_tipoorg;
global $ls_telefono;
global $ls_fax;
global $ls_nacionalidad;
global $ls_especialidad;
global $ls_rif;
global $ls_nit;
global $ld_capital;
global $ld_monmax;
global $ls_banco;
global $ls_cuenta;
global $ls_moneda;
global $ls_pais;
global $ls_estado;
global $ls_municipio;
global $ls_parroquia;
global $ls_proveedor;
global $ls_contratista;
global $ls_contable;
global $ls_contablerecdoc;
global $ls_observacion;
global $ls_denocuenta;
global $ls_denocuentarecdoc;
global $ls_cedula;
global $ls_nomrep;
global $ls_cargo;
global $ls_numregRNC;
global $ls_registro;
global $ls_fecreg;
global $ls_numero;
global $ls_tomo;
global $ls_fecregRNC;
global $ls_fecregmod;
global $ls_regmod;
global $ls_nummod;
global $ls_tommod;
global $ls_numfol;
global $ls_numfolmod;
global $ls_numlic;
global $ls_inspector;
global $ls_pagweb;
global $ls_email;
global $ls_estprov;
global $ls_fecvenRNC;
global $ls_regSSO;
global $ls_fecvenSSO;
global $ls_regINCE;
global $ls_fecINCE;
global $ls_fecvenINCE;
global $ls_estatus;
global $ls_operacion;
global $ls_tipconpro;
global $ls_ctaant;
global $ls_denctaant;
global $ls_tipperpro;
global $ls_ageviapro;
global $ls_aerolipro;
$ls_nombre="";
$ls_direccion="";
$ls_tipoorg="";
$ls_telefono="";
$ls_fax="";
$ls_nacionalidad="V";
$ls_especialidad="";
$ls_rif="";
$ls_nit="";
$ld_capital="";
$ld_monmax="";
$ls_banco="";
$ls_cuenta="";
$ls_moneda="";
$ls_pais="";
$ls_estado="";
$ls_municipio="";
$ls_parroquia="";
$ls_proveedor="";
$ls_contratista="";
$ls_contable="";
$ls_contablerecdoc="";
$ls_observacion="";
$ls_denocuenta="";
$ls_denocuentarecdoc="";
$ls_cedula="";
$ls_nomrep="";
$ls_cargo="";
$ls_numregRNC="";
$ls_registro="";
$ls_fecreg="";
$ls_numero="";
$ls_tomo="";
$ls_fecregRNC="";
$ls_fecregmod="";
$ls_regmod="";
$ls_nummod="";
$ls_tommod="";
$ls_numfol="";
$ls_numfolmod="";
$ls_numlic="";
$ls_inspector="";
$ls_pagweb="";
$ls_email="";
$ls_estprov="";
$ls_fecvenRNC="";
$ls_regSSO="";
$ls_fecvenSSO="";
$ls_regINCE="";
$ls_fecINCE = "";
$ls_fecvenINCE = "";
$ls_estatus = 'NUEVO';
$ls_operacion = 'NUEVO';
$ls_tipconpro = '-';
$ls_tipperpro ='-';
$ls_ctaant="";
$ls_denctaant="";
$ls_ageviapro='0';
$ls_aerolipro='0';
}
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion=="NUEVO")
{
$lb_empresa = true;
$ls_type = uf_load_tipo($ls_codemp); // Variable que indica si el Código es
// Númerico o Alfanumerico para la
// Generacion del consecutivo.A=Alfanumerico,N=Numerico
if ($ls_type!='A')
{
$ls_string = "'0123456789'";
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'rpc_proveedor','cod_pro');
if (empty($ls_codigo))
{
$io_msg->message($io_funciondb->is_msg_error);
}
}
else
{
$ls_codigo = "";
$ls_string = "'0123456789'+'abcdefghijklmnopqrstuvwxyz'";
}
uf_limpiar_variables();
}
if (($ls_operacion=="pais")||($ls_operacion=="estado")||($ls_operacion=="municipio")||($ls_operacion=="parroquia"))
{
$lb_empresa = true;
$ls_type = uf_load_tipo($ls_codemp); // Variable que indica si el Código es
// Númerico o Alfanumerico para la
// Generacion del consecutivo.A=Alfanumerico,N=Numerico
if ($ls_type!='A')
{
$ls_string = "'0123456789'";
}
else
{
$ls_string = "'0123456789'+'abcdefghijklmnopqrstuvwxyz'";
}
}
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion=="GUARDAR")
{
$lb_existe = $io_proveedor->uf_select_proveedor($ls_codemp,$ls_codigo);
if ($lb_existe && $ls_estatus=="GRABADO")
{
/*if ($ls_estatus=="NUEVO")
{
$io_msg->message("Este Código de Proveedor ya existe !!!");
$lb_valido=false;
}
else*///if($ls_estatus=="GRABADO")
//{
$lb_valido=$io_proveedor->uf_update_proveedor($ls_codemp,$lr_datos,$la_seguridad);
if ($lb_valido)
{
$io_sql->commit();
$io_msg->message("Registro Actualizado !!!");
$lb_empresa = false;
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'rpc_proveedor','cod_pro');
$ls_estatus ="NUEVO";
uf_limpiar_variables();
}
else
{
$io_sql->rollback();
$io_msg->message("Error en Actualización !!!");
}
//}
}
else
{
$lb_valido=$io_proveedor->uf_insert_proveedor($ls_codemp,$lr_datos,$ls_cod,$la_seguridad);
if($lb_valido)
{
$io_sql->commit();
$io_msg->message("Registro incluido con el codigo ".$ls_cod);
$lb_empresa=false;
$ls_codigo=$io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'rpc_proveedor','cod_pro');
$ls_estatus="NUEVO";
uf_limpiar_variables();
}
else
{
$io_sql->rollback();
$io_msg->message($io_proveedor->is_msg_error);
}
}
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/// PARA LA CONVERSIÓN MONETARIA
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//$lb_valido=$io_proveedor->uf_convertir_rpcproveedor($lr_datos,$la_seguridad);
//if($lb_valido===false)
//{
// $io_msg->message("Error al Actualizar los montos auxiliares");
//}
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
}
if ($ls_operacion=="ELIMINAR")
{
$lb_existe = $io_proveedor->uf_select_proveedor($ls_codemp,$ls_codigo);
if ($lb_existe)
{
$lb_valido = $io_proveedor->uf_delete_proveedor($ls_codemp,$ls_codigo,$la_seguridad);
if ($lb_valido)
{
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$lb_empresa=false;
$ls_codigo=$io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'rpc_proveedor','cod_pro');
uf_limpiar_variables();
}
else
{
$io_sql->rollback();
$io_msg->message("Error en Eliminación !!!");
}
}
else
{
$io_msg->message("Este Registro No Existe !!!");
}
}
if ($ls_operacion=="buscar")
{
$ls_readonly = "readonly";
$ls_disabled = '';
$ls_estado=$_POST["hidestado"];
$ls_parroquia=$_POST["hidparroquia"];
$ls_municipio=$_POST["hidmunicipio"];
}
if ($ls_operacion=="VERIFICAR")
{
$ls_rif=$_POST["txtrif"];
$ls_nif=$_POST["txtnit"];
$lb_existe = $io_proveedor->uf_select_validar_rif($ls_codemp,$ls_rif);
if ($lb_existe)
{
$io_msg->message("Este Rif ya existe !!!");
}
}
?>
