commit-gnue
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[gnue-contrib] r259 - address/forms


From: reinhard
Subject: [gnue-contrib] r259 - address/forms
Date: Mon, 26 Mar 2007 08:17:44 -0500 (CDT)

Author: reinhard
Date: 2007-03-26 08:17:43 -0500 (Mon, 26 Mar 2007)
New Revision: 259

Modified:
   address/forms/address.gfd
   address/forms/stamm.gfd
Log:
General port to gnue-forms 0.6


Modified: address/forms/address.gfd
===================================================================
--- address/forms/address.gfd   2007-03-26 11:45:20 UTC (rev 258)
+++ address/forms/address.gfd   2007-03-26 13:17:43 UTC (rev 259)
@@ -1,261 +1,211 @@
 <?xml version="1.0" encoding="UTF-8"?>
 
-<form title="Studiokonzept Adreßdatenbank">
+<form title="Studiokonzept Adressdatenbank">
   <options>
     <author>ByteWise Software GmbH</author>
-    <version>$Rev:$</version>
+    <version>$Rev$</version>
     <description>Simple address management</description>
   </options>
 
-  <datasource name="dtsCompany" connection="address" table="company">
+  <datasource name="dts_company" connection="address" table="company">
     <sortorder>
-      <sortfield name="name1" descending="False" ignorecase="True" />
+      <sortfield name="name1" descending="N" ignorecase="Y"/>
     </sortorder>
   </datasource>
 
-  <datasource name="dtsContact" connection="address" table="contact"
-    master="dtsCompany" masterlink="id" detaillink="company" />
-  <datasource name="dtsCategory" connection="address" table="category"
-    prequery="Y" />
-  <datasource name="dtsSalutation" connection="address" table="salutation"
-    prequery="Y" />
+  <datasource name="dts_contact" connection="address" table="contact"
+    master="dts_company" masterlink="id" detaillink="company"/>
+  <datasource name="dts_category" connection="address" table="category"
+    prequery="Y"/>
+  <datasource name="dts_salutation" connection="address" table="salutation"
+    prequery="Y"/>
 
   <logic>
-    <block name="blkCompany" datasource="dtsCompany">
-      <field name="search" case="upper" />
-      <field name="eMatchcode" field="matchcode" maxLength="20" case="upper"/>
-      <field name="eName1" field="name1" maxLength="64"  />
-      <field name="eName2" field="name2" maxLength="64"  />
-      <field name="eCountry" field="country" maxLength="4"  />
-      <field name="eStreet" field="street" maxLength="64"  />
-      <field name="eCity" field="city" maxLength="64"  />
-      <field name="eZIP" field="zip" maxLength="10"  />
-      <field name="eVAT" field="vatid" maxLength="18"  />
-      <field name="eCRG" field="compreg" maxLength="32" />
+    <block name="blk_company" datasource="dts_company" startup="full">
+      <field name="search"                         datatype="text" length="64" 
case="upper"/>
+      <field name="eMatchcode"  field="matchcode"  datatype="text" length="20" 
case="upper"/>
+      <field name="eName1"      field="name1"      datatype="text" 
length="64"/>
+      <field name="eName2"      field="name2"      datatype="text" 
length="64"/>
+      <field name="eCountry"    field="country"    datatype="text" length="4"/>
+      <field name="eStreet"     field="street"     datatype="text" 
length="64"/>
+      <field name="eCity"       field="city"       datatype="text" 
length="64"/>
+      <field name="eZIP"        field="zip"        datatype="text" 
length="10"/>
+      <field name="eVAT"        field="vatid"      datatype="text" 
length="18"/>
+      <field name="eCRG"        field="compreg"    datatype="text" 
length="32"/>
 
