<?php
include('../../Connections/conexion.php');
include('../../main/libreria.php');

$mes  = $_GET['mes'];//mes seleccionado para generar el archivo XML
$ano = $_GET['ano']; // año seleccionado.

mysql_select_db($database_conexion, $conexion);
echo $insertSQL = "update `provedor` set provruc=replace(provruc, ' ', ' ')";
$Result1 = mysql_query($insertSQL, $conexion) or die(mysql_error());
	
		
///PENDIENTE	 
mysql_select_db($database_conexion, $conexion);
$result=mysql_query("UPDATE `fcabecera_1` SET fcariva =0 WHERE `fcariva` IS NULL",$conexion);
//$result=mysql_query("UPDATE `fcabecera_1` SET fcariva30 =0 WHERE `fcariva30` IS NULL",$conexion);


mysql_select_db($database_conexion, $conexion);
$result=mysql_query("SELECT * FROM sriinfor",$conexion);
$infor=mysql_fetch_array($result);

///VENTAS PARA CABECERA///
mysql_select_db($database_conexion, $conexion);
$query_sucursales = "SELECT suc_codigo FROM sucursal WHERE suc_tipo = 'VENTA'";
$sucursales = mysql_query($query_sucursales, $conexion) or die(mysql_error());
$row_sucursales = mysql_fetch_assoc($sucursales);
$totalRows_sucursales = mysql_num_rows($sucursales);

$todos = $totalRows_sucursales;

mysql_select_db($database_conexion, $conexion);
$queryiva="SELECT sucursal_1/100 as valoriva FROM parametros WHERE nparametro = 'iva'";
$ivas=mysql_query($queryiva, $conexion) or die(mysql_error());
$row_queryiva = mysql_fetch_assoc($ivas);
$totalRows_ivas = mysql_num_rows($ivas);


mysql_select_db($database_conexion, $conexion);
$query_Recordset3 = "TRUNCATE TABLE ReporteVentasATS";
$Recordset3 = mysql_query($query_Recordset3, $conexion) or die(mysql_error());

