<?php
session_start();
function jwib_ics($idnum)
{
// 	$_SESSION['user_vcrx_empr']
// header('Content-disposition: attachment; filename=ATS_'.$xanio.$xmes.'.xml');//nombre del archivo
header('Content-disposition: attachment; filename=jwib_'.$idnum.'ics');//nombre del archivo
header ("Content-Type:text/xml"); 
?>
<?php ob_start(); ?>
<?php
require('../cfg/res.php');
include('../_cfg/config.php');
include ('php_gene1.php');
//$r_compes=msql_query($xml_sql,$link_vcrx);
/// correcciones a usuarios	
// $sql_info='update vtas1 set fpag="02" where fpag is null or fpag=""';

?>
<?php echo '<?xml version="1.0" encoding="UTF-8"?>'; ?>	
<iva>
<TipoIDInformante><?php echo msql_result($res_info,0,'enti_tipoid');?></TipoIDInformante>
<IdInformante><?php echo msql_result($res_info,0,'enti_codigo');?></IdInformante>
<razonSocial><?php echo $xrazsoc;?></razonSocial>
<Anio><?php echo $xanio;?></Anio>
<Mes><?php echo $xmes;?></Mes>
<numEstabRuc><?php echo $numEstab;?></numEstabRuc>
<totalVentas><?php echo number_format(msql_result($res_infov,0,'totvtas'),2,".","");?></totalVentas>
<codigoOperativo>IVA</codigoOperativo>

<compras>
<?php
while($r_comp=msql_fetch_assoc($res_comp)){ ?>
<?php $codSustento=	$r_comp['codSustento']; ?>
<?php if($r_comp['tipoComprobante']=='04'){?>	
<?php
$modi_sql='select * from comp1 where idnum1="'.$r_comp['idnum'].'"';
$modi_res=msql_query($modi_sql,$link_vcrx);
$docModificado=msql_result($modi_res,0,'todocu');
$ptoModificado=msql_result($modi_res,0,'toptoe');

$modi_sql='select * from comp11 where ';
$modi_sql.='status!="X"'	;
$modi_sql.=' and status!="O"'	;
$modi_sql.=' and enti like "'.$r_comp['idProv'].'"'	;
$modi_sql.=' and docu like "'.$docModificado.'"'	;
$modi_sql.=' and ptoe like "'.$ptoModificado.'"'	;
$modi_sql.=' and status=status '	;
$modi_res=msql_query($modi_sql,$link_vcrx);
  
if(msql_num_rows($modi_res)==0)
{
  $modi_sql='select * from comp11 where ';
  $modi_sql.='status!="X"'	;
  $modi_sql.=' and status!="O"'	;
  $modi_sql.=' and enti like "'.$r_comp['idProv'].'"'	;
  $modi_sql.=' and docu like "'.$docModificado.'"'	;
  $modi_sql.=' and status=status '	;
  $modi_res=msql_query($modi_sql,$link_vcrx);
}
$docModificado=@msql_result($modi_res,0,'docu_tico');
$autModificado=@msql_result($modi_res,0,'atrznume');
$codSustento=@msql_result($modi_res,0,'suco');
  
?>	
<?php } ?>	
<?php
$tpidprov=$r_comp['tpIdProv'];
$idprov=$r_comp['idProv'];
$tipreg=r_fiel('enti',$idprov,'tipreg');                                      
$dobtri=r_fiel('enti',$idprov,'dobtri');                                      
$retnor=r_fiel('enti',$idprov,'retnor');
if($dobtri==1){$dobtri='SI';}else{$dobtri='NO';}                                           
if($retnor==1){$retnor='SI';}else{$retnor='NO';}                                           
if($tpidprov=='03'){$idprov=r_fiel('enti',$idprov,'pasaporte');}
                                            
if($codSustento=='-'){$codSustento='01';}                                            
// if($tpidprov=='03'){$idprov=$r_comp['enti_pasaporte'];;}
?>
<detalleCompras>
<codSustento><?php echo $codSustento;?></codSustento>
<tpIdProv><?php echo $tpidprov;?></tpIdProv>
<idProv><?php echo $idprov;?></idProv>
<tipoComprobante><?php echo $r_comp['tipoComprobante'];?></tipoComprobante>

<?php if($r_comp['tpIdProv']=='03'){?>	
<tipoProv><?php echo $r_comp['tipoProv'];?></tipoProv>
<denoProv><?php echo $r_comp['enti_descri'];?></denoProv>
<?php } ?>
  
<?php if (mb_stristr('01.02.03',$r_comp['tpIdProv'])) {?>	
<parteRel><?php echo $r_comp['parteRel'];?></parteRel>
<?php } ?>	

<fechaRegistro><?php echo $r_comp['fechaRegistro'];?></fechaRegistro>
<establecimiento><?php echo $r_comp['establecimiento'];?></establecimiento>
<puntoEmision><?php echo $r_comp['puntoEmision'];?></puntoEmision>
<secuencial><?php echo $r_comp['secuencial'];?></secuencial>
<fechaEmision><?php echo $r_comp['fechaEmision'];?></fechaEmision>
<?php //if(strlen(trim($r_comp['autorizacione']))>=35){ ?>
<?php if(strlen(trim($r_comp['claveacc']))>=49){ ?>
<autorizacion><?php echo $r_comp['autorizacione'];?></autorizacion>
<?php }else{ ?>
<autorizacion><?php echo $r_comp['autorizacion'];?></autorizacion>
<?php } ?>
<baseNoGraIva><?php echo number_format(abs($r_comp['baseNoGraIva']),2,".","");?></baseNoGraIva>
<baseImponible><?php echo number_format(abs($r_comp['baseImponible']),2,".","");?></baseImponible>
<baseImpGrav><?php echo number_format(abs($r_comp['baseImpGrav']),2,".","");?></baseImpGrav>
<!-- <baseImpExe><?php //echo $r_comp['baseImpExe'];?></baseImpExe> -->
<baseImpExe>0.00</baseImpExe>
<montoIce><?php echo $r_comp['montoIce'];?></montoIce>
<montoIva><?php echo str_replace('-','',$r_comp['montoIva']);?></montoIva>

<?php if ($xanio.$xmes>="201506"){ ?>	
<valRetBien10>0.00</valRetBien10>
<valRetServ20>0.00</valRetServ20>
<?php } ?>	
	
<?php
$sql_retp='select * from ats_rp where porcentajeair="30" and concat(docum,ptoem,numer,enti)="'.$r_comp['docuenti'].'"';
$res_retp=msql_query($sql_retp,$link_vcrx);
?>
<?php if(msql_num_rows($res_retp)>0){ ?>																					
<valorRetBienes><?php echo number_format(msql_result($res_retp,0,'valretair'),2,".","");?></valorRetBienes>
<?php }else{ ?>
<valorRetBienes><?php echo '0.00';?></valorRetBienes>
<?php } ?>

<?php //if ($xanio.$xmes>="201607"){ ?>	
<?php if ($xanio.$xmes>="201601"){ ?>	
<valRetServ50>0.00</valRetServ50>
<?php } ?>	

<?php
$sql_retp='select * from ats_rp where porcentajeair="70" and concat(docum,ptoem,numer,enti)="'.$r_comp['docuenti'].'"';
$res_retp=msql_query($sql_retp,$link_vcrx);
?>
<?php if(msql_num_rows($res_retp)>0){ ?>																					
<valorRetServicios><?php echo number_format(msql_result($res_retp,0,'valretair'),2,".","");?></valorRetServicios>
<?php }else{ ?>
<valorRetServicios><?php echo '0.00';?></valorRetServicios>
<?php } ?>

<?php
$sql_retp='select * from ats_rp where porcentajeair="100" and concat(docum,ptoem,numer,enti)="'.$r_comp['docuenti'].'"';
$res_retp=msql_query($sql_retp,$link_vcrx);
?>
<?php if(msql_num_rows($res_retp)>0){ ?>																					
<valRetServ100><?php echo number_format(msql_result($res_retp,0,'valretair'),2,".","");?></valRetServ100>
<?php }else{ ?>
<valRetServ100><?php echo '0.00';?></valRetServ100>
<?php } ?>

<totbasesImpReemb>0.00</totbasesImpReemb>
	
<pagoExterior>
<pagoLocExt><?php echo $r_comp['pagoLocExt'];?></pagoLocExt>

<?php if($r_comp['pagoLocExt']=='02'){?>	
  <?php $paisefecpago=r_fiel('pais',$r_comp['enti_pais'],'pais_ats'); ?>
  <tipoRegi><?php echo $tipreg;?></tipoRegi>
  <paisEfecPagoGen><?php echo $paisefecpago; ?></paisEfecPagoGen>
  <paisEfecPago><?php echo $paisefecpago; ?></paisEfecPago>
	<aplicConvDobTrib><?php echo $r_comp['aplicConvDobTrib'];?></aplicConvDobTrib>
	<?php if($dobtri=='NO'){?>	
		<pagExtSujRetNorLeg><?php echo $retnor;?></pagExtSujRetNorLeg>
	<?php }?>
<?php }else{ ?>
	<paisEfecPago><?php echo 'NA';?></paisEfecPago>
	<aplicConvDobTrib><?php echo 'NA';?></aplicConvDobTrib>
	<pagExtSujRetNorLeg><?php echo 'NA';?></pagExtSujRetNorLeg>
<?php } ?>
	
</pagoExterior>

<?php if($r_comp['tipoComprobante']=='04'){?>	
<docModificado><?php echo $docModificado; ?></docModificado>
<estabModificado><?php echo $r_comp['estabModificado']; ?></estabModificado>
<ptoEmiModificado><?php echo $r_comp['ptoEmiModificado']; ?></ptoEmiModificado>
<secModificado><?php echo $r_comp['secModificado']; ?></secModificado>
<autModificado><?php echo $autModificado; ?></autModificado>	
<?php } ?>
	
<?php if(mb_stristr('41.47.48',$r_comp['tipoComprobante'])){?>	
<reembolsos>
<reembolso>
<tipoComprobanteReemb>01</tipoComprobanteReemb>
<tpIdProvReemb>01</tpIdProvReemb>
<idProvReemb>0000000000000</idProvReemb>
<establecimientoReemb>001</establecimientoReemb>
<puntoEmisionReemb>001</puntoEmisionReemb>
<secuencialReemb>000000001</secuencialReemb>
<fechaEmisionReemb>01/01/2017</fechaEmisionReemb>
<autorizacionReemb>0000000000</autorizacionReemb>
<baseImponibleReemb>0.00</baseImponibleReemb>
<baseImpGravReemb>0.00</baseImpGravReemb>
<baseNoGraIvaReemb>0.00</baseNoGraIvaReemb>
<baseImpExeReemb>0.00</baseImpExeReemb>
<montoIceRemb>0.00</montoIceRemb>
<montoIvaRemb>0.00</montoIvaRemb>
</reembolso>
</reembolsos>	
	
<?php } ?>
	
<?php if($r_comp['tipoComprobante']!='04'){?>		
<?php if($r_comp['total']>1000){?>
<?php $fpago=$r_comp['formaPago']; ?>
<?php if($fpago=='-'){$fpago='01';} ?>
	<formasDePago>
		<formaPago><?php echo $fpago;?></formaPago>
	</formasDePago>
<?php } ?>
<?php } ?>

<?php
// $sql_retp='select * from ats_rp where codRetAir!="-" and concat(docum,ptoem,numer,enti)="'.$r_comp['docuenti'].'"';
$sql_retp ='select ats_rp.*,sum(baseImpAir) as tbaseImpAir, sum(valRetAir) as tvalRetAir from ats_rp ';
$sql_retp.=' where codRetAir!="-" and concat(docum,ptoem,numer,enti)="'.$r_comp['docuenti'].'" group by codretair,porcentajeair';
$res_retp=msql_query($sql_retp,$link_vcrx);
?>	
<?php if (msql_num_rows($res_retp)!=0) {?>		
  <?php if($r_comp['pagoLocExt']=='02'){?>	
    <?php while($r_retp=msql_fetch_assoc($res_retp)){ ?>
    <estabRetencion1><?php echo substr($r_retp['ptoe'],0,3);?></estabRetencion1>
    <ptoEmiRetencion1><?php echo substr($r_retp['ptoe'],3,3);?></ptoEmiRetencion1>
    <secRetencion1><?php echo $r_retp['numero'];?></secRetencion1>
    <autRetencion1>1234567890</autRetencion1>
    <fechaEmiRet1><?php echo substr($r_retp['fecha'],8,2).'/'.substr($r_retp['fecha'],5,2).'/'.substr($r_retp['fecha'],0,4);?></fechaEmiRet1>  
    <?php } ?>
  <?php }else{ ?>
    <air>
    <?php while($r_retp=msql_fetch_assoc($res_retp)){ ?>
      <detalleAir>
      <codRetAir><?php echo $r_retp['codRetAir'];?></codRetAir>
      <baseImpAir><?php echo $r_retp['tbaseImpAir'];?></baseImpAir>
      <porcentajeAir><?php echo number_format($r_retp['porcentajeAir'],2,".","");?></porcentajeAir>
      <valRetAir><?php echo number_format($r_retp['tvalRetAir'],2,".","");?></valRetAir>
      </detalleAir>
    <?php } ?>
    </air>
  <?php } ?> 
<?php }else{ ?>
  
<?php
// $sql_comp3 ='select sum(tsubt) as stsubt,comp12.* from comp12 ';
$sql_comp3 ='select sum(tsubt-tdcto+tprop) as stsubt,comp12.* from comp12 ';
$sql_comp3.='where idnum1="'.$r_comp['idnum1'].'" ';
$sql_comp3.='and cair in("332","312","344") ';
$sql_comp3.='and docu_tico!="04" ';
$sql_comp3.='group by cair';
$res_comp3=msql_query($sql_comp3,$link_vcrx);
?>                                            
<?php if(msql_num_rows($res_comp3)!=0){ ?>
  <air>
    <?php while($r_comp3=msql_fetch_assoc($res_comp3)){ ?>
    <?php $cair3= trim($r_comp3['cair']);?>
    <?php $porc3= r_fiel('cair',$cair3,'cair_porc')*1;?>
    <?php $stsubt= $r_comp3['stsubt'];?>
    <?php $valor3= $stsubt*$porc3/100;?>
      <detalleAir>
      <codRetAir><?php echo $cair3;?></codRetAir>
      <baseImpAir><?php echo number_format($stsubt,2,".","");?></baseImpAir>
      <porcentajeAir><?php echo number_format($porc3,2,".","");?></porcentajeAir>
      <valRetAir><?php echo number_format($valor3,2,".","");?></valRetAir>
      </detalleAir>
    <?php } ?>
  </air>
<?php }?>
<?php } ?>
  
  
  
</detalleCompras>


<?php }
	?>
</compras>

<?php if (msql_num_rows($res_vtas)>0)	{ ?>
	
<ventas>
<?php while($r_vtas=msql_fetch_assoc($res_vtas)){ ?>
<detalleVentas>
<tpIdCliente><?php echo $r_vtas['tpIdCliente'];?></tpIdCliente>
<idCliente><?php echo $r_vtas['idCliente'];?></idCliente>
<?php if (mb_stristr('04.05.06',$r_vtas['tpIdCliente'])) {?>	
<parteRelVtas><?php echo $r_vtas['parteRelVtas'];?></parteRelVtas>
<?php } ?>	
<?php if (mb_stristr('06',$r_vtas['tpIdCliente'])) {?>	
<tipoCliente>02</tipoCliente>
<denoCli><?php echo $r_vtas['enti_descri']; ?></denoCli>
<?php } ?>	

<tipoComprobante><?php echo $r_vtas['tipoComprobante'];?></tipoComprobante>
<?php if ($xanio.$xmes>="201604"){ ?>	
<tipoEmision>F</tipoEmision>
<?php } ?>	
<numeroComprobantes><?php echo $r_vtas['numeroComprobantes'];?></numeroComprobantes>
<baseNoGraIva><?php echo number_format(abs($r_vtas['baseNoGraiva']),2,".","");?></baseNoGraIva>
<baseImponible><?php echo number_format(abs($r_vtas['baseImponible']),2,".","");?></baseImponible>
<baseImpGrav><?php echo number_format(abs($r_vtas['baseImpGrav']),2,".","");?></baseImpGrav>
<montoIva><?php echo number_format(abs($r_vtas['montoIva']),2,".","");?></montoIva>
<?php
// monto ice obligatorio marzo 2015	
// solicitado por apri 5/oct/16	
?>																									
<montoIce><?php echo number_format(abs($r_vtas['montoIce']),2,".","");?></montoIce>
<valorRetIva><?php echo number_format(abs($r_vtas['valorRetIva']),2,".","");?></valorRetIva>
<valorRetRenta><?php echo number_format(abs($r_vtas['valorRetRenta']),2,".","");?></valorRetRenta>
	
<?php if($r_vtas['tipoComprobante']!='04'){?>
<?php if ($xanio.$xmes>="201606"){ ?>	
<formasDePago>
	<formaPago><?php echo $r_vtas['formaPago']; ?></formaPago>
</formasDePago>	
<?php }?>
<?php }?>
	
</detalleVentas>
<?php }?>
</ventas>
	
<ventasEstablecimiento>
<?php
while($r_vtase=msql_fetch_assoc($res_vtase)){ 
?>
<ventaEst>
<codEstab><?php echo $r_vtase['estab'];?></codEstab>
<ventasEstab><?php echo number_format($r_vtase['totvtas'],2,".","");?></ventasEstab>
</ventaEst>
<?php }?>
</ventasEstablecimiento>

<?php }?>
	

	
<anulados>
<?php while($r_anul=msql_fetch_assoc($res_anul)){ ?>
<?php 
  $autorizacion=$r_anul['autorizacion'];
  $autornum=$r_anul['autornum'];
  if($autorizacion==''){$autorizacion=$autornum;};
?>
<detalleAnulados>
<tipoComprobante><?php echo $r_anul['tipoComprobante'];?></tipoComprobante>	
<establecimiento><?php echo $r_anul['establecimiento'];?></establecimiento>
<puntoEmision><?php echo $r_anul['puntoEmision'];?></puntoEmision>
<secuencialInicio><?php echo $r_anul['numero'];?></secuencialInicio>
<secuencialFin><?php echo $r_anul['numero'];?></secuencialFin>	
<autorizacion><?php echo $autorizacion;?></autorizacion>
</detalleAnulados>
<?php }?>
</anulados>

</iva> 

<?php $obstart = ob_get_clean(); ?>
<?php $obstart=alltrim($obstart); ?>
<?php echo $obstart; ?>



<?php } ?>