9 BASE_DIR="$HOME/.antifraude"
11 . "$BASE_DIR/conf/aficonf.conf"
16 #Valida que exista el pais
18 EXISTE=`cat "$BASE_DIR/oridesti.txt" | egrep "^$1;"`;
19 if [ "$EXISTE" != "" ] ; then
25 poner_estado_umbral () {
29 if [ "$ESTADO" != "A" ] && [ "$ESTADO" != "I" ] ; then
32 SALIDA=`sed "s/^$ID\(;[^;]*;[^;]*;[^;]*;\)[^;]*\(;[^;]*;[^;]*;[^;]*\)$/$ID\1I\2/" "$BASE_DIR/umbrales.param"`
33 echo "$SALIDA" > "$BASE_DIR/umbrales.param"
45 preguntar "Su opción" "1234" $1
49 EXISTE=`cat "$BASE_DIR/umbrales.param" | egrep "$1"`;
50 if [ "$EXISTE" == "" ] ; then
59 ID=`cat "$BASE_DIR/umbrales.id"`;
62 echo "$ID" > "$BASE_DIR/umbrales.id"
67 while [ $DONE == 0 ] ; do
68 leer "Número de línea" "" LINEA
70 if ! validar_solo_numeros "$LINEA" ; then
71 echo "EL NUMERO TE LINEA SOLO DEBE TENER DIGITOS"
75 if [ "$LINEA" == "" ] ; then
80 preguntar "Tipo de llamada" "ES" TIPO
83 while [ $DONE == 0 ] ; do
84 leer "Pais (código de 2 letras)" "" PAIS
85 if ! existe_pais "$PAIS" ; then
86 echo "No existe el país de código $PAIS"
90 if [ "$PAIS" == "" ] ; then
95 # Verifico que el umbral no exista
96 FECHA=`date +"%Y%m%d"`
98 UMBRAL="$LINEA;$PAIS;$TIPO;A;*;*;*"
100 if existe_umbral "$UMBRAL" ; then
101 echo "Ya existe un umbral con los datos ingresados."
108 UMBRAL="$ID;$LINEA;$PAIS;$TIPO;A;$USER;$FECHA;$HORA"
111 echo "$UMBRAL" >> "$BASE_DIR/umbrales.param"
114 echo "El Umbral fue grabado con éxito"
120 while [ $DONE == 0 ] ; do
121 leer "Número de línea" "" LINEA
123 if ! validar_solo_numeros "$LINEA" ; then
124 echo "EL NUMERO TE LINEA SOLO DEBE TENER DIGITOS"
128 if [ "$LINEA" == "" ] ; then
133 DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA"`
135 printf "%3s %2s %1s %1s %10s%8s %6s\n" "ID" "Ciudad" "Tipo" "Estado" "Usuario" "Fecha" "Hora"
138 ID=`echo "$i" | cut -d ';' -f 1`
139 CIUDAD=`echo "$i" | cut -d ';' -f 3`
140 TIPO=`echo "$i" | cut -d ';' -f 4`
141 ESTADO=`echo "$i" | cut -d ';' -f 5`
142 USUARIO=`echo "$i" | cut -d ';' -f 6`
143 FECHA=`echo "$i" | cut -d ';' -f 7`
144 HORA=`echo "$i" | cut -d ';' -f 8`
145 printf "%3s %2s %1s %1s %10s %8s %6s\n" "$ID" "$CIUDAD" "$TIPO" "$ESTADO" "$USUARIO" "$FECHA" "$HORA"
146 OPCIONES="$OPCIONES $ID"
149 preguntar "Cual desea borrar (-1 para salir)" "$OPCIONES" OPT
151 if [ "$OPT" = "-1" ] ; then
155 echo "Borrando el registro $OPT ..."
156 poner_estado_umbral "$OPT" "I"
160 # No permito correr 2 instancias de AFICONF
161 if is_lock "aficonf" ; then
163 echo "Aficonf está corriendo actualmente."
172 while [ "$OPT" != "4" ] ; do