do
{
	$i = $row_sucursales['suc_codigo'];
	$sql = " INSERT INTO ReporteVentasATS (cliciruc, doce, cero, iva, tipo, largo, documentos, tipodoc, retfuente, retiva, punto, doc_tipo, fac_numero, formapago) VALUES 
	('0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '$i', '0', '0', '0')";
	$ReporteComprasATSventas = mysql_query($sql, $conexion) or die(mysql_error());
}while($row_sucursales = mysql_fetch_assoc($sucursales));
mysql_data_seek($sucursales, 0); $row_sucursales = mysql_fetch_assoc($sucursales);

do
{
	$i = $row_sucursales['suc_codigo'];
	/*$sql = "SELECT ase_ruc as cliciruc,
	IFNULL((sum(fcasubtotal-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))),0)as doce,
	IFNULL((sum(`fcaivacero`-(fcaivacero*fcadescuento/(fcasubtotal+fcaivacero)))),0)as cero,
	IFNULL(((sum(`fcasubtotal`-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))*0.12)),0)as iva,
	if(LENGTH(cliciruc)=13 and cliciruc!='9999999999999','04',if(LENGTH(cliciruc)=10,'05',if(LENGTH(cliciruc)=8,'06',if(cliciruc='9999999999999','07','06'))))as tipo, LENGTH(cliciruc)as largo, 
	count(*)as documentos, 
	18 as tipodoc, 
	IFNULL(ROUND((SELECT SUM(abo_valorpago) FROM abonos_$i WHERE abo_numfactura = fcanfactura AND abo_estado = 1 AND abo_tipopago = 'RETENCION'
	AND  (year(abo_fretencion)=date('Y') and MONTH(abo_fretencion)=1)) ,2),0) as retfuente, 		
	 
	round(sum((fcaiva)*fcariva/100),2)as retiva, 
	$i as punto, 
	'FACTURA' as doc_tipo,
	fcanfactura as fac_numero, fcacodtipopago as formapago
	FROM fcabecera_$i 
	INNER JOIN  aseguradora on `CODCLIEN` = ase_codigo
	WHERE YEAR(fcafecha)=$ano and MONTH(fcafecha)=$mes and fcancelada!=5 
	group by fcanfactura";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($sql, $conexion) or die(mysql_error());
	$totalAseg=mysql_num_rows($vista_notas_creditot);*/

	//if($totalAseg!=0){

	echo $sql = "INSERT INTO ReporteVentasATS
	SELECT cliciruc as cliciruc,
	IFNULL((sum(fcasubtotal-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))),0)as doce,
	IFNULL((sum(`fcaivacero`-(fcaivacero*fcadescuento/(fcasubtotal+fcaivacero)))),0)as cero,
	IFNULL(((sum(`fcasubtotal`-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))*".$row_queryiva['valoriva'].")),0)as iva,
	if(LENGTH(cliciruc)=13 and cliciruc!='9999999999999','04',if(LENGTH(cliciruc)=10,'05',if(LENGTH(cliciruc)=8,'06',if(cliciruc='9999999999999','07','06'))))as tipo, LENGTH(cliciruc)as largo, 
	count(*)as documentos, 
	18 as tipodoc, 
	IFNULL(ROUND((SELECT SUM(abo_valorpago) FROM abonos_$i WHERE abo_numfactura = fcanfactura AND abo_estado = 1 AND abo_tipopago = 'RETENCION'
	AND  (year(abo_fretencion)=$ano and MONTH(abo_fretencion)=$mes)) ,2),0)-round(sum((fcaiva)*fcariva2/100),2) as retfuente,	 
	round(sum((fcaiva)*fcariva2/100),2)as retiva, 
	$i as punto, 
	'FACTURA' as doc_tipo,
	fcanfactura as fac_numero, if(fcatipopago='CONTADO','01',(if(fcatipopago='CREDITO DIRECTO','20',0))) as formapago 
	FROM fcabecera_$i 
	INNER JOIN  cliente on `CODCLIEN` = cli_codigo
	WHERE YEAR(fcafecha)=$ano and MONTH(fcafecha)=$mes and fcancelada!=4 
	group by fcanfactura";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($sql, $conexion) or die(mysql_error());
	//}
	// if(fcasubtotal=0,(round(sum((fcatotal)*fcarfuente2/100),2) ),(round(sum((fcasubtotal)*fcarfuente2/100),2)))as retfuente, 

	/*$sql = "SELECT clioc_ruc as cliciruc,
	IFNULL((sum(fcasubtotal-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))),0)as doce,
	IFNULL((sum(`fcaivacero`-(fcaivacero*fcadescuento/(fcasubtotal+fcaivacero)))),0)as cero,
	IFNULL(((sum(`fcasubtotal`-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))*0.12)),0)as iva,
	if(LENGTH(cliciruc)=13 and cliciruc!='9999999999999','04',if(LENGTH(cliciruc)=10,'05',if(LENGTH(cliciruc)=8,'06',if(cliciruc='9999999999999','07','06'))))as tipo, LENGTH(cliciruc)as largo, 
	count(*)as documentos, 
	18 as tipodoc, 
	IFNULL(ROUND((SELECT SUM(abo_valorpago) FROM abonos_$i WHERE abo_numfactura = fcanfactura AND abo_estado = 1 AND abo_tipopago = 'RETENCION'
	AND  (year(abo_fretencion)=date('Y') and MONTH(abo_fretencion)=1)) ,2),0) as retfuente, 		
	 
	round(sum((fcaiva)*fcariva/100),2)as retiva, 
	$i as punto, 
	'FACTURA' as doc_tipo,
	fcanfactura as fac_numero, fcacodtipopago as formapago
	FROM fcabecera_$i 
	INNER JOIN cliente_ocasional on cliciruc=clioc_cod
	WHERE YEAR(fcafecha)=$ano and MONTH(fcafecha)=$mes and fcancelada!=5 
	group by fcanfactura";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($sql, $conexion) or die(mysql_error());
	$totalAseg=mysql_num_rows($vista_notas_creditot);*/

	/*if($totalAseg!=0){*/

	/*$sql = "INSERT INTO ReporteVentasATS
	SELECT cliciruc as cliciruc,
	IFNULL((sum(fcasubtotal-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))),0)as doce,
	IFNULL((sum(`fcaivacero`-(fcaivacero*fcadescuento/(fcasubtotal+fcaivacero)))),0)as cero,
	IFNULL(((sum(`fcasubtotal`-(fcasubtotal*fcadescuento/(fcasubtotal+fcaivacero)))*".$row_queryiva['valoriva'].")),0)as iva,
	if(LENGTH(cliciruc)=13 or cliciruc!='9999999999999','04',if(LENGTH(cliciruc)=10,'05',if(LENGTH(cliciruc)=8,'06',if(cliciruc='9999999999999','07','06'))))as tipo, LENGTH(cliciruc)as largo, 
	count(*)as documentos, 
	18 as tipodoc, 
	IFNULL(ROUND((SELECT SUM(abo_valorpago) FROM abonos_$i WHERE abo_numfactura = fcanfactura AND abo_estado = 1 AND abo_tipopago = 'RETENCION'
	AND  (year(abo_fretencion)=$ano and MONTH(abo_fretencion)=1)) ,2),0),
	round(sum((fcaiva)*fcariva2/100),2)as retiva, 
	$i as punto, 
	'FACTURA' as doc_tipo,
	fcanfactura as fac_numero, fcacodtipopago as formapago
	FROM fcabecera_$i 
	INNER JOIN cliente_ocasional on cliciruc=clioc_cod
	WHERE YEAR(fcafecha)=$ano and MONTH(fcafecha)=$mes and fcancelada!=5 
	group by fcanfactura";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($sql, $conexion) or die(mysql_error());
*/
	$tbl_notas ="ncredito_".$i;

	echo $sql = " INSERT INTO ReporteVentasATS 
	SELECT cli_ciruc, 
	IFNULL((round(sum(nota_doce-(nota_doce*nota_descuento/(nota_doce+nota_cero))),2)*-1),0)as doce, 
	IFNULL((round(sum(nota_cero-(nota_cero*nota_descuento/(nota_doce+nota_cero))),2)*-1),0)as cero, 
	IFNULL((sum(nota_iva)*-1),0)as iva, 
	if(LENGTH(cli_ciruc)=13 and cli_ciruc!='9999999999999','04',if(LENGTH(cli_ciruc)=10,'05',if(LENGTH(cli_ciruc)=8,'06',if(cli_ciruc='9999999999999','07','06'))))as tipo, LENGTH(cli_ciruc)as largo, 
	count(*)as documentos, 
	'04' as tipodoc, 
	'0.00' as retfuente , 
	'0.00' as retiva, 
	$i as punto,
	'NOTA_CREDITO', 0 , 0 as formapago
	FROM $tbl_notas 
	INNER JOIN cliente on `nota_cliente` = cli_codigo
	WHERE nota_estado <> 2 AND month(nota_fecha)=$mes AND year(nota_fecha)=$ano AND numeronotacredito > 0
	group by cli_ciruc";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($sql, $conexion) or die(mysql_error());

	//}

	

	/*$query_nota_credito = " INSERT INTO ReporteVentasATS 
	SELECT 
	fctar_ruc as cliciruc, 0 as doce, 0 as cero, 0 as iva, 
	if(LENGTH(fctar_ruc)=13 and fctar_ruc!='9999999999999','04',if(LENGTH(fctar_ruc)=10,'05',if(LENGTH(fctar_ruc)=8,'06',if(fctar_ruc='9999999999999','07','06'))))
	 as tipo, LENGTH(fctar_ruc) as largo, 0 as documentos, '18' as tipodoc, (tc_valretencion) as retfuente, 0 as retiva, $i as punto, 'FACTURA' AS doc_tipo, 0 fac_numero, 0 as formapago
	FROM `abonosdestc_$i` 
	INNER JOIN abonostc_$i ON atc_codtarcre = tc_codigo
	INNER JOIN fcobros_tarjetas ON tc_tarjeta = fctar_codigo
	WHERE atc_tipo = 'RETENCION' and  month(atc_fecha)=$mes AND year(atc_fecha)=$ano
	GROUP BY fctar_ruc";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($query_nota_credito, $conexion) or die(mysql_error());*/

}while($row_sucursales = mysql_fetch_assoc($sucursales));

mysql_data_seek($sucursales, 0); $row_sucursales = mysql_fetch_assoc($sucursales);
/*do
{
	$i = $row_sucursales['suc_codigo'];
	$tbl_notas ="ncredito_".$i;

	$query_nota_credito = " INSERT INTO ReporteVentasATS 
	SELECT cli_ciruc, 
	IFNULL((round(sum(nota_doce-(nota_doce*nota_descuento/(nota_doce+nota_cero))),2)*-1),0)as doce, 
	IFNULL((round(sum(nota_cero-(nota_cero*nota_descuento/(nota_doce+nota_cero))),2)*-1),0)as cero, 
	IFNULL((sum(nota_iva)*-1),0)as iva, 
	if(LENGTH(cli_ciruc)=13 and cli_ciruc!='9999999999999','04',if(LENGTH(cli_ciruc)=10,'05',if(LENGTH(cli_ciruc)=8,'06',if(cli_ciruc='9999999999999','07','06'))))as tipo, LENGTH(cli_ciruc)as largo, 
	count(*)as documentos, 
	'04' as tipodoc, 
	'0.00' as retfuente , 
	'0.00' as retiva, 
	$i as punto,
	'NOTA_CREDITO', 0 , 0 as formapago
	FROM $tbl_notas INNER JOIN cliente on `nota_cliente` = cli_codigo 
	WHERE nota_estado <> 2 AND month(nota_fecha)=$mes AND year(nota_fecha)=$ano AND numeronotacredito > 0
	group by cli_ciruc";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditot = mysql_query($query_nota_credito, $conexion) or die(mysql_error());		
}while($row_sucursales = mysql_fetch_assoc($sucursales));*/


