2011-07-09 14:11:40 +00:00
#!/usr/bin/php
< ? php
2005-08-12 20:24:05 +00:00
/* Copyright ( C ) 2005 Rodolphe Quiedeville < rodolphe @ quiedeville . org >
*
* 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
2013-01-16 14:36:08 +00:00
* the Free Software Foundation ; either version 3 of the License , or
2005-08-12 20:24:05 +00:00
* ( 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
2011-07-31 22:21:57 +00:00
* along with this program . If not , see < http :// www . gnu . org / licenses />.
2005-08-12 20:24:05 +00:00
*
* ATTENTION DE PAS EXECUTER CE SCRIPT SUR UNE INSTALLATION DE PRODUCTION
*/
2005-08-25 20:27:17 +00:00
/**
2015-11-09 15:48:30 +00:00
* \file dev / intdata / generate - invoice . php
* \brief Script example to inject random customer invoices ( for load tests )
2010-01-20 18:36:42 +00:00
*/
2005-08-25 20:27:17 +00:00
2007-08-26 12:10:50 +00:00
// Test si mode batch
$sapi_type = php_sapi_name ();
if ( substr ( $sapi_type , 0 , 3 ) == 'cgi' ) {
2010-05-02 18:02:43 +00:00
echo " Erreur: Vous utilisez l'interpreteur PHP pour le mode CGI. Pour executer mailing-send.php en ligne de commande, vous devez utiliser l'interpreteur PHP pour le mode CLI. \n " ;
exit ;
2007-08-26 12:10:50 +00:00
}
// Recupere root dolibarr
2009-10-20 14:22:24 +00:00
$path = preg_replace ( '/generate-facture.php/i' , '' , $_SERVER [ " PHP_SELF " ]);
2010-05-09 20:25:53 +00:00
require ( $path . " ../../htdocs/master.inc.php " );
2010-04-25 14:17:39 +00:00
require_once ( DOL_DOCUMENT_ROOT . " /compta/facture/class/facture.class.php " );
2010-04-29 14:54:12 +00:00
require_once ( DOL_DOCUMENT_ROOT . " /societe/class/societe.class.php " );
2005-08-12 20:24:05 +00:00
2007-08-26 12:10:50 +00:00
2005-08-12 20:24:05 +00:00
/*
2007-08-26 12:10:50 +00:00
* Parameters
2005-08-12 20:24:05 +00:00
*/
2012-02-15 12:58:37 +00:00
define ( GEN_NUMBER_FACTURE , 5 );
2005-08-12 20:24:05 +00:00
2010-07-09 23:13:44 +00:00
$ret = $user -> fetch ( '' , 'admin' );
if ( ! $ret > 0 )
2005-08-12 20:24:05 +00:00
{
2010-07-09 23:13:44 +00:00
print 'A user with login "admin" and all permissions must be created to use this script.' . " \n " ;
exit ;
2005-08-12 20:24:05 +00:00
}
2010-07-09 23:13:44 +00:00
$user -> getrights ();
2005-08-12 20:24:05 +00:00
$socids = array ();
2007-06-11 22:51:47 +00:00
$sql = " SELECT rowid FROM " . MAIN_DB_PREFIX . " societe WHERE client=1 " ;
2005-08-12 20:24:05 +00:00
$resql = $db -> query ( $sql );
2009-04-21 19:24:12 +00:00
if ( $resql )
2005-08-12 20:24:05 +00:00
{
2010-05-02 18:02:43 +00:00
$num_socs = $db -> num_rows ( $resql );
$i = 0 ;
while ( $i < $num_socs )
{
$i ++ ;
$row = $db -> fetch_row ( $resql );
$socids [ $i ] = $row [ 0 ];
}
2005-08-12 20:24:05 +00:00
}
$prodids = array ();
2010-08-11 18:35:31 +00:00
$sql = " SELECT rowid FROM " . MAIN_DB_PREFIX . " product WHERE tosell=1 " ;
2005-08-12 20:24:05 +00:00
$resql = $db -> query ( $sql );
2009-04-21 19:24:12 +00:00
if ( $resql )
2005-08-12 20:24:05 +00:00
{
2010-05-02 18:02:43 +00:00
$num_prods = $db -> num_rows ( $resql );
$i = 0 ;
while ( $i < $num_prods )
{
$i ++ ;
$row = $db -> fetch_row ( $resql );
$prodids [ $i ] = $row [ 0 ];
}
2005-08-12 20:24:05 +00:00
}
$i = 0 ;
2007-08-26 12:10:50 +00:00
$result = 0 ;
while ( $i < GEN_NUMBER_FACTURE && $result >= 0 )
2005-08-12 20:24:05 +00:00
{
2006-09-09 13:05:45 +00:00
$i ++ ;
$socid = rand ( 1 , $num_socs );
2007-08-26 12:10:50 +00:00
print " Invoice " . $i . " for socid " . $socid ;
2009-04-21 19:24:12 +00:00
2014-08-01 12:26:13 +00:00
$facture = new Facture ( $db );
2006-09-09 13:05:45 +00:00
$facture -> date = time ();
$facture -> cond_reglement_id = 3 ;
$facture -> mode_reglement_id = 3 ;
2009-04-21 19:24:12 +00:00
2007-08-26 12:10:50 +00:00
$result = $facture -> create ( $user );
if ( $result >= 0 )
{
2010-04-28 13:49:13 +00:00
$result = $facture -> validate ( $user );
2009-04-21 19:24:12 +00:00
if ( $result )
{
$nbp = rand ( 2 , 5 );
$xnbp = 0 ;
while ( $xnbp < $nbp )
{
$prodid = rand ( 1 , $num_prods );
$product = new Product ( $db );
2010-07-09 23:13:44 +00:00
$result = $product -> fetch ( $prodids [ $prodid ]);
2013-07-10 15:29:54 +00:00
$result = $facture -> addline ( $product -> description , $product -> price , rand ( 1 , 5 ), 0 , 0 , 0 , $prodids [ $prodid ], 0 , '' , '' , 0 , 0 , '' , $product -> price_base_type , $product -> price_ttc , $product -> type );
2013-07-10 14:07:57 +00:00
if ( $result < 0 )
{
dol_print_error ( $db , $propal -> error );
}
$xnbp ++ ;
2009-04-21 19:24:12 +00:00
}
2010-07-09 23:13:44 +00:00
print " OK with ref " . $facture -> ref . " \n " ;;
2009-04-21 19:24:12 +00:00
}
2007-08-26 12:10:50 +00:00
else
{
2009-02-20 22:53:15 +00:00
dol_print_error ( $db , $facture -> error );
2007-08-26 12:10:50 +00:00
}
}
else
{
2009-02-20 22:53:15 +00:00
dol_print_error ( $db , $facture -> error );
2007-08-26 12:10:50 +00:00
}
2009-04-21 19:24:12 +00:00
2005-08-12 20:24:05 +00:00
}