Foro - Perl en Español

[kidd]

¡¡¡Descubierto el fallo!!!

Según he comprobado y como puedes ver, el fallo estaba en la forma de poner las fechas de las fiestas.

Y según yo lo había revisado, lo bueno es que encontraste el fallo.


Saludos

[piero66]

Hola, buen día. Reabro el tema, ya que como aquí se menciona, no me toma en cuenta los días festivos. Inclusive instalé el Date::Manip y ahora me marca los siguientes errores:

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using text Syntax Highlighting

ERROR: [config_var] invalid config variable: personalcnfpath
ERROR: [config_var] invalid config variable: personalcnf

Coloreado en 0.000 segundos, usando GeSHi 1.0.8.4

Busqué y hay un archivo llamado DateManip.cnf, pero éste no existe en mi servidor. No sé si lo debo crear ni dónde o en qué ruta guardarlo y cómo vincularlo con mi archivo Manip.pm y mis diasfestivos.txt.

¡¡ Espero me puedan apoyar !!

[explorer]

Por el error yo diría que le has pasado a Data::Manip una mala configuración.

¿Puedes publicar el código que estás probando? Con las líneas que usas para definir las fechas, nos vale. Mira los ejemplos de código de los anteriores mensajes. Verás que con cuatro líneas es suficiente para ver qué estás haciendo.

[piero66]

¿Qué tal, explorer? Gracias por contestar... ¡¡ Te agrego el código !!

use Date::Manip; # módulo de Perl
use DBI;


use Date::Calc qw(Today Delta_Days);
use Spreadsheet::WriteExcel;

my ($sec,$min,$hour,$mday,$mes,$anio,$wday,$yday,$isdst) = localtime(time);
$mes++;
$anio+=1900;

$dateIn ="$anio-$mes-$mday";
Date_Init( "Language=English", "DateFormat=non-US","EraseHolidays=0","PersonalCnfPath=/usr/lib64/perl5/vendor_perl/Eflow/date/","PersonalCnf=misDiasFestivos.cfg");

$fechain = DateCalc("$dateIn", "+ 1 business days");

[explorer]

Vale, el problema es que tu módulo Date::Manip es de la versión 6, mientras que los ejemplos que hay en este hilo, y tu programa, está siguiendo las opciones de la versión 5.

Debes consultar la documentación de la configuración del módulo, pero creo que valdría con

Date_Init("ConfigFile=misDiasFestivos.cfg", ...<resto de opciones>...

Dice el manual que ConfigFile debe ir en primer lugar de Date_Init.

[piero66]

Listo, muchas gracias, ¡¡sí fue el cambio de versión!! Agrego lo que modifiqué por si alguien tiene el mismo problema.

Date_Init("ConfigFile=/usr/lib64/perl5/vendor_perl/Eflow/date/misDiasFestivos.cfg","Language=English", "DateFormat=non-US","EraseHolidays=1");

Mi archivo misDiasFestivos.cfg quedo así:

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using text Syntax Highlighting

sep 16 = independencia
nov 18 = revolucion MX

Coloreado en 0.000 segundos, usando GeSHi 1.0.8.4

[explorer]

¿Has hecho pruebas de que te sale bien?

¿No le falta una línea

*Holidays

por delante, en el archivo de configuración?

[piero66]

Retomo el tema, porque al parecer me confundí y aún no estaba ejecutándose bien.

Archivo CGI:

Date_Init("ConfigFile=/usr/lib64/perl5/vendor_perl/Eflow/date/misDiasFestivos.cfg","Language=English", "DateFormat=non-US","EraseHolidays=1");

El archivo LOG me arroja lo siguiente:

[Tue Nov 12 09:57:23 2013] [error] [client 192.1.47.126] WARNING: [config_file] unknown section created: holiday, referer: https://192.1.47.100/cgi-bin
[Tue Nov 12 09:57:27 2013] [error] [client 192.1.47.126] WARNING: [config_file] unknown section created: holiday, referer: https://192.1.47.100/cgi-bin

Y mi archivo de configuración de días lo tengo como sigue:

*Holiday

nov 18 = revolucion
Dec 12 = dia de la virgen
Dec 19 = vacaciones
Dec 20 = vacaciones
Dec 23 = vacaciones
Dec 24 = vacaciones
Dec 25 = vacaciones
Dec 26 = vacaciones
Dec 27 = vacaciones
Dec 30 = vacaciones
Dec 31 = vacaciones
Jan 1 = Anio nuevo


¿Qué podrá ser, compañeros?

[explorer]

No es

*Holiday

sino

*Holidays

Mirar ejemplo en Date::Manip::ConfigFile.

[piero66]

Gracias, ya vi la documentación, pero no sé si tengo algo mal

Lo dejo así, a ver si con cualquiera de los tres jala.

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using text Syntax Highlighting

*Holidays

18/11/2013 = revolucion
third Monday in nov = revolucion
1*11:0:18:0:0:0 = revolucion

Coloreado en 0.000 segundos, usando GeSHi 1.0.8.4

¡¡¡Y ni aun así me funciona!!!