Reparar Base de Datos Firebird - FDB

(Si estas en un Servidor, asegúrate de ejecutar la terminal como Administrador o que tengas permisos de escritura en la carpeta de trabajo).No funciona en la PowerShell de Windows, tiene que ser en la Consola CMD.

1. Detener el Servidor del Firebird. (services.msc)
2. Hacer una copia de la Base de Datos dañada.
3. Reinicia el Firebird y ejecuta estos comandos en una carpeta:

gfix -v -full -user SYSDBA -password masterkey BDDAÑADA.fdb
gfix -mend -user SYSDBA -password masterkey BDDAÑADA.fdb
gbak -b -v -user SYSDBA -password masterkey BDDAÑADA.fdb BDDAÑADA.fbk
 

4.-Si el el respaldo se realizo correctamente, solo queda restaurar la Base de Datos con el siguiente comando:

gbak -c -v -user SYSDBA -password masterkey BDDAÑADA.fbk BDREPARADA.fdb

Solucion a BDE - Error en .CFG

El error de .CFG al querer reinstalar el BDE (Borland DataBase Engine), ocurre por un problema de permisos o el archivo de configuracion es de solo Lectura. Este error se me presento al querer reinstalarlo en un equipo con CONTPAQi Nominas, y es un complemento del Aspel 4. Sin embargo este no tiene Desinstalador y el BDE Administrator en el panel de control no funciona.

Para solucionar esto primero.

1. Asegurarse de que el usuario que tienen en windows tiene permisos de administrador
2. ir al registro y dar permisos a administradores y usuarios de lectura/escritura a la clave HKEY_LOCAL_MACHINE>Software>Borland Engine
3. Localizar el Path de instalacion del BDE, en mi caso Archivos de Programa>Contapi>Aspel4>BDE
4. Renombrar la carpeta por BDE1
5. Ejecutar el instalador y listo, ya no debe presentarse el error.

Servidor PostgreSql en Red

 

Por defecto el Servidor de Base de datos PostgreSql, viene configurado para trabajar y escuchar en la PC instalada. Para activar la escucha y recepcion de peticiones y transacciones desde otros equipos de la red, es necesario hacer modificaciones en el archivo de configuracion pg_hba.conf ubicado en la carpeta /data donde se encuentra instalado el programa.


Abre el archivo con el Bloc de Notas. y Agrega la linea como la que se muestra en rojo, Guarda los cambios y ya podras acceder desde otros equipos en la red a tu servidor de Base de Datos.

# In the absence of preceding "host" lines, these two lines will
# reject all connection from 192.168.54.1 (since that entry will be
# matched first), but allow Kerberos 5 connections from anywhere else
# on the Internet.  The zero mask means that no bits of the host IP
# address are considered so it matches any host.
# 
# TYPE  DATABASE    USER        CIDR-ADDRESS          METHOD
host    all         all         127.0.0.1/32           md5
host    all         all         0.0.0.0/0              md5

PhpMailer - Language string failed to load: from_failedroot@localhost.local

Este codigo de error generado por la libreria phpMailer se debe a que no registra o encuentra la direccion del remitente, la cual verifica su existencia. no basta con poner loquesea@midominio.com. Para esto ponga los valores correctos en los punteros ->From     y ->FromName como se muestra en el siguiente ejemplo:

<?
//Roman E. Herrera Coronado