mysql_select_db($database_conexion, $conexion);
$query_sri = "SELECT SUM(doce + cero) AS ventas FROM ReporteVentasATS ";
$sri = mysql_query($query_sri, $conexion) or die(mysql_error());
$row_sri = mysql_fetch_assoc($sri);

//Funcion llenar con ceros

function zerofill($entero, $largo)
{
    $entero = (int)$entero;
    $largo = (int)$largo;
    $ceros=strlen($entero);
    $relleno = '';

    if ($ceros < $largo)
	{
		$ceros1=$largo-$ceros;
        $relleno = str_repeat('0', $ceros1);
    }
	//return $relleno;
    return $relleno . $entero;
}

$todos1= zerofill($todos, 3);

//generamos la cabecera del el xml correcta
if (strlen($mes)==1)$mes="0".$mes;
$buffer.="<iva>\n";
$buffer.=" <TipoIDInformante>"."R"."</TipoIDInformante>\n";
$buffer.=" <IdInformante>".$infor['ruc']."</IdInformante>\n";
$buffer.=" <razonSocial>".$infor['empresa']."</razonSocial>\n";
$buffer.=" <Anio>".$ano."</Anio>\n";
$buffer.=" <Mes>".$mes."</Mes>\n";
$buffer.=" <numEstabRuc>".$todos1."</numEstabRuc>\n";
$buffer.=" <totalVentas>".$row_sri['ventas']."</totalVentas>\n";
$buffer.=" <codigoOperativo>IVA</codigoOperativo>\n";
$buffer.=" <compras>\n";
//cargamos el detalle del xml

mysql_select_db($database_conexion, $conexion);
$elimina_vista = "TRUNCATE TABLE ReporteComprasATS";
$drop_view = mysql_query($elimina_vista, $conexion) or die(mysql_error());

// SUM(IF(fde_iva = 1,`fde_fuentebase` ,0))
echo $sql="INSERT INTO ReporteComprasATS  
SELECT `fcaccod` , `fcaccodprov` , `factipodocumento` , `fcacnfactura` , `fcacfechaemi` , IF(fde_tipo='SE',`fcac_porivaservicios`,0) as fcac_porivaservicios, IF(fde_tipo='SE',`fcac_valivaservicios`,0) as fcac_valivaservicios , IF(fde_tipo='CO',`fcac_porivabienes`,0) as fcac_porivabienes , 
IF(fde_tipo='CO',`fcac_valivabienes`,0)  as fcac_valivabienes, sum(fde_retfte) as  `fcacporret` ,  fcacsubtotaliva, 
`fcacdescuento` , `fcacsubtotalnoiva` ,`fcacice`, `fcaciva` , `fcactransporte` , `fcactotal` , `fcaits` , `fac_tipogasto` , `fac_tipogasto1` , `fcac_nretencion` , `fcac_nroautorizacion` , `fcac_fechacaduca` , `fcac_nautorizacion` ,
provcod, provnom, provruc, provtipo,
SUM(fde_fuentebase) AS fde_fuentebase, fde_codretencion, fde_porretfuente, sum(fde_retfte) as fde_retfte,
codigo, sritabla.concepto, fac_aplicConvDobTrib, fac_pagExtSujRetNorLeg, fac_pagoLocExt, fac_formapago, fac_paisEfcPago, 
(select sum(if(fde_codretencion=86,fde_fuentebase,0)) from fdetallecomp where fcaccod  = fdeccodfcac group by fdeccodfcac) as seguros,
fcac_nserieret
FROM fcabeceracomp 
INNER JOIN fdetallecomp on fcaccod = fdeccodfcac 
INNER JOIN sritabla on sricod = fde_codretencion AND fde_codretencion NOT IN (86, 87)
INNER JOIN provedor ON fcaccodprov = provcod
WHERE YEAR( fcacfechaemi ) =$ano
AND MONTH( fcacfechaemi ) =$mes 
and fcaits!=99
GROUP BY provcod, fcacnfactura, fde_codretencion
";
$result = mysql_query($sql,$conexion);

//NOTAS DE CREDITO

	$sql = " INSERT INTO ReporteComprasATS 
	SELECT ncprov_codigo,ncprov_codproveedor, 'NOTAS DE CREDITO',ncprov_numdocumento,ncprov_fecdocumento, 
	0 as fcac_porivaservicios, 0 as fcac_valivaservicios ,0 as fcac_porivabienes , 0 as fcac_valivabienes, 
	0 as `fcacporret`, ncprov_sub12 as fcacsubtotaliva, ncprov_descuento as`fcacdescuento` ,
	ncprov_sub0 as `fcacsubtotalnoiva` ,0 as`fcacice`, ncprov_iva as `fcaciva` , 0 as`fcactransporte` , 
	ncprov_total as `fcactotal` ,'01' as `fcaits` , 0 as fac_tipogasto, 0 as `fac_tipogasto1` ,  `fcacnfactura` ,  
	`fcac_nroautorizacion` , 0 as`fcac_fechacaduca` , `fcac_nautorizacion`,provcod, provnom, provruc, provtipo,
	0 AS fde_fuentebase, 0 as fde_codretencion, 0 as fde_porretfuente, 0 as fde_retfte, 0 as codigo,0 as concepto, 
	fac_aplicConvDobTrib, fac_pagExtSujRetNorLeg, fac_pagoLocExt, fac_formapago, fac_paisEfcPago, 0 as seguros, 
	fcac_nserieret 
	FROM proveedor_ncredito 
	INNER JOIN fcabeceracomp ON fcacnfactura = ncprov_ndocaplica 
	INNER JOIN provedor ON provcod = ncprov_codproveedor 
	WHERE month(ncprov_fecdocumento)=$mes AND year(ncprov_fecdocumento)=$ano and ncprov_estado!=2 
	GROUP BY ncprov_codigo ORDER BY ncprov_fecdocumento DESC";
	mysql_select_db($database_conexion, $conexion);
	$vista_notas_creditoc = mysql_query($sql, $conexion) or die(mysql_error());
