PHP Societe::initAsSpecimen方法代码示例

require_once DOL_DOCUMENT_ROOT . '/core/lib/admin.lib.php';
require_once DOL_DOCUMENT_ROOT . '/core/lib/fourn.lib.php';
require_once DOL_DOCUMENT_ROOT . '/fourn/class/fournisseur.class.php';
require_once DOL_DOCUMENT_ROOT . '/fourn/class/fournisseur.commande.class.php';
$langs->load("admin");
$langs->load("other");
$langs->load("orders");
if (!$user->admin) {
    accessforbidden();
}
$type = GETPOST('type', 'alpha');
$value = GETPOST('value', 'alpha');
$label = GETPOST('label', 'alpha');
$action = GETPOST('action', 'alpha');
$specimenthirdparty = new Societe($db);
$specimenthirdparty->initAsSpecimen();
/*
 * Actions
 */
if ($action == 'updateMask') {
    $maskconstorder = GETPOST('maskconstorder', 'alpha');
    $maskvalue = GETPOST('maskorder', 'alpha');
    if ($maskconstorder) {
        $res = dolibarr_set_const($db, $maskconstorder, $maskvalue, 'chaine', 0, '', $conf->entity);
    }
    if (!$res > 0) {
        $error++;
    }
    if (!$error) {
        setEventMessages($langs->trans("SetupSaved"), null, 'mesgs');
    } else {

    /**
     * testSocieteGetFullAddress
     *
     * @return	int		$id				Id of company
     */
    public function testSocieteGetFullAddress()
    {
        global $conf,$user,$langs,$db;
        $conf=$this->savconf;
        $user=$this->savuser;
        $langs=$this->savlangs;
        $db=$this->savdb;

        $localobjectadd=new Societe($db);
        $localobjectadd->initAsSpecimen();

        // France
        unset($localobjectadd->country_code);
        $localobjectadd->country_id=1;
        $localobjectadd->name='New name';
        $localobjectadd->address='New address';
        $localobjectadd->zip='New zip';
        $localobjectadd->town='New town';
        $result=$localobjectadd->getFullAddress(1);
        print __METHOD__." id=".$localobjectadd->id." result=".$result."\n";
        $this->assertContains("New address\nNew zip New town\nFrance", $result);

        // Belgium
        unset($localobjectadd->country_code);
        $localobjectadd->country_id=2;
        $localobjectadd->name='New name';
        $localobjectadd->address='New address';
        $localobjectadd->zip='New zip';
        $localobjectadd->town='New town';
        $result=$localobjectadd->getFullAddress(1);
        print __METHOD__." id=".$localobjectadd->id." result=".$result."\n";
        $this->assertContains("New address\nNew zip New town\nBelgium", $result);

        // Switzerland
        unset($localobjectadd->country_code);
        $localobjectadd->country_id=6;
        $localobjectadd->name='New name';
        $localobjectadd->address='New address';
        $localobjectadd->zip='New zip';
        $localobjectadd->town='New town';
        $result=$localobjectadd->getFullAddress(1);
        print __METHOD__." id=".$localobjectadd->id." result=".$result."\n";
        $this->assertContains("New address\nNew zip New town\nSwitzerland", $result);

        // USA
        unset($localobjectadd->country_code);
        $localobjectadd->country_id=11;
        $localobjectadd->name='New name';
        $localobjectadd->address='New address';
        $localobjectadd->zip='New zip';
        $localobjectadd->town='New town';
        $result=$localobjectadd->getFullAddress(1);
        print __METHOD__." id=".$localobjectadd->id." result=".$result."\n";
        $this->assertContains("New address\nNew zip New town\nUnited States", $result);

        return $localobjectadd->id;
    }

 /**
  * 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);
//.........这里部分代码省略.........

 /**
  * testAdherentSetThirdPartyId
  *
  * @param   Adherent    $localobject    Member instance
  * @return  Adherent
  *
  * @depends testAdherentSetUserId
  * The depends says test is run only if previous is ok
  */
 public function testAdherentSetThirdPartyId(Adherent $localobject)
 {
     global $conf, $user, $langs, $db;
     $conf = $this->savconf;
     $user = $this->savuser;
     $langs = $this->savlangs;
     $db = $this->savdb;
     //Create a Third Party
     $thirdparty = new Societe($db);
     $thirdparty->initAsSpecimen();
     $result = $thirdparty->create($user);
     print __METHOD__ . " id=" . $localobject->id . " third party id=" . $thirdparty->id . " result=" . $result . "\n";
     $this->assertTrue($result > 0);
     //Set Third Party ID
     $result = $localobject->setThirdPartyId($thirdparty->id);
     $this->assertEquals($result, 1);
     print __METHOD__ . " id=" . $localobject->id . " result=" . $result . "\n";
     //Adherent is updated with new data
     $localobject->fetch($localobject->id);
     $this->assertEquals($localobject->fk_soc, $thirdparty->id);
     print __METHOD__ . " id=" . $localobject->id . " result=" . $result . "\n";
     //We remove the third party association
     $result = $localobject->setThirdPartyId(0);
     $this->assertEquals($result, 1);
     //And check if it has been updated
     $localobject->fetch($localobject->id);
     $this->assertNull($localobject->fk_soc);
     //Now we remove the third party
     $result = $thirdparty->delete($thirdparty->id, $user);
     $this->assertEquals($result, 1);
     return $localobject;
 }

 /**
  * testDolFormatAddress
  *
  * @return	void
  */
 public function testDolFormatAddress()
 {
     global $conf, $user, $langs, $db;
     $conf = $this->savconf;
     $user = $this->savuser;
     $langs = $this->savlangs;
     $db = $this->savdb;
     $object = new Societe($db);
     $object->initAsSpecimen();
     $object->country_code = 'FR';
     $address = dol_format_address($object);
     $this->assertEquals("21 jump street\n99999 MyTown", $address);
     $object->country_code = 'GB';
     $address = dol_format_address($object);
     $this->assertEquals("21 jump street\nMyTown, MyState\n99999", $address);
     $object->country_code = 'US';
     $address = dol_format_address($object);
     $this->assertEquals("21 jump street\nMyTown, MyState, 99999", $address);
     $object->country_code = 'AU';
     $address = dol_format_address($object);
     $this->assertEquals("21 jump street\nMyTown, MyState, 99999", $address);
 }

    /**
     */
    public function testSocieteCreate()
    {
    	global $conf,$user,$langs,$db;
		$conf=$this->savconf;
		$user=$this->savuser;
		$langs=$this->savlangs;
		$db=$this->savdb;

		$localobject=new Societe($this->savdb);
    	$localobject->initAsSpecimen();
    	$result=$localobject->create($user);

        print __METHOD__." result=".$result."\n";
    	$this->assertLessThanOrEqual($result, 0);

    	return $result;
    }