EVOLUTION-MANAGER

Edit File: registro_persona_riesgosa.frm.php

<?php
/**
 * @author Balam Gonzalez Luis Humberto
 * @version 0.0.01
 * @package
 */
//=====================================================================================================
	include_once("../core/go.login.inc.php");
	include_once("../core/core.error.inc.php");
	include_once("../core/core.html.inc.php");
	include_once("../core/core.init.inc.php");
	include_once("../core/core.db.inc.php");
	$theFile			= __FILE__;
	$permiso			= getSIPAKALPermissions($theFile);
	if($permiso === false){	header ("location:../404.php?i=999");	}
	$_SESSION["current_file"]	= addslashes( $theFile );
//=====================================================================================================
$xHP		= new cHPage("TR.Registro de Personas Riesgosas", HP_FORM);
$persona	= parametro("persona", DEFAULT_SOCIO, MQL_INT); $persona = parametro("socio", $persona, MQL_INT); $persona = parametro("idsocio", $persona, MQL_INT);
$credito	= parametro("credito", DEFAULT_CREDITO, MQL_INT); $credito = parametro("idsolicitud", $credito, MQL_INT); $credito = parametro("solicitud", $credito, MQL_INT);
$cuenta		= parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT); $cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback	= parametro("callback"); $tiny = parametro("tiny"); $form = parametro("form"); $action = parametro("action", SYS_NINGUNO);

$xF			= new cFecha();
$xAml		= new cAML();
$nivelcargado	= SYS_RIESGO_BAJO;
$notas			= "";
if($persona > DEFAULT_SOCIO){
	$xAml	= new cAMLPersonas($persona);
	if( $xAml->init() == true){
		$nivelcargado	= $xAml->setAnalizarNivelDeRiesgo();
		$notas			= $xAml->getMessages();	
	}
}
//$jxc = new TinyAjax();
//$jxc ->exportFunction('datos_del_pago', array('idsolicitud', 'idparcialidad'), "#iddatos_pago");
//$jxc ->process();

$xHP->init();
?>
<style>
textarea { min-height:8em; }
</style>
<?php

//$jxc ->drawJavaScript(false, true);

$xFRM	= new cHForm("frmriesgo", "registro_persona_riesgosa.frm.php?action=" . MQL_ADD);
$xBtn	= new cHButton();		
$xTxt	= new cHText();
$xSel	= new cHSelect();
$xFec	= new cHDate();
$xTa	= new cHTextArea();
$xChk	= new cHCheckBox();

if($action == SYS_NINGUNO){
	$xUsers = $xSel->getUsuarios("idusuarioreportado");
	$xFRM->setTitle($xHP->getTitle());
	if($persona > DEFAULT_SOCIO){
		$xFRM->OHidden("idsocio", $persona);
		$xSoc	= new cSocio($persona);
		if($xSoc->init() == true){
			$xFRM->addHElem( $xSoc->getFicha(false, false, "", true) );
		}
	} else {
		$xFRM->addPersonaBasico("", false, $persona);
	}
	$xFRM->addJsBasico(iDE_AML);
	$xFRM->ODate("idfechaevento", false, "TR.Fecha de Evento");
	$xFRM->addHElem($xSel->getListaDeNivelDeRiesgo("", $nivelcargado)->get("TR.Nivel de Riesgo", true));
	$xFRM->OTextArea("idmensaje", $notas,  "TR.AML_TEXTO_C");
	$xFRM->addHElem( $xChk->get("TR.Agregar como no_vigilada", "idnovigilada") );
	$xFRM->OCheck("TR.Agregar a LISTA_NEGRA", "idaddlistanegra");
	$xFRM->addSubmit();
	
} else {
	if(setNoMenorQueCero($persona) > 0 ){
		$fecha				= parametro("idfechaevento", false, MQL_DATE);
		$mensaje			= parametro("idmensaje");
		$nivel				= parametro("idnivelderiesgo",0, MQL_INT);
		$novigilada			= parametro("idnovigilada",false, MQL_BOOL);
		$addlistanegra		= parametro("idaddlistanegra",false, MQL_BOOL);
		$motivo				= parametro("idmotivo", AML_RISK_INTERNAL_OPERATION, MQL_INT);
		
		$xSoc				= new cSocio($persona);
		$xSoc->init();
		$xSoc->setActualizarNivelDeRiesgo($nivel, $mensaje, $fecha, $novigilada);
		if(MODO_DEBUG == true){ $xFRM->addAviso($xSoc->getMessages()); }
		if($addlistanegra == true){
			$xAml				= new cAMLPersonas($persona);
			if( $xAml->init() == true){
				$xAml->addToListaNegra($motivo, $nivel, $mensaje, $xF->getFechaMaximaOperativa());
			}
		}
		$xFRM->addAvisoRegistroOK();
		$xFRM->addCerrar();
	}
}

echo $xFRM->get();

?>
<script>

</script>
<?php
$xHP->fin();
?>