dolibarr/dev/initdemo/updatedemo.php

#!/usr/bin/env php
<?php
/* Copyright (C) 2016 Laurent Destailleur	<eldy@users.sourceforge.net>
 *
 * This program 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.
 *
 * This program 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
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 * or see http://www.gnu.org/
 * 
 * Get a distant dump file and load it into a mysql database
 */

$sapi_type = php_sapi_name();
$script_file = basename(__FILE__);
$path=dirname(__FILE__).'/';

// Test if batch mode
if (substr($sapi_type, 0, 3) == 'cgi') {
	echo "Error: You are using PHP for CGI. To execute ".$script_file." from command line, you must use PHP for CLI mode.\n";
	exit;
}

// Global variables
$error=0;

$confirm=isset($argv[1])?$argv[1]:'';

// Include Dolibarr environment
$res=0;
if (! $res && file_exists($path."../../master.inc.php")) $res=@include($path."../../master.inc.php");
if (! $res && file_exists($path."../../htdocs/master.inc.php")) $res=@include($path."../../htdocs/master.inc.php");
if (! $res && file_exists("../master.inc.php")) $res=@include("../master.inc.php");
if (! $res && file_exists("../../master.inc.php")) $res=@include("../../master.inc.php");
if (! $res && file_exists("../../../master.inc.php")) $res=@include("../../../master.inc.php");
if (! $res && preg_match('/\/nltechno([^\/]*)\//',$_SERVER["PHP_SELF"],$reg)) $res=@include($path."../../../dolibarr".$reg[1]."/htdocs/master.inc.php"); // Used on dev env only
if (! $res && preg_match('/\/nltechno([^\/]*)\//',$_SERVER["PHP_SELF"],$reg)) $res=@include("../../../dolibarr".$reg[1]."/htdocs/master.inc.php"); // Used on dev env only
if (! $res) die ("Failed to include master.inc.php file\n");
include_once(DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php');


/*
 *	Main
 */

if (empty($confirm))
{
	print "Usage: $script_file confirm\n";
	print "Return code: 0 if success, <>0 if error\n";
	exit(-1);
}


$tmp=dol_getdate(dol_now());


$tables=array(
    'propal'=>array(0=>'datep', 1=>'fin_validite', 2=>'date_valid', 3=>'date_cloture'),
    'commande'=>array(0=>'date_commande', 1=>'date_valid', 2=>'date_cloture'),
    'facture'=>array(0=>'datef', 1=>'date_valid', 2=>'date_lim_reglement'),
    'paiement'=>array(0=>'datep'),
    'bank'=>array(0=>'datev', 1=>'dateo'),
    'commande_fournisseur'=>array(0=>'date_commande', 1=>'date_valid', 3=>'date_creation', 4=>'date_approve', 5=>'date_approve2', 6=>'date_livraison'),
    'supplier_proposal'=>array(0=>'datec', 1=>'date_valid', 2=>'date_cloture')
);

$year=2010;
$currentyear=$tmp['year'];
while ($year <= $currentyear) 
{
    //$year=2021;
    $delta=($currentyear - $year);
    //$delta=-1;

    if ($delta)
    {
        foreach($tables as $tablekey => $tableval)
        {
            print "\nCorrect ".$tablekey." for year ".$year." and move them to current year ".$currentyear." "; 
            $sql="select rowid from ".MAIN_DB_PREFIX.$tablekey." where ".$tableval[0]." between '".$year."-01-01' and '".$year."-12-31' and ".$tableval[0]." < DATE_ADD(NOW(), INTERVAL -1 YEAR)";
            //$sql="select rowid from ".MAIN_DB_PREFIX.$tablekey." where ".$tableval[0]." between '".$year."-01-01' and '".$year."-12-31' and ".$tableval[0]." > NOW()";
            $resql = $db->query($sql);
            if ($resql)
            {
                $num = $db->num_rows($resql);
                $i=0;
                while ($i < $num)
                {
                    $obj=$db->fetch_object($resql);
                    if ($obj)
                    {
                        print ".";
                        $sql2="UPDATE ".MAIN_DB_PREFIX.$tablekey." set ";
                        $j=0;
                        foreach($tableval as $field)
                        {
                            if ($j) $sql2.=", ";
                            $sql2.= $field." = DATE_ADD(".$field.", INTERVAL ".$delta." YEAR)";
                            $j++;
                        }
                        $sql2.=" WHERE rowid = ".$obj->rowid;
                        //print $sql2."\n";
                        $resql2 = $db->query($sql2);
                        if (! $resql2) dol_print_error($db);
                    }            
                    $i++;
                }
            }
            else dol_print_error($db);
        }
    }
    
    $year++;
}

print "\n";

exit(0);