/////////
$query_retencion = "SELECT fcac_nretencion FROM ReporteComprasATS";
$retencionn = mysql_query($query_retencion, $conexion) or die(mysql_error());
$row_retencion = mysql_fetch_assoc($retencionn);
$totalRows_retencion = mysql_num_rows($retencionn);


$sql="SELECT fcaccod, fcaccodprov, factipodocumento, fcacnfactura, fcacfechaemi, max(fcac_porivaservicios) as fcac_porivaservicios, fcac_valivaservicios as fcac_valivaservicios, max(fcac_porivabienes) as fcac_porivabienes, sum(fcac_valivabienes) as fcac_valivabienes, sum(fcacporret) as fcacporret, max(fcacsubtotaliva) as fcacsubtotaliva, sum(fcacdescuento) as fcacdescuento, max(fcacsubtotalnoiva) as fcacsubtotalnoiva, fcacice, fcaciva, sum(fcactransporte) as fcactransporte, fcactotal, fcaits, fac_tipogasto, fac_tipogasto1,if(LENGTH(fcac_nretencion)=17,SUBSTRING(fcac_nretencion, 9, 9),fcac_nretencion) as fcac_nretencion, fcac_nroautorizacion, fcac_fechacaduca, fcac_nautorizacion, provcod, provnom, provruc, provtipo, SUM(fde_fuentebase), fde_codretencion, fde_porretfuente, fde_retfte, codigo, concepto, fac_aplicConvDobTrib, fac_pagExtSujRetNorLeg, fac_pagoLocExt, fac_formapago, fac_paisEfcPago, seguros, max(fcac_nserieret) as fcac_nserieret
FROM ReporteComprasATS
where factipodocumento  not like '%NOTAS DE CREDITO%'
group by provcod, fcacnfactura";
$result = mysql_query($sql,$conexion);	
while ($fila=mysql_fetch_assoc($result))
{
	$id='01';
	if(strlen($fila['provruc'])==13 && ($fila['provtipo'])=='NACIONAL'){$id='01';}
	else if(strlen($fila['provruc'])==10 && ($fila['provtipo'])=='NACIONAL'){$id='02';}
	else if(strlen($fila['provruc'])<=12 && ($fila['provtipo'])=='INTERNACIONAL'){ $id='03';
	$tc=1;}
	if($fila['factipodocumento']=='FACTURA'){$tc=1;}
	else if($fila['factipodocumento']=='NOTA VENTA'||$fila['factipodocumento']=='RISE'){$tc=2;}
	else if($fila['factipodocumento']=='LIQ.COMPRA'){$tc=3;}
	      
	$algo=$fila['fcacnfactura'];
	$algo=$fila['fcacnfactura'];
	$cadena=explode("-",$algo);
	$ret=$cadena[2];
	$provcod=$fila['provcod'];
	
	$bienes=$fila['fcac_valivabienes'];
	if($fila['fcac_porivabienes']==100)
	{
		//$cien=$bienes;
		$bienes=0;
	}
	$servicios=$fila['fcac_valivaservicios'];
	$cien=0;
	if($fila['fcac_porivaservicios']==100)
	{
		$cien = $cien + $servicios;
		$servicios=0;
	}
	
	mysql_select_db($database_conexion, $conexion);
	$sqlretencion="SELECT codigo, fcac_nretencion,fde_porretfuente as retftepor, fde_codretencion as retfte, round(sum(fde_retfte),2) as tot, sum(fde_fuentebase)as baseimp, round(fcac_valivaservicios + fcac_valivabienes,2)as tot_iva, (fcaciva)as baseimp_iva, round(fde_fuentebase - fcaciva,2) as basecero,fac_aplicConvDobTrib, fac_pagExtSujRetNorLeg, fac_pagoLocExt, fac_formapago, fac_paisEfcPago, seguros 
	FROM ReporteComprasATS 
	WHERE fcacnfactura='$algo' AND provcod = $provcod and fde_codretencion not in(86, 87) and factipodocumento  not like '%NOTAS DE CREDITO%' group by codigo";	
	
	
	/*SELECT clave_acceso,fcac_nretencion,codigo, fde_porretfuente as retftepor, fde_codretencion as retfte, round(sum(fde_retfte),2) as tot, sum(fde_fuentebase)as baseimp, round(fcac_valivaservicios + fcac_valivabienes,2)as tot_iva, (fcaciva)as baseimp_iva, round(fde_fuentebase - fcaciva,2) as basecero,fac_aplicConvDobTrib, fac_pagExtSujRetNorLeg, fac_pagoLocExt, fac_formapago, fac_paisEfcPago, seguros 
	FROM ReporteComprasATS
	inner join ce_transacciones on secuencial=$ret
	FROM ReporteComprasATS 
	WHERE fcacnfactura='$algo' AND provcod = $provcod and nombre_comprobante='RETENCIONES' and fde_codretencion not in(86, 87) group by codigo";*/	
	
	
	 
	    
	if ($fila['fcaciva']=='null' || $fila['fcaciva']=='' || is_null($fila['fcaciva']))
	{$ivac=0.00;} 
	else 
	{$ivac=$fila['fcaciva'];}	 
   
	if ($fila['seguros']>0)
	{
		$basei=$fila['fcacsubtotaliva']-$fila['seguros'];
		$montoiva=($basei*0.12);
	}
	else
	{
		$basei=$fila['fcacsubtotaliva'];
		$montoiva=$ivac;	
	}
	$basei=$fila['fcacsubtotaliva'];
		$montoiva=$ivac;
			
	if($fila['retdeviva'] == 1) $valiva = $fila['fcaciva']; else $valiva = "0.00";
	$buffer.="\t<detalleCompras>\n";
	$buffer.="\t\t<codSustento>".$fila['fcaits']."</codSustento>\n";
    $buffer.="\t\t<tpIdProv>".$id."</tpIdProv>\n";
    $buffer.="\t\t<idProv>".trim($fila['provruc'])."</idProv>\n";
    $buffer.="\t\t<tipoComprobante>".zerofill($tc, 2)."</tipoComprobante>\n";
	$buffer.="\t\t<parteRel>NO</parteRel>\n";
	
	
	if ($id==3)
	{
		$buffer.="\t\t<tipoProv>02</tipoProv>\n";
		$buffer.="\t\t<parteRel>NO</parteRel>\n";		
	}
    $buffer.="\t\t<fechaRegistro>".substr($fila['fcacfechaemi'],8,2)."/".substr($fila['fcacfechaemi'],5,2)."/".substr($fila['fcacfechaemi'],0,4)."</fechaRegistro>\n";
    $buffer.="\t\t<establecimiento>".substr($fila['fcacnfactura'],0,3)."</establecimiento>\n";
    $buffer.="\t\t<puntoEmision>".substr($fila['fcacnfactura'],4,3)."</puntoEmision>\n";
    $buffer.="\t\t<secuencial>".substr($fila['fcacnfactura'],8,9)."</secuencial>\n";
    $buffer.="\t\t<fechaEmision>".substr($fila['fcacfechaemi'],8,2)."/".substr($fila['fcacfechaemi'],5,2)."/".substr($fila['fcacfechaemi'],0,4)."</fechaEmision>\n";
    
	//$buffer.="\t\t<autorizacion>".zerofill($fila['fcac_nautorizacion'],3)."</autorizacion>\n";
	mysql_select_db($database_conexion, $conexion);
	$query_aut_compras = "select pest_autorizacion, fcac_nautorizacion from proveedor_sucursales 
	inner join fcabeceracomp on fcaccodprov=pest_codprov
	where pest_codprov=".$fila['fcaccodprov']." and pest_autorizacion like '%".$fila['fcac_nautorizacion']."%'
 	GROUP BY pest_autorizacion";
	$aut_compras = mysql_query($query_aut_compras, $conexion) or die(mysql_error());
	$row_compras = mysql_fetch_assoc($aut_compras);
	$buffer.="\t\t<autorizacion>".$row_compras['pest_autorizacion']."</autorizacion>\n";
	
	$buffer.="\t\t<baseNoGraIva>0.00</baseNoGraIva>\n";
    $buffer.="\t\t<baseImponible>".$fila['fcacsubtotalnoiva']."</baseImponible>\n";
    $buffer.="\t\t<baseImpGrav>".number_format($basei,2,".","")."</baseImpGrav>\n";
	$buffer.="\t\t<baseImpExe>0.00</baseImpExe>\n";
    $buffer.="\t\t<montoIce>0.00</montoIce>\n";
    $buffer.="\t\t<montoIva>".number_format($montoiva,2,".","")."</montoIva>\n";//*****///****/////*****////*****////***//
   	
	$buffer.="\t\t<valRetBien10>0.00</valRetBien10>\n";//se agrega
	$buffer.="\t\t<valRetServ20>0.00</valRetServ20>\n";//se agrega*/
   
    $buffer.="\t\t<valorRetBienes>".$bienes."</valorRetBienes>\n";
	
	$buffer.="\t\t<valRetServ50>0.00</valRetServ50>\n";//se agrega
	
    $buffer.="\t\t<valorRetServicios>".$servicios."</valorRetServicios>\n";
    $buffer.="\t\t<valRetServ100>".number_format($cien,2,".","")."</valRetServ100>\n";
	$buffer.="\t\t<totbasesImpReemb>0.00</totbasesImpReemb>\n";
	$buffer.="\t\t<pagoExterior>\n";
	
	$p1=zerofill($fila['fac_pagoLocExt'],2);
		
	if ($fila['fac_paisEfcPago']==null)
	{$p2='NA';}
	else	
	{$p2=zerofill($fila['fac_paisEfcPago'],2);}
  
  
	if ($fila['fac_aplicConvDobTrib']==null)
	{$p3='NA';}
	else	
	{$p3=$fila['fac_aplicConvDobTrib'];}
  
	if ($fila['fac_pagExtSujRetNorLeg']==null)
	{$p4='NA';}
	else	
	{$p4=$fila['fac_pagExtSujRetNorLeg'];}

	$buffer.="\t\t\t\t<pagoLocExt>".$p1."</pagoLocExt>\n"; 
	
	$buffer.="\t\t\t\t<tipoRegi>01</tipoRegi>\n";//se agrega
	$buffer.="\t\t\t\t<paisEfecPagoGen>".$p2."</paisEfecPagoGen>\n";//se agrega

	
	$buffer.="\t\t\t\t<paisEfecPago>".$p2."</paisEfecPago>\n";
	$buffer.="\t\t\t\t<aplicConvDobTrib>".$p3."</aplicConvDobTrib>\n";
	$buffer.="\t\t\t\t<pagExtSujRetNorLeg>".$p4."</pagExtSujRetNorLeg> \n";
	$buffer.="\t\t</pagoExterior>\n";
	$fpago='01';
	if ($fila['fcactotal']>1000) 
	{
		$fpago = zerofill($fila['fac_formapago'],2);
		$buffer.="\t\t<formasDePago>\n";
		$buffer.="\t\t\t\t<formaPago>".$fpago."</formaPago>\n";
		$buffer.="\t\t</formasDePago>\n";
	}
	$buffer.="\t\t<air>\n";	
			
	//echo $sqlretencion;
	
	$resultretencion=mysql_query($sqlretencion, $conexion) or die(mysql_error());
	
	
	//$resultretencion = mysql_ery($sqlretencion,$conexion);
	$totalRows_cantidad = mysql_num_rows($resultretencion);
	$xy = 1;
	while ($filaretecion=mysql_fetch_assoc($resultretencion))
	{
		$buffer.="\t\t\t<detalleAir>\n";
		$buffer.="\t\t\t\t<codRetAir>".trim($filaretecion['codigo'])."</codRetAir>\n";
		$buffer.="\t\t\t\t<baseImpAir>".trim($filaretecion['baseimp'])."</baseImpAir>\n";
		$buffer.="\t\t\t\t<porcentajeAir>".number_format($filaretecion['retftepor'],2,".",",")."</porcentajeAir>\n";
		$buffer.="\t\t\t\t<valRetAir>".trim($filaretecion['tot'])."</valRetAir>\n";	
		$buffer.="\t\t\t</detalleAir>\n";	
	}
	//
	$buffer.="\t\t</air>\n";
	if($fila['fcac_nretencion']!= 0){		// fcac_nserieret	
	$buffer.="\t\t<estabRetencion1>".substr($fila['fcac_nserieret'],0,3)."</estabRetencion1>\n";
	$buffer.="\t\t<ptoEmiRetencion1>".substr($fila['fcac_nserieret'],4,7)."</ptoEmiRetencion1>\n";
	$buffer.="\t\t<secRetencion1>".trim($fila['fcac_nretencion'])."</secRetencion1>\n";
	//query para la clave de acceso de la retencion emitida por redmedica
	mysql_select_db($database_conexion, $conexion);
	$sqlclaveretencion="SELECT clave_acceso,fcac_nretencion
	FROM ReporteComprasATS 
	inner join ce_transacciones on secuencial=".trim($fila['fcac_nretencion'])."
	WHERE fcacnfactura='$algo' AND provcod = $provcod and nombre_comprobante='RETENCIONES' and fde_codretencion not in(86, 87) group by codigo";	
	
	$resulclaveretencion=mysql_query($sqlclaveretencion, $conexion) or die(mysql_error());
	while ($filaclaveretecion=mysql_fetch_assoc($resulclaveretencion))
	{
		$buffer.="\t\t<autRetencion1>".trim($filaclaveretecion['clave_acceso'])."</autRetencion1>\n";
	}
	//$buffer.="\t\t<autRetencion1>".trim($fila['fcac_nroautorizacion'])."</autRetencion1>\n";
	$buffer.="\t\t<fechaEmiRet1>".trim(substr($fila['fcacfechaemi'],8,2)).'/'.trim(substr($fila['fcacfechaemi'],5,2)).'/'.trim(substr($fila['fcacfechaemi'],0,4))."</fechaEmiRet1>\n";
	
	
	
}
	$buffer.="\t</detalleCompras>\n";
}	
//NOTAS DE CREDITO COMPRAS
mysql_select_db($database_conexion, $conexion);
$sql="SELECT *FROM ReporteComprasATS inner join proveedor_ncredito on ncprov_codigo=fcaccod where factipodocumento like '%NOTAS DE CREDITO%' order by provruc"; 

