/[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.37 by styxman, Thu Feb 27 22:10:44 2003 UTC revision 1.38 by apronotti, Wed Mar 5 20:40:00 2003 UTC
# Line 4  Line 4 
4  <!--   <maintoolbar enabled=""/> -->  <!--   <maintoolbar enabled=""/> -->
5    <datasource name="focusDataSource" cache="1"/>    <datasource name="focusDataSource" cache="1"/>
6    <datasource name="searchDataSource" cache="1"/>    <datasource name="searchDataSource" cache="1"/>
7    <datasource name="clientResultDataSource" database="papo"    <datasource name="clientResultDataSource" database="papo"
8                table="entity, _entity_data, alien_entity, _alien_entity_data, persona, _persona_data, client, _client_data"                table="_entity_data, _alien_entity_data, _persona_data, _client_data, entity_type_uid_conf, _entity_uid_data"
               historytable="_entity_data, _alien_entity_data, _persona_data, _client_data"  
9                order_by="_entity_data.name">                order_by="_entity_data.name">
10      <condition>      <condition>
11        <and>        <and>
12          <eq>          <eq>
           <cfield name="entity.id"/>  
13            <cfield name="_entity_data._table"/>            <cfield name="_entity_data._table"/>
         </eq>  
         <eq>  
           <cfield name="alien_entity.id"/>  
           <cfield name="_alien_entity_data._table"/>  
         </eq>  
         <eq>  
           <cfield name="persona.id"/>  
           <cfield name="_persona_data._table"/>  
         </eq>  
         <eq>  
           <cfield name="client.id"/>  
           <cfield name="_client_data._table"/>  
         </eq>  
         <eq>  
           <cfield name="entity.id"/>  
14            <cfield name="_alien_entity_data.entity"/>            <cfield name="_alien_entity_data.entity"/>
15          </eq>          </eq>
16          <eq>          <eq>
17            <cfield name="alien_entity.id"/>            <cfield name="_alien_entity_data._table"/>
18            <cfield name="_persona_data.alien_entity"/>            <cfield name="_persona_data.alien_entity"/>
19          </eq>          </eq>
   
20          <eq>          <eq>
21            <cfield name="_entity_uid_data.entity_uid_type"/>            <cfield name="_persona_data._table"/>
22            <cfield name="_entity_uid_type_data._table"/>            <cfield name="_client_data.persona"/>
23          </eq>          </eq>
24          <eq>          <eq>
25             <cfield name="_entity_data._table"/>
26            <cfield name="_entity_uid_data.entity"/>            <cfield name="_entity_uid_data.entity"/>
           <cfield name="_entity_data._table"/>  
27          </eq>          </eq>
28          <eq>          <eq>
29            <cfield name="_entity_data.entity_type"/>           <cfield name="_entity_data.entity_type"/>
30            <cfield name="entity_type_uid_conf.entity_type"/>           <cfield name="entity_type_uid_conf.entity_type"/>
31          </eq>          </eq>
32          <eq>          <eq>
33            <cfield name="entity_type_uid_conf.entity_uid_type"/>           <cfield name="_entity_uid_data.entity_uid_type"/>
34            <cfield name="_entity_uid_type_data._table"/>           <cfield name="entity_type_uid_conf.entity_uid_type"/>
         </eq>  
   
         <eq>  
           <cfield name="persona.id"/>  
           <cfield name="_client_data.persona"/>  
35          </eq>          </eq>
36          <null>          <null>
37            <cfield name="_entity_data._end_t"/>            <cfield name="_entity_data._end_t"/>
# Line 71  Line 48 
48          <null>          <null>
49            <cfield name="_entity_uid_data._end_t"/>            <cfield name="_entity_uid_data._end_t"/>
50          </null>          </null>
         <null>  
           <cfield name="_entity_uid_type_data._end_t"/>  
         </null>  
51        </and>        </and>
52      </condition>      </condition>
53    </datasource>    </datasource>
# Line 284  Line 258 
258      if not str(clientBlock.priceTypeEntry):      if not str(clientBlock.priceTypeEntry):
259          clientBlock.priceTypeEntry = "1"          clientBlock.priceTypeEntry = "1"
260      if clientBlock.getCurrentRecord().isInserted():      if clientBlock.getCurrentRecord().isInserted():
         print 'commitTrigger.then'  
261          # entity_type 7 es cliente          # entity_type 7 es cliente
262          clientBlock.clientEntityTypeEntry = 7          clientBlock.clientEntityTypeEntry = 7
263          creditLimit1Block.newRecord()          creditLimit1Block.newRecord()
# Line 296  Line 269 
269          clientUID_IB_Block.uid_IB_TypeEntry = 2          clientUID_IB_Block.uid_IB_TypeEntry = 2
270          clientTaxProfileBlock.newRecord()          clientTaxProfileBlock.newRecord()
271          clientBlock.commit()          clientBlock.commit()
         clientBlock.jumpRecord(2)  
272          tmpId = str(clientBlock.clientIdEntry)          tmpId = str(clientBlock.clientIdEntry)
273          clientBlock.processRollback()          clientBlock.processRollback()
274          clientBlock.initQuery()          clientBlock.initQuery()
275          clientBlock.clientIdEntry = tmpId          clientBlock.clientIdEntry = tmpId
276          clientBlock.processQuery()          clientBlock.processQuery()
277      else:      else:
         print 'commitTrigger.else'  
278          clientBlock.commit()          clientBlock.commit()
279        callTrigger("showClientPriceTypeTrigger")
280    ]]></trigger>    ]]></trigger>
281    
282    <trigger name="clientDeleteTrigger" type="NAMED"><![CDATA[    <trigger name="clientDeleteTrigger" type="NAMED"><![CDATA[
# Line 405  Line 377 
377    
378    ]]></trigger>    ]]></trigger>
379        
380        <trigger type="NAMED" name="clientPageFocusInTrigger"><![CDATA[
381        if str(clientResultBlock.clientIdREntry)!='':
382          # this is needed for updating some fields, like price_type there below
383          print clientBlock.priceTypeEntry
384          if str(clientBlock.priceTypeEntry)!='':
385            # look for the name...
386            searchingPriceTypeBlock.processRollback ()
387            searchingPriceTypeBlock.initQuery ()
388            searchingPriceTypeBlock.idEntry= str(clientBlock.priceTypeEntry)
389            searchingPriceTypeBlock.processQuery ()
390    
391            # ... and show it
392            clientBlock.priceTypeNameEntry= str(searchingPriceTypeBlock.nameEntry)
393          else:
394            clientBlock.priceTypeNameEntry= ''
395        ]]></trigger>
396    
397        <trigger type="NAMED" name="showClientPriceTypeTrigger"><![CDATA[
398          # this is needed for updating some fields, like price_type there below
399          if str(clientBlock.priceTypeEntry)!='':
400            # look for the name...
401            searchingPriceTypeBlock.processRollback ()
402            searchingPriceTypeBlock.initQuery ()
403            searchingPriceTypeBlock.idEntry= str(clientBlock.priceTypeEntry)
404            searchingPriceTypeBlock.processQuery ()
405    
406            # ... and show it
407            clientBlock.priceTypeNameEntry= str(searchingPriceTypeBlock.nameEntry)
408        ]]></trigger>
409    
410    <page name="Clientes">    <page name="Clientes">
411    <trigger type="Pre-Focusout"><![CDATA[    <trigger type="Pre-Focusout"><![CDATA[
412     clientBlock.processRollback()     clientBlock.processRollback()
# Line 425  Line 427 
427        <button x="69" y="19" trigger="printTrigger" width="10" label="Imprimir" name="printBtn" height="1"/>        <button x="69" y="19" trigger="printTrigger" width="10" label="Imprimir" name="printBtn" height="1"/>
428      </block>      </block>
429      <block name="clientResultBlock" datasource="clientResultDataSource">      <block name="clientResultBlock" datasource="clientResultDataSource">
430        <entry name="clientIdREntry" field="entity.id" hidden="" x="1" y="1" width="20" />        <entry name="clientIdREntry" field="_entity_data._table" hidden="" x="1" y="1" width="20" />
431        <label text="Resultado" x="1" y="4"/>        <label text="Resultado" x="1" y="4"/>
432        <entry name="codeListEntry" field="_entity_uid_data.uid" x="1" y="5" width="20" rows="14"/>        <entry name="codeListEntry" field="_entity_uid_data.uid" x="1" y="5" width="20" rows="14"/>
433        <entry name="nameListEntry" field="_entity_data.name" x="21" y="5" width="58" rows="14"/>        <entry name="nameListEntry" field="_entity_data.name" x="21" y="5" width="58" rows="14"/>
# Line 441  Line 443 
443        <entry name="nameEntry" field="name"        <entry name="nameEntry" field="name"
444          x="1" y="1" hidden="y"/>          x="1" y="1" hidden="y"/>
445      </block>      </block>
446      <trigger type="Pre-Focusin"><![CDATA[      <trigger type="Pre-Focusin" src="clientPageFocusInTrigger"/>
     if str(clientResultBlock.clientIdREntry)!='':  
       # this is needed for updating some fields, like price_type there below  
       if str(clientBlock.priceTypeEntry)!='':  
         # look for the name...  
         searchingPriceTypeBlock.processRollback ()  
         searchingPriceTypeBlock.initQuery ()  
         searchingPriceTypeBlock.idEntry= str(clientBlock.priceTypeEntry)  
         searchingPriceTypeBlock.processQuery ()  
   
         # ... and show it  
         clientBlock.priceTypeNameEntry= str(searchingPriceTypeBlock.nameEntry)  
       else:  
         clientBlock.priceTypeNameEntry= ''  
     ]]></trigger>  
447      <!-- new_schema_end -->      <!-- new_schema_end -->
448      <trigger type="Pre-Focusout" src="askForChangesTrigger"/>      <trigger type="Pre-Focusout" src="askForChangesTrigger"/>
449      <box label="Datos"      <box label="Datos"

Legend:
Removed from v.1.37  
changed lines
  Added in v.1.38

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