hypersonic-plus 0.0.0

data/lib/hwidgets/hdbfilterview.rb

@@ -0,0 +1,28 @@
+class HDBFilterView < HDivTag
+
+  def initialize(sourceView: nil, **args)
+
+    @sourceView = sourceView
+    return super(class: 'hdbfilterview', **args)
+
+  end
+
+  def applyFilter(value: 'true')
+    return @sourceView.html(filter: value)
+  end
+
+  def filter
+    div = HDivTag.new(class: 'filter-box') 
+    div << HWidget.new("span", "Filter:")
+    div << filter = HWidget.new("input", class: 'filter', type: 'text', value: "",  
+                       onkeypress: "hdbFilterView.keyPress(this, event)")
+    filter.connect(:onblur, self, "applyFilter", id: @sourceView.oid, attributes: ":obj.value")
+    return div
+  end
+
+  def html
+    self << filter
+    return super
+  end 
+
+end

data/lib/hwidgets/hdbtableview.rb

@@ -0,0 +1,213 @@
+require "hwidgets/htableview"
+
+# Quando faccio doppio click su una tabella si apre una finestra di dialogo a cui passo l'odb della tabella
+# Se in una finestra di dialogo ho un tabella a quella tabella deve essere passato l'odb direttamente dalla 
+# finestra di dialogo perche' l'odb deve essere generato con dialogOdb.tableName_table altrimenti quano chiudo 
+# l'ultima finestra con ok la tabella modificata non verra' salvata in quando sconnessa dalla dialog box
+ 
+class HDBTableView < HTableView
+    attr_reader :moduleName, :modelName, :oid, :odb, :dialogLevel
+
+    def initialize(moduleName: nil, modelName: nil,
+                   filter: "true", sortField: "id", sortDirection: "asc",
+                   pageSize: 'all', page: 0,
+                   odb: nil, poid: nil, dialogLevel: 0, connectionName: "default")
+
+      hl << " =========================================================".red
+      hl << " ==================== NEW HDBTableView ===================".red
+      hl << " =========================================================".red
+      super(className: 'hdbtableview')
+      @moduleName = moduleName
+      @modelName = modelName
+      @oid = hm().malloc(self, poid).obj.object_id.to_s
+      self.hotLog("hdbtableview oid: #{@oid}")
+      @odb = odb
+      @dialogLevel = dialogLevel
+      @connectionName = connectionName
+      
+      @filter = filter
+      @sortField = sortField
+      @sortDirection = sortDirection
+      @pageSize = pageSize
+      @page = page
+    end
+    
+    def rpcPageSize
+      return @pageSize
+    end
+    def rpcPages
+      return 1 if @pageSize == "all"
+      result = hdb(@connectionName).select("count(*)").from(@modelName).where(@filter).orderBy(nil).direction(nil).execute()
+
+      rows = result.data(0, "count").to_i
+      pages = rows / @pageSize.to_i 
+      pages += 1 if (rows % @pageSize.to_i > 0)
+      return pages;
+    end
+    def rpcHtml(args)
+      return self.html(args)
+    end
+    
+    def rpcAction(ids: nil, action: nil)
+      return if ids.empty?
+      odb = Marshal.load(Marshal.dump(@odb))
+      odb.findBy("id in (#{ids.join(',')})")
+      eval("odb.#{action}(ids)")
+    end
+
+    def setControlPanel()
+      
+      tr = self.appendRow(@headerTr)
+      prevTd = HWidget.new("th")
+      prevTd.setInnerHTML("Prev")
+      # if arr is an array of integers then a.map!(&to_s) converts each number to string
+      prevTd.connect(:onclick, self, "html", id: @oid, 
+                     args: {page: [0, @page - 1].max})
+      nextTd = HWidget.new("th")
+      nextTd.setInnerHTML("Next")
+      nextTd.connect(:onclick, self, "html", id: @oid, 
+                     args: {page: @page + 1})
+      tr.getChilds()[-2] = prevTd
+      tr.getChilds()[-1] = nextTd
+
+    end
+    
+    def setAddRowButton()
+      
+      tr = self.appendRow()
+      td0 = tr.getChilds()[0]
+      td0.setInnerHTML("")
+      td0 << HWidget.new("a", "Add Row")
+      td0.connect(:onclick, self, "newRecord", getElem: "body", mode: "add", id: @oid)
+
+    end
+
+    def setThSlots(th, fieldName)
+     
+      sortDirection = (@sortDirection == "asc") ? "desc" : "asc"
+      th.connect(:onclick, self, "html", id: @oid, 
+                 args: {sortField: fieldName, sortDirection: sortDirection},
+                 hotLog: "sort #{fieldName}")
+
+    end
+
+    def setTrSlots(tr, row)
+
+      tr.set(value: "#id", tabindex: "0")
+      tr.connect(:ondblclick, self, "doubleClick", attributes: "id", getElem: "body", mode: "add", id: @oid, after:'loadComboBox()');
+      tr.addJsFunction(:onclick,      :'hdbTableView.click',       :event, @oid)
+      tr.addJsFunction(:oncontextmenu,  :'hdbTableView.rightClick',  :event, @oid)
+      tr.addJsFunction(:onkeypress,   :'hdbTableView.keyPress',    :event, @oid)
+      cancKey = 46
+      tr.connect(:onkeypress, self, "deleteRecord", attributes: "id", KeyEvent: :event, keyCode: cancKey, id: @oid)
+      
+    end
+  
+    def setTd(td, fieldName, value, row)
+      td.set(name: "#{@fieldTable.tableName}[#{row}][#{fieldName}]", overwrite: true)
+    end
+    
+    def beforeInsertRow(row, tagName, fieldName, value)
+      checkBox = HWidget.new("input", value: value, type: "checkbox", class: 'hdbtableview-checkbox')
+      checkBox.set(onchange: "hdbTableView.selectAllRows(this)") if tagName == "th"
+      row << ( HWidget.new(tagName) << checkBox ) if fieldName == "id"
+    end
+    
+    def setTableHeaders()
+
+      super()
+    
+    end
+    
+    def closeButton()
+      hl << "closeButton".red
+      @odb.remove() if @odb.id[0] == '#' and @odb.id[-1] != '#'
+      return nil
+    end
+      
+    def doubleClick(id: nil)
+      dialogView = HDBDialogView.initByTableView(id, self)
+      dialogView.closeButton.connect(:onclick, self, "closeButton", before: 'hdialogView.close()', mode: 'none', id: @oid)
+      dialogView.cancelButton.connect(:onclick, self, "closeButton", before: 'hdialogView.close()', mode: 'none', id: @oid)
+      dialogView.connect(:onsubmit, self, "html", submit: true, id: @oid)
+      return dialogView.html()
+    end
+    
+    def newRecord()
+      nvr = odb.create # new virtual record
+      dialogView = HDBDialogView.initByTableView(nvr.id, self)
+      dialogView.closeButton.connect(:onclick, self, "closeButton", before: 'hdialogView.close()', mode: 'none', id: @oid)
+      dialogView.cancelButton.connect(:onclick, self, "closeButton", before: 'hdialogView.close()', mode: 'none', id: @oid)
+      dialogView.connect(:onsubmit, self, "html", submit: true, id: @oid)
+      return dialogView.html()
+    end
+    
+    def deleteRecord(id: nil)
+      hl << "deleteRecord: #{id}".red
+      if dialogLevel == 0
+        @odb.delete({"#{modelName}.id": id}) 
+      else
+        @odb.remove(id)
+      end
+      return self.html()
+    end
+    
+    def html(filter: @filter, sortField: @sortField, sortDirection: @sortDirection, pageSize: @pageSize, page: @page)
+      
+      filter = "true" if filter == ""
+      @filter = filter
+      @sortField = sortField
+      @sortDirection = sortDirection
+      @pageSize = pageSize
+      @page = page
+
+      @odb = HODB.newOdb(@modelName, @connectionName) unless @odb
+      @odb.where(filter).orderBy(sortField).direction(sortDirection).pageSize(pageSize).page(page) if @dialogLevel == 0
+      @fieldTable = @odb.toFieldTable(false) 
+      @fieldTable.sortBy(sortField, asc: sortDirection == 'asc') if @dialogLevel > 0 
+      
+      self.set(id: @oid, name: @modelName, oid: self.object_id.to_s)
+      self.reset()
+      
+      return super() 
+
+    end
+    
+    
+    def self.tableViewDecorator(tableView)
+      headerTr = HWidget.new("tr").setStyle("background-color": "#0099cc")
+      td = HWidget.new("td").setStyle(padding: "8px")
+      tableView.
+        setStyle("table-layout": "auto").
+        set(align: "center", width: "100%")
+      tableView.headerTr = headerTr
+      tableView.td = td
+      #tableView.th = td
+      tr = Array.new()
+      tr[0] = HWidget.new("tr").set(class: "even-row", id: "#id")
+      tr[1] = HWidget.new("tr").set(class: "odd-row", id: "#id")
+      tableView.tr = tr
+      
+      totalizerTr = Array.new()
+      totalizerTr[0] = HWidget.new("tr").setStyle("background-color": "yellow")
+      totalizerTr[1] = totalizerTr[0]
+      tableView.totalizerTr = totalizerTr
+
+      summaryTr = Array.new()
+      summaryTr[0] = summaryTr[1] = headerTr
+      tableView.summaryTr = summaryTr
+
+      return tableView
+   
+   
+    end
+
+    def self.html(moduleName: nil, modelName: nil, odb: nil, dialogLevel: 0, connectionName: "default", filter: "true", sortField: "id", sortDirection: "asc", pageSize: "5", page: 0)
+      modelName = modelName.to_s
+      dbTableView = HDBTableView.new(moduleName, modelName, odb, dialogLevel, connectionName)
+      HDBTableView.tableViewDecorator(dbTableView)
+      return dbTableView.html(filter: filter, sortField: sortField, sortDirection: sortDirection, pageSize: pageSize, page: page)
+
+    end
+
+end

