} elseif ($tmp == 'NotConfigured') { print $langs->trans($tmp); } else { print $tmp; } print '</td>' . "\n"; print '<td align="center">'; //print "> ".$conf->global->FACTURE_ADDON." - ".$file; if ($conf->global->FACTURE_ADDON == $file || $conf->global->FACTURE_ADDON . '.php' == $file) { print img_picto($langs->trans("Activated"), 'switch_on'); } else { print '<a href="' . $_SERVER["PHP_SELF"] . '?action=setmod&value=' . preg_replace('/\\.php$/', '', $file) . '&scandir=' . $module->scandir . '&label=' . urlencode($module->name) . '" alt="' . $langs->trans("Default") . '">' . img_picto($langs->trans("Disabled"), 'switch_off') . '</a>'; } print '</td>'; $facture = new Facture($db); $facture->initAsSpecimen(); // Example for standard invoice $htmltooltip = ''; $htmltooltip .= '' . $langs->trans("Version") . ': <b>' . $module->getVersion() . '</b><br>'; $facture->type = 0; $nextval = $module->getNextValue($mysoc, $facture); if ("{$nextval}" != $langs->trans("NotAvailable")) { // Keep " on nextval $htmltooltip .= $langs->trans("NextValueForInvoices") . ': '; if ($nextval) { if (preg_match('/^Error/', $nextval) || $nextval == 'NotConfigured') { $nextval = $langs->trans($nextval); } $htmltooltip .= $nextval . '<br>'; } else { $htmltooltip .= $langs->trans($module->error) . '<br>';
/** * testFactureCreate * * @return int */ public function testFactureMercure() { global $conf,$user,$langs,$db; $conf=$this->savconf; $user=$this->savuser; $langs=$this->savlangs; $db=$this->savdb; require_once dirname(__FILE__).'/../../htdocs/compta/facture/class/facture.class.php'; require_once dirname(__FILE__).'/../../htdocs/core/modules/facture/mod_facture_mercure.php'; //$conf->global->FACTURE_MERCURE_MASK_CREDIT='{yyyy}{mm}-{0000@3}'; //$conf->global->FACTURE_MERCURE_MASK_INVOICE='{yyyy}{mm}-{0000@3}'; $conf->global->FACTURE_MERCURE_MASK_CREDIT='{yyyy}-{0000@1}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE='{yyyy}-{0000@1}'; $localobject=new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date=dol_mktime(0, 0, 0, 1, 1, 2012); $numbering=new mod_facture_mercure(); $result=$numbering->getNextValue($mysoc, $localobject); print __METHOD__." result=".$result."\n"; $localobject=new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date=dol_mktime(0, 0, 0, 1, 1, 2011); $numbering=new mod_facture_mercure(); $result=$numbering->getNextValue($mysoc, $localobject); print __METHOD__." result=".$result."\n"; $this->assertLessThan($result, 0); return $result; }
/** * testFactureCreate * * @return int */ public function testFactureRecCreate() { global $conf, $user, $langs, $db; $conf = $this->savconf; $user = $this->savuser; $langs = $this->savlangs; $db = $this->savdb; $localobjectinv = new Facture($this->savdb); $localobjectinv->initAsSpecimen(); $localobjectinv->create($user); $localobject = new FactureRec($this->savdb); $localobject->initAsSpecimen(); $result = $localobject->create($user, $localobjectinv->id); $this->assertLessThan($result, 0); print __METHOD__ . " result=" . $result . "\n"; return $result; }
/** * testPdfDocGetLineDesc * * @return void */ public function testPdfDocGetLineDesc() { global $conf,$user,$langs,$db; $conf=$this->savconf; $user=$this->savuser; $langs=$this->savlangs; $db=$this->savdb; $localobject=new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->lines=array(); $localobject->lines[0]->fk_product=1; $localobject->lines[0]->label='Label 1'; $localobject->lines[0]->desc="This is a description with a é accent\n(Country of origin: France)"; $result=pdf_getlinedesc($localobject,0,$langs); print __METHOD__." result=".$result."\n"; $this->assertEquals($result,"PIDRESS - Label 1<br>This is a description with a é accent<br>(Country of origin: France)"); $result=doc_getlinedesc($localobject->lines[0],$langs); print __METHOD__." result=".$result."\n"; $this->assertEquals($result,"PIDRESS - Label 1\nThis is a description with a é accent\n(Country of origin: France)"); }
/** * Test function addline and update_price * * @return boolean * @see http://wiki.dolibarr.org/index.php/Draft:VAT_calculation_and_rounding#Standard_usage */ public function testUpdatePrice() { //$this->sharedFixture global $conf, $user, $langs, $db; $this->savconf = $conf; $this->savuser = $user; $this->savlangs = $langs; $this->savdb = $db; $conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND = 0; // Two lines of 1.24 give 2.48 HT and 2.72 TTC with standard vat rounding mode $localobject = new Facture($this->savdb); $localobject->initAsSpecimen('nolines'); $invoiceid = $localobject->create($user); $localobject->addline('Desc', 1.24, 1, 10, 0, 0, 0, 0, '', '', 0, 0, 0, 'HT'); $localobject->addline('Desc', 1.24, 1, 10, 0, 0, 0, 0, '', '', 0, 0, 0, 'HT'); $newlocalobject = new Facture($this->savdb); $newlocalobject->fetch($invoiceid); $this->assertEquals(2.48, $newlocalobject->total_ht, "testUpdatePrice test1"); $this->assertEquals(0.24, $newlocalobject->total_tva, "testUpdatePrice test2"); $this->assertEquals(2.72, $newlocalobject->total_ttc, "testUpdatePrice test3"); // Two lines of 1.24 give 2.48 HT and 2.73 TTC with global vat rounding mode $localobject = new Facture($this->savdb); $localobject->initAsSpecimen('nolines'); $invoiceid = $localobject->create($user); $localobject->addline('Desc', 1.24, 1, 10, 0, 0, 0, 0, '', '', 0, 0, 0, 'HT'); $localobject->addline('Desc', 1.24, 1, 10, 0, 0, 0, 0, '', '', 0, 0, 0, 'HT'); $newlocalobject = new Facture($this->savdb); $newlocalobject->fetch($invoiceid); $this->assertEquals(2.48, $newlocalobject->total_ht, "testUpdatePrice test4"); //$this->assertEquals(0.25,$newlocalobject->total_tva); //$this->assertEquals(2.73,$newlocalobject->total_ttc); }
/** * Initialise an instance with random values. * Used to build previews or test instances. * id must be 0 if object instance is a specimen. * * @param string $option ''=Create a specimen invoice with lines, 'nolines'=No lines * @return void */ function initAsSpecimen($option = '') { global $user, $langs, $conf; $now = dol_now(); $arraynow = dol_getdate($now); $nownotime = dol_mktime(0, 0, 0, $arraynow['mon'], $arraynow['mday'], $arraynow['year']); parent::initAsSpecimen($option); $this->usenewprice = 1; }
/** * testFactureRoundingCreate2 * * @return int * * @depends testFactureRoundingCreate1 * Test according to page http://wiki.dolibarr.org/index.php/Draft:VAT_calculation_and_rounding#Standard_usage */ public function testFactureRoundingCreate2() { global $conf,$user,$langs,$db; $conf=$this->savconf; $user=$this->savuser; $langs=$this->savlangs; $db=$this->savdb; $localobject=new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->lines=array(); unset($localobject->total_ht); unset($localobject->total_ttc); unset($localobject->total_vat); $result=$localobject->create($user); // Add two lines for ($i=0; $i<2; $i++) { $localobject->addline($result, 'Description '.$i, 1.24, 1, 10); } $newlocalobject=new Facture($this->savdb); $newlocalobject->fetch($result); //var_dump($newlocalobject); $this->assertEquals($newlocalobject->total_ht, 2.48); //$this->assertEquals($newlocalobject->total_tva, 0.25); //$this->assertEquals($newlocalobject->total_ttc, 2.73); return $result; }
/** * testFactureValid * * @param Object $localobject Invoice * @return void * * @depends testFactureUpdate * The depends says test is run only if previous is ok */ public function testFactureValid($localobject) { global $conf,$user,$langs,$db; $conf=$this->savconf; $user=$this->savuser; $langs=$this->savlangs; $db=$this->savdb; $result=$localobject->validate($user); print __METHOD__." id=".$localobject->id." result=".$result."\n"; $this->assertLessThan($result, 0); // Test everything are still same than specimen $newlocalobject=new Facture($this->savdb); $newlocalobject->initAsSpecimen(); $this->changeProperties($newlocalobject); $this->assertEquals($this->objCompare($localobject,$newlocalobject,true,array('id','lines','client','thirdparty','brouillon','user_author','date_creation','date_validation','datem','ref','statut','paye','specimen','facnumber','actiontypecode','actionmsg2','actionmsg','mode_reglement','cond_reglement','cond_reglement_doc')), array()); // Actual, Expected return $localobject; }
/** * testFactureBuild * * @return int */ public function testFactureBuild() { global $conf,$user,$langs,$db; $conf=$this->savconf; $user=$this->savuser; $langs=$this->savlangs; $db=$this->savdb; $conf->facture->dir_output.='/temp'; $localobjectcom=new Commande($this->savdb); $localobjectcom->initAsSpecimen(); $localobject=new Facture($this->savdb); $localobject->createFromOrder($localobjectcom); $localobject->date_lim_reglement = dol_now() + 3600 * 24 *30; // Crabe $localobject->modelpdf='crabe'; $result=facture_pdf_create($db, $localobject, $localobject->modelpdf, $langs); $localobject=new Facture($this->savdb); $localobject->initAsSpecimen(); $this->assertLessThan($result, 0); print __METHOD__." result=".$result."\n"; // Oursin $localobject->modelpdf='oursin'; $result=facture_pdf_create($db, $localobject, $localobject->modelpdf, $langs); $this->assertLessThan($result, 0); print __METHOD__." result=".$result."\n"; return 0; }
/** * testPdfDocGetLineDesc * * @return void */ public function testPdfDocGetLineDesc() { global $conf, $user, $langs, $db; $conf = $this->savconf; $user = $this->savuser; $langs = $this->savlangs; $db = $this->savdb; $localproduct = new Product($this->savdb); $localproduct->fetch(0, 'PIDRESS'); $product_id = $localproduct->id; if ($product_id <= 0) { print "\n" . __METHOD__ . " A product with ref PIDRESS must exists into database"; die; } $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->lines = array(); $localobject->lines[0] = new FactureLigne($this->savdb); $localobject->lines[0]->fk_product = $product_id; $localobject->lines[0]->label = 'Label 1'; $localobject->lines[0]->desc = "This is a description with a é accent\n(Country of origin: France)"; $result = pdf_getlinedesc($localobject, 0, $langs); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals($result, "PIDRESS - Label 1<br>This is a description with a é accent<br>(Country of origin: France)"); $result = doc_getlinedesc($localobject->lines[0], $langs); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals($result, "PIDRESS - Label 1\nThis is a description with a é accent\n(Country of origin: France)"); }
/** * testFactureAddLine3 * * @return void * * @depends testFactureAddLine2 * The depends says test is run only if previous is ok */ public function testFactureAddLine3() { global $conf, $user, $langs, $db; $conf = $this->savconf; $user = $this->savuser; $langs = $this->savlangs; $db = $this->savdb; // With option MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND = 0 $conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND = 0; $localobject3 = new Facture($this->savdb); $localobject3->initAsSpecimen('nolines'); $facid = $localobject3->create($user); $localobject3->addline('Line 1', 6.36, 3, 21); $localobject3->addline('Line 2', 6.36, 3, 21); $localobject3->addline('Line 3', 6.36, 3, 21); $localobject3->addline('Line 4', 6.36, 3, 21); $localobject3->addline('Line 5', 6.36, 3, 21); print __METHOD__ . " id=" . $facid . " total_ttc=" . $localobject3->total_ttc . "\n"; $this->assertEquals(95.40000000000001, $localobject3->total_ht); $this->assertEquals(20.05, $localobject3->total_tva); $this->assertEquals(115.45, $localobject3->total_ttc); // With option MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND = 1 $conf->global->MAIN_ROUNDOFTOTAL_NOT_TOTALOFROUND = 1; $localobject3 = new Facture($this->savdb); $localobject3->initAsSpecimen('nolines'); $facid = $localobject3->create($user); $localobject3->addline('Line 1', 6.36, 3, 21); $localobject3->addline('Line 2', 6.36, 3, 21); $localobject3->addline('Line 3', 6.36, 3, 21); $localobject3->addline('Line 4', 6.36, 3, 21); $localobject3->addline('Line 5', 6.36, 3, 21); print __METHOD__ . " id=" . $facid . " total_ttc=" . $localobject3->total_ttc . "\n"; $this->assertEquals(95.40000000000001, $localobject3->total_ht); $this->assertEquals(20.03, $localobject3->total_tva); $this->assertEquals(115.43, $localobject3->total_ttc); }
/** * testFactureMercure * * @return int */ public function testFactureMercure() { global $conf, $user, $langs, $db, $mysoc; $conf = $this->savconf; $user = $this->savuser; $langs = $this->savlangs; $db = $this->savdb; require_once dirname(__FILE__) . '/../../htdocs/compta/facture/class/facture.class.php'; require_once dirname(__FILE__) . '/../../htdocs/core/modules/facture/mod_facture_mercure.php'; // First we try with a simple mask, with no reset // and we test counter is still increase second year. $conf->global->FACTURE_ADDON = 'mercure'; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}-{0000}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}-{0000}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1915); // we use year 1915 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); // create invoice by forcing ref print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('1915-0001', $result); // counter must start to 1 $result = $localobject->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result, 'Test for {yyyy}-{0000}, 1st invoice'); // Can be deleted $localobject2 = new Facture($this->savdb); $localobject2->initAsSpecimen(); $localobject2->date = dol_mktime(12, 0, 0, 1, 1, 1916); // we use following year for second invoice (there is no reset into mask) $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject2, 'last'); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('1915-0001', $result); $result = $numbering->getNextValue($mysoc, $localobject2); $result2 = $localobject2->create($user, 1); $result3 = $localobject2->validate($user, $result); // create invoice by forcing ref print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('1916-0002', $result); // counter must be now 2 (not reseted) $result = $localobject2->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result); // Can be deleted $result = $localobject->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(0, $result, 'Test for {yyyy}-{0000} that is_erasable is 0 for 1st invoice'); // 1 can no more be deleted (2 is more recent) // Now we try with a reset $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}-{0000@1}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}-{0000@1}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1910); // we use year 1910 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('1910-0001', $result, 'Test for {yyyy}-{0000@1} 1st invoice'); // counter must start to 1 $localobject2 = new Facture($this->savdb); $localobject2->initAsSpecimen(); $localobject2->date = dol_mktime(12, 0, 0, 1, 1, 1910); // we use same year for second invoice (and there is a reset required) $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject2); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('1910-0002', $result, 'Test for {yyyy}-{0000@1} 2nd invoice, same day'); // counter must be now 2 $localobject3 = new Facture($this->savdb); $localobject3->initAsSpecimen(); $localobject3->date = dol_mktime(12, 0, 0, 1, 1, 1911); // we use next year for third invoice (and there is a reset required) $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject3); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('1911-0001', $result, 'Test for {yyyy}-{0000@1} 3nd invoice, same day'); // counter must be now 1 // Same but we add month after year $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@1}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@1}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1920); // we use year 1920 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('192001-0001', $result, 'Test for {yyyy}{mm}-{0000@1} 1st invoice'); // counter must start to 1 $result = $localobject->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result); // Can be deleted $localobject2 = new Facture($this->savdb); $localobject2->initAsSpecimen(); $localobject2->date = dol_mktime(12, 0, 0, 1, 1, 1921); // we use following year for second invoice (and there is a reset required) $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject2); $result2 = $localobject2->create($user, 1); $result3 = $localobject2->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('192101-0001', $result); // counter must be reseted to 1 $result = $localobject2->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result); // Can be deleted $result = $localobject->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result); // Case 1 can be deleted (because there was a reset for case 2) // Same but we add month before year and use a year on 2 digits $conf->global->FACTURE_MERCURE_MASK_CREDIT = '[mm}{yy}-{0000@1}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{mm}{yy}-{0000@1}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1925); // we use year 1925 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('0125-0001', $result, 'Test for {mm}{yy}-{0000@1} 1st invoice'); // counter must start to 1 $result = $localobject->is_erasable(); // This call get getNextNumRef with param 'last' print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result); // Can be deleted $localobject2 = new Facture($this->savdb); $localobject2->initAsSpecimen(); $localobject2->date = dol_mktime(12, 0, 0, 1, 1, 1925); // we use same year 1925 for second invoice (and there is a reset required) $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject2); $result2 = $localobject2->create($user, 1); $result3 = $localobject2->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('0125-0002', $result, 'Test for {mm}{yy}-{0000@1} 2st invoice'); // counter must be now 2 $result = $localobject2->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(1, $result); // Can be deleted $result = $localobject->is_erasable(); print __METHOD__ . " is_erasable=" . $result . "\n"; $this->assertEquals(0, $result); // Case 1 can not be deleted (because there is an invoice 2) $localobject3 = new Facture($this->savdb); $localobject3->initAsSpecimen(); $localobject3->date = dol_mktime(12, 0, 0, 1, 1, 1926); // we use following year for third invoice (and there is a reset required) $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject3); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('0126-0001', $result, 'Test for {mm}{yy}-{0000@1} 3rd invoice'); // counter must be now 1 // Try an offset when an invoice already exists $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000+9990}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000+9990}'; $result = $numbering->getNextValue($mysoc, $localobject2); // Now we try with a different fiscal month (forced by mask) $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@6}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@6}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1930); // we use year 1930 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject, 'last'); print __METHOD__ . " result for last=" . $result . "\n"; $this->assertEquals('', $result); // no existing ref into reset range $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('193001-0001', $result); // counter must start to 1 $result = $numbering->getNextValue($mysoc, $localobject, 'last'); print __METHOD__ . " result for last=" . $result . "\n"; $this->assertEquals('193001-0001', $result); // last ref into reset range should be same than last created $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1930); // we use same year but fiscal month after $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject, 'last'); print __METHOD__ . " result for last=" . $result . "\n"; $this->assertEquals('', $result); // last ref into reset range should be '' $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('193012-0001', $result); // counter must be reset to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1931); // we use same fiscal year but different year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('193101-0002', $result); // counter must be 2 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1931); // we use different fiscal year but same year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('193112-0001', $result); // counter must be reset to 1 // Now we try with a different fiscal month (defined by SOCIETE_FISCAL_MONTH_START) $conf->global->SOCIETE_FISCAL_MONTH_START = 6; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@0}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@0}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1940); // we use year 1940 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('194001-0001', $result); // counter must start to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1940); // we use same year but fiscal month after $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('194012-0001', $result); // counter must be reset to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1941); // we use same fiscal year but different year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('194101-0002', $result); // counter must be 2 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1941); // we use different discal year but same year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('194112-0001', $result); // counter must be reset to 1 // Now we try with a different fiscal month (defined by SOCIETE_FISCAL_MONTH_START) and we always want year of element $conf->global->SOCIETE_FISCAL_MONTH_START = 6; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@=}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@=}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1950); // we use year 1950 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('195001-0001', $result); // counter must start to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1950); // we use same year but fiscal month after $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('195012-0001', $result); // counter must be reset to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1951); // we use same fiscal year but different year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('195101-0002', $result); // counter must be 2 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1951); // we use different discal year but same year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('195112-0001', $result); // counter must be reset to 1 // Now we try with a different fiscal month (defined by SOCIETE_FISCAL_MONTH_START) and we always want start year $conf->global->SOCIETE_FISCAL_MONTH_START = 6; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@-}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@-}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1960); // we use year 1960 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('195901-0001', $result); // counter must start to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1960); // we use same year but fiscal month after $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('196012-0001', $result); // counter must be reset to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1961); // we use same fiscal year but different year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('196001-0002', $result); // counter must be 2 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1961); // we use different discal year but same year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('196112-0001', $result); // counter must be reset to 1 // Now we try with a different fiscal month (defined by SOCIETE_FISCAL_MONTH_START) and we always want end year $conf->global->SOCIETE_FISCAL_MONTH_START = 6; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@+}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@+}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1970); // we use year 1970 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('197001-0001', $result); // counter must start to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1970); // we use same year but fiscal month after $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('197112-0001', $result); // counter must be reset to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1971); // we use same fiscal year but different year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('197101-0002', $result); // counter must be 2 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 12, 1, 1971); // we use different fiscal year but same year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('197212-0001', $result); // counter must be reset to 1 // Now we try with a reset every month (@99) $conf->global->SOCIETE_FISCAL_MONTH_START = 6; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{yyyy}{mm}-{0000@99}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{yyyy}{mm}-{0000@99}'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1980); // we use year 1980 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('198001-0001', $result); // counter must start to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1980); // we use year 1980 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('198001-0002', $result); // counter must start to 2 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 2, 1, 1980); // we use year 1980 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('198002-0001', $result); // counter must start to 1 $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1981); // we use year 1981 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($mysoc, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('198101-0001', $result); // counter must start to 1 // Test with {t} tag $conf->global->SOCIETE_FISCAL_MONTH_START = 1; $conf->global->FACTURE_MERCURE_MASK_CREDIT = '{t}{yyyy}{mm}-{0000}'; $conf->global->FACTURE_MERCURE_MASK_INVOICE = '{t}{yyyy}{mm}-{0000}'; $tmpthirdparty = new Societe($this->savdb); $tmpthirdparty->initAsSpecimen(); $tmpthirdparty->typent_code = 'TE_ABC'; $localobject = new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->date = dol_mktime(12, 0, 0, 1, 1, 1982); // we use year 1982 to be sure to not have existing invoice for this year $numbering = new mod_facture_mercure(); $result = $numbering->getNextValue($tmpthirdparty, $localobject); $result2 = $localobject->create($user, 1); $result3 = $localobject->validate($user, $result); print __METHOD__ . " result=" . $result . "\n"; $this->assertEquals('A198201-0001', $result); // counter must start to 1 return $result; }
/** */ public function testFactureBuild() { global $conf,$user,$langs,$db; $conf=$this->savconf; $user=$this->savuser; $langs=$this->savlangs; $db=$this->savdb; $conf->facture->dir_output.='/temp'; $localobject=new Facture($this->savdb); $localobject->initAsSpecimen(); $localobject->socid=1; // Crabe $localobject->modelpdf='crabe'; $result=facture_pdf_create($db, $localobject, '', $localobject->modelpdf, $langs); $this->assertLessThan($result, 0); print __METHOD__." result=".$result."\n"; // Oursin $localobject->modelpdf='oursin'; $result=facture_pdf_create($db, $localobject, '', $localobject->modelpdf, $langs); $this->assertLessThan($result, 0); print __METHOD__." result=".$result."\n"; return 0; }