/*echo $sql="SELECT fcaccodprov,factipodocumento,fcacnfactura,fcac_valivabienes,fcac_nretencion,fcac_nretencion,fcac_porivabienes,fcaits,fcacfechaemi,provruc,provtipo,provcod,
ncprov_numdocumento,ncprov_nautorizacion,ncprov_sub0,fac_pagoLocExt,fac_paisEfcPago,fac_aplicConvDobTrib,fac_pagExtSujRetNorLeg FROM ReporteComprasATS 
inner join proveedor_ncredito on ncprov_codigo=fcaccod where factipodocumento like '%NOTAS DE CREDITO%'";*/
$result = mysql_query($sql,$conexion) or die(mysql_error());	
while($fila=mysql_fetch_assoc($result))
{
	$id='01';
	if(strlen($fila['provruc'])==13 && ($fila['provtipo'])=='NACIONAL'){$id='01';}
	else if(strlen($fila['provruc'])==10 && ($fila['provtipo'])=='NACIONAL'){$id='02';}
	else if(strlen($fila['provruc'])<=12 && ($fila['provtipo'])=='INTERNACIONAL'){ $id='03';
	$tcc=1;}
	if($fila['factipodocumento']=='FACTURA'){$tcc=1;}
	else if($fila['factipodocumento']=='NOTA VENTA'||$fila['factipodocumento']=='RISE'){$tcc=2;}
	else if($fila['factipodocumento']=='LIQ.COMPRA'){$tcc=3;}
	else if($fila['factipodocumento']=='NOTAS DE CREDITO'){$tcc=4;}
	
    $tcc;
	$algo=$fila['fcacnfactura'];
	$algo=$fila['fcacnfactura'];
	$cadena=explode("-",$algo);
	$ret=$cadena[2];
	$provcod=$fila['provcod'];
	
	$bienes=$fila['fcac_valivabienes'];
	if($fila['fcac_porivabienes']==100)
	{
		//$cien=$bienes;
		$bienes=0;
	}
	$servicios=$fila['fcac_valivaservicios'];
	$cien=0;
	if($fila['fcac_porivaservicios']==100)
	{
		$cien = $cien + $servicios;
		$servicios=0;
	}
	$buffer.="\t<detalleCompras>\n";
	$buffer.="\t\t<codSustento>".$fila['fcaits']."</codSustento>\n";
	$buffer.="\t\t<tpIdProv>".$id."</tpIdProv>\n";
    $buffer.="\t\t<idProv>".trim($fila['provruc'])."</idProv>\n";
    $buffer.="\t\t<tipoComprobante>04</tipoComprobante>\n";
	$buffer.="\t\t<parteRel>NO</parteRel>\n";
	
	$buffer.="\t\t<fechaRegistro>".substr($fila['fcacfechaemi'],8,2)."/".substr($fila['fcacfechaemi'],5,2)."/".substr($fila['fcacfechaemi'],0,4)."</fechaRegistro>\n";
    $buffer.="\t\t<establecimiento>".substr($fila['ncprov_numdocumento'],0,3)."</establecimiento>\n";
    $buffer.="\t\t<puntoEmision>".substr($fila['ncprov_numdocumento'],4,3)."</puntoEmision>\n";
    $buffer.="\t\t<secuencial>".substr($fila['ncprov_numdocumento'],8,9)."</secuencial>\n";
    $buffer.="\t\t<fechaEmision>".substr($fila['fcacfechaemi'],8,2)."/".substr($fila['fcacfechaemi'],5,2)."/".substr($fila['fcacfechaemi'],0,4)."</fechaEmision>\n";
    
	$buffer.="\t\t<autorizacion>".$fila['ncprov_nautorizacion']."</autorizacion>\n";
	
	$buffer.="\t\t<baseNoGraIva>0.00</baseNoGraIva>\n";
    $buffer.="\t\t<baseImponible>".$fila['ncprov_sub0']."</baseImponible>\n";
    $buffer.="\t\t<baseImpGrav>".$fila['ncprov_sub12']."</baseImpGrav>\n";
	$buffer.="\t\t<baseImpExe>0.00</baseImpExe>\n";
    $buffer.="\t\t<montoIce>0.00</montoIce>\n";
    $buffer.="\t\t<montoIva>".$fila['ncprov_iva']."</montoIva>\n";//*****///****/////*****////*****////***//
   	
	$buffer.="\t\t<valRetBien10>0.00</valRetBien10>\n";//se agrega
	$buffer.="\t\t<valRetServ20>0.00</valRetServ20>\n";//se agrega*/
   
    $buffer.="\t\t<valorRetBienes>".$bienes."</valorRetBienes>\n";
	
	$buffer.="\t\t<valRetServ50>0.00</valRetServ50>\n";//se agrega
	
    $buffer.="\t\t<valorRetServicios>".$servicios."</valorRetServicios>\n";
    $buffer.="\t\t<valRetServ100>".number_format($cien,2,".","")."</valRetServ100>\n";
	$buffer.="\t\t<totbasesImpReemb>0.00</totbasesImpReemb>\n";
	$buffer.="\t\t<pagoExterior>\n";
	
	$p1=zerofill($fila['fac_pagoLocExt'],2);
		
	if ($fila['fac_paisEfcPago']==null)
	{$p2='NA';}
	else	
	{$p2=zerofill($fila['fac_paisEfcPago'],2);}
  
  
	if ($fila['fac_aplicConvDobTrib']==null)
	{$p3='NA';}
	else	
	{$p3=$fila['fac_aplicConvDobTrib'];}
  
	if ($fila['fac_pagExtSujRetNorLeg']==null)
	{$p4='NA';}
	else	
	{$p4=$fila['fac_pagExtSujRetNorLeg'];}

	$buffer.="\t\t\t\t<pagoLocExt>".$p1."</pagoLocExt>\n"; 
	$buffer.="\t\t\t\t<paisEfecPago>".$p2."</paisEfecPago>\n";
	$buffer.="\t\t\t\t<aplicConvDobTrib>".$p3."</aplicConvDobTrib>\n";
	$buffer.="\t\t\t\t<pagExtSujRetNorLeg>".$p4."</pagExtSujRetNorLeg> \n";
	$buffer.="\t\t</pagoExterior>\n";
	
	$buffer.="\t\t<docModificado>".$fila['fcaits']."</docModificado>\n";
	$nc=$fila['fcac_nretencion'];
	$cantidadnc=explode("-",$nc);
	mysql_select_db($database_conexion, $conexion);
	$query_aut_compras = "select pest_autorizacion, fcac_nautorizacion from proveedor_sucursales 
	inner join fcabeceracomp on fcaccodprov=pest_codprov
	where pest_codprov=".$fila['fcaccodprov']." and pest_autorizacion like '%".$fila['fcac_nautorizacion']."%'
 	GROUP BY pest_autorizacion";
	$aut_compras = mysql_query($query_aut_compras, $conexion) or die(mysql_error());
	$row_compras = mysql_fetch_assoc($aut_compras);
	//$buffer.="\t\t<autorizacion>".$row_compras['pest_autorizacion']."</autorizacion>\n";
	
	
	$buffer.="\t\t<estabModificado>".$cantidadnc[0]."</estabModificado>\n";
	$buffer.="\t\t<ptoEmiModificado>".$cantidadnc[1]."</ptoEmiModificado>\n";
	$buffer.="\t\t<secModificado>".$cantidadnc[2]."</secModificado>\n";
	$buffer.="\t\t<autModificado>".$row_compras['pest_autorizacion']."</autModificado>\n";
	$buffer.="\t\t</detalleCompras>\n";
}