-      <field name="ePhone" field="phone" maxLength="50"  />
-      <field name="eFax" field="fax" maxLength="50"  />
-      <field name="eWeb" field="web" maxLength="64" />
-      <field name="eMail" field="email" maxLength="64" />
-      <field name="eCustomer" field="customer" maxLength="20" />
-      <field name="eBWCustomer" field="bwcustomer" maxLength="16" />
-      <field name="eBWSupplier" field="bwsupplier" maxLength="16" />
-      <field name="eShipment" field="shipment" maxLength="64" />
-      <field name="eCategory" field="category" fk_key="id"
-        fk_description="text" fk_source="dtsCategory"/>
-      <field name="eMemo" field="memo" />
-      <field name="eMemoAvailable" readonly="Y" />
+      <field name="ePhone"      field="phone"      datatype="text" 
length="50"/>
+      <field name="eFax"        field="fax"        datatype="text" 
length="50"/>
+      <field name="eWeb"        field="web"        datatype="text" 
length="64"/>
+      <field name="eMail"       field="email"      datatype="text" 
length="64"/>
+      <field name="eCustomer"   field="customer"   datatype="text" 
length="20"/>
+      <field name="eBWCustomer" field="bwcustomer" datatype="text" 
length="16"/>
+      <field name="eBWSupplier" field="bwsupplier" datatype="text" 
length="16"/>
+      <field name="eShipment"   field="shipment"   datatype="text" 
length="64"/>
+      <field name="eCategory"   field="category"   datatype="text" length="64" 
fk_key="id" fk_description="text" fk_source="dts_category"/>
+      <field name="eMemo"       field="memo"       datatype="text"/>
+      <field name="eMemoAvailable"                 datatype="boolean" 
editable="N"/>
 
       <trigger type="ON-RECORDLOADED"><![CDATA[
-        value = len (blkCompany.eMemo.get ().strip ()) > 0
-        blkCompany.eMemoAvailable.set (value)
+        blk_company.eMemoAvailable.value = (blk_company.eMemo.value is not 
None and len(blk_company.eMemo.value.strip()) > 0)
         ]]>
       </trigger>
     </block>
 
-    <block name="blkContact" datasource="dtsContact">
-      <field name="eSalutation" field="salutation" fk_key="id"
-        fk_description="text" fk_source="dtsSalutation" />
-      <field name="eTitle" field="title" maxLength="21" />
-      <field name="eFirstname" field="firstname" maxLength="26" />
-      <field name="eSurname" field="surname" maxLength="31" />
-      <field name="eDepartment" field="department" maxLength="32" />
-      <field name="eDuty" field="duty" maxLength="32" />
-      <field name="ePhone1" field="phone1" maxLength="32" />
-      <field name="ePhone2" field="phone2" maxLength="32" />
-      <field name="eFax" field="fax" maxLength="32" />
-      <field name="eMail" field="email" maxLength="64" />
-      <field name="eMemo" field="memo" />
-      <field name="eMemoAvailable" readonly="Y" />
+    <block name="blk_contact" datasource="dts_contact">
+      <field name="eSalutation" field="salutation" datatype="text" length="15" 
fk_key="id" fk_description="text" fk_source="dts_salutation"/>
+      <field name="eTitle"      field="title"      datatype="text" 
length="21"/>
+      <field name="eFirstname"  field="firstname"  datatype="text" 
length="26"/>
+      <field name="eSurname"    field="surname"    datatype="text" 
length="31"/>
+      <field name="eDepartment" field="department" datatype="text" 
length="32"/>
+      <field name="eDuty"       field="duty"       datatype="text" 
length="32"/>
+      <field name="ePhone1"     field="phone1"     datatype="text" 
length="32"/>
+      <field name="ePhone2"     field="phone2"     datatype="text" 
length="32"/>
+      <field name="eFax"        field="fax"        datatype="text" 
length="32"/>
+      <field name="eMail"       field="email"      datatype="text" 
length="64"/>
+      <field name="eMemo"       field="memo"       datatype="text"/>
+      <field name="eMemoAvailable"                 datatype="boolean" 
editable="N"/>
 
       <trigger type="ON-RECORDLOADED"><![CDATA[
-        value = len (blkContact.eMemo.get ().strip ()) > 0
-        blkContact.eMemoAvailable.set (value)
+        blk_contact.eMemoAvailable.value = (blk_contact.eMemo.value is not 
None and len(blk_contact.eMemo.value.strip()) > 0)
         ]]>
       </trigger>
     </block>
   </logic>
 
