5 * Setup the core values in the database
10 require_once 'Pman/Core/UpdateDatabase.php';
11 class Pman_Xtuple_UpdateDatabase extends Pman_Core_UpdateDatabase
14 static $cli_desc = "Update SQL - Beta";
16 static $cli_opts = array(
18 'desc' => 'Source directory for json files.',
28 'desc' => 'Base Currency',
36 'json-accnt' => array(
37 'desc' => 'Accounts JSON file',
43 'json-curr-symbol' => array(
44 'desc' => 'Currency Symbols JSON file',
51 'json-location' => array(
52 'desc' => 'Location JSON file',
58 'json-terms' => array(
59 'desc' => 'Terms JSON file',
72 $ff = HTML_FlexyFramework::get();
73 if (!empty($ff->cli)) {
80 // called to ensure options are correct.
81 // before any data is imported / started..
82 function checkOpts($opts)
84 $opts = HTML_FlexyFramework::get()->page->opts;
86 (!empty($opts['init']) && empty($opts['base']) )
88 (empty($opts['init']) && !empty($opts['base']) )
91 die("--base=XXX and --init =1 must be used together.");
93 // default to import the terms.
95 (!empty($opts['init']) && empty($opts['json-terms']) ))
97 HTML_FlexyFramework::get()->page->opts['json-terms'] = dirname(__FILE__).'/Setup/terms.json';
106 function get($k = '',$opts)
112 require_once 'Pman/Core/UpdateDatabase.php';
114 Pman_Core_UpdateDatabase::jsonImportFromArray($opts);
116 $this->updateData($k);
120 function importModuleSQL($dburl)
123 $dbtype = $dburl['scheme'];
124 $dirmethod = 'import' . $dburl['scheme'] . 'dir';
127 echo "Xtyple:Importing SQL\n";
130 // if init has been called
131 // look in pgsql.ini -- This creates all the tables....
133 if (!empty($this->opts['init'])) {
134 // it should really use xtuple... but it's not very well organized...
135 //$this->{$dirmethod}($dburl, $this->rootDir. "/Pman/$m/{$dbtype}.init");
137 // ?? use dbscripts/misc/postbooks_empty.backup ???
139 $this->{$dirmethod}($dburl, $this->rootDir. "/Pman/$m/{$dbtype}.init");
143 // let's see if this works.. -- not very flexible... - hardcoding schema...
144 $this->{$dirmethod}($dburl, $this->rootDir. "/Pman/Xtuple/xtuple-database/440_schema.sql");
151 'public/trigger_functions',
158 $this->{$dirmethod}($dburl, $this->rootDir. "/Pman/Xtuple/xtuple-database/" . $dir);
161 // first try the standard from xtuple-database
164 // new -- sql directory..
165 // new style will not support migrate ... they have to go into mysql-migrate.... directories..
166 // new style will not support pg.sql etc.. naming - that's what the direcotries are for..
171 $this->{$dirmethod}($dburl, $this->rootDir. "/Pman/$m/{$dbtype}");
175 if (!empty($this->opts['init']) && file_exists($this->rootDir. "/Pman/$m/{$dbtype}.initdata")) {
176 HTML_FlexyFramework::get()->generateDataobjectsCache(true);
178 $this->{$dirmethod}($dburl, $this->rootDir. "/Pman/$m/{$dbtype}.initdata");
179 $this->{'fixSequences'. $dbtype}();
186 function updateData($k='')
188 $ff = HTML_Flexyframework::get();
189 $dburl = parse_url($ff->DB_DataObject['database']);
192 // $this->importpgsqldir($dburl, $this->rootDir. "/Pman/Xtuple/xtuple-database/empty_data.sql");
194 //DB_DataObject::debugLevel(1);
195 $tables = empty($k) ? array(
197 // 'curr_symbol', //?? fixme
207 // accounts - fixme - we need a better 'base set'
208 // 'costcat' -- fixme - we need to init this..
212 // 'location', //?? just check hat one exists.
216 $core_opts = HTML_FlexyFramework::get()->page->opts;
217 if (!empty($core_opts['init'])) {
218 DB_DataObject::factory('curr_symbol')->setBase($this, $core_opts['base']);
224 foreach($tables as $t) {
225 $cs = DB_DataObject::factory($t);
226 $cs->initDatabase($this);
230 // update data is called from main
232 $this->updateMetricValue();
234 $this->addWarehouse();
235 $this->addExtraYears();
236 $this->addAccounts();
237 $this->addBankAccounts();
243 function updateMetricValue()
246 $d = DB_DataObject::Factory('shipvia');
247 if($d->get('shipvia_code', 'UPS-Ground')){
248 $metric = DB_DataObject::Factory('metric');
249 $metric->query("SELECT setmetric('DefaultShipViaId', '{$d->pid()}')");
252 $d = DB_DataObject::Factory('accnt');
253 if($d->get('accnt_descrip', 'Currency Gain Loss')){
254 $metric = DB_DataObject::Factory('metric');
255 $metric->query("SELECT setmetric('CurrencyGainLossAccount', '{$d->pid()}')");
258 $d = DB_DataObject::Factory('salesrep');
262 salesrep_number IS NOT NULL
264 salesrep_number != ''
266 $d->orderBy('salesrep_id ASC');
268 $metric = DB_DataObject::Factory('metric');
269 $metric->query("SELECT setmetric('DefaultSalesRep', '{$d->pid()}')");
272 $d = DB_DataObject::Factory('shipform');
273 $d->orderBy('shipform_id ASC');
275 $metric = DB_DataObject::Factory('metric');
276 $metric->query("SELECT setmetric('DefaultShipFormId', '{$d->pid()}')");
296 function updateData($k='')
303 function addWarehouse()
305 $l = DB_DataObject::Factory('location');
307 echo "location exists - SKIP\n";
310 $cust = DB_DataObject::Factory('custinfo');
311 $cc =$cust->count() ;
313 echo "location create - needs 1 custinfo - got $cc\n";
319 'location_name' => 'Warehouse',
320 'location_descrip' => 'Warehouse',
321 'location_cust_id' => $cust->pid()
327 function addExtraYears()
329 $p = DB_DataObject::Factory('period');
331 echo "SKIP - already have periods\n";
334 $p->initPeriods($this);
335 $p->initPeriods($this);
336 $p->initPeriods($this);
337 $p->initPeriods($this);
340 function addAccounts()
342 $ac = DB_DataObject::factory('accnt');
347 require_once 'File/Convert.php';
348 $cp = $this->tempName('xls');
349 copy(dirname(__FILE__).'/Setup/accounts_sample.xls', $cp);
350 $fc = new File_Convert($cp, 'application/vnd.ms-excel');
351 //var_Dump($img->getStoreName());
352 $csv = $fc->convert('text/csv');
355 require_once 'Pman/Xtuple/Import/Accounts.php';
356 $ia = new Pman_Xtuple_Import_Accounts();
357 $ia->importCsv($csv);
360 function addBankAccounts() {
362 $accnt = DB_DataObject::factory('subaccnt');
363 if (!$accnt->get('subaccnt_number', '01')) {
364 echo "SKIP Bank account creation - no subaccnt - 01\n";
368 $bankaccnt = DB_DataObject::factory('bankaccnt');
370 $bankaccnt->whereAdd("
373 // do we have any bank accounts.. with names...
374 if($bankaccnt->count()){
377 $bankaccnt = DB_DataObject::factory('bankaccnt');
379 if(!$bankaccnt->get('bankaccnt_name', 'Current Account')){
380 // create a standard account.
381 $accnt = DB_DataObject::factory('accnt');
382 $accnt->setFrom(array(
383 'accnt_number' => '131',
384 'accnt_descrip' => 'Current Account',
385 'accnt_comments' => '',
386 'accnt_profit' => '01',
389 'accnt_extref' => '',
390 'accnt_closedpost' => false,
391 'accnt_forwardupdate' => false,
392 'accnt_subaccnttype_code' => 'CA',
393 'accnt_curr_id' => $accnt->sqlValue("baseCurrId()"),
394 'accnt_active' => true
397 if(!$accnt->find(true)){
401 $bankaccnt->setFrom(array(
402 'bankaccnt_name' => 'Current Account',
403 'bankaccnt_descrip' => 'Current Account',
404 'bankaccnt_bankname' => 'Current Account',
405 'bankaccnt_accntnumber' => 'N/A',
406 'bankaccnt_ar' => true,
407 'bankaccnt_ap' => true,
408 'bankaccnt_nextchknum' => 5000,
409 'bankaccnt_type' => 'K',
410 'bankaccnt_accnt_id' => $accnt->pid(),
411 'bankaccnt_curr_id' => $bankaccnt->sqlValue("baseCurrId()"),
412 'bankaccnt_notes' => '',
413 'bankaccnt_routing' => '',
414 'bankaccnt_ach_enabled' => false,
415 'bankaccnt_ach_origintype' => 'I'
418 $bankaccnt->insert();
421 $bankaccnt = DB_DataObject::factory('bankaccnt');
423 if(!$bankaccnt->get('bankaccnt_name', 'Savings Account')){
424 $accnt = DB_DataObject::factory('accnt');
425 $accnt->setFrom(array(
426 'accnt_number' => '404',
427 'accnt_descrip' => 'Savings Account',
428 'accnt_comments' => '',
429 'accnt_profit' => '01',
432 'accnt_extref' => '',
433 'accnt_closedpost' => false,
434 'accnt_forwardupdate' => false,
435 'accnt_subaccnttype_code' => 'CA',
436 'accnt_curr_id' => $accnt->sqlValue("baseCurrId()"),
437 'accnt_active' => true
440 if(!$accnt->find(true)){
444 $bankaccnt->setFrom(array(
445 'bankaccnt_name' => 'Savings Account',
446 'bankaccnt_descrip' => 'Savings Account',
447 'bankaccnt_bankname' => 'Savings Account',
448 'bankaccnt_accntnumber' => 'N/A',
449 'bankaccnt_ar' => true,
450 'bankaccnt_ap' => true,
451 'bankaccnt_nextchknum' => 5000,
452 'bankaccnt_type' => 'K',
453 'bankaccnt_accnt_id' => $accnt->pid(),
454 'bankaccnt_curr_id' => $bankaccnt->sqlValue("baseCurrId()"),
455 'bankaccnt_notes' => '',
456 'bankaccnt_routing' => '',
457 'bankaccnt_ach_enabled' => false,
458 'bankaccnt_ach_origintype' => 'I'
461 $bankaccnt->insert();