17 abril, 2015

WebService para obtener el Tipo de Cambio Banco Central Costa Rica

Mauricio Alpizar Web Services 3 Comments

Tweet

Hola! colegas.

Comparto un pequeño script muy sencillo sin dependencias de librerias SOAP para obtener el tipo de cambio en colones, valor de compra y venta. Emitido de la fuente del Banco Central Costa Rica

<?php
function etiqueta_final($parser, $name) {
    global $info,$datos,$contador;
    $info[$name][] = $datos;
}
function extractor_datos($parser,$data){
                global $datos;
                $datos = $data;
}
function extractor_datos_tags($parser,$data){
                global $datos;
                $datos .= $data;
}
function parser_extractor($cadena,$tags=true){
                
	// Definiendo variables 
	global $info,$datos,$contador;
	$info = array();
	$datos = "";
	$contador = 0;

	// Creando el parser
	$xml_parser = xml_parser_create();

	// Definiendo la funciones controladoras
	xml_set_character_data_handler($xml_parser,($tags?"extractor_datos":"extractor_datos_tags"));
	xml_set_element_handler($xml_parser, "", "etiqueta_final");
	
	// Procesando el archivo
	if (!xml_parse($xml_parser, $cadena)) {
					die(sprintf("XML error: %s at line %d",
																	xml_error_string(xml_get_error_code($xml_parser)),
																	xml_get_current_line_number($xml_parser)));
	}
	
	// Liberando recursos
	xml_parser_free($xml_parser); 
	return $info;
}


/*
La siguiente Funcion debe recibir por parametro la fecha en formato dd/mm/YYYY
*/
function tipo_cambio($fecha){
	// Rutas de los archivos XML con el tipo de cambio
	$file["compra"] = "http://indicadoreseconomicos.bccr.fi.cr/indicadoreseconomicos/WebServices/wsIndicadoresEconomicos.asmx/ObtenerIndicadoresEconomicosXML?tcIndicador=317&tcFechaInicio=$fecha&tcFechaFinal=$fecha&tcNombre=dmm&tnSubNiveles=N"; // Archivo XML 
	$file["venta"] = "http://indicadoreseconomicos.bccr.fi.cr/indicadoreseconomicos/WebServices/wsIndicadoresEconomicos.asmx/ObtenerIndicadoresEconomicosXML?tcIndicador=318&tcFechaInicio=$fecha&tcFechaFinal=$fecha&tcNombre=dmm&tnSubNiveles=N"; // Archivo XML 
	
	// Extrae el tipo cambio con el valor de COMPRA
	$data_file = file_get_contents($file["compra"]);
	$ainfo = parser_extractor($data_file,false);
	$fuente = parser_extractor($ainfo["STRING"][0]);
	$tipo["compra"] = $fuente["NUM_VALOR"][0];
	
	// Extrae el tipo cambio con el valor de VENTA
	$data_file = file_get_contents($file["venta"]);
	$ainfo = parser_extractor($data_file,false);
	$fuente = parser_extractor($ainfo["STRING"][0]);
	$tipo["venta"] = $fuente["NUM_VALOR"][0];
	
	// Retornando valor de compra y venta del dolar
	if ( $tipo["compra"] == "" or $tipo["venta"] == "" ){
		return false;
	}else{
		return $tipo;
	}

}

$fecha = date('d/m/Y');
$valor = tipo_cambio($fecha);

/* Imprime en Pantalla el Resultado de Valor de COMPRA Y VENTA*/
/* Pueden utilizar la variable llamada $valor( que es una estructura Arreglo ) con la posicion de compra y venta en sus aplicaciones como gusten. */
echo "<pre>";
print_r($valor);
echo "</pre>";
?>

Para probar el resultado del scrip aqui les dejo el URL: http://www.mauricioalpizar.com/ejemplos/tipo_cambio_costa_rica/tipocambio.php

Buena Suerte!.