#!/usr/bin/php4 -qC
<?php 
/* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
-------------------------------------------------------------------------------
                             Ministerio de Economía
                                    Protocolizacion
-------------------------------------------------------------------------------
This file is part of Protocolizacion.

Protocolizacion is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 2 of the License, or (at your option)
any later version.

Protocolizacion is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
 
You should have received a copy of the GNU General Public License; if not,
write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
Boston, MA  02111-1307  USA
-------------------------------------------------------------------------------
Creado: mar nov 18 10:46:28 ART 2003
Autor:  Martin Marrese <mmarre@mecon.gov.ar>
-------------------------------------------------------------------------------
$Id$
-----------------------------------------------------------------------------*/

//Las posibles bases son:
// normas (para MECON)
// normas_miplan (para MIPLAN)

require_once 'DB.php';

require_once 'Console/Getopt.php';
$con  = new Console_Getopt;
$args = $con->readPHPArgv();
$options = $con->getopt($args, $so);
$base = (@$options[1][0]) ? @$options[1][0] : 'normas';
$periodo = (@$options[1][1]) ? @$options[1][1] : '2003';

$db = DB::connect("mysql://intranet:intranet@intranet-db/".$base,
        "persistent=true");
if (DB::isError($db)) {
    die ($db->getMessage());
}

//FIXME Hay que cambiar el nombre de la base segun el ministerio 
$sql = 'SELECT DISTINCT id_firmante AS id_firmante '.
        'FROM '.$base.'.firmante '.
        'ORDER BY id_firmante';

$dbh = $db->prepare($sql);
$res = $db->execute($dbh);    

while ($re = $res->fetchrow(DB_FETCHMODE_ASSOC)) {
    print "Procesando id_firmante: ".$re['id_firmante']."\n";
    $txt = './informe_auditoria.php '.$periodo.' '.$re['id_firmante'] 
        .' '. $base
        . ' > '.$re['id_firmante'].'.pdf';
    system ($txt);
}
$res->free();

print "Comprimiendo archivos.\n";
system ('find . -name "*.pdf" -print | zip '.$base.' -@');
system ('rm *.pdf -f');
?>