-  <layout xmlns:c="GNUe:Layout:Char" c:height="17" c:width="105" tabbed="none">
+  <layout tabbed="none">
     <page name="pgContact" caption="Contacts">
-      <label c:x="0" c:y="0" c:width="8" text="Suche:" alignment="right" />
-      <label c:x="0" c:y="1" c:width="8" text="Match:" alignment="right"/>
-      <label c:x="0" c:y="2" c:width="8" text="Firma 1:" alignment="right"/>
-      <label c:x="0" c:y="3" c:width="8" text="Firma 2:" alignment="right"/>
-      <label c:x="0" c:y="4" c:width="8" text="Straße:" alignment="right"/>
-      <label c:x="0" c:y="5" c:width="8" text="PLZ:" alignment="right"/>
-      <label c:x="20" c:y="5" c:width="6" text="Stadt:" alignment="right"/>
-      <label c:x="0" c:y="6" c:width="8" text="Land:" alignment="right"/>
-      <label c:x="20" c:y="6" c:width="6" text="UID:" alignment="right"/>
-      <label c:x="20" c:y="7" c:width="6" text="FNr:" alignment="right"/>
+      <vbox>
+        <hbox block="blk_company" label="Firmen">
+          <vbox>
+            <hbox label="Suche:">
+              <entry field="search"/>
 
-      <entry c:x="9" c:y="0" c:width="28" block="blkCompany" field="search" />
+              <button label="Suche">
+                <trigger type="ON-ACTION"><![CDATA[
+                  def u (v):
+                    return unicode (v, 'utf-8')
 
-      <button c:x="39" c:y="0" c:width="10" label="Suche">
-        <trigger type="ON-ACTION"><![CDATA[
-          def u (v):
-            return unicode (v, 'utf-8')
+                  def build (aval, last = 0):
+                    cmap = {u('ö'): u('Ö'), u('Ö'): u('ö'),
+                            u('ä'): u('Ä'), u('Ä'): u('ä'),
+                            u('ü'): u('Ü'), u('Ü'): u('ü')}
 
-          def build (aval, last = 0):
-            cmap = {u('ö'): u('Ö'), u('Ö'): u('ö'),
-                    u('ä'): u('Ä'), u('Ä'): u('ä'),
-                    u('ü'): u('Ü'), u('Ü'): u('ü')}
+                    result = []
 
-            result = []
+                    for ix in range (last, len (aval)):
+                      if aval [ix] in cmap:
+                        cc = aval [ix]
+                        newval = aval [0:ix] + cmap [cc] + aval [ix + 1:]
 
-            for ix in range (last, len (aval)):
-              if aval [ix] in cmap:
-                cc = aval [ix]
-                newval = aval [0:ix] + cmap [cc] + aval [ix + 1:]
+                        xres = build (newval, ix + 1)
+                        result.extend (xres)
 
-                xres = build (newval, ix + 1)
-                result.extend (xres)
+                    result.append (aval)
+                    return result
 
-            result.append (aval)
-            return result
+                  def buildPattern (pattern):
+                    result = []
 
-          def buildPattern (pattern):
-            result = []
+                    for item in build (pattern):
+                      result.extend ([ \
+                        ['like', ['upper', ['field', 'matchcode']], ['const', 
item]], \
+                        ['like', ['upper', ['field', 'name1']], ['const', 
item]],     \
+                        ['like', ['upper', ['field', 'name2']], ['const', 
item]], \
+                        ['exist', 'contact', 'id', 'company', \
+                          ['or', 
+                            ['like', ['upper', ['field', 'firstname']],
+                            ['const', item]],
+                            ['like', ['upper', ['field', 'surname']],
+                            ['const', item]]]]])
 
-            for item in build (pattern):
-              result.extend ([ \
-                ['like', ['upper', ['field', 'matchcode']], ['const', item]], \
-                ['like', ['upper', ['field', 'name1']], ['const', item]],     \
-                ['like', ['upper', ['field', 'name2']], ['const', item]], \
-                ['exist', 'contact', 'id', 'company', \
-                  ['or', 
-                    ['like', ['upper', ['field', 'firstname']],
-                    ['const', item]],
-                    ['like', ['upper', ['field', 'surname']],
-                    ['const', item]]]]])
+                    result.insert (0, 'or')
+                    return result
 
-            result.insert (0, 'or')
-            return result
+                  val = blk_company.search.get ()
+                  pattern = "%%%s%%" % val
 
-          val = blkCompany.search.get ()
-          pattern = "%%%s%%" % val
+                  cond = buildPattern (pattern)
 
-          cond = buildPattern (pattern)
+                  r = dts_company.createResultSet (cond, query = True)
+                  ]]>
+                </trigger>
+              </button>
+            </hbox>
 
-          r = dtsCompany.createResultSet (cond, query = True)
-          ]]>
-        </trigger>
-      </button>
+            <entry field="eMatchcode"     label="Match:"/>
+            <entry field="eName1"         label="Firma-1:"/>
+            <entry field="eName2"         label="Firma-2:"/>
+            <entry field="eStreet"        label="Straße:"/>
+            <entry field="eZIP"           label="PLZ:"/>
+            <entry field="eCity"          label="Stadt:"/>
+            <entry field="eCountry"       label="Land:"/>
+            <entry field="eVAT"           label="UID:"/>
+            <entry field="eCRG"           label="FNr:"/>
+            <entry field="eMemoAvailable" label="Memo verfügbar"/>
 
