$principal = parametro("idprincipal", true, MQL_BOOL);
 $regimen = parametro("idregimendevivienda", DEFAULT_PERSONAS_REGIMEN_VIV);
 $tdomicilio = parametro("idtipodevivienda", DEFAULT_PERSONAS_TIPO_VIV);
 $tiempo = parametro("idtiempo", DEFAULT_TIEMPO);
 $colonia = parametro("idnombrecolonia", false);
 $nombremunicipio = parametro("idnombremunicipio", "");
 $nombrelocalidad = parametro("idnombrelocalidad", "");
 $idlocalidad = parametro("idlocalidad", false, MQL_INT);
 $pais = parametro("idpais", EACP_CLAVE_DE_PAIS);
 $idcolonia = parametro("idcolonia", false, MQL_INT);
 $cpostal = parametro("idcodigopostal", false, MQL_INT);
 $nombre_pais = "";
 $nombre_estado = "";
 $iddomicilio = FALLBACK_DOMICILIO;
 if (setNoMenorQueCero($idlocalidad) <= 0) {
     $idlocalidad = $xLoc->DomicilioLocalidadClave();
 }
 if (setNoMenorQueCero($cpostal) > 0) {
     $xCol = new cDomiciliosColonias();
     if ($xCol->existe($cpostal) == true) {
         $pais = EACP_CLAVE_DE_PAIS;
         $nombre_estado = $xCol->getNombreEstado();
         $nombremunicipio = $xCol->getNombreMunicipio();
         $nombrelocalidad = $xCol->getNombreLocalidad();
         if (trim($colonia) == "") {
             $colonia = $xCol->getNombre();
         }
     }
 }
 if ($colonia == false || $colonia == "") {
     if (setNoMenorQueCero($idcolonia) > 0) {
 $nac = $xSoc->getPaisDeOrigen() == EACP_CLAVE_DE_PAIS ? 1 : 2;
 $detalles = $xRisk->notas_de_checking()->v(OUT_TXT);
 $razones = $xRisk->razones_de_reporte()->v(OUT_TXT);
 $tipo_de_obj = $xRisk->tipo_de_documento()->v();
 $tercero = $xRisk->tercero_relacionado()->v();
 //obtiene las razones de cada operacion presente.
 $recibo = $xRisk->documento_relacionado()->v();
 $cont = array();
 $linea = "";
 $cont[1] = $xLayout->getClave();
 $cont[2] = $FechaExtraccion;
 $cont[3] = $operaciones == 0 ? 1 : $operaciones;
 $cont[4] = "01" . $xT->cSerial(3, $supervisor);
 //clave nacional de entidad supervisora 1002 = CNBV
 $cont[5] = $casfin;
 $cont[6] = $xLoc->DomicilioLocalidadClave();
 // cambiar por la UIF
 $cont[7] = $xLoc->DomicilioCodigoPostal();
 // CP de la sucursal
 $docto_relacionado = $OAEc == null ? $OAEc->getNumeroDeSeguridadSocial() : $xRisk->documento_relacionado()->v();
 //($xRec->getCodigoDeDocumento() == DEFAULT_CREDITO) ? $xRec->getCodigoDeRecibo() : $xRec->getCodigoDeDocumento();
 $fecha_de_op = $xF->getFechaByInt($xRisk->fecha_de_reporte()->v());
 $instrumento = $xRisk->instrumento_financiero()->v();
 $tipo_de_op = $xRisk->tipo_de_operacion()->v();
 $total = $xRisk->monto_total_relacionado()->v();
 $moneda = AML_CLAVE_MONEDA_LOCAL;
 //TODO: Agregar soporte para captación y colocación
 switch ($tipo_de_obj) {
     case iDE_RECIBO:
         $xRec = new cReciboDeOperacion(false, false, $recibo);
         if ($xRec->init() == true) {
$xTxt2 = new cHText();
$xTxt3 = new cHText();
$xTxt4 = new cHText();
$xTxt5 = new cHText();
$xTxt6 = new cHText();
$xSel = new cHSelect();
$xHSel = new cHSelect();
$xTxtE = new cHText();
$xHP->init("initComponents()");
/* verifica si hay un dato */
$tipo_ae = parametro("idactividad", FALLBACK_ACTIVIDAD_ECONOMICA);
$sector_ae = parametro("idsectoreconomico", FALLBACK_SECTOR_ECONOMICO);
$nombre_ae = parametro("idrazonsocialtrabajo");
$domicilio_ae = parametro("iddomiciliodeactividad");
$localidad_ae = parametro("idnombrelocalidad", $xLoc->DomicilioLocalidad());
$idlocalidad = parametro("idlocalidad", $xLoc->DomicilioLocalidadClave(), MQL_INT);
$municipio_ae = parametro("idnombremunicipio", $xLoc->DomicilioMunicipio());
$idmunicipio = parametro("idmunicipio", $xLoc->DomicilioMunicipioClave(), MQL_INT);
$estado = parametro("identidadfederativa", $xLoc->DomicilioEstadoClaveNum(), MQL_INT);
//DEFAULT_NOMBRE_ESTADO
$telefono_ae = parametro("idtelefono");
$extension_ae = parametro("idextension");
$numero_empleado = parametro("idnumeroempleado");
$antiguedad_ae = parametro("idantiguedad", DEFAULT_TIEMPO);
$departamento_ae = parametro("iddepartamento");
$montoper_ae = parametro("idsalario", 0, MQL_FLOAT);
$empresa = parametro("iddependencia", FALLBACK_CLAVE_EMPRESA);
$puesto = parametro("idpuesto");
$nss = parametro("idnss");
$cp = parametro("idcodigopostal", $xLoc->DomicilioCodigoPostal(), MQL_INT);
$fechaalta = fechasys();
 function getClaveDeLocalidad()
 {
     if ($this->mClaveLocalidad == 0) {
         $xDomLoc = new cDomicilioLocalidad(false);
         $rs = $xDomLoc->setBuscar($this->mNombreLocalidad, $this->mClaveEstado, $this->mClaveMunicipio);
         if ($rs == false) {
             //devolver clave local
             $xLoc = new cLocal();
             $this->mClaveLocalidad = $xLoc->DomicilioLocalidadClave();
         } else {
             $this->mClaveLocalidad = $xDomLoc->getClaveUnica();
             $this->mClaveDePais = $xDomLoc->getClaveDePais();
         }
     }
     return $this->mClaveLocalidad;
 }
 function getListaDeLocalidades($id = "", $estado = SYS_TODAS, $pais = EACP_CLAVE_DE_PAIS, $selected = false)
 {
     $xLoc = new cLocal();
     $id = $id == "" ? "idlocalidad" : $id;
     $this->mLIDs[] = $id;
     $selected = setNoMenorQueCero($selected) <= 0 ? $xLoc->DomicilioLocalidadClave() : $selected;
     $ByEst = setNoMenorQueCero($estado) <= 0 ? "" : " AND (`catalogos_localidades`.`clave_de_estado` ='{$estado}') ";
     if ($pais != EACP_CLAVE_DE_PAIS) {
         $ByEst = " AND\t(`catalogos_localidades`.`clave_de_pais` ='{$pais}') ";
     }
     $sql = "\n\t\tSELECT\n\t\t\t`catalogos_localidades`.`clave_unica`,\t`catalogos_localidades`.`nombre_de_la_localidad`\n\t\tFROM\n\t\t\t`catalogos_localidades`\n\t\tWHERE `catalogos_localidades`.`clave_unica` > 0 {$ByEst}";
     $xS = new cSelect($id, $id, $sql);
     $xS->setLabel("TR.Localidad");
     $xS->setOptionSelect($selected);
     $xS->setEsSql();
     return $xS;
 }
}
$cTbl = new cTabla($xLi->getListadoDeTareas(getUsuarioActual()));
$cTbl->setKeyField("idusuarios_web_notas");
$cTbl->setKeyTable("usuarios_web_notas");
$cTbl->OButton("TR.Checado", "setUpdateEstatus(_REPLACE_ID_)", $cTbl->ODicIcons()->OK);
$alerts .= $cTbl->Show("TR.Tareas");
$xFRM->OButton("TR.Salir", "var xG = new Gen(); xG.salir()", "salir");
$xFRM->addSeccion("idmastareas", "TR.Tareas");
$xFRM->addHElem("<div id=\"tcalendar-task\">{$alerts}</div>");
$xFRM->endSeccion();
$sysinfo = "";
if (MODO_DEBUG == true and SYSTEM_ON_HOSTING == false) {
    $xUL = new cHUl();
    $xUL2 = new cHUl();
    $sysinfo = $xUL->li("Base de Datos:" . MY_DB_IN)->li("Servidor: " . WORK_HOST)->li("Sucursal: " . getSucursal())->li("Version S.A.F.E.: " . SAFE_VERSION)->li("Revision S.A.F.E: " . SAFE_REVISION)->li("Path Temporal: " . PATH_TMP)->li("Path Backups: " . PATH_BACKUPS)->li("Fecha del Sistema: " . date("Y-m-d H:i:s"))->li("Usuario Activo: " . $xUsr->getNombreCompleto())->li("ID de Usuario: " . $xUsr->getID())->li("Nivel de Usuario: " . $xUsr->getNivel())->li("SAFE DB version : " . SAFE_DB_VERSION)->end();
    $sysinfo2 = $xUL2->li("Caja Local : " . $xLoc->getCajaLocal())->li("Localidad : " . $xLoc->DomicilioLocalidad())->li("Clave Localidad : " . $xLoc->DomicilioLocalidadClave())->li("Municipio : " . $xLoc->DomicilioMunicipio())->li("Estado : " . $xLoc->DomicilioEstado())->li("Clave Estado : " . $xLoc->DomicilioEstadoClaveABC())->li("C.P. : " . $xLoc->DomicilioCodigoPostal())->end();
    $xFRM->addSeccion("idmaslogs", "TR.Sistema");
    $xFRM->addDivSolo($sysinfo, $sysinfo2, "tx24", "tx24");
    $xFRM->endSeccion();
}
if (getUsuarioActual(SYS_USER_NIVEL) == USUARIO_TIPO_CAJERO) {
    $xNot = new cHNotif();
    $xCaja = new cCaja();
    if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
        $xNot->get("", "idestadocaja", $xNot->ERROR);
    } else {
    }
}
$xFRM->addAviso("", "idavisos");
$xFRM->OHidden("id-KeyEditable", "", "");
//$xFRM->addHTML($menu);