/////////// LLENAR VENTAS /////////////
mysql_select_db($database_conexion, $conexion);
$sql=" SELECT cliciruc, formapago,sum(doce) as doce, sum(cero) as cero, sum(iva) as iva, tipo, largo, SUM(documentos) documentos, tipodoc, ROUND(sum(retfuente),2) as retfuente, sum(retiva) as retiva, punto FROM ReporteVentasATS WHERE doc_tipo = 'FACTURA' GROUP BY cliciruc";
$result = mysql_query($sql,$conexion) or die(mysql_error());	
//generamos el final del xml

$buffer.="</compras>\n";
$buffer.="<ventas>\n";
//do{	
while ($fila=mysql_fetch_assoc($result))
{ 
	$buffer.="\t<detalleVentas>\n";
	$buffer.="\t\t<tpIdCliente>".$fila['tipo']."</tpIdCliente>\n";
	$buffer.="\t\t<idCliente>".$fila['cliciruc']."</idCliente>\n";
	$buffer.="\t\t<tipoComprobante>".zerofill($fila['tipodoc'],2)."</tipoComprobante>\n";
	$buffer.="\t\t<tipoEmision>F</tipoEmision>\n"; 
	$buffer.="\t\t<numeroComprobantes>".$fila['documentos']."</numeroComprobantes>\n";
	$buffer.="\t\t<baseNoGraIva>0.00</baseNoGraIva>\n";
	$buffer.="\t\t<baseImponible>".$fila['cero']."</baseImponible>\n";
	$buffer.="\t\t<baseImpGrav>".$fila['doce']."</baseImpGrav>\n";
	$buffer.="\t\t<montoIva>".$fila['iva']."</montoIva>\n";
	$buffer.="\t\t<valorRetIva>".$fila['retiva']."</valorRetIva>\n";
	$buffer.="\t\t<valorRetRenta>".$fila['retfuente']."</valorRetRenta>\n";
	$buffer.="\t<formasDePago>\n";
	$buffer.="\t\t<formaPago>".$fila['formapago']."</formaPago>\n";
	$buffer.="\t</formasDePago>\n";
	$buffer.="\t</detalleVentas>\n";
}
	