-      <entry c:x="9" c:y="1" c:width="40" block="blkCompany"
-        field="eMatchcode"/>
-      <entry c:x="9" c:y="2" c:width="40" block="blkCompany"
-        field="eName1"/>
-      <entry c:x="9" c:y="3" c:width="40" block="blkCompany"
-        field="eName2"/>
-      <entry c:x="9" c:y="4" c:width="40" block="blkCompany"
-        field="eStreet"/>
-      <entry c:x="9" c:y="5" c:width="10" block="blkCompany"
-        field="eZIP"/>
+            <button label="Memo">
+              <trigger type="ON-ACTION"><![CDATA[
+                params = {'prm_memo': blk_company.eMemo.get ()}
+                activateDialog ('editMemo', params, True)
+                if params.get ('prm_mres'):
+                  value = params.get ('prm_memo')
+                  blk_company.eMemo.set (value)
+                  blk_company.eMemoAvailable.set (bool (value))
+                ]]>
+              </trigger>
+            </button>
+          </vbox>
 
-      <entry c:x="27" c:y="5" c:width="22" block="blkCompany"
-        field="eCity"/>
-      <entry c:x="9" c:y="6" c:width="10" block="blkCompany"
-        field="eCountry"/>
-      <entry c:x="27" c:y="6" c:width="22" block="blkCompany"
-        field="eVAT"/>
-      <entry c:x="27" c:y="7" c:width="22" block="blkCompany"
-        field="eCRG"/>
+          <vbox>
+            <entry field="ePhone"       label="Tel.allg.:"/>
+            <entry field="eFax"         label="Fax allg.:"/>
+            <entry field="eWeb"         label="Internet:"/>
+            <entry field="eMail"        label="E-Mail:"/>
+            <entry field="eCustomer"    label="unsere KdNr:"/>
+            <entry field="eBWCustomer"  label="BW KdNr:"/>
+            <entry field="eBWSupplier"  label="BW LiNr:"/>
+            <entry field="eShipment"    label="Versandart:"/>
+            <entry field="eCategory"    label="Kategorie:"/>
+          </vbox>
+        </hbox>
 
