Fix #7123 - getting abra ready to test
[Pman.Xtuple] / dumpAccnt.php
1 <?php
2
3 /**
4  * -- Dump accnt and backaccnt from HK
5  * 
6  *
7  */
8 require_once 'Pman.php';
9  
10 class Pman_Xtuple_dumpAccnt extends Pman
11 {
12     static $cli_desc = "Dump accnt and backaccnt from HK";
13     
14     var $cli = false;
15     
16     function getAuth() {
17         
18         
19         $ff = HTML_FlexyFramework::get();
20         if (!empty($ff->cli)) {
21             $this->cli = true;
22             return true;
23         }
24         die("NOT ALLOWED");
25     }
26     
27     function get()
28     {
29         
30         $accnt = DB_DataObject::factory('accnt');
31         $accnt->joinAddBankaccnt();
32         $accnt->SelectAdd("
33             (SELECT curr_abbr FROM curr_symbol WHERE curr_id = accnt_curr_id) AS accnt_curr_abbr,
34             (SELECT curr_abbr FROM curr_symbol WHERE curr_id = bankaccnt_curr_id) AS bankaccnt_curr_abbr
35         ");
36         $accnt->find();
37         $accnts = array();
38         while ($accnt->fetch()){
39             $line = $accnt->toArray();
40             foreach($line as $k=>$v) {
41                 if (is_string($v) && !strlen($v)) {
42                     unset($line[$k]);
43                 }
44                 
45             }
46             
47             $accnts[] = json_encode($line);
48         }
49         echo "[\n". implode(",\n", $accnts) . "]";
50         
51         exit;
52     }
53     
54     
55     
56 }