data/lib/hwidgets/hdbview.rb

@@ -0,0 +1,63 @@
+class HDBView < HDivTag
+
+  attr_reader :oid
+
+  def initialize(moduleName: nil, modelName: nil,
+                 filter: "true", sortField: "id", sortDirection: "asc",
+                 pageSize: '5', page: 0,
+                 paginationView: true, filterView: true, actionMenu: true, actionButtons: true,
+                 poid: nil,
+                 **args)
+
+    @moduleName = moduleName
+    @modelName = modelName
+    @oid = hm().malloc(self, poid).obj.object_id.to_s
+    @pageSize = pageSize
+    @page = page
+    @paginationView = paginationView
+    @filterView = filterView
+    @actionMenu = actionMenu
+    @dbTableView = HDBTableView.new(moduleName: moduleName, modelName: modelName,
+                                   filter: filter, sortField: sortField, sortDirection: sortDirection,
+                                   pageSize: pageSize, page: page, poid: @oid)  
+    HDBTableView.tableViewDecorator(@dbTableView)
+    
+    super(class: 'hdbview', id: @oid, **args)
+    self.hotLog("hdbview oid: #{@oid}".hight_purple)
+    self.actionButtons() if actionButtons
+    self.dropDowns() if actionMenu
+    self << HDBFilterView.new(sourceView: @dbTableView) if filterView
+    self << HPagination.new(sourceView: @dbTableView, pages: @dbTableView.rpcPages, pageSize: pageSize, 
+                            rowsForPage: [@pageSize, 10, 100, 'all']) if paginationView 
+    self << @dbTableView
+    return self
+
+  end
+    
+  def dropDowns
+
+    actionMenus = hv().viewByType(@moduleName, @modelName, :table).xpath("//actionmenu")
+    actionMenus.each do |menu|
+      nodes = menu.xpath(".//item")
+      items = nodes.to_a_of_h
+      self << HDropDown.new(sourceView: @dbTableView, caption: menu["name"], items: items) if items.any?
+    end
+
+  end
+  
+  def actionButtons
+
+    actionBtns = hv().viewByType(@moduleName, @modelName, :table).xpath("//actionbuttons")
+    actionBtns.each do |button|
+      nodes = button.xpath(".//button")
+      buttons = nodes.to_a_of_h
+      self << HDBActionButtons.new(sourceView: @dbTableView, buttons: buttons) if buttons.any?
+    end
+
+  end
+
+  def html
+    return super
+  end 
+
+end