////// NOTAS DE CREDITO /////////

mysql_select_db($database_conexion, $conexion);
$sql=" SELECT cliciruc, sum(if(doce < 0, doce*-1, 0)) as doce, sum(if(cero < 0, cero*-1, 0)) as cero, sum(if(iva < 0, iva*-1, 0))  as iva, tipo, largo, SUM(documentos) documentos, tipodoc, sum(retfuente) as retfuente, sum(retiva) as retiva, punto FROM ReporteVentasATS WHERE doc_tipo = 'NOTA_CREDITO' GROUP BY cliciruc";
$result = mysql_query($sql,$conexion) or die(mysql_error());	

while ($fila=mysql_fetch_assoc($result))
{ 
	$buffer.="\t<detalleVentas>\n";
	$buffer.="\t\t<tpIdCliente>".$fila['tipo']."</tpIdCliente>\n";
	$buffer.="\t\t<idCliente>".$fila['cliciruc']."</idCliente>\n";
	$buffer.="\t\t<tipoComprobante>".zerofill($fila['tipodoc'],2)."</tipoComprobante>\n";
	$buffer.="\t\t<tipoEmision>F</tipoEmision>\n";
	$buffer.="\t\t<numeroComprobantes>".$fila['documentos']."</numeroComprobantes>\n";
	$buffer.="\t\t<baseNoGraIva>0.00</baseNoGraIva>\n";
	$buffer.="\t\t<baseImponible>".number_format($fila['cero'],2,".","")."</baseImponible>\n";
	$buffer.="\t\t<baseImpGrav>".number_format($fila['doce'],2,".","")."</baseImpGrav>\n";
	$buffer.="\t\t<montoIva>".number_format($fila['iva'],2,".","")."</montoIva>\n";
	$buffer.="\t\t<valorRetIva>".number_format($fila['retiva'],2,".","")."</valorRetIva>\n";
	$buffer.="\t\t<valorRetRenta>".number_format($fila['retfuente'],2,".","")."</valorRetRenta>\n";
	$buffer.="\t</detalleVentas>\n";
}

$buffer.="</ventas>\n";

mysql_select_db($database_conexion, $conexion);
$query_ventas = "SELECT punto AS fcaciudad, sum(doce + cero) as ventas FROM ReporteVentasATS GROUP BY punto ORDER BY punto";
$ventas = mysql_query($query_ventas, $conexion) or die(mysql_error());
$row_ventas = mysql_fetch_assoc($ventas);
$totalRows_ventas = mysql_num_rows($ventas);