-      <entry c:x="22" c:y="8" c:width="14" block="blkCompany"
-        field="eMemoAvailable" style="checkbox" label="Memo verfügbar"/>
+        <hbox block="blk_contact" label="Ansprechpersonen">
+          <vbox>
+            <entry field="eSalutation" label="Anrede:"/>
+            <entry field="eTitle"      label="Titel:"/>
+            <entry field="eFirstname"  label="Vorname:"/>
+            <entry field="eSurname"    label="Nachname:"/>
+            <entry field="eDepartment" label="Abteilung:"/>
+            <entry field="eDuty"       label="Funktion"/>
+          </vbox>
 
-      <button c:x="37" c:y="8" c:width="12" c:height="1" label="Memo">
-        <trigger type="ON-ACTION"><![CDATA[
-          params = {'memo': blkCompany.eMemo.get ()}
-          activateDialog ('editMemo', params, True)
-          if params.get ('mres'):
-            value = params.get ('memo')
-            blkCompany.eMemo.set (value)
-            blkCompany.eMemoAvailable.set (bool (value))
-          ]]>
-        </trigger>
-      </button>
+          <vbox>
+            <entry field="ePhone1"        label="Telefon 1:"/>
+            <entry field="ePhone2"        label="Telefon 2:"/>
+            <entry field="eFax"           label="Fax:"/>
+            <entry field="eMail"          label="E-Mail:"/>
+            <entry field="eMemoAvailable" label="Memo verfügbar"/>
 
