/[papo]/papo/forms/client.gfd
ViewVC logotype

Diff of /papo/forms/client.gfd

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

revision 1.9 by apronotti, Tue Oct 29 18:30:08 2002 UTC revision 1.10 by apronotti, Tue Oct 29 19:09:36 2002 UTC
# Line 213  Line 213 
213    
214    <trigger name="clientCommitTrigger" type="NAMED">    <trigger name="clientCommitTrigger" type="NAMED">
215      if clientBlock.getCurrentRecord().isInserted():      if clientBlock.getCurrentRecord().isInserted():
       tmpCL2 = str(creditLimit2Block.creditLimitEntry)  
       if not tmpCL2: tmpCL2 = "0.0"  
216    
217        creditLimit2Block.newRecord()        creditLimit2Block.newRecord()
218        creditLimit2Block.movementTypeEntry = 2        creditLimit2Block.movementTypeEntry = 2
219        creditLimit2Block.creditLimitEntry = tmpCL2        creditLimit2Block.creditLimitEntry = "0.0"
220          clientUID_CUIT_Block.newRecord()
221          clientUID_CUIT_Block.uid_CUIT_TypeEntry = "1"
222          clientUID_IB_Block.newRecord()
223          clientUID_IB_Block.uid_CUIT_TypeEntry = "2"
224        clientBlock.commit()        clientBlock.commit()
225        creditLimit2Block.commit()        creditLimit2Block.commit()
226          clientUID_CUIT_Block.commit()
227          clientUID_IB_Block.commit()
228        clientBlock.jumpRecord(2)        clientBlock.jumpRecord(2)
229        tmpClientId = str(clientBlock.clientIdEntry)        tmpClientId = str(clientBlock.clientIdEntry)
230        clientBlock.processRollback()        clientBlock.processRollback()
# Line 239  Line 243 
243    
244    <trigger name="clientRollbackTrigger" type="NAMED">    <trigger name="clientRollbackTrigger" type="NAMED">
245      clientBlock.processRollback(1)      clientBlock.processRollback(1)
246        clientUID_CUIT_Block.processRollback(1)
247        clientUID_IB_Block.processRollback(1)
248    </trigger>    </trigger>
249    
250    <trigger name="clientAskForChangesTrigger" type="NAMED">    <trigger name="clientAskForChangesTrigger" type="NAMED">
# Line 250  Line 256 
256          clientBlock.processRollback(1)          clientBlock.processRollback(1)
257    </trigger>    </trigger>
258    
   <trigger name="clientRollbackTrigger" type="NAMED">  
     clientBlock.processRollback(1)  
     clientUID_CUIT_Block.processRollback(1)  
     clientUID_IB_Block.processRollback(1)  
     print "cancelar"  
   </trigger>  
   
259    <trigger name="telephoneCommitTrigger" type="NAMED">    <trigger name="telephoneCommitTrigger" type="NAMED">
260      telephoneBlock.commit()      telephoneBlock.commit()
261    </trigger>    </trigger>
# Line 300  Line 299 
299        
300    <page name="Clientes">    <page name="Clientes">
301    <trigger type="Pre-Focusout">    <trigger type="Pre-Focusout">
302      clientBlock.processRollback()     clientBlock.processRollback()
303      clientBlock.initQuery()     if clientResultBlock.getRecordCount() > 0 and not clientResultBlock.getCurrentRecord().isEmpty():
304      clientBlock.clientIdEntry = ("%s" % clientResultBlock.clientIdREntry)       clientBlock.initQuery()
305      clientBlock.processQuery()       clientBlock.clientIdEntry = ("%s" % clientResultBlock.clientIdREntry)
306         clientBlock.processQuery()
307    </trigger>    </trigger>
308       <block name="clientSearchBlock" datasource="searchDataSource" transparentBlock="">       <block name="clientSearchBlock" datasource="searchDataSource" transparentBlock="">
309          <label text="Nombre o Razón Social a buscar"          <label text="Nombre o Razón Social a buscar"
# Line 330  Line 330 
330    </page>    </page>
331    <page name="Cliente">    <page name="Cliente">
332    <trigger type="Pre-Focusout" src="clientAskForChangesTrigger"/>    <trigger type="Pre-Focusout" src="clientAskForChangesTrigger"/>
   <trigger type="Pre-Focusin">  
    #if not str(clientUID_CUIT_Block.uid_CUIT_TypeEntry):  
    #  clientUID_CUIT_Block.uid_CUIT_TypeEntry = "1"  
    #  clientUID_IB_Block.uid_IB_TypeEntry = "2"  
   </trigger>  