require "class.phpmailer.php";

 include("config.php");

 $mail = new phpmailer();

  //Definimos las propiedades y llamamos a los métodos
  //correspondientes del objeto mail

  //Con PluginDir le indicamos a la clase phpmailer donde se
  //encuentra la clase smtp que como he comentado al principio de
  //este ejemplo va a estar en el subdirectorio includes
  //$mail->PluginDir = "includes/";

  //Con la propiedad Mailer le indicamos que vamos a usar un
  //servidor smtp
  $mail->Mailer = "smtp";

  //Asignamos a Host el nombre de nuestro servidor smtp
  $mail->Host = "smtp.midominio.com.mx";

  //Le indicamos que el servidor smtp requiere autenticación
  $mail->SMTPAuth = true;

  //Le decimos cual es nuestro nombre de usuario y password
  $mail->Username = "roman@midominio.com.mx";
  $mail->Password = "mipass";

  //Indicamos cual es nuestra dirección de correo y el nombre que
  //queremos que vea el usuario que lee nuestro correo
  $mail->From = "roman@midominio.com.mx";
  $mail->FromName = "Intranet ";

  //el valor por defecto 10 de Timeout es un poco escaso dado que voy a usar
  //una cuenta gratuita, por tanto lo pongo a 30 
  $mail->Timeout=30;

  //Indicamos cual es la dirección de destino del correo

  $mail->AddAddress("destino@midominio.com.mx");



 

  //Asignamos asunto y cuerpo del mensaje
  //El cuerpo del mensaje lo ponemos en formato html, haciendo
  //que se vea en negrita
  $mail->Subject = "Mi Asunto";
 
  $mail->Body = "Mi mensaje de correo";
  //Definimos AltBody por si el destinatario del correo no admite email con formato html 

  $mail->AltBody = "Solicitud de Requerimiento para la sucursal ".$m12;

  //se envia el mensaje, si no ha habido problemas
  //la variable $exito tendra el valor true
  $exito = $mail->Send();

  //Si el mensaje no ha podido ser enviado se realizaran 4 intentos mas como mucho
  //para intentar enviar el mensaje, cada intento se hara 5 segundos despues
  //del anterior, para ello se usa la funcion sleep    

  $intentos=1;
  while ((!$exito) && ($intentos < 5)) {
    sleep(5);
         //echo $mail->ErrorInfo;
         $exito = $mail->Send();
         $intentos=$intentos+1;   
   
   }

       
   if(!$exito)
   {
    echo "Problemas enviando correo electrónico a ".$valor;
    echo "<br/>".$mail->ErrorInfo;   
   }
   else
   {
    echo "Mensaje enviado correctamente";
   }
   
   
   

echo "&ERROR=1&";



?>

Microsip - Solucion al error de costeo en polizas de Inventario

Hace unos dias, que se lleva presentando un error en los meses de enero y febrero al intentar generar las polizas del modulo de inventarios 2010, con el mensage de error :

"No es posible generar polizas debido a que existen movimientos pendientes de asignar costo en el periodo inidicado" 

 

Pese a que se revisaron los movimientos de los dias, no se detecto ninguna anomalia e incluso se ejecuto la herramienta de recalcular costos, pero no hubo exito, todos los articulos tenian costo y ningun documento (entrada o Salida) estaba en Cero, a exepcion de unas ventas de mostrador, pero estas ya se encontraban contabilizadas, por lo que no era probable que estas ocasionen el error, debido a que los movimientos contabilizados se ignoran al crear las polizas. 

Despues de un rato de analizar y revisar la informacion desde la interfaz del microsip y no encontrar solucion, no me quedo mas remedio, que desensamblar el programa con el PE Explorer para revisar en su estructura , el origen del mensaje de error.

Y despues de revisar el codigo fuente del modulo de inventarios, me encuentro con este codigo, el cual me dice lo que verifica y de alli obtengo la solucion, la cual es que un codigo, aparentemente por error del mismo microsip esta marcado, con costeo pendiente, en la tabla DOCTOS_IN_DET por lo que la solucion es localizar dichos codigos y en ese campo remplazar el 'S' por el 'N', para eso abrimos el IBexpert para conectarnos a la base de datos y ejecutar el siguiente SQL:

SELECT * FROM DOCTOS_IN_DET A WHERE
A.fecha='12.01.2011'
AND A.costeo_pend='S'

Despues de asegurarnos que no hay registros pendientes de asignar costo, procedemos a crear las polizas desde el modulo de inventarios, com originalmente, se hizo y con lo anterior, queda solucionado el problema.