-      <label c:x="50" c:y="1" c:width="12" text="Tel.allg.:" 
alignment="right"/>
-      <label c:x="50" c:y="2" c:width="12" text="Fax allg.:" 
alignment="right"/>
-      <label c:x="50" c:y="3" c:width="12" text="Internet:" alignment="right"/>
-      <label c:x="50" c:y="4" c:width="12" text="eMail:" alignment="right"/>
-      <label c:x="50" c:y="5" c:width="12" text="unsere KdNr:"
-        alignment="right"/>
-      <label c:x="50" c:y="6" c:width="12" text="BW KdNr:" alignment="right"/>
-      <label c:x="50" c:y="7" c:width="12" text="BW LiNr:" alignment="right"/>
-      <label c:x="50" c:y="8" c:width="12" text="Versandart:"
-        alignment="right"/>
-      <label c:x="50" c:y="9" c:width="12" text="Kategorie:" 
alignment="right"/>
-
-      <entry c:x="63" c:y="1" c:width="40" block="blkCompany" field="ePhone" />
-      <entry c:x="63" c:y="2" c:width="40" block="blkCompany" field="eFax" />
-      <entry c:x="63" c:y="3" c:width="40" block="blkCompany" field="eWeb" />
-      <entry c:x="63" c:y="4" c:width="40" block="blkCompany" field="eMail" />
-      <entry c:x="63" c:y="5" c:width="40" block="blkCompany"
-        field="eCustomer" />
-      <entry c:x="63" c:y="6" c:width="40" block="blkCompany"
-        field="eBWCustomer" />
-      <entry c:x="63" c:y="7" c:width="40" block="blkCompany"
-        field="eBWSupplier" />
-      <entry c:x="63" c:y="8" c:width="40" block="blkCompany" 
-        field="eShipment" />
-      <entry c:x="63" c:y="9" c:width="40" block="blkCompany" field="eCategory"
-        style="dropdown" />
-
-
-      <box c:x="0" c:y="10" c:width="103" c:height="7" label="Ansprechperson" 
/>
-
-      <label c:x="1" c:y="11" c:width="10" text="Anrede:" alignment="right"/>
-      <label c:x="1" c:y="12" c:width="10" text="Vorname:" alignment="right"/>
-      <label c:x="1" c:y="13" c:width="10" text="Nachname:" alignment="right"/>
-      <label c:x="1" c:y="14" c:width="10" text="Abteilung:" 
alignment="right"/>
-      <label c:x="1" c:y="15" c:width="10" text="Funktion:" alignment="right"/>
-      <label c:x="28" c:y="11" c:width="5" text="Titel:" alignment="right"/>
-
-      <entry c:x="12" c:y="11" c:width="15" block="blkContact"
-        field="eSalutation" style="dropdown" />
-      <entry c:x="34" c:y="11" c:width="15" block="blkContact" field="eTitle" 
/>
-      <entry c:x="12" c:y="12" c:width="37" block="blkContact"
-        field="eFirstname" />
-      <entry c:x="12" c:y="13" c:width="37" block="blkContact" field="eSurname"
-        />
-      <entry c:x="12" c:y="14" c:width="37" block="blkContact"
-        field="eDepartment" />
-      <entry c:x="12" c:y="15" c:width="37" block="blkContact"
-        field="eDuty" />
-
-      <label c:x="50" c:y="11" c:width="12" text="Telefon 1:"
-        alignment="right"/>
-      <label c:x="50" c:y="12" c:width="12" text="Telefon 2:" 
-        alignment="right"/>
-      <label c:x="50" c:y="13" c:width="12" text="Fax:" alignment="right"/>
-      <label c:x="50" c:y="14" c:width="12" text="E-Mail:" alignment="right"/>
-
-      <entry c:x="63" c:y="11" c:width="38" block="blkContact" 
field="ePhone1"/>
-      <entry c:x="63" c:y="12" c:width="38" block="blkContact" 
field="ePhone2"/>
-      <entry c:x="63" c:y="13" c:width="38" block="blkContact" field="eFax" />
-      <entry c:x="63" c:y="14" c:width="38" block="blkContact" field="eMail" />
-
-      <entry c:x="74" c:y="15" c:width="14" block="blkContact"
-        field="eMemoAvailable" style="checkbox" label="Memo verfügbar"/>
-
-      <button c:x="89" c:y="15" c:width="12" c:height="1" label="Memo">
-        <trigger type="ON-ACTION"><![CDATA[
-          params = {'memo': blkContact.eMemo.get ()}
-          activateDialog ('editMemo', params, True)
-          if params.get ('mres'):
-            blkContact.eMemo.set (params.get ('memo'))
-          ]]>
-        </trigger>
-      </button>
+            <button label="Memo">
+              <trigger type="ON-ACTION"><![CDATA[
+                params = {'prm_memo': blk_contact.eMemo.get ()}
+                activateDialog ('editMemo', params, True)
+                if params.get ('prm_mres'):
+                  blk_contact.eMemo.set (params.get ('prm_memo'))
+                ]]>
+              </trigger>
+            </button>
+          </vbox>
+        </hbox>
+      </vbox>
     </page>
-
   </layout>
 
-  <dialog xmlns:c="GNUe:Layout:Char" name="editMemo" title="Memo bearbeiten">
+  <dialog name="editMemo" title="Memo bearbeiten">
 
+    <parameter name="prm_memo" datatype="string"/>
+    <parameter name="prm_mres" datatype="boolean"/>
+
     <trigger type="On-Startup">
       form.setFeature ('GUI:MENUBAR:SUPPRESS', 1)
       form.setFeature ('GUI:TOOLBAR:SUPPRESS', 1)
@@ -263,39 +213,42 @@
     </trigger>
 
     <trigger type="On-Activation">
-      blk.memo.set (getParameter ('memo'))
-      setFocus (blk.memo)
+      blk.memo.value = prm_memo.value
+      setFocus(blk.memo)
     </trigger>
 
     <logic>
       <block name="blk">
-        <field name="memo" />
+        <field name="memo"/>
       </block>
     </logic>
 
-    <layout c:height="10" c:width="40">
+    <layout>
       <page name="Page">
-        <label c:x="1" c:y="0" c:width="10" text="Memo:" />
-        <entry c:x="1" c:y="1" c:width="39" c:height="8" block="blk"
-            field="memo" />
+        <vbox block="blk">
+          <hbox>
+            <entry field="memo" label="Memo:"/>
+          </hbox>
 
