Procedimiento para llenar dimensión estados