function init()
{
myconnect();
# get
global $pdf_file;
$pdf_file = get_get('pdf');
# lock
global $db;
global $lock;
$sql = "SELECT * FROM zamky WHERE pdf = " . $db->quote($pdf_file) . ";";
$result = $db->query($sql);
foreach ($result as $row) {
$lock = $row;
break;
}
# post
if (count($_POST) > 0) {
do_post();
redir_to_get();
}
return true;
}
/**
* Secondary Database query function
*/
function myquery($sql)
{
return mysql_query($sql, myconnect());
}
<?php
error_reporting(E_ALL);
header('Content-Type: application/json');
ini_set('display_errors', 1);
require 'db_connect_functions.php';
require 'db_query_functions.php';
$MAX_DEF_LENGTH = 35;
$MIN_DEF_LENGTH = 9;
$connection = myconnect();
$num_headwords = get_num_headwords_that_have_defs($connection, $MAX_DEF_LENGTH, $MIN_DEF_LENGTH);
$random_word = get_random_word_that_has_defs($connection, $num_headwords, $MAX_DEF_LENGTH, $MIN_DEF_LENGTH);
if (count($_POST) > 0) {
$result = ['foo' => 'bar', 'first' => $_POST['id']];
echo json_encode($result);
}
?>
<?php
set_time_limit(300);
$mes = $_GET['mes'];
$farma = $_GET['farma'];
$ameses = array('Ene', 'Feb', 'Mar', 'Abr', 'May', 'Jun', 'Jul', 'Ago', 'Sep', 'Oct', 'Nov', 'Dic');
$anomeses = array('01' => 'ENERO', '02' => 'FEBRERO', '03' => 'MARZO', '04' => 'ABRIL', '05' => 'MAYO', '06' => 'JUNIO', '07' => 'JULIO', '08' => 'AGOSTO', '09' => 'SEPTIEMBRE', '10' => 'OCTBRE', '11' => 'NOVIEMBRE', '12' => 'DICIEMBRE');
require "mysql.php";
$link = myconnect();
// BUSCA EN CIVA EL IVA QUE CORRESPONDE
$mc = damecur("SELECT tasa, redutasa, sobretasa FROM civa WHERE fecha < {$mes}" . "01" . " ORDER BY fecha DESC LIMIT 1");
$row = mysql_fetch_row($mc);
$tasa = $row[0];
$redutasa = $row[1];
$sobretasa = $row[2];
if ($mes >= 200703) {
$tasa = 11;
//traevalor('TASA');
} else {
$tasa = 14;
//traevalor('TASA');
}
@mysql_select_db("{$farma}") or die("No se pudo conectar a {$farma}");
require_once "../wexcel/class.writeexcel_workbook.inc.php";
require_once "../wexcel/class.writeexcel_worksheet.inc.php";
// ARREGLA SIVA PORSIA
$mSQL = "UPDATE siva SET impuesto=0, geneimpu=0, exento=gtotal, stotal=gtotal, general=0 where geneimpu<0 and general>=0 ";
ejecutasql($mSQL);
$mSQL = "UPDATE siva SET geneimpu=0, exento=exento+general, stotal=exento+general, general=0 WHERE geneimpu=0 and general<0 ";
ejecutasql($mSQL);
$mSQL = "\nSELECT \na.fecha AS fecha,\na.numero AS NUMERO,\na.nfiscal AS FINAL,\na.rif AS RIF,\nIF( MID(a.rif,1,1) NOT IN ('J','G') AND b.contacto IS NOT NULL AND b.contacto!='',b.contacto,a.nombre) AS NOMBRE,\nIF(a.tipo='NC',a.numero,' ') AS NUMNC,\nIF(a.tipo='ND',a.numero,' ') AS NUMND,\na.tipo AS TIPO, \nIF(a.referen=a.numero,' ',a.referen) AS AFECTA,\na.gtotal*IF(a.tipo='NC',-1,1) VENTATOTAL,\na.exento*IF(a.tipo='NC',-1,1) EXENTO,\na.general*IF(a.tipo='NC',-1,1) BASE,\n'{$tasa}%' AS ALICUOTA,\na.impuesto*IF(a.tipo='NC',-1,1) AS Cgimpu,\na.reiva*IF(a.tipo='NC',-1,1),\n' ' COMPROBANTE,\n' ' FECHACOMP,\n' ' IMPERCIBIDO,\n' ' IMPORTACION,\n'SI' tiva, \na.tipo, \na.numero numa,\na.general,\na.geneimpu,\na.adicional,\na.adicimpu,\na.reducida,\na.reduimpu,\na.contribu c2\nFROM siva a LEFT JOIN scli b ON a.clipro=b.cliente\nWHERE EXTRACT(YEAR_MONTH FROM a.fechal)={$mes} AND a.libro='V' AND a.tipo<>'FA' \nORDER BY a.fecha, IF(a.tipo IN ('FC','XE','XC'),1,2), numa ";