$buffer.="\t<ventasEstablecimiento>\n";
do 
{
	
	$pemision = parametros_ventas($database_conexion, $conexion, 'nfactura_emision_ventas', $row_ventas['fcaciudad']);
	
	$buffer.="\t\t\t<ventaEst>\n";
	$buffer.="\t\t\t\t<codEstab>".substr($pemision,0,3)."</codEstab>\n";
	$buffer.="\t\t\t\t<ventasEstab>".$row_ventas['ventas']."</ventasEstab>\n";
	$buffer.="\t\t\t</ventaEst>\n";
}while($row_ventas = mysql_fetch_assoc($ventas));
$buffer.="\t</ventasEstablecimiento>\n";
	
//// DOCUMENTOS ANULADOS

$buffer.="<anulados>\n";
/// FACTRUAS ANULADAS
mysql_data_seek($sucursales, 0); $row_sucursales = mysql_fetch_assoc($sucursales);
mysql_select_db($database_conexion, $conexion);
do
{
	$i = $row_sucursales['suc_codigo'];
	$sql="SELECT fcanfactura,secuencial, fcaciudad as punto, autorizacion, fcac_puntoemision_e FROM fcabecera_$i INNER JOIN ce_transacciones on secuencial=fcanfactura_e WHERE fcancelada=4 AND YEAR(fcafecha)=$ano and MONTH(fcafecha)=$mes and nombre_comprobante='FACTURA'";	
	$result = mysql_query($sql,$conexion) or die(mysql_error());	
	//SELECT fcanfactura, fcaciudad as punto, autorizacion_e, fcac_puntoemision_e FROM fcabecera_$i WHERE fcancelada=5 AND YEAR(fcafecha)=$ano and MONTH(fcafecha)=$mes ";	
	$row_result = mysql_fetch_assoc($result);
	$totalRows_result=mysql_num_rows($result);

	if($totalRows_result > 0)
	{	
		do
		{
			$buffer.="\t<detalleAnulados>\n";
				$buffer.="\t\t\t<tipoComprobante>01</tipoComprobante>\n";
				if($row_result['fcac_puntoemision_e']!= null){
				$buffer.="\t\t\t<establecimiento>".substr($row_result['fcac_puntoemision_e'],0,3)."</establecimiento>\n";
				$buffer.="\t\t\t<puntoEmision>".substr($row_result['fcac_puntoemision_e'],4,7)."</puntoEmision>\n";
			    }
				$buffer.="\t\t\t<secuencialInicio>".$row_result['secuencial']."</secuencialInicio>\n";
				$buffer.="\t\t\t<secuencialFin>".$row_result['secuencial']."</secuencialFin>\n";
				if($row_result['autorizacion_e']!= null){
				$buffer.="\t\t\t<autorizacion>".$row_result['autorizacion']."</autorizacion>\n";
			    }else{$buffer.="\t\t\t<autorizacion>".$row_result['autorizacion']."</autorizacion>\n";}

			$buffer.="\t</detalleAnulados>\n";
		}while($row_result = mysql_fetch_assoc($result));
	}
}while($row_sucursales = mysql_fetch_assoc($sucursales));

///// NOTAS DE CREDITO ANULADAS 
 
mysql_data_seek($sucursales, 0); $row_sucursales = mysql_fetch_assoc($sucursales);
mysql_select_db($database_conexion, $conexion);
do
{
	$i = $row_sucursales['suc_codigo'];
	$campo = "";
	if($i==1)
	{
		$campo = " AND nota_ciudad = 2 ";	
	}
	$sql="
	SELECT nc_puntoemision as nc_puntoemision_e, numeronotacredito, nc_nautorizacion FROM ncredito_anuladas WHERE YEAR(nota_fecha)=$ano and MONTH(nota_fecha)=$mes AND (nota_ciudad = $i $campo)
	UNION ALL 
	SELECT nc_puntoemision_e, numeronotacredito, nc_nautorizacion FROM ncredito_$i WHERE YEAR(nota_fecha)=$ano and MONTH(nota_fecha)=$mes AND nota_estado = 2 AND numeronotacredito > 0
	";	
	$result = mysql_query($sql,$conexion) or die(mysql_error());	
	$row_result = mysql_fetch_assoc($result);
	$totalRows_result=mysql_num_rows($result);
	if($totalRows_result > 0)
	{	
		do
		{		
			$buffer.="\t<detalleAnulados>\n";
			$buffer.="\t\t\t<tipoComprobante>04</tipoComprobante>\n";
			if($row_result['nc_puntoemision_e']!= null){
			$buffer.="\t\t\t<establecimiento>".substr($row_result['nc_puntoemision_e'],0,3)."</establecimiento>\n";
			$buffer.="\t\t\t<puntoEmision>".substr($row_result['nc_puntoemision_e'],4,7)."</puntoEmision>\n";
			}
			$buffer.="\t\t\t<secuencialInicio>".$row_result['numeronotacredito']."</secuencialInicio>\n";
			$buffer.="\t\t\t<secuencialFin>".$row_result['numeronotacredito']."</secuencialFin>\n";
			if($row_result['nc_nautorizacion']!= null){
			$buffer.="\t\t\t<autorizacion>".$row_result['nc_nautorizacion']."</autorizacion>\n";
		    }
			$buffer.="\t</detalleAnulados>\n";
		}while($row_result = mysql_fetch_assoc($result));
	}
}while($row_sucursales = mysql_fetch_assoc($sucursales));


$buffer.="</anulados>\n";
$buffer.="</iva>\n";
//Creamos el archivo XML
//echo $buffer;
if(strlen($mes)<2)
	$mes="0".$mes;
$nombreArchivo="AT".$mes.$ano.".XML";
$archivo=fopen($nombreArchivo,"w+"); 
fwrite ($archivo,$buffer); 
fclose($archivo); 
?>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />
<title>Documento sin título</title>
<link href="../../main/estilos.css" rel="stylesheet" type="text/css" />
</head>

<body bgcolor="<?php echo parametros($database_conexion, $conexion, 'color_fondo'); ?>" >
<form id="form1" name="form1" method="get" action="">
<table width="90%" border="0" align="center" class="main">
  <tr >
    <td align="center" class="titulo"><strong>GENERAR ATS<br />
    </strong></td>
  </tr>
</table>
<br />
<table width="90%" border="0" class="main" align="center">
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td><table class="main" align="center">
      <tr>
        <td><?php echo "<h2 align='center' style=\"color:#426BA1\">ANEXOS</h2>";
		echo "<h4 align='center' style=\"color:#426BA1\">Archivo generado correctamente.</h4>";
		echo"<p align=\"center\"><a target=\"_blank\" href=\"$nombreArchivo\" download=\"$nombreArchivo\">$nombreArchivo</a>";
		echo "<center><a href=\"https://soinpre.com/redmedicacuenca/m_tributacion/ats/atsMenu.php\"\><img src=\"cerrar.png\" border=0 width=15% title=\"Cerrar\"></a></center>";?>
		</td>

      </tr>
    </table></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
</form>
</body>
<?
exit;
?>