data/lib/hwidgets/hdivtag.rb

@@ -0,0 +1,9 @@
+require "hwidgets/hwidget"
+
+class HDivTag < HWidget
+
+    def initialize(innerHTML = "", **args)
+      return super('div', innerHTML, args)
+    end
+
+end

data/lib/hwidgets/hdropdown.rb

@@ -0,0 +1,44 @@
+class HDropDown < HDivTag
+
+  def initialize(sourceView: nil, caption: "select", items: [], **args)
+
+    @sourceView = sourceView
+    @caption = caption 
+    @items = items
+
+    return super(class: 'hdropdown', **args)
+  end
+
+  def button
+    return HWidget.new("button", @caption, class: "dropbtn") 
+  end
+    
+  def a(innerHTML = '', icon: nil, **args)
+
+    a = HWidget.new("a", "", args)
+    a << HWidget.new('span', class: icon) if icon
+    a << HWidget.new('span', innerHTML)
+    return a
+
+  end
+
+  def content
+    contentDiv = HDivTag.new(class: 'dropdown-content')
+    @items.each do |item|
+      action = item.delete(:action)
+      link = self.a(item.delete(:name), icon: item.delete(:icon), **item)
+      link.connect(:onclick, @sourceView, "rpcAction", args: {action: action}, 
+                   id: @sourceView.oid, mode: 'none',
+                   attributes: ":hdbTableView.ids(obj) => ids")
+
+      contentDiv << link
+    end
+    return contentDiv
+  end
+
+  def html
+    self << self.button << self.content
+    return super
+  end 
+
+end

