$val) {
switch(true) {
case is_object($val):
$out[$key] = obj2array($val);
break;
case is_array($val):
$out[$key] = obj2array($val);
break;
default:
$out[$key] = $val;
}
}
return $out;
}
$dato=$_POST["tipo"];
$op=$_POST["ope"];
$pag=$_POST["pag"];
$val=0;
$resultado="";
try
{
$client = new SoapClient('http://181.196.104.90:17900/lecturas/WebService1.asmx?WSDL',array('soap_version'=>'SOAP_1_2','keep_alive' => false,'encoding'=>'utf-8','cache_wsdl' => WSDL_CACHE_NONE));
//$client = new SoapClient('http://186.101.101.130:17900/lecturas/WebService1.asmx?WSDL',array('soap_version'=>'SOAP_1_2','keep_alive' => false,'encoding'=>'utf-8','cache_wsdl' => WSDL_CACHE_NONE));
if ($pag==1)
{
if ($op==1)
{
$ready = $client->consultar_deuda_cedula(array('cedula'=>$dato))->consultar_deuda_cedulaResult;
}
if ($op==2)
{
$ready = $client->consultar_deuda_cuenta(array('cuenta'=>$dato))->consultar_deuda_cuentaResult;
}
}
if ($pag==2 or $pag==3 or $pag==4 or $pag==5)
{
if ($op==1)
{
$ready = $client->jrsa_cuentas_por_cliente(array('cedula'=>$dato,'cuenta'=>$val))->jrsa_cuentas_por_clienteResult;
}
if ($op==2)
{
$ready = $client->jrsa_cuentas_por_cliente(array('cedula'=>$val,'cuenta'=>$dato))->jrsa_cuentas_por_clienteResult;
}
}
$xml = simplexml_load_string($ready->any);
$result = obj2array($xml);
if(count($result)>0 and $dato<>""){
$abonadon="ninguno";
foreach ($xml->NewDataSet->Table as $iClave => $row1)
{
$deuda=number_format((float)$row1->deuda_anteriorn, 2, '.', '');
$interes=number_format((float)$row1->interesn, 2, '.', '');
$mesesdeuda=$row1->meses_deudan;
$tmeses='Meses';
$tdeuda='Deuda';
$tinteres='Interes';
$cuenta=$row1->cuentan;
$abonadon=$row1->abonadon;
$cedula=$row1->cedulan;
$direccionn=$row1->direccionn;
$ciclo=$row1->id_ciclo;
$boton='
| ';
if($pag==2 or $pag==3 or $pag==4 or $pag==5)
{
$deuda=$row1->medidorn;
$interes=date("d-m-Y",strtotime($row1->fechan));
$mesesdeuda=$row1->categorian;
$tmeses='Categoría';
$tdeuda='#Medidor';
$tinteres='Fecha';
//$boton='
';
$boton="";
}
$resultado=$cuenta.";".$cedula.";".$abonadon.";".$direccionn.";".$mesesdeuda.";".$deuda.";".$interes.";".$ciclo.";";
}
}
else
{
$resultado='| No existen datos asociados, o su problema fue atendido |
';
}
}
catch (Exception $e)
{
$resultado="";
//trigger_error($e->getMessage(), E_USER_WARNING);
}
if ($abonado!=="ninguno")
{
try
{
$client = new SoapClient('http://181.196.104.90:17900/lecturas/WebService1.asmx?WSDL',array('soap_version'=>'SOAP_1_2','keep_alive' => false,'encoding'=>'utf-8','cache_wsdl' => WSDL_CACHE_NONE));
//$client = new SoapClient('http://186.101.101.130:17900/lecturas/WebService1.asmx?WSDL',array('soap_version'=>'SOAP_1_2','keep_alive' => false,'encoding'=>'utf-8','cache_wsdl' => WSDL_CACHE_NONE));
$ready = $client->consultar_cuenta_consumos(array('cuenta'=>$dato))->consultar_cuenta_consumosResult;
$xml = simplexml_load_string($ready->any);
$result = obj2array($xml);
$lfinal=0;
$cfinal=0;
$ulreal=0;
$promedio=0;
$vpromedio=0;
$tarifaf=0;
$resultado1="";
if(count($result)>0 and $dato<>"")
{
foreach ($xml->NewDataSet->Table as $iClave => $row1)
{
setlocale(LC_TIME, 'es_ES.UTF-8');
$consumo=$row1->consumo;
$ttarifa=number_format((float)$row1->tttarifa, 2, '.', '');
$emision=$row1->emision;
if ($consumo>=0 and $ttarifa>0 and $emision>=1910)
{
$novedad=$row1->novedad;
//if ($emision=="2004" and $novedad=="PROMEDIO")
if ($emision=="2004")
{
$ulreal=$row1->lanterior;
$promedio=$row1->consumo;
$vpromedio=$ttarifa;
}
if ($emision=="2005")
{
$lfinal=$row1->lactual;
$cfinal=$row1->consumo;
$tarifaf=$ttarifa;
}
//*****
$emision=substr($row1->observaciones, strrpos($row1->observaciones, ' ', -7));
$lanterior=$row1->lanterior;
$lactual=$row1->lactual;
$interes=number_format((float)$row1->interes, 2, '.', '');
$ffactura=date("d-m-Y",strtotime($row1->fcreacion));
$fvencimiento=date("d-m-Y",strtotime($row1->vencimiento));
$fpago=date("d-m-Y",strtotime($row1->fpago));
$novedad=$row1->novedad;
$pagado=$row1->pagado;
if ($pagado==0)
{
$fpago="Impago";
}
if ($i==0)
{
$total_meses_interes=$row1->total_meses_interes;
$datos=explode('*',$total_meses_interes);
$mesest=$datos[0];
$i=1;
}
//$mes=strftime("%B",strtotime($row1->fechan)); columna de interes se quito por que calculaba desde la fecha de facturación hasta la fecha actual".$interes." |
$resultado1=$resultado1."
| ".$emision." |
".$lanterior." |
".$lactual." |
".$consumo." |
".$ttarifa." |
".$ffactura." |
".$novedad." |
".$fpago." |
";
//*****
}
}
$resultado=$resultado.$lfinal.";".$cfinal.";".$tarifaf.";".$ulreal.";".$promedio.";".$vpromedio.";".$resultado1;
}
else
{
$resultado="No existen datos asociados";
}
}
catch (Exception $e)
{
$resultado="";
//trigger_error($e->getMessage(), E_USER_WARNING);
}
}
echo $resultado;
?>