-        <button c:x="18" c:y="9" c:width="10" c:height="1" label="Ok" >
-          <trigger type="ON-ACTION"><![CDATA[
-            val = blk.memo.get ()
-            setParameter ('memo', val)
-            setParameter ('mres', True)
-            close ()
-            ]]>
-          </trigger>
-        </button>
+          <hbox>
+            <button label="Ok" >
+              <trigger type="ON-ACTION"><![CDATA[
+                prm_memo.value = blk.memo.value
+                prm_mres.value = True
+                close()
+                ]]>
+              </trigger>
+            </button>
 
-        <button c:x="30" c:y="9" c:width="10" c:height="1" label="Abbrechen" >
-          <trigger type="ON-ACTION"><![CDATA[
-            setParameter ('mres', False)
-            close ()
-            ]]>
-          </trigger>
-        </button>
+            <button label="Abbrechen" >
+              <trigger type="ON-ACTION"><![CDATA[
+                prm_mres.value = False
+                close ()
+                ]]>
+              </trigger>
+            </button>
+          </hbox>
+        </vbox>
       </page>
     </layout>
   </dialog>

Modified: address/forms/stamm.gfd
===================================================================
--- address/forms/stamm.gfd     2007-03-26 11:45:20 UTC (rev 258)
+++ address/forms/stamm.gfd     2007-03-26 13:17:43 UTC (rev 259)
@@ -3,39 +3,40 @@
 <form title="Adressenverwaltung">
   <options>
     <author>ByteWise Software GmbH</author>
-    <version>$Rev:$</version>
+    <version>$Rev$</version>
     <description>Stammdaten</description>
   </options>
 
-  <datasource name="dtsCategory" connection="address" table="category"
-    prequery="Y"/>
-  <datasource name="dtsSalutation" connection="address" table="salutation"
-    prequery="Y"/>
+  <datasource name="dts_category" connection="address" table="category"/>
+  <datasource name="dts_salutation" connection="address" table="salutation"/>
 
   <logic>
-    <block name="blkCategory" datasource="dtsCategory" rows="10">
-      <field name="eId" field="id" readonly="Y" />
-      <field name="eText" field="text" maxLength="32" />
+    <block name="blk_category" datasource="dts_category" startup="full"
+      autoNextRecord="Y">
+      <field name="fld_text" field="text" datatype="text" length="32"/>
     </block>
 
-    <block name="blkSalutation" datasource="dtsSalutation" rows="10">
-      <field name="eId" field="id" readonly="Y" />
-      <field name="eText" field="text" maxLength="15" />
+    <block name="blk_salutation" datasource="dts_salutation" startup="full"
+      autoNextRecord="Y">
+      <field name="fld_text" field="text" datatype="text" length="15"/>
     </block>
-
   </logic>
 
-  <layout xmlns:c="GNUe:Layout:Char" c:height="15" c:width="80" tabbed="top">
+  <layout>
+    <page name="pg">
+      <hbox>
+        <grid block="blk_category" rows="10">
+          <gridline>
+            <entry field="fld_text" label="Kategorien"/>
+          </gridline>
+        </grid>
 
-    <page name="pgCategory" caption="Kategorie">
-      <label c:x="1" c:y="0" c:width="10" text="Bezeichnung:" />
-      <entry c:x="1" c:y="1" c:width="35" block="blkCategory" field="eText"/>
+        <grid block="blk_salutation" rows="10">
+          <gridline>
+            <entry field="fld_text" label="Anreden"/>
+          </gridline>
+        </grid>
+      </hbox>
     </page>
-
-    <page name="pgSalutation" caption="Anrede">
-      <label c:x="1" c:y="0" c:width="10" text="Bezeichnung:" />
-      <entry c:x="1" c:y="1" c:width="35" block="blkSalutation" field="eText"/>
-    </page>
-
   </layout>
 </form>





reply via email to

[Prev in Thread] Current Thread [Next in Thread]