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"/> |
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() |
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) |
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"> |
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', |