function check_ip()
{
global $mybb;
if (!check_ip_with_dnsbl_is_activated()) {
return;
}
$realIP = getRealIP();
$is_listed = is_in_dnsbl($realIP);
if (!$is_listed) {
return;
}
$lang_var = str_replace(".", "_", $is_listed);
global $lang;
$lang->load("check_ip_with_dnsbl");
require_once MYBB_ROOT . "/inc/functions.php";
if (isset($lang->{$lang_var})) {
error($lang->sprintf($lang->{$lang_var}, $realIP));
} else {
$lang->load("member");
error($lang->sprintf($lang->error_stop_forum_spam_spammer, "IP"));
}
}
function checkRecaptchar($secret, $recaptcha)
{
$res = getCurlData("https://www.google.com/recaptcha/api/siteverify?secret=" . $secret . "&response=" . $recaptcha . "&remoteip=" . getRealIP());
$res = json_decode($res, true);
return isset($res['success']) && $res['success'];
}
function getErrorString($errstr)
{
$errstr = trim($errstr);
$XML = "<log>\n <date>" . date("Y-m-d H:i:m") . "</date>\n <uid>" . @UserParameters::getUserId() . "</uid>\n <command>" . @GlobalParameters::getCommand() . "</command>\n <ip>" . getRealIP() . "</ip>\n" . get_caller_method() . "\n <body><![CDATA[\n" . $errstr . "\n ]]></body>\n</log>" . PHP_EOL;
return $XML;
}
*/
function replace_vars($buffer, $data)
{
/* replace declared var names */
foreach ($data as $k => $v) {
if (is_string($v) || is_numeric($v) || $v == NULL) {
$buffer = preg_replace('/\\{' . strtolower($k) . '\\}/', $v, $buffer);
}
}
return $buffer;
}
/** END FUNCTIONS ****/
/**
* Vars
*/
$requester_IP = getRealIP();
// current requester IP
$wl_filename = dirname(__FILE__) . '/' . $wl;
// set full path whitelist file
/* Create/Open session */
session_start();
/* Check actionname */
if (isset($_SESSION['actionname']) and isset($_POST['actionname'])) {
if ($_SESSION['actionname'] == $_POST['actionname']) {
/* Add IP to whitelist */
$fh = fopen($wl_filename, 'a');
fwrite($fh, $requester_IP . "\n");
fclose($fh);
/* Destroy current session */
$_SESSION = array();
// destroys sesion parameters
function p_gf_ult($form, $codReg, $Conex_Emp)
{
$conexion = conexDefsei();
if (empty($Conex_Emp)) {
$Conex_EmpB = $conexion;
} else {
$Conex_EmpB = $Conex_Emp;
}
$sql = 'SELECT Codigo,Tabla,Descripcion FROM sys_form WHERE Estado = "Activo" AND Codigo = "' . $form . '" ';
$rg = rGT($conexion, $sql);
$codigo = $rg["Codigo"];
$tabla = $rg["Tabla"];
$formNombre = $rg["Descripcion"];
if ($codReg != "") {
$formNombre = $formNombre . "-UPD";
$sql = 'SELECT count(*) as contReg FROM sys_form_det WHERE InsertP = 0 AND Form = "' . $codigo . '" ';
$vSQL = 'SELECT * FROM sys_form_det WHERE InsertP = 0 AND Form = "' . $codigo . '" ';
} else {
$sql = 'SELECT count(*) as contReg FROM sys_form_det WHERE Form = "' . $codigo . '" ';
$vSQL = 'SELECT * FROM sys_form_det WHERE Form = "' . $codigo . '" ';
}
$consulta = mysql_query($vSQL, $conexion);
$resultadoB = $consulta or die(mysql_error());
$cReg = 0;
$rg = rGT($conexion, $sql);
$contReg = $rg["contReg"];
$rUlt = $contReg;
$ins = "INSERT INTO " . $tabla . "(";
$insB = " VALUES (";
$upd = "UPDATE " . $tabla . " SET ";
if ($codReg != "") {
$sql = 'SELECT TipoInput FROM sys_form_det WHERE NombreCampo = "Codigo" AND Form = "' . $codigo . '" ';
$rg = rGT($conexion, $sql);
$TipoInput = $rg["TipoInput"];
if ($TipoInput == "varchar" || $TipoInput == "date" || $TipoInput == "time" || $TipoInput == "datetime" || $TipoInput == "text") {
$sql = "SELECT * FROM " . $tabla . " WHERE Codigo = '" . $codReg . "' ";
} else {
$sql = "SELECT * FROM " . $tabla . " WHERE Codigo = " . $codReg . " ";
}
$rgVT = rGT($Conex_EmpB, $sql);
}
while ($registro = mysql_fetch_array($resultadoB)) {
$cReg += 1;
if ($cReg != $rUlt) {
$coma = ",";
} else {
$coma = "";
}
if ($registro["NombreCampo"] == "Codigo") {
if ($codReg != "") {
$codigo = $codReg;
} else {
if ($registro["Correlativo"] == 0) {
$codigo = post($registro["NombreCampo"]);
} else {
if (empty($Conex_Emp)) {
$codigo = numerador($tabla, $registro["CtdaCartCorrelativo"], $registro["CadenaCorrelativo"]);
} else {
$codigo = numerador_emp($tabla, $registro["CtdaCartCorrelativo"], $registro["CadenaCorrelativo"], $Conex_EmpB);
}
}
}
if ($registro["AutoIncrementador"] != "SI") {
$ins .= $registro["NombreCampo"] . $coma;
if ($registro["TipoInput"] == "varchar") {
$valorCmp = "'" . $codigo . "'";
$where = " WHERE " . $registro["NombreCampo"] . " = " . $valorCmp;
} else {
$valorCmp = (int) $codigo;
$where = " WHERE " . $registro["NombreCampo"] . " = " . $valorCmp;
}
} else {
if ($registro["TipoInput"] == "varchar") {
$valorCmp = "'" . $codigo . "'";
$where = " WHERE " . $registro["NombreCampo"] . " = " . $valorCmp;
} else {
$valorCmp = (int) $codigo;
$where = " WHERE " . $registro["NombreCampo"] . " = " . $valorCmp;
}
}
} else {
if ($registro["Visible"] == "SI") {
if ($registro["TipoInput"] == "varchar" || $registro["TipoInput"] == "date" || $registro["TipoInput"] == "time" || $registro["TipoInput"] == "datetime" || $registro["TipoInput"] == "text") {
if ($registro["TipoOuput"] == "file" || $registro["TipoOuput"] == "upload-file") {
$valorCmpFile = post($registro["NombreCampo"]);
if ($valorCmpFile != "") {
$ins .= $registro["NombreCampo"] . $coma;
$sql = 'SELECT * FROM sys_archivotemporal WHERE Formulario = "' . $formNombre . '" AND Campo = "' . $registro["NombreCampo"] . '" ';
$rg = rGT($conexion, $sql);
$path = $rg["Path"];
$nombre = $rg["Nombre"];
$tipoArchivo = $rg["TipoArchivo"];
$extencion = $rg["Extencion"];
if ($path != "") {
//Elimina archivo anterior
$ruta = $path . $rgVT["" . $registro["NombreCampo"] . ""];
Elimina_Archivo($ruta);
$valorCmp = "'" . $rg["Nombre"] . "'";
$sql = 'SELECT Codigo FROM sys_archivo WHERE Tabla = "' . $tabla . '" AND Campo = "' . $registro["NombreCampo"] . '" ';
$rg = rGT($conexion, $sql);
$codigoArchivo = $rg["Codigo"];
if ($codigo != "") {
if ($codigoArchivo == "") {
$codigoA = numerador("sys_archivo", $registro["CtdaCartCorrelativo"], $registro["CadenaCorrelativo"], $conexion);
$sql = 'INSERT INTO sys_archivo (Codigo,Path,Nombre,TipoArchivo,Tabla,Campo,Extencion,Codigo_Tabla)
VALUES(' . $codigoA . ',"' . $path . '","' . $nombre . '","' . $tipoArchivo . '","' . $tabla . '","' . $registro["NombreCampo"] . '","' . $extencion . '",' . $codigo . ') ';
xSQL($sql, $conexion);
} else {
$sql = 'UPDATE sys_archivo SET
Path = " ' . $path . '",
Nombre = "' . $nombre . '",
TipoArchivo = "' . $tipoArchivo . '",
Extencion = "' . $extencion . '"
WHERE Tabla = "' . $tabla . '" AND Campo = "' . $registro["NombreCampo"] . '" AND Codigo_Tabla = ' . $codigo . ' ';
xSQL($sql, $conexion);
}
}
$sql = 'DELETE FROM sys_archivotemporal WHERE Formulario = "' . $formNombre . '" AND Campo = "' . $registro["NombreCampo"] . '" ';
xSQL($sql, $conexion);
}
}
} else {
$ins .= $registro["NombreCampo"] . $coma;
$valorCmp = "'" . post($registro["NombreCampo"]) . "'";
}
} else {
$ins .= $registro["NombreCampo"] . $coma;
$valorCmp = post($registro["NombreCampo"]);
}
} else {
if ($registro["TipoInput"] == "int" || $registro["TipoInput"] == "decimal") {
$valorCmp = post($registro["NombreCampo"]);
} else {
$valorCmp = "'" . post($registro["NombreCampo"]) . "'";
}
$ins .= $registro["NombreCampo"] . $coma;
}
}
//Proceso que altera el valor original
if ($registro["NombreCampo"] == "Codigo") {
$valorFC = p_interno($codigo, $registro["NombreCampo"]);
if ($valorFC != "") {
$insB .= $valorFC . $coma;
$codigo = $valorFC;
} else {
if ($registro["AutoIncrementador"] != "SI") {
$insB .= $valorCmp . $coma;
}
}
} else {
$valorFC = p_interno($codigo, $registro["NombreCampo"]);
if ($valorFC != '') {
$insB .= $valorFC . $coma;
$updV = $valorFC . $coma;
} else {
$insB .= $valorCmp . $coma;
$updV = $valorCmp . $coma;
}
if ($registro["TipoOuput"] == "file") {
if (post($registro["NombreCampo"]) != "") {
$upd .= " " . $registro["NombreCampo"] . " = " . $updV;
} else {
$valor_campoBD = $rgVT["" . $registro["NombreCampo"] . ""];
$upd .= " " . $registro["NombreCampo"] . " = '" . $valor_campoBD . "' " . $coma;
}
} else {
$upd .= " " . $registro["NombreCampo"] . " = " . $updV;
}
}
}
$insB .= ")";
$ins .= ")";
$hora = date("y/m/d h:m:s");
if ($codReg == "") {
$sql = $ins . $insB;
$reg = true;
} else {
$reg = false;
$sql = $upd . $where;
}
W("<div class='MensajeB vacio' style='width:98%;font-size:11px;margin:10px 30px; float:left;'>" . $sql . " </div>");
$s = xSQL($sql, $Conex_EmpB);
W("<div class='MensajeB vacio' style='width:98%;font-size:11px;margin:10px 30px;float:left;'>" . $s . "</div>");
if (empty($codigo)) {
$codigo = mysql_insert_id($Conex_EmpB);
}
$USus = $_SESSION['CtaSuscripcion']['string'];
$UMie = $_SESSION['UMiembro']['string'];
if ($reg == true) {
$sql2 = "UPDATE " . $tabla . " SET " . "CtaSuscripcion = '" . $USus . "'," . "UMiembro = '" . $UMie . "'," . "FHCreacion = '" . $hora . "'," . "IpPublica = '" . getRealIP() . "'," . "IpPrivada = '" . getRealIP() . "' " . "WHERE Codigo = '" . $codigo . "'";
xSQL($sql2, $Conex_EmpB);
} else {
$sql2 = "UPDATE " . $tabla . " SET " . "CtaSuscripcion = '" . $USus . "'," . "UMiembro = '" . $UMie . "'," . "FHActualizacion = '" . $hora . "'," . "IpPublica = '" . getRealIP() . "'," . "IpPrivada = '" . getRealIP() . "' " . "WHERE Codigo = '" . $codigo . "'";
xSQL($sql2, $Conex_EmpB);
}
p_before($codigo);
}
$codRole = $row['codRole'];
$passwordB = $row['password'];
}
if ($password == $passwordB) {
if ($status == 1) {
if ($log == 0) {
$_SESSION['authenticated'] = '1';
$_SESSION['user'] = $user;
$_SESSION['codEmpleado'] = $codEmpleado;
$_SESSION['time_out'] = time();
$_SESSION['codRole'] = $codRole;
include '../conection/conection.php';
$stmt = $db->prepare("CALL updateLog(1,?)");
$stmt->execute(array($codEmpleado));
include '../conection/conection.php';
$ipAccess = (string) getRealIP();
$reason = 'Inicio de sesión';
$stmt = $db->prepare("CALL accessLog(?,?,?)");
$stmt->execute(array($codEmpleado, $ipAccess, $reason));
header('location:../index.php');
} else {
header('location:login.php?error=0');
}
} else {
header('location:login.php?error=1');
}
} else {
header('location:login.php?error=2');
}
?>
<script src="../js/encrypt.js" type="text/javascript"></script>
<?php
session_start();
function UnsetSessionVars()
{
global $_SESSION;
unset($_SESSION['username']);
unset($_SESSION['password']);
unset($_SESSION['last_activity']);
unset($_SESSION['domain']);
unset($_SESSION['address']);
}
function ClearSession()
{
UnsetSessionVars();
session_regenerate_id(true);
}
require_once 'ip.php';
$ip = getRealIP();
if (isset($_SESSION['address'])) {
if ($_SESSION['address'] != $ip) {
ClearSession();
echo "<b><span style='color: red'>Session spoofing attempt detected.</span></b><br />";
exit;
}
}
$_SESSION['address'] = $ip;
function generar_asientos($librocontable, $codigo, $accion)
{
W($librocontable);
global $ConexionEmpresa;
$lc = 0;
if ($librocontable == 'Registro de Ventas') {
$sql = "SELECT rv.Codigo, rv.Cliente, cli.RazonNombres, rv.Emision, rv.DocTipo, tdoc.descripcion AS tdocumento, rv.DocSerie, rv.DocNumero, \n rv.BaseImp, rv.Exonerado, rv.Igv, rv.Total, rv.Moneda, rv.TC, rv.Tipo_Asiento FROM ct_registro_ventas AS rv INNER JOIN ct_cliente AS cli \n ON rv.cliente = cli.codigo INNER JOIN ct_tipo_documento AS tdoc ON rv.doctipo = tdoc.codigo where rv.codigo={$codigo}";
$lc = 2;
} elseif ($librocontable == 'Registro de Compras') {
$sql = "SELECT rv.Codigo, rv.Cliente, cli.RazonNombres, rv.Emision, rv.DocTipo, tdoc.descripcion AS tdocumento, rv.DocSerie, rv.DocNumero, \n rv.BaseImp, rv.Exonerado, rv.Igv, rv.Total, rv.Moneda, rv.TC, rv.Tipo_Asiento FROM ct_registro_ventas AS rv INNER JOIN ct_cliente AS cli \n ON rv.cliente = cli.codigo INNER JOIN ct_tipo_documento AS tdoc ON rv.doctipo = tdoc.codigo where rv.codigo={$codigo}";
}
$registro = rGT($ConexionEmpresa, $sql);
$sql = "Select Codigo,Descripcion,CtaCte,FechaSist,FechaManual,MonedaNac,MonedaOpc,NroFormatSunat from ct_configuracion_tipo_asiento where Tipo_Asiento=" . $registro['Tipo_Asiento'];
$Configuracion = rGT($ConexionEmpresa, $sql);
$sql = "Select Codigo,Cuenta,Debe,Haber from ct_configuracion_tipo_asiento_det where Configuracion_Tipo_Asiento='" . $Configuracion['Codigo'] . "'";
$Configuracion_Det = mysql_query($sql, $ConexionEmpresa);
$sql = "Select Codigo,Tipo_Documento from ct_configuracion_tipoasiento_documento where Configuracion_Tipo_Asiento='" . $Configuracion['Codigo'] . "'";
$Configuracion_Doc = mysql_query($sql, $ConexionEmpresa);
$CtaSuscricion = $_SESSION['CtaSuscripcion'];
$UMiembro = $_SESSION['UMiembro'];
$FH = date('y-m-d h:m:s');
$Ip = getRealIP();
$fecha = $registro['Emision'];
$entidad = $registro['Cliente'];
$glosa = 'Venta del ' . $registro['Emision'] . ' a Sr(es). ' . $registro['RazonNombres'] . ' C/Doc ' . $registro['tdocumento'] . ' Nro ' . $registro['DocSerie'] . ' - ' . $registro['DocNumero'];
$serie = $registro['DocSerie'];
$numero = $registro['DocNumero'];
$estado = '1';
$tipodocumento = $registro['DocTipo'];
$moneda = $registro['Moneda'];
$tipo_asiento = $registro['Tipo_Asiento'];
$periodoanual = date('Y', $fecha);
$periodomensual = date('m', $fecha);
$codigo = $_SESSION['CtaSuscripcion'] . $lc . $periodoanual . $periodomensual;
while ($row = mysql_fetch_array($Configuracion_Doc)) {
if ($tipodocumento == $row['Tipo_Documento']) {
switch ($accion) {
case 'INSERT':
$sql_asiento = "insert into ct_asiento values('{$codigo}','{$CtaSuscricion}','{$UMiembro}','{$FH}',NULL,'{$Ip}','{$Ip}','{$tipo_asiento}','{$numero}','{$fecha}','{$glosa}','{$estado}','{$serie}','{$numero}','{$tipodocumento}','{$moneda}','{$entidad}','{$librocontable}','{$periodoanual}','{$periodomensual}')";
mysql_query($sql_asiento, $ConexionEmpresa);
// $codigo = mysql_insert_id($ConexionEmpresa);
W($codigo);
while ($fila = mysql_fetch_array($Configuracion_Det)) {
$cuenta = $fila['Cuenta'];
$debe = $RegistroVentas['BaseImp'] * $fila['Debe'] / 100;
$haber = $RegistroVentas['BaseImp'] * $fila['Haber'] / 100;
$sql_asientodet = "insert into ct_asiento_det values(NULL,'{$CtaSuscricion}','{$UMiembro}','{$FH}',NULL,'{$Ip}','{$Ip}','{$tipo_asiento}','{$cuenta}','{$tipodocumento}','{$moneda}','0','{$fecha}','{$serie}','{$numero}','{$glosa}','{$debe}','{$haber}','{$codigo}')";
mysql_query($sql_asientodet, $ConexionEmpresa);
}
break;
case 'UPDATE':
$sql_bus = "select codigo from ct_asiento where TipoDoc ='{$tipodocumento}' and DocSerie='{$serie}' and DocNumero='{$numero}' and Fecha='{$fecha}'";
$cod_bus = rGT($ConexionEmpresa, $sql_bus);
$cod_asiento = $cod_bus['codigo'];
$sql_asiento = "update ct_asiento set FHActualizacion='{$FH}',IpPublica='{$Ip}',IpPrivada='{$Ip}',Tipo_Asiento='{$tipo_asiento}',Numero='{$numero}',Fecha='{$fecha}',Glosa='{$glosa}',Estado='{$estado}',DocSerie='{$serie}',DocNumero='{$numero}',TipoDoc='{$tipodocumento}',Entidad='{$entidad}' where Codigo='{$cod_asiento}'";
$sql_asientodet = "delete from ct_asiento_det where asiento={$cod_asiento}";
mysql_query($sql_asiento, $ConexionEmpresa);
mysql_query($sql_asientodet, $ConexionEmpresa);
while ($f = mysql_fetch_array($Configuracion_Det)) {
$cuenta = $f['Cuenta'];
$debe = $RegistroVentas['BaseImp'] * $f['Debe'] / 100;
$haber = $RegistroVentas['BaseImp'] * $f['Haber'] / 100;
$sql_asientodet = "insert into ct_asiento_det values(NULL,'{$CtaSuscricion}','{$UMiembro}','{$FH}',NULL,'{$Ip}','{$Ip}','{$tipo_asiento}','{$cuenta}','{$tipodocumento}','{$moneda}','0','{$fecha}','{$serie}','{$numero}','{$glosa}','{$debe}','{$haber}','{$cod_asiento}')";
mysql_query($sql_asientodet, $ConexionEmpresa);
}
break;
}
}
}
}
function pro_sysform()
{
global $vConex;
$sql = 'SELECT Codigo,Descripcion FROM sys_tabla WHERE Codigo = "' . post("Tabla") . '" ';
$rg = rGT($vConex, $sql);
$codigo = $rg["Codigo"];
// WE($codigo);
if ($codigo != "") {
$vSQL = 'SELECT Codigo,Descripcion,TipoCampo,sys_tabla,AutoIncrement,Visible ' . 'FROM sys_tabla_det WHERE sys_tabla = "' . post("Tabla") . '" ';
$consulta = mysql_query($vSQL, $vConex);
while ($r = mysql_fetch_array($consulta)) {
$ai = $r["AutoIncrement"];
$visible = $r["Visible"];
if ($visible == 0) {
$vis = "NO";
} else {
$vis = "SI";
}
$cod_sys_form_det = numerador("sys_form_det", 9, "", $vConex);
$sql = 'INSERT INTO sys_form_det (Codigo,NombreCampo,Alias,TipoInput,TipoOuput,Form,Visible,TamanoCampo,AutoIncrementador)
VALUES ("' . $cod_sys_form_det . '",' . '"' . $r["Descripcion"] . '"' . ',"' . $r["Descripcion"] . '",' . '"' . cmn($r["TipoCampo"]) . '","text",' . '"' . post("Codigo") . '"' . ',"' . $vis . '",' . '130,' . ' "' . $ai . '")';
xSQL($sql, $vConex);
}
p_gf("SysFomr1", $vConex, "");
$sql = 'UPDATE sys_form set ' . 'FHCreacion = "' . date('y/m/d h:m:s') . '" ,' . 'FHActualizacion = "' . date('y/m/d h:m:s') . '" ,' . 'CtaSuscripcion =' . $_SESSION["CtaSuscripcion"]['string'] . ' ,' . 'UMiembro = ' . $_SESSION["UMiembro"]['string'] . ',' . 'UMiembro_Act = ' . $_SESSION["UMiembro"]['string'] . ',' . 'IpPublica = "' . getRealIP() . '",' . 'IpPrivada = "' . getRealIP() . '" ' . 'WHERE Codigo = "' . post("Codigo") . '"';
W(xSQL($sql, $vConex));
W("Codigo post " . post("Codigo"));
detalleForm('detalle', post("Codigo"));
} else {
WE("La Tabla No existe" . post("Tabla"));
}
}
function TELogRegister($description)
{
$Ip = getRealIP();
$Referer = $_SERVER['HTTP_REFERER'];
mysql_connect(DB_HOST, DB_USER, DB_PASS);
$sql = "INSERT INTO " . TableLogs . " SET FECHA='" . TECurrentDate() . "', HORA='" . TECurrentTime() . "', IP='" . $Ip . "', HTTP_REFERER='" . $Referer . "', DESCRIPCION='" . addslashes($description) . "' ";
$result = mysql_db_query(DB_NAME, $sql);
}
function LeerExcel($NombreArchivo, $conexion)
{
$obj = PHPExcel_IOFactory::load($NombreArchivo);
$cant_hoja = $obj->getAllSheets();
foreach ($cant_hoja as $hoja) {
$nom_hoja = $hoja->getTitle();
$filas = $hoja->getHighestRow();
$columnas = $hoja->getHighestColumn();
switch ($nom_hoja) {
case 'Importar Cuentas':
$sql = "select Codigo from mk_listas where Codigo=(select max(Codigo) from mk_listas)";
$rg = fetch($sql);
$codmklistas = $rg['Codigo'];
for ($fila = 2; $fila <= $filas; $fila++) {
$email = $hoja->getCellByColumnAndRow(2, $fila)->getValue();
$xsql = "select Codigo,Email from mk_contacto where Email='{$email}'";
$data = fetch($xsql);
if (count($data) == 0) {
insert('mk_contacto', array('CtaSuscripcion' => $_SESSION['CtaSuscripcion'], 'UMiembro' => $_SESSION['UMiembro'], 'FHCreacion' => date("y/m/d h:m:s"), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Nombres' => $hoja->getCellByColumnAndRow(0, $fila)->getValue(), 'Apellidos' => $hoja->getCellByColumnAndRow(1, $fila)->getValue(), 'Email' => $hoja->getCellByColumnAndRow(2, $fila)->getValue()), $conexion);
$sqlcodmkcontacto = "select max(Codigo) as Codigo from mk_contacto";
$rg = fetch($sqlcodmkcontacto);
$codmkcontacto = $rg['Codigo'];
insert('mk_listas_det', array('CtaSuscripcion' => $_SESSION['CtaSuscripcion'], 'UMiembro' => $_SESSION['UMiembro'], 'FHCreacion' => date("y/m/d h:m:s"), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'codmklistas' => $codmklistas, 'codmkcontacto' => $codmkcontacto), $conexion);
} else {
$codmkcontacto = $data['Codigo'];
$sqlmkld = "select * from mk_listas_det where codmklistas={$codmklistas} and codmkcontacto={$codmkcontacto}";
$rgmkld = fetch($sqlmkld);
if (count($rgmkld) == 0) {
insert('mk_listas_det', array('CtaSuscripcion' => $_SESSION['CtaSuscripcion'], 'UMiembro' => $_SESSION['UMiembro'], 'FHCreacion' => date("y/m/d h:m:s"), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'codmklistas' => $codmklistas, 'codmkcontacto' => $codmkcontacto), $conexion);
}
}
}
break;
case 'Importar Lista Temporal':
$sql = "select Codigo from lista_temp_excel where Codigo=(select max(Codigo) from lista_temp_excel)";
$rg = fetch($sql);
$codmklistas = $rg['Codigo'];
for ($fila = 2; $fila <= $filas; $fila++) {
$email = $hoja->getCellByColumnAndRow(2, $fila)->getValue();
//$xsql="select Codigo,email from temporal_excel where email='$email'";
//$data=fetch($xsql);
//if(count($data)==0){
$Nombres = $hoja->getCellByColumnAndRow(0, $fila)->getValue();
$Apellidos = $hoja->getCellByColumnAndRow(1, $fila)->getValue();
$Email = $hoja->getCellByColumnAndRow(2, $fila)->getValue();
$FHNacimiento = $hoja->getCellByColumnAndRow(3, $fila)->getValue();
$Sexo = $hoja->getCellByColumnAndRow(4, $fila)->getValue();
$DireccionCasa = $hoja->getCellByColumnAndRow(5, $fila)->getValue();
$TelefonoMovil = $hoja->getCellByColumnAndRow(6, $fila)->getValue();
$DistritoCasa = $hoja->getCellByColumnAndRow(7, $fila)->getValue();
$ProvinciaCasa = $hoja->getCellByColumnAndRow(8, $fila)->getValue();
$PaisCasa = $hoja->getCellByColumnAndRow(9, $fila)->getValue();
$Cargo = $hoja->getCellByColumnAndRow(10, $fila)->getValue();
$datat = array('CtaSuscripcion' => $_SESSION['CtaSuscripcion'], 'UMiembro' => $_SESSION['UMiembro'], 'FHCreacion' => date("y/m/d h:m:s"), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Nombres' => $Nombres, 'Apellidos' => $Apellidos, 'Email' => $Email, 'FHNacimiento' => $FHNacimiento, 'Sexo' => $Sexo, 'DireccionCasa' => $DireccionCasa, 'TelefonoMovil' => $TelefonoMovil, 'DistritoCasa' => $DistritoCasa, 'ProvinciaCasa' => $ProvinciaCasa, 'PaisCasa' => $PaisCasa, 'Cargo' => $Cargo, 'codlistatemp' => $codmklistas);
insert('temporal_excel', $datat, $conexion);
//}
}
break;
case "importar_pregunta":
for ($fila = 2; $fila <= $filas; $fila++) {
$email = $hoja->getCellByColumnAndRow(2, $fila)->getValue();
$Nombres = $hoja->getCellByColumnAndRow(0, $fila)->getValue();
$Apellidos = $hoja->getCellByColumnAndRow(1, $fila)->getValue();
$Email = $hoja->getCellByColumnAndRow(2, $fila)->getValue();
$FHNacimiento = $hoja->getCellByColumnAndRow(3, $fila)->getValue();
$Sexo = $hoja->getCellByColumnAndRow(4, $fila)->getValue();
$DireccionCasa = $hoja->getCellByColumnAndRow(5, $fila)->getValue();
$TelefonoMovil = $hoja->getCellByColumnAndRow(6, $fila)->getValue();
$DistritoCasa = $hoja->getCellByColumnAndRow(7, $fila)->getValue();
$ProvinciaCasa = $hoja->getCellByColumnAndRow(8, $fila)->getValue();
$PaisCasa = $hoja->getCellByColumnAndRow(9, $fila)->getValue();
$Cargo = $hoja->getCellByColumnAndRow(10, $fila)->getValue();
$data = array('CtaSuscripcion' => $_SESSION['CtaSuscripcion'], 'UMiembro' => $_SESSION['UMiembro'], 'FHCreacion' => date("y/m/d h:m:s"), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Nombres' => $Nombres, 'Apellidos' => $Apellidos, 'Email' => $Email, 'FHNacimiento' => $FHNacimiento, 'Sexo' => $Sexo, 'DireccionCasa' => $DireccionCasa, 'TelefonoMovil' => $TelefonoMovil, 'DistritoCasa' => $DistritoCasa, 'ProvinciaCasa' => $ProvinciaCasa, 'PaisCasa' => $PaisCasa, 'Cargo' => $Cargo, 'codlistatemp' => $codmklistas);
return $data;
/*
insert('temporal_excel', $datat, $conexion);
*/
//}
}
break;
default:
break;
}
/* switch ($nom_hoja) {
case 'Plan de Cuentas':
for ( $fila = 0; $fila<=$filas;$fila++){
$nstr = strlen($hoja->getCellByColumnAndRow(0, $fila));
if ($nstr == 1 and is_numeric($hoja->getCellByColumnAndRow(0, $fila)->getValue())){
$sql = 'SELECT COUNT(*) as cant FROM ct_tipo_estructura '
. 'WHERE clase like "%'.$hoja->getCellByColumnAndRow(0, $fila).'%" and '
. 'CtaSuscripcion like "%'.$_SESSION['CtaSuscripcion'].'%" and '
. 'UMiembro like "%'.$_SESSION['UMiembro'].'%"';
$rgt = fetch($sql);
if ($rgt['cant'] == 0){
$insert = insert('ct_tipo_estructura', array(
'CtaSuscripcion' => $_SESSION['CtaSuscripcion'],
'UMiembro' => $_SESSION['UMiembro'],
'FHCreacion' => date('y-m-d h:m:s'),
'IpPublica' => getRealIP(),
'IpPrivada' => getRealIP(),
'Clase' => $hoja ->getCellByColumnAndRow(0, $fila)->getValue(),
'Descripcion' => $hoja->getCellByColumnAndRow(1, $fila)->getValue()
), $conexion);
}
}else if($nstr == 2 and is_numeric($hoja->getCellByColumnAndRow(0, $fila)->getValue())){
$sql ='SELECT codigo FROM ct_tipo_estructura where clase like "%'.substr($hoja->getCellByColumnAndRow(0, $fila), 0, 1).'%" and CtaSuscripcion like "%'.$_SESSION['CtaSuscripcion'].'%" and UMiembro like "%'.$_SESSION['UMiembro'].'%"';
$rgt = fetch($sql);
$codTipoEs = $rgt['codigo'];
$sql = 'SELECT COUNT(*) as cant FROM ct_subtipo_estructura WHERE grupo like "%'.$hoja->getCellByColumnAndRow(0, $fila).'%" and CtaSuscripcion like "%'.$_SESSION['CtaSuscripcion'].'%" and UMiembro like "%'.$_SESSION['UMiembro'].'%"';
$rgt = fetch($sql);
if ($rgt['cant'] == 0){
insert('ct_subtipo_estructura', array(
'CtaSuscripcion' => $_SESSION['CtaSuscripcion'],
'UMiembro' => $_SESSION['UMiembro'],
'FHCreacion' => date('y-m-d h:m:s'),
'IpPublica' => getRealIP(),
'IpPrivada' => getRealIP(),
'Grupo' => $hoja->getCellByColumnAndRow(0, $fila)->getValue(),
'Descripcion' => $hoja->getCellByColumnAndRow(1, $fila)->getValue(),
'TipoEstructura' => $codTipoEs
), $conexion);
}
}else if($nstr >= 3 and is_numeric($hoja->getCellByColumnAndRow(0, $fila)->getValue())){
$sql ='SELECT codigo,tipoestructura FROM ct_subtipo_estructura where Grupo like "%'.substr($hoja->getCellByColumnAndRow(0, $fila), 0, 2).'%" and CtaSuscripcion like "%'.$_SESSION['CtaSuscripcion'].'%" and UMiembro like "%'.$_SESSION['UMiembro'].'%"';
$rgt = fetch($sql);
$codTipoEs = $rgt['tipoestructura'];
$codSubTEs = $rgt['codigo'];
$sql = 'SELECT COUNT(*) as cant FROM ct_subtipo_estructura WHERE grupo like "%'.$hoja->getCellByColumnAndRow(0, $fila).'%" and CtaSuscripcion like "%'.$_SESSION['CtaSuscripcion'].'%" and UMiembro like "%'.$_SESSION['UMiembro'].'%"';
$rgt = fetch($sql);
if ($rgt['cant'] == 0){
if ($hoja->getCellByColumnAndRow(4, $fila)->getValue()=='SI'){$Bal = 1;}else{$Bal = 0;}
if ($hoja->getCellByColumnAndRow(5, $fila)->getValue()=='SI'){$Nat = 1;}else{$Nat = 0;}
if ($hoja->getCellByColumnAndRow(6, $fila)->getValue()=='SI'){$Fun = 1;}else{$Fun = 0;}
insert('ct_plan_cuentas', array(
'CtaSuscripcion' => $_SESSION['CtaSuscripcion'],
'UMiembro' => $_SESSION['UMiembro'],
'FHCreacion' => date('y-m-d h:m:s'),
'IpPublica' => getRealIP(),
'IpPrivada' => getRealIP(),
'Cuenta' => $hoja->getCellByColumnAndRow(0, $fila)->getValue(),
'Denominacion' => $hoja->getCellByColumnAndRow(1, $fila)->getValue(),
'TipoEstructura' => $codTipoEs,
'SubTipoEstructura' => $codSubTEs,
'Balance' => $Bal,
'EEFFNat' => $Nat,
'EEFFFun' => $Fun
), $conexion);
}
}
}
break;
case 'Registro de Ventas':
for ($fila = 2; $fila <= $filas; $fila++ ) {
$codi = $hoja->getCellByColumnAndRow(1,$fila)->getValue().$hoja->getCellByColumnAndRow(3,$fila)->getValue().$hoja->getCellByColumnAndRow(4,$fila)->getValue().$hoja->getCellByColumnAndRow(5,$fila)->getValue().$_SESSION['CtaSuscripcion'].$_SESSION['UMiembro'];
$sql = "select count(*) as cant from ct_registroventas where codigo like '%".$codi."%'";
$rgt = fetch($sql);
if ( $rgt['cant'] == 0 ){
insert( 'ct_registroventas', array(
'Codigo' => $hoja->getCellByColumnAndRow(1,$fila)->getValue().$hoja->getCellByColumnAndRow(3,$fila)->getValue().$hoja->getCellByColumnAndRow(4,$fila)->getValue().$hoja->getCellByColumnAndRow(5,$fila)->getValue().$_SESSION['CtaSuscripcion'].$_SESSION['UMiembro'],
'CtaSuscripcion' => $_SESSION['CtaSuscripcion'],
'UMiembro' => $_SESSION['UMiembro'],
'FHCreacion' => date("y/m/d h:m:s"),
'IpPublica' => getRealIP(),
'IpPrivada' => getRealIP(),
'Ruc' => $hoja->getCellByColumnAndRow(1,$fila)->getValue(),
'Emision' => PHPExcel_Style_NumberFormat::toFormattedString($hoja->getCellByColumnAndRow(2,$fila)->getValue(),'y-m-d'),
'DocTipo' => $hoja->getCellByColumnAndRow(3,$fila)->getValue(),
'DocSerie' => $hoja->getCellByColumnAndRow(4,$fila)->getValue(),
'DocNumero' => $hoja->getCellByColumnAndRow(5,$fila)->getValue(),
'BaseImp' => $hoja->getCellByColumnAndRow(6,$fila)->getValue(),
'Exonerado' => $hoja->getCellByColumnAndRow(7,$fila)->getValue(),
'Igv' => $hoja->getCellByColumnAndRow(8,$fila)->getValue(),
'Total' => $hoja->getCellByColumnAndRow(9,$fila)->getValue(),
'Moneda' => $hoja->getCellByColumnAndRow(10,$fila)->getValue(),
'TC' => $hoja->getCellByColumnAndRow(11,$fila)->getValue(),
'RazonSocial' => $hoja->getCellByColumnAndRow(12,$fila)->getValue(),
'Direccion_Facturacion' => $hoja->getCellByColumnAndRow(13,$fila)->getValue()
), $conexion);
}
}
break;
case 'Importar Sponsor':
$Codmailling=get('codcmailling');
for ($fila = 2; $fila <= $filas; $fila++ ) {
$email=$hoja->getCellByColumnAndRow(2,$fila)->getValue();
$xsql="select Email from campana_mailling_sponsor where Email='$email' and Codcmailling=$Codmailling";
$data=fetch($xsql);
if(count($data)==0){
insert( 'campana_mailling_sponsor', array(
'CtaSuscripcion' => $_SESSION['CtaSuscripcion'],
'UMiembro' => $_SESSION['UMiembro'],
'FHCreacion' => date("y/m/d h:m:s"),
'IpPublica' => getRealIP(),
'IpPrivada' => getRealIP(),
'Estado_envio'=>'Pendiente',
'Codcmailling'=>get('codcmailling'),
'Email' => $hoja->getCellByColumnAndRow(2,$fila)->getValue(),
'Nombre' => $hoja->getCellByColumnAndRow(0,$fila)->getValue(),
'Apellidos' =>$hoja->getCellByColumnAndRow(1,$fila)->getValue()
), $conexion);
}
}
break;
} */
}
}
function generar_asientos2($codigo, $transaccion)
{
global $ConexionEmpresa;
$sql = "SELECT rv.Codigo, rv.Cliente, cli.RazonNombres, rv.Emision, \n rv.DocTipo, tdoc.descripcion AS tdocumento, rv.DocSerie, \n rv.DocNumero, rv.BaseImp, rv.Exonerado, rv.Igv, rv.Total, \n rv.Moneda, rv.TC, rv.VencPago, rv.ValorExportacion, rv.Isc, \n rv.CargosBaseImp, rv.FechaRef, rv.TipoRef, rv.SerieRef, \n rv.NumeroRef, rv.Tipo_Asiento\n FROM ct_registro_ventas AS rv\n INNER JOIN ct_cliente AS cli ON rv.cliente = cli.codigo\n INNER JOIN ct_tipo_documento AS tdoc ON rv.doctipo = tdoc.codigo where rv.codigo={$codigo}";
$RegistroVentas = rGT($ConexionEmpresa, $sql);
$sql = "Select Codigo,Descripcion,CtaCte,FechaSist,FechaManual,MonedaNac,MonedaOpc,NroFormatSunat \n from ct_configuracion_tipo_asiento where Tipo_Asiento=" . $RegistroVentas['Tipo_Asiento'];
$Configuracion = rGT($ConexionEmpresa, $sql);
$sql = "Select Codigo,Cuenta,Debe,Haber from ct_configuracion_tipo_asiento_det \n where Configuracion_Tipo_Asiento='" . $Configuracion['Codigo'] . "'";
$Configuracion_Det = mysql_query($sql, $ConexionEmpresa);
$sql = "Select Codigo,Tipo_Documento from ct_configuracion_tipoasiento_documento \n where Configuracion_Tipo_Asiento='" . $Configuracion['Codigo'] . "'";
$Configuracion_Doc = mysql_query($sql, $ConexionEmpresa);
/* ---------------- Variables Generales ----------------- */
$CtaSuscricion = $_SESSION['CtaSuscripcion'];
$UMiembro = $_SESSION['UMiembro'];
$FH = date('y-m-d h:m:s');
$Ip = getRealIP();
$fecha = $RegistroVentas['Emision'];
$entidad = $RegistroVentas['Cliente'];
$glosa = 'Venta del ' . $RegistroVentas['Emision'] . ' a Sr(es). ' . $RegistroVentas['RazonNombres'] . ' C/Doc ' . $RegistroVentas['tdocumento'] . ' Nro ' . $RegistroVentas['DocSerie'] . ' - ' . $RegistroVentas['DocNumero'];
$serie = $RegistroVentas['DocSerie'];
$numero = $RegistroVentas['DocNumero'];
$estado = '1';
$tipodocumento = $RegistroVentas['DocTipo'];
$moneda = $RegistroVentas['Moneda'];
$tipo_asiento = $RegistroVentas['Tipo_Asiento'];
while ($row = mysql_fetch_array($Configuracion_Doc)) {
if ($tipodocumento == $row['Tipo_Documento']) {
switch ($transaccion) {
case 'INSERT':
$sql_asiento = "insert into ct_asiento values(NULL,'{$CtaSuscricion}','{$UMiembro}','{$FH}',NULL,'{$Ip}','{$Ip}','{$tipo_asiento}','{$numero}','{$fecha}','{$glosa}','{$estado}','{$serie}','{$numero}','{$tipodocumento}','{$moneda}','{$entidad}')";
mysql_query($sql_asiento, $ConexionEmpresa);
$codigo = mysql_insert_id($ConexionEmpresa);
while ($fila = mysql_fetch_array($Configuracion_Det)) {
$cuenta = $fila['Cuenta'];
$debe = $RegistroVentas['BaseImp'] * $fila['Debe'] / 100;
$haber = $RegistroVentas['BaseImp'] * $fila['Haber'] / 100;
$asiento = $codigo;
$sql_asientodet = "insert into ct_asiento_det values(NULL,'{$CtaSuscricion}','{$UMiembro}','{$FH}',NULL,'{$Ip}','{$Ip}','{$tipo_asiento}','{$cuenta}','{$tipodocumento}','{$moneda}','0','{$fecha}','{$serie}','{$numero}','{$glosa}','{$debe}','{$haber}','{$asiento}')";
mysql_query($sql_asientodet, $ConexionEmpresa);
}
break;
case 'UPDATE':
$sql_bus = "select codigo from ct_asiento where TipoDoc ='{$tipodocumento}' and DocSerie='{$serie}' and DocNumero='{$numero}' and Fecha='{$fecha}'";
$cod_bus = rGT($ConexionEmpresa, $sql_bus);
$cod_asiento = $cod_bus['codigo'];
$sql_asiento = "update ct_asiento set FHActualizacion='{$FH}',IpPublica='{$Ip}',IpPrivada='{$Ip}',Tipo_Asiento='{$tipo_asiento}',Numero='{$numero}',Fecha='{$fecha}',Glosa='{$glosa}',Estado='{$estado}',DocSerie='{$serie}',DocNumero='{$numero}',TipoDoc='{$tipodocumento}',Entidad='{$entidad}' where Codigo='{$cod_asiento}'";
$sql_asientodet = "delete from ct_asiento_det where asiento={$cod_asiento}";
mysql_query($sql_asiento, $ConexionEmpresa);
mysql_query($sql_asientodet, $ConexionEmpresa);
while ($f = mysql_fetch_array($Configuracion_Det)) {
$cuenta = $f['Cuenta'];
$debe = $RegistroVentas['BaseImp'] * $f['Debe'] / 100;
$haber = $RegistroVentas['BaseImp'] * $f['Haber'] / 100;
$sql_asientodet = "insert into ct_asiento_det values(NULL,'{$CtaSuscricion}','{$UMiembro}','{$FH}',NULL,'{$Ip}','{$Ip}','{$tipo_asiento}','{$cuenta}','{$tipodocumento}','{$moneda}','0','{$fecha}','{$serie}','{$numero}','{$glosa}','{$debe}','{$haber}','{$cod_asiento}')";
mysql_query($sql_asientodet, $ConexionEmpresa);
}
break;
}
}
}
}
* @copyright 2015 Desarrollos Cuado C.A.
* @license GPLv3
*/
include_once "./lib/classDBAndUser.php";
if (isset($_POST['cedula']) && isset($_POST['nacionalidad'])) {
if (!checkRecaptchar(RECAPTCHAR_SECRET, $_POST['g-recaptcha-response'])) {
$error = 'reCAPTCHA inválido';
} else {
$rif = valid_rif($_POST['nacionalidad'], trim($_POST['cedula']));
if (!$rif) {
$error = 'Su cédula tiene un formato inválido';
} else {
if ($data = $db->ls("SELECT * FROM not_show WHERE rif = '%s'", array(secInjection($rif)))) {
$error = 'Esta cédula ya fue dado de baja el día ' . $data['created_date'];
} else {
if ($db->qs("INSERT INTO not_show (rif, created_date, ip_submit) VALUES ('%s', NOW(), '%s')", array(secInjection($rif), getRealIP()))) {
$msj = "Su cédula fue dado de baja de nuestro sistema correctamente";
} else {
$error = "Ocurrió un error temporal en nuestro sistema, intente más tarde";
}
}
}
}
}
$html_title = 'Baja de Cédula en el Sistema';
$html_description = 'No mostrar una Cédula en el Sistema';
$menu_select = 'baja';
include 'header.php';
?>
<br />
<?php
function InsertarCuenta($codi)
{
global $ConxGestionDC, $ConexSisEmp;
$sql = "SELECT MAX(NroSuscripcion) as Nro FROM ct_suscripcion";
$rgt = rGT($ConexSisEmp, $sql);
$Nro = 0;
if ($rgt['Nro'] == "") {
$Nro = 1;
} else {
$Nro = intval($rgt['Nro']['string']) + 1;
}
$sql = "INSERT INTO ct_suscripcion(Codigo,CtaSuscripcion,FHCreacion,IpPublica,IpPrivada,NroSuscripcion) VALUES(" . " " . $Nro . ",'" . $Nro . "','" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "'," . $Nro . ")";
$codSuscripcion = $Nro;
xSQL2($sql, $ConexSisEmp);
$sql = "INSERT INTO ct_umiembro(CtaSuscripcion,FHCreacion,IpPublica,IpPrivada,Suscriptor,Suscripcion,Cargo) VALUES (" . "'" . $codi . "','" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "','" . post('Email') . "'," . $Nro . "," . post('Cargo') . ")";
xSQL2($sql, $ConexSisEmp);
$codMiembro = mysql_insert_id($ConexSisEmp);
$sql = "INSERT INTO sys_usuarios(Usuario,Nombres,Apellidos,Contrasena,Estado,email,FechaRegistro,CtaSuscripcion,UMiembro) VALUES (" . "'" . post('Usuario') . "','" . post('Nombres') . "','" . post('ApellidoP') . " " . post('ApellidoM') . "'," . "'" . post('Contrasena') . "',1,'" . post('Email') . "','" . date('y-m-d h:m:s') . "','" . $codSuscripcion . "','" . $codMiembro . "')";
xSQL2($sql, $ConxGestionDC);
$sql = "SELECT Codigo FROM ct_entidad WHERE Ruc=" . post('Empresa') . "";
$res = mysql_query($sql, $ConexSisEmp);
$ce = mysql_num_rows($res);
$codEnt = 0;
$rucEnt = "";
$razEnt = "";
$dirEnt = "";
if ($ce == 0) {
#$emp = BuscarRuc(post('Empresa'));
$sql = "SELECT Empresa,RazonSocial FROM ct_solicitud WHERE Empresa=" . post('Empresa') . ";";
$emp = rGT($ConexSisEmp, $sql);
$sql2 = "INSERT INTO ct_entidad(CtaSuscripcion,UMiembro,FHCreacion,IpPublica,IpPrivada,Ruc,RazonSocial,DireccionFiscal)values(" . "'" . $codSuscripcion . "','" . $codMiembro . "','" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "'," . $emp['Empresa'] . ",'" . $emp['RazonSocial'] . "','')";
xSQL2($sql2, $ConexSisEmp);
$codEnt = mysql_insert_id();
$rucEnt = $emp['Empresa'];
$razEnt = $emp['RazonSocial'];
#$dirEnt = $emp[2];
} else {
$xSql = "SELECT codigo,ruc,razonsocial,direccionfiscal FROM ct_entidad where RUC='" . post('Empresa') . "'";
$rg = rGT($ConexSisEmp, $xSql);
$codEnt = $rg['codigo'];
$rucEnt = $rg['ruc'];
$razEnt = $rg['razonsocial'];
$dirEnt = $rg['direccionfiscal'];
}
$sql = "INSERT INTO ct_suscriptores(Codigo,CtaSuscripcion,UMiembro,FHCreacion,IpPublica,IpPrivada,Nombre,ApellidoP,ApellidoM,Entidad,Email,Telefono) values (" . "'" . post('Email') . "','" . $codSuscripcion . "','" . $codMiembro . "','" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "','" . post('Nombres') . "'," . "'" . post('ApellidoP') . "','" . post('ApellidoM') . "'," . $codEnt . ",'" . post('Email') . "'," . post('Telefono') . ")";
xSQL2($sql, $ConexSisEmp);
$codSuscriptor = mysql_insert_id();
$sql = "INSERT INTO ct_acreditacion(CtaSuscripcion,UMiembro,FHCreacion,IpPublica,IpPrivada,Solicitud,FechaAprovacion,Estado) VALUES (" . "'" . $codSuscripcion . "'," . $codMiembro . ",'" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "'," . $codi . ",'" . date('y-m-d h:m:s') . "',0)";
xSQL2($sql, $ConexSisEmp);
$codAcredi = mysql_insert_id();
$sql = "INSERT INTO ct_empresasuscripcion(CtaSuscripcion,UMiembro,FHCreacion,IpPublica,IpPrivada,Entidad,Suscripcion,RazonSocial,Predeterminado) VALUES(" . "'" . $codSuscripcion . "'," . $codMiembro . ",'" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "','" . $codEnt . "','" . $codSuscripcion . "','" . $razEnt . "',1)";
xSQL2($sql, $ConexSisEmp);
$sql = "UPDATE ct_suscripcion SET UMiembro = '" . $codMiembro . "',Acreditacion='" . $codAcredi . "' where codigo='" . $codSuscripcion . "'";
xSQL2($sql, $ConexSisEmp);
$sql = "UPDATE ct_umiembro SET UMiembro = '" . $codMiembro . "',Entidad='" . $codEnt . "' where codigo='" . $codMiembro . "'";
xSQL2($sql, $ConexSisEmp);
return $codSuscripcion;
}
function Entidades($Arg)
{
global $ConexionEmpresa, $enlace;
switch ($Arg) {
case "Listado":
$btn = "Agregar]" . $enlace . "?Entidades=EntidadesAdd]PanelB}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span>Suscripción</span><p >EMPRESAS</p><div class='bicel'></div>", $btn, "70px", "TituloA");
$sql = "SELECT ct_entidad.ruc as RUC," . "ct_entidad.razonsocial as 'RAZON SOCIAL'," . "ct_entidad.direccionfiscal as 'DIRECCION'," . "ct_empresasuscripcion.Codigo as CodigoAjax " . "FROM ct_empresasuscripcion inner join ct_entidad " . "on ct_empresasuscripcion.entidad=ct_entidad.codigo " . "WHERE ct_empresasuscripcion.UMiembro=" . $_SESSION['UMiembro'];
$clase = 'reporteA';
$panel = 'PanelB';
$enlaceCod = '';
$url = $enlace . "?Entidades=Listado";
$reporte = ListR2('', $sql, $ConexionEmpresa, $clase, '', $url, $enlaceCod, $panel, 'ct_empresasuscripcion', '', '');
$s = "<div class= 'PanelPadding'>" . $btn . $reporte . "</div>";
WE($s);
break;
case "EntidadesAdd":
$btn = "<div class='botIconS'><i class='icon-arrow-left'></i></div>]" . $enlace . "?Entidades=Listado]PanelB}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span>Registrar</span><p > REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "50px", "TituloA");
$uRLForm = "Buscar]" . $enlace . "?Entidades=Confirmar]PanelB]F]}";
$form = c_form_ult('', $ConexionEmpresa, 'busentidad', 'CuadroA', $path, $uRLForm, "'" . $codEntidad . "'", $tSelectD);
$form = "<div style='width:100%;'>" . $btn . $form . "</div>";
$s = "<div class= 'PanelPadding'>" . $form . "</div>";
WE($s);
break;
case "Confirmar":
$RucBus = post('Ruc');
$btn = "<div class='botIconS'><i class='icon-arrow-left'></i></div>]" . $enlace . "?Entidades=Listado]PanelB}";
$btn .= "Registrar]" . $enlace . "?Entidades=GrabarEntidad&RucBus=" . $RucBus . "]PanelB]}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span>Registrar</span><p >REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "140px", "TituloA");
$val = BuscarRuc($RucBus);
$sql = "SELECT '" . $val[0] . "' as RUC,'" . $val[1] . "' as 'RAZON SOCIAL','" . $val[2] . "' as 'DIRECCION FISCAL'";
$clase = 'reporteA';
$panel = 'PanelB';
$reporte = ListR2('', $sql, $ConexionEmpresa, $clase, '', $url, $enlaceCod, $panel, 'busentidad', '', '');
$s = "<div class= 'PanelPadding'>" . $btn . $reporte . "</div>";
WE($s);
break;
case "GrabarEntidad":
$sql = "select max(codigo)+1 as cod from ct_suscripcion";
$rgt = rGT($ConexionEmpresa, $sql);
$sql = "select codigo from ct_entidad where ruc like '%" . get('RucBus') . "%'";
$rg = rGT($ConexionEmpresa, $sql);
$codentid = "";
if (get('RucBus') != "") {
$val = BuscarRuc(get('RucBus'));
$hora = date("y/m/d h:m:s");
if ($rg['codigo'] == "") {
$val2 = array('Ruc' => $val[0], 'RazonSocial' => $val[1], 'DireccionFiscal' => $val[2], 'CtaSuscripcion' => $rgt['cod'], 'UMiembro' => $_SESSION['UMiembro']['string'], 'FHCreacion' => $hora, 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP());
$codent = insert("ct_entidad", $val2, $ConexionEmpresa);
$codentid = $codent['lastInsertId'];
} else {
$sql = "select codigo from ct_entidad where ruc='" . $val[0] . "'";
$rg2 = rGT($ConexionEmpresa, $sql);
$codentid = $rg2['codigo'];
}
$sql = "select codigo from ct_acreditacion where CtaSuscripcion='" . $_SESSION['CtaSuscripcion'] . "'";
$rg2 = rGT($ConexionEmpresa, $sql);
$codacr = $rg2['codigo'];
$array1 = array('Codigo' => $rgt['cod'], 'CtaSuscripcion' => $rgt['cod'], 'UMiembro' => $_SESSION['UMiembro']['string'], 'FHCreacion' => date('y-m-d h:m:s'), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Acreditacion' => $codacr, 'NroSuscripcion' => $rgt['cod']);
insert('ct_suscripcion', $array1, $ConexionEmpresa);
$array = array('CtaSuscripcion' => $rgt['cod'], 'UMiembro' => $_SESSION['UMiembro']['string'], 'FHCreacion' => date('y-m-d h:m:s'), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Entidad' => $codentid, 'Suscripcion' => $rgt['cod'], 'RazonSocial' => $val[1], 'Predeterminado' => '0');
insert("ct_empresasuscripcion", $array, $ConexionEmpresa);
}
$btn = "Agregar]" . $enlace . "?Entidades=EntidadesAdd]PanelB}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span></span><p >REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "70px", "TituloA");
$sql = "SELECT ct_entidad.ruc as RUC," . "ct_entidad.razonsocial as 'RAZON SOCIAL'," . "ct_entidad.direccionfiscal as 'DIRECCION'," . "ct_empresasuscripcion.Codigo as CodigoAjax " . "FROM ct_empresasuscripcion inner join ct_entidad " . "on ct_empresasuscripcion.entidad=ct_entidad.codigo " . "WHERE ct_empresasuscripcion.UMiembro=" . $_SESSION['UMiembro'];
$clase = 'reporteA';
$panel = 'PanelB';
$enlaceCod = '';
$url = $enlace . "?Entidades=Listado";
$reporte = ListR2('', $sql, $ConexionEmpresa, $clase, '', $url, $enlaceCod, $panel, 'ct_empresasuscripcion', '', '');
$s = "<div class= 'PanelPadding'>" . $btn . $reporte . "</div>";
WE($s);
}
}
define("SYSTEM_PATH", ".");
break;
}
include_once SYSTEM_PATH . "/System/settings.php";
include_once SYSTEM_PATH . "/System/function.php";
register_shutdown_function('shutdown');
set_error_handler("handlerError");
$userId = intval($_GET["userId"]);
$authKey = @trim($_GET["authKey"]);
$checkSum = @trim($_GET["checkSum"]);
$serverCheckSum = md5($authKey . SECRET_KEY . $userId);
if ($serverCheckSum != $checkSum) {
$actionResult = new ErrorPoint(ErrorPoint::CODE_BAD_MD5, "WFT", ErrorPoint::TYPE_USER);
}
if (!in_array(getRealIP(), $allowIPForSystemCommand)) {
$actionResult = new ErrorPoint(ErrorPoint::CODE_BAD_MD5, "WFT!: " . getRealIP(), ErrorPoint::TYPE_USER);
}
UserParameters::setUserId($userId);
if (SQL::getInstance()->connect_error) {
$actionResult = new ErrorPoint(ErrorPoint::CODE_SQL, "Невозможно подключиться (" . SQL::getInstance()->connect_error . ")", ErrorPoint::TYPE_SYSTEM);
break;
}
echo '<?xml version="1.0"?>
<userInfo>';
if (!array_key_exists("onlyProfile", $_GET)) {
echo '<requests>';
getUsersActivity();
echo "</requests>";
}
$team = new Team();
$team->initById(UserParameters::getUserId());
function printRealIP()
{
$list_ip = getRealIP();
$listado = "";
for ($j = 0; $j < count($list_ip); $j++) {
$listado .= $list_ip[$j] . " ";
}
unset($list_ip);
$listado = rtrim($listado);
return $listado;
}
function Conf_Asiento($codigo)
{
global $ConexionEmpresa;
$sql = "insert into ct_configuracion_tipo_asiento(" . "CtaSuscripcion,UMiembro,FHCreacion,IpPublica,IpPrivada,tipo_asiento)" . "values('" . $_SESSION['CtaSuscripcion'] . "','" . $_SESSION['UMiembro'] . "','" . date('y-m-d h:m:s') . "','" . getRealIP() . "','" . getRealIP() . "',{$codigo})";
$ejec = mysql_query($sql, $ConexionEmpresa);
$_GET['codigo'] = $codigo;
}
case "double":
$theValue = $theValue != "" ? doubleval($theValue) : "NULL";
break;
case "date":
$theValue = $theValue != "" ? "'" . $theValue . "'" : "NULL";
break;
case "defined":
$theValue = $theValue != "" ? $theDefinedValue : $theNotDefinedValue;
break;
}
return $theValue;
}
}
$_POST['estado'] = 0;
$estadoinactivo = $_POST['estado'];
$_POST['ipus'] = getRealIP();
$ipusuario = $_POST['ipus'];
$editFormAction = $_SERVER['PHP_SELF'];
if (isset($_SERVER['QUERY_STRING'])) {
$editFormAction .= "?" . htmlentities($_SERVER['QUERY_STRING']);
}
if (isset($_POST["MM_insert"]) && $_POST["MM_insert"] == "formregistro") {
if (!ComprobarCorreoUnico($_POST['correo'])) {
$insertGoTo = "correo-repetido.php";
header(sprintf("Location: %s", $insertGoTo));
} else {
$insertSQL = sprintf("INSERT INTO usuarios (nombre, apellido, correo, password, fecha_reg, estado, suscrito, ipus) VALUES (%s, %s, %s, %s, NOW(), %s, %s, %s)", GetSQLValueString($_POST['nombre'], "text"), GetSQLValueString($_POST['apellido'], "text"), GetSQLValueString($_POST['correo'], "text"), GetSQLValueString(md5($_POST['password']), "text"), GetSQLValueString($estadoinactivo, "int"), GetSQLValueString(isset($_POST['suscrito']) ? "true" : "", "defined", "1", "0"), GetSQLValueString($ipusuario, "text"));
mysql_select_db($database_HotSecrets, $HotSecrets);
$Result1 = mysql_query($insertSQL, $HotSecrets) or die(mysql_error());
Darse_Alta_usuario($_POST['correo'], $_POST['nombre']);
$insertGoTo = "confirmar-correo.php";
function Entidades($Arg)
{
global $ConexionEmpresa, $enlace, $CtaSuscripcion, $UMiembro;
switch ($Arg) {
case "ListadoEnt":
$btn = "Buscar]" . $enlace . "?Entidades=EntidadCrear]PanelB}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span></span><p >REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "70px", "TituloA");
$sql = "SELECT RUC," . "RazonSocial as 'RAZON SOCIAL'," . "DireccionFiscal as 'DIRECCION FISCAL' " . " FROM ct_entidad ";
//. "WHERE CtaSuscripcion = '".$CtaSuscripcion."' and UMiembro='".$UMiembro."'";
$clase = 'reporteA';
$panel = 'PanelB';
$reporte = ListR2('', $sql, $ConexionEmpresa, $clase, '', $url, $enlaceCod, $panel, 'busentidad', '', '');
$s = "<div class= 'PanelPadding'>" . $btn . $reporte . "</div>";
WE($s);
break;
case "EntidadCrear":
$btn = "<div class='botIconS'><i class='icon-arrow-left'></i></div>]" . $enlace . "?Entidades=ListadoEnt]PanelB}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span>Registrar</span><p > REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "50px", "TituloA");
$uRLForm = "Buscar]" . $enlace . "?Entidades=Confirmar]PanelB]F]}";
$form = c_form_ult('', $ConexionEmpresa, 'busentidad', 'CuadroA', $path, $uRLForm, "'" . $codEntidad . "'", $tSelectD);
$form = "<div style='width:100%;'>" . $btn . $form . "</div>";
$s = "<div class= 'PanelPadding'>" . $form . "</div>";
WE($s);
break;
case "Confirmar":
$RucBus = post('Ruc');
$btn = "<div class='botIconS'><i class='icon-arrow-left'></i></div>]" . $enlace . "?Entidades=ListadoEnt]PanelB}";
$btn .= "Registrar]" . $enlace . "?Entidades=GrabarEntidad&RucBus=" . $RucBus . "]PanelB]}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span>Registrar</span><p >REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "140px", "TituloA");
$val = BuscarRuc($RucBus);
$sql = "SELECT '" . $val[0] . "' as RUC,'" . $val[1] . "' as 'RAZON SOCIAL','" . $val[2] . "' as 'DIRECCION FISCAL'";
$clase = 'reporteA';
$panel = 'PanelB';
$reporte = ListR2('', $sql, $ConexionEmpresa, $clase, '', $url, $enlaceCod, $panel, 'busentidad', '', '');
$s = "<div class= 'PanelPadding'>" . $btn . $reporte . "</div>";
WE($s);
break;
case "GrabarEntidad":
if (get('RucBus') != "") {
$val = BuscarRuc(get('RucBus'));
$hora = date("y/m/d h:m:s");
if ($rg['codigo'] == "") {
$val2 = array('Ruc' => $val[0], 'RazonSocial' => $val[1], 'DireccionFiscal' => $val[2], 'CtaSuscripcion' => $_SESSION['CtaSuscripcion']['string'], 'UMiembro' => $_SESSION['UMiembro']['string'], 'FHCreacion' => $hora, 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP());
insert("ct_entidad", $val2, $ConexionEmpresa);
}
}
$btn = "Buscar]" . $enlace . "?Entidades=EntidadCrear]PanelB}";
$btn = Botones($btn, 'botones1', '');
$btn = tituloBtnPn("<span></span><p >REGISTRO DE EMPRESAS</p><div class='bicel'></div>", $btn, "70px", "TituloA");
$sql = "SELECT RUC," . "RazonSocial as 'RAZON SOCIAL'," . "DireccionFiscal as 'DIRECCION FISCAL' " . " FROM ct_entidad " . "WHERE CtaSuscripcion = '" . $CtaSuscripcion . "' and UMiembro = '" . $UMiembro . "'";
$clase = 'reporteA';
$panel = 'PanelB';
$reporte = ListR2('', $sql, $ConexionEmpresa, $clase, '', $url, $enlaceCod, $panel, 'busentidad', '', '');
$s = "<div class= 'PanelPadding'>" . $btn . $reporte . "</div>";
WE($s);
break;
}
}
function emitirProforma($codPro)
{
global $ConexionEmpresa;
$sql = "SELECT * FROM ct_proformas where Codigo='" . $codPro . "'";
$rgt = rGT($ConexionEmpresa, $sql);
$array1 = array('CtaSuscripcion' => $_SESSION['CtaSuscripcion']['string'], 'UMiembro' => $_SESSION['UMiembro']['string'], 'FHCreacion' => date('y-m-d h:m:s'), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Cliente' => $rgt['Cliente'], 'Proformas' => $rgt['Codigo'], 'TipoPago' => $rgt['TipoPago'], 'Moneda' => $rgt['Moneda'], 'Fechaemision' => date('y-m-d h:m:s'), 'TotalPrecio' => $rgt['TotalPrecio'], 'Estado' => 'Pendiente');
$insert = insert('ct_pedidos', $array1, $ConexionEmpresa);
$sql = "UPDATE ct_proformas SET estado='Emitido' where codigo='" . $codPro . "'";
xSQL2($sql, $ConexionEmpresa);
$sql = "SELECT Articulo,Precio,Cantidad,Total,CodigoParlante FROM ct_proformasdet WHERE proforma='" . $codPro . "'";
$result = mysql_query($sql, $ConexionEmpresa);
while ($row = mysql_fetch_array($result)) {
$array2 = array('CtaSuscripcion' => $_SESSION['CtaSuscripcion']['string'], 'UMiembro' => $_SESSION['UMiembro']['string'], 'FHCreacion' => date('y-m-d h:m:s'), 'IpPublica' => getRealIP(), 'IpPrivada' => getRealIP(), 'Pedido' => $insert['lastInsertId'], 'Articulo' => $row['Articulo'], 'Precio' => $row['Precio'], 'Cantidad' => $row['Cantidad'], 'Total' => $row['Total'], 'CodigoParlante' => $row['CodigoParlante']);
insert('pedidosdet', $array2, $ConexionEmpresa);
}
}
