/[papo]/papo/forms/ownBranch.neb
ViewVC logotype

Diff of /papo/forms/ownBranch.neb

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by mhepp, Thu Apr 17 16:23:04 2003 UTC revision 1.3 by mhepp, Thu Apr 24 21:00:27 2003 UTC
# Line 1  Line 1 
1  <?xml version="1.0" encoding="ISO-8859-1"?>  <?xml version="1.0" encoding="ISO-8859-1"?>
2  <!DOCTYPE form SYSTEM "gnue-forms.dtd">  <!DOCTYPE form SYSTEM "gnue-forms.dtd">
3  <form tabbed="top" title="Sucursales" height="20" width="84">  <form tabbed="top" title="Sucursales" height="20" width="84">
4      <neb:Block>
5        use PAPO;
6    my $uniqed=0;
7      </neb:Block>
8  <!-- Búsqueda -->  <!-- Búsqueda -->
9  <!--datasource -->  <!--datasource -->
10   <datasource name="searchDataSource" cache="1"/>   <datasource name="searchDataSource" cache="1"/>
# Line 39  Line 42 
42  <!--     ]]></trigger> -->  <!--     ]]></trigger> -->
43    
44    
   
45   <trigger name="searchTrigger" type="NAMED">   <trigger name="searchTrigger" type="NAMED">
46    resultBlock.processRollback()    resultBlock.processRollback()
47    resultBlock.initQuery()    resultBlock.initQuery()
# Line 137  Line 139 
139    
140    <!-- triggers -->    <!-- triggers -->
141    
142    <trigger name="commitTrigger" type="NAMED"><![CDATA[    <trigger name="commitTrigger" type="NAMED">
143      print 'commitTrigger'      print 'commitTrigger'
144      ownBranchBlock.commit()      if ownBranchBlock.getCurrentRecord().isInserted():
145      ]]></trigger>          print "Poniendo Nuevo"
146            ownBranchBlock.commit()
147            entityTypesBlock.ownBranchEntityEntry = str(ownBranchBlock.entityIdEntry)
148            # own branch lo busco de entre las constantes PAPO
149            entityTypesBlock.ownBranchEntityTypeEntry = <neb:Inline>'"'.PAPO::ownBranchType.'"'</neb:Inline>
150            ownBranchBlock.commit()
151        else:
152            ownBranchBlock.commit()
153        </trigger>
154    <trigger name="ownBranchRollbackTrigger" type="NAMED"><![CDATA[    <trigger name="ownBranchRollbackTrigger" type="NAMED"><![CDATA[
155      import hack      import hack
156      hack.rollback(ownBranchBlock)      hack.rollback(ownBranchBlock)
# Line 150  Line 160 
160      ownBranchBlock.deleteRecord()      ownBranchBlock.deleteRecord()
161      ownBranchBlock.commit()      ownBranchBlock.commit()
162      ]]></trigger>      ]]></trigger>
163     <trigger name="newTrigger" type="NAMED"><![CDATA[
164                from hack import confirmRollback
165                confirmRollback (self, ownBranchBlock, 'commitTrigger', ownBranchBlock.nameEntry )
166               ]]></trigger>
167    
168    <!-- gestión -->    <!-- gestión -->
169    <page name="Gestión">    <page name="Gestión">
# Line 160  Line 173 
173        <label text="Número de sucursal" x="1" y="5"/>        <label text="Número de sucursal" x="1" y="5"/>
174        <entry name="nameEntry" field="_entity_data.name" x="1" y="4" width="40"/>        <entry name="nameEntry" field="_entity_data.name" x="1" y="4" width="40"/>
175        <entry name="numberEntry" field="_own_branch_data.number" x="1" y="6" width="4"/>        <entry name="numberEntry" field="_own_branch_data.number" x="1" y="6" width="4"/>
176          <button name="newButton" label="Nuevo" trigger="newTrigger" x="42" y="4" width="9" height="1"/>
177        <button x="1" y="19" trigger="commitTrigger" width="9" label="Aceptar" name="ownBranchCommitBtn" height="1"/>          <button x="1" y="19" trigger="commitTrigger" width="9" label="Aceptar" name="ownBranchCommitBtn" height="1"/>  
178        <button x="11" y="19" trigger="ownBranchDeleteTrigger" width="9" label="Borrar" name="ownBranchDeleteBtn" height="1"/>        <button x="11" y="19" trigger="ownBranchDeleteTrigger" width="9" label="Borrar" name="ownBranchDeleteBtn" height="1"/>
179        <button x="21" y="19" trigger="ownBranchRollbackTrigger" width="9" label="Cancelar" name="ownBranchRollbackBtn" height="1"/>        <button x="21" y="19" trigger="ownBranchRollbackTrigger" width="9" label="Cancelar" name="ownBranchRollbackBtn" height="1"/>
180      </block>      </block>
181        <!-- entity types -->
182          <block name="entityTypesBlock" datasource="entityTypesDataSource" >
183            <entry name="ownBranchEntityTypeEntry" field="_entity_types_data.entity_type"
184              x="40" y="4" width="4" hidden=""/>
185            <entry name="ownBranchEntityEntry" field="_entity_types_data.entity"
186              x="40" y="4" width="4" hidden=""/>
187          </block>
188        <!-- /entity types -->
189    </page>    </page>
   
190  <!-- DIRECCIONES -->  <!-- DIRECCIONES -->
191  <neb:Block>  <neb:Block>
192      my $fields = [ { 'label' => 'Nombre de sucursal',      my $fields = [ { 'label' => 'Nombre de sucursal',

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26