data/lib/hwidgets/hformfield.rb

@@ -0,0 +1,91 @@
+class HFormField
+
+    def initialize(moduleName, record, odb, oid, dialogLevel)
+      @formField = nil
+      @odb = odb
+      @moduleName = moduleName
+      @modelName = odb.modelName.to_s
+      @record = record
+      @oid = oid
+      @dialogLevel = dialogLevel
+      @value = @record.value(:value)
+      @oid = hm().malloc(self, oid).obj.object_id.to_s
+    end
+
+    def obj()
+      
+      record = @record
+      value = @value
+
+      name = @record.name
+      type = @record.type
+      label = @record.label
+      default = @record.default
+      dialogLevel = @record.dialogLevel
+
+      if(type == "combobox")
+        @formField = HSelectTag.new(name, "#{@modelName}[#{name}]", label).
+          setItems(record.value("items").split(",")).
+          setValues(record.value("values").split(",")).
+          setCarriageReturn().
+          setSelected(value) 
+
+      elsif(type == "dbcombobox")
+        hl << "dbComboBox".red
+        modelName = @odb.fieldProperty(name, "modelNameReference")
+        puts "@odb.#{modelName}_id".red
+        odb = eval("@odb.#{modelName}_id")
+        puts "#{odb.class}".red
+        puts "#{odb.table}".red
+        puts "#{odb.type}".red
+        puts "§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§===========> end".red
+        odb = odb.odb if odb.class == HRecordPtr
+        showedFieldName = record.value("show_field")
+        selectedValue = record.value(:value)
+        puts "#{selectedValue}".red
+        @formField = HDBComboBox.new(@moduleName, odb, name, showedFieldName, label, selectedValue, @oid, @dialogLevel)
+
+      elsif(type == "lineedit")
+        @formField = HInputTag.new(name, @modelName, label, nil, type).
+          setCarriageReturn().
+          setSelected(value) 
+
+      elsif(type == "radiobutton")
+        @formField = HRadioButtonTag.new(name, @modelName, label).
+          setCarriageReturn().
+          setSelected(value) 
+        @formField.items = record.value("items").split(",")
+        @formField.values = record.value("values").split(",")
+
+      elsif(type == "checkbox")
+        @formField = HCheckBoxTag.new(name, @modelName, label).
+          setCarriageReturn().
+          setSelected(value)
+        @formField.items = record.value("items").split(",")
+        @formField.values = record.value("values").split(",")
+
+      elsif(type == "textarea")
+        @formField = HTextAreaTag.new(name, @modelName, label).setCarriageReturn().
+          setSelected(value). 
+          setInnerHTML(value) 
+
+      elsif(type == "dbtable")
+        modelName = @odb.fieldProperty(name, "modelNameReference")
+        puts "@odb.#{modelName}_table".red
+        odb = eval("@odb.#{modelName}_table")
+        odb = odb.odb if odb.class == HRecordPtr
+        @formField = HDBTableView.new(moduleName: @moduleName, modelName: modelName, 
+                                      poid: @oid, odb: odb, dialogLevel: dialogLevel.to_i + 1)
+        HDBTableView.tableViewDecorator(@formField)
+      
+      elsif(type == "submit")
+        @formField = HWidget.new("input").setClosedTag(false)
+        @formField.set(type: "submit", value: label)
+      end
+      
+      return @formField
+
+    end
+    
+
+end