333      <box label="Datos"      <box label="Datos"
334          x="0" y="0" height="20" width="64">          x="0" y="0" height="20" width="64">
335       <block name="clientBlock" datasource="clientDataSource">       <block name="clientBlock" datasource="clientDataSource">
# Line 355  Line 350 
350          <button x="1" y="17" trigger="clientCommitTrigger" width="9" label="Aceptar"          <button x="1" y="17" trigger="clientCommitTrigger" width="9" label="Aceptar"
351                  name="clientCommitBtn" height="1"/>                  name="clientCommitBtn" height="1"/>
352          <button x="11" y="17" trigger="clientDeleteTrigger" width="9" label="Borrar"          <button x="11" y="17" trigger="clientDeleteTrigger" width="9" label="Borrar"
353                  name="clientRollbackBtn" height="1"/>                  name="clientDeleteBtn" height="1"/>
354          <button x="21" y="17" trigger="clientRollbackTrigger" width="9" label="Cancelar"          <button x="21" y="17" trigger="clientRollbackTrigger" width="9" label="Cancelar"
355                  name="clientRollbackBtn" height="1"/>                  name="clientRollbackBtn" height="1"/>
356       </block>       </block>
      <block name="clientUID_CUIT_Block" datasource="entityUID_CUIT_DataSource">  
         <entry x="1" y="12" field="_entity_uid_data.entity_uid_type"  
           name="uid_CUIT_TypeEntry"  
           width="14" style="textlookup" readonly="" foreign_key="entityUIDTypeDataSource.id"  
           foreign_key_description="name" />  
         <entry name="uidEntry" field="_entity_uid_data.uid"  
           x="15" y="12" width="24"/>  
      </block>  
      <block name="clientUID_IB_Block" datasource="entityUID_IB_DataSource">  
         <entry x="1" y="13" field="_entity_uid_data.entity_uid_type"  
           name="uid_IB_TypeEntry"  
           width="14" style="textlookup" readonly="" foreign_key="entityUIDTypeDataSource.id"  
           foreign_key_description="name" />  
         <entry name="uidEntry" field="_entity_uid_data.uid"  
           x="15" y="13" width="24"/>  
      </block>  
357      </box>      </box>
358    </page>    </page>
359    
# Line 468  Line 447 
447                  name="creditLimitRollbackBtn" height="1"/>                  name="creditLimitRollbackBtn" height="1"/>
448      </box>      </box>
449    </page>    </page>
450      <page name="Datos Impositivos">
451      <trigger type="Pre-Focusout" src="clientAskForChangesTrigger"/>
452        <box label="Límites de Crédito"
453            x="0" y="0" height="5" width="64">
454         <block name="clientUID_CUIT_Block" datasource="entityUID_CUIT_DataSource">
455            <entry x="1" y="1" field="_entity_uid_data.entity_uid_type"
456              name="uid_CUIT_TypeEntry"
457              width="14" style="textlookup" readonly="" foreign_key="entityUIDTypeDataSource.id"
458              foreign_key_description="name" />
459            <entry name="uidEntry" field="_entity_uid_data.uid"
460              x="15" y="1" width="24"/>
461         </block>
462         <block name="clientUID_IB_Block" datasource="entityUID_IB_DataSource">
463            <entry x="1" y="2" field="_entity_uid_data.entity_uid_type"
464              name="uid_IB_TypeEntry"
465              width="14" style="textlookup" readonly="" foreign_key="entityUIDTypeDataSource.id"
466              foreign_key_description="name" />
467            <entry name="uidEntry" field="_entity_uid_data.uid"
468              x="15" y="2" width="24"/>
469         </block>
470        </box>
471      </page>
472  </form>  </form>

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

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