/[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.44 by styxman, Wed Mar 26 20:09:54 2003 UTC revision 1.45 by charlie, Wed Mar 26 21:48:12 2003 UTC
# Line 3  Line 3 
3  <form tabbed="top" title="Clientes" height="20" width="84">  <form tabbed="top" title="Clientes" height="20" width="84">
4    <datasource name="focusDataSource" cache="1"/>    <datasource name="focusDataSource" cache="1"/>
5    <datasource name="searchDataSource" cache="1"/>    <datasource name="searchDataSource" cache="1"/>
6    
7    <datasource name="clientResultDataSource" database="papo"    <datasource name="clientResultDataSource" database="papo"
8                table="_entity_data, _alien_entity_data, _persona_data, _client_data, entity_type_uid_conf, _entity_uid_data"                table="_entity_data, _alien_entity_data, _persona_data, _client_data, entity_type_uid_conf, _entity_uid_data"
9                order_by="_entity_data.name">                order_by="_entity_data.name">
# Line 102  Line 103 
103      </condition>      </condition>
104    </datasource>    </datasource>
105    
106      <datasource name="printClientDataSource" database="papo"
107                  table="_entity_data, _alien_entity_data, _persona_data, _client_data, entity_type_uid_conf, _entity_uid_data"
108                  order_by="_entity_data.name">
109        <condition>
110          <and>
111            <eq>
112              <cfield name="_entity_data._table"/>
113              <cfield name="_alien_entity_data.entity"/>
114            </eq>
115            <eq>
116              <cfield name="_alien_entity_data._table"/>
117              <cfield name="_persona_data.alien_entity"/>
118            </eq>
119            <eq>
120              <cfield name="_persona_data._table"/>
121              <cfield name="_client_data.persona"/>
122            </eq>
123            <eq>
124             <cfield name="_entity_data._table"/>
125              <cfield name="_entity_uid_data.entity"/>
126            </eq>
127            <!-- use the configured code -->
128            <eq>
129             <cfield name="_entity_data.entity_type"/>
130             <cfield name="entity_type_uid_conf.entity_type"/>
131            </eq>
132            <eq>
133             <cfield name="_entity_uid_data.entity_uid_type"/>
134             <cfield name="entity_type_uid_conf.entity_uid_type"/>
135            </eq>
136            <!-- eocc: end of commented code -->
137            <eq>
138              <cfield name="entity_uid.id"/>
139              <cfield name="_entity_uid_data._table"/>
140            </eq>
141            <eq>
142              <cfield name="_entity_uid_data.entity_uid_type"/>
143              <cconst value="1"/>
144            </eq>
145            <eq>
146              <cfield name="entity.id"/>
147              <cfield name="_address_data._table"/>
148            </eq>
149            <null>
150              <cfield name="_entity_uid_data._end_t"/>
151            </null>
152            <null>
153              <cfield name="_entity_data._end_t"/>
154            </null>
155            <null>
156              <cfield name="_alien_entity_data._end_t"/>
157            </null>
158            <null>
159              <cfield name="_persona_data._end_t"/>
160            </null>
161            <null>
162              <cfield name="_client_data._end_t"/>
163            </null>
164            <null>
165              <cfield name="_entity_uid_data._end_t"/>
166            </null>
167          </and>
168        </condition>
169      </datasource>
170    
171    
172    <datasource name="creditLimit1DataSource" database="papo"    <datasource name="creditLimit1DataSource" database="papo"
173      detaillink="_credit_limit_data.entity" master="clientDataSource"      detaillink="_credit_limit_data.entity" master="clientDataSource"
174      masterlink="entity.id" table="credit_limit, _credit_limit_data" historytable="_credit_limit_data">      masterlink="entity.id" table="credit_limit, _credit_limit_data" historytable="_credit_limit_data">
# Line 377  Line 444 
444    ]]></trigger>    ]]></trigger>
445    
446    <trigger name="printTrigger" type="NAMED"><![CDATA[    <trigger name="printTrigger" type="NAMED"><![CDATA[
447    import tempfile    callTrigger('startWaitingModeTrigger')
448    import os    import gnue.common.GConditions as GConditions
449      import string
450    try:    import hack
451        # gnue version <= 0.4    
452        from gnue.forms.GFEvent import GFEvent    def printField (field,size):
453    except ImportError:        if str(field).strip() == "None":
454        # gnue version >= 0.5            field = ""
455        from gnue.common.events.Event import Event as GFEvent        return str(field).ljust(size)
456    
457      def printTitle (field,size):
458          return str(field).center(size)
459    
460      
461      table = []
462      line = "\n\nListado de Clientes\n\n\n"
463      table.append(line)
464    
465      line = printTitle("Nombre",30)
466      line += printTitle("Direccion",30)
467      line += printTitle("Nro I.V.A.",14)
468      table.append(line)
469    
470      condClient = GConditions.GCondition()
471    
472      clientResulSet = printClientDataSource.createResultSet(condClient)
473      more = clientResulSet.firstRecord();
474    
475      while more:
476          line = printField(clientResulSet.current.getField("_entity_data.name"),30)
477          line += printField(clientResulSet.current.getField("_address_data.address"),30)
478          line += printField(clientResulSet.current.getField("_entity_uid_data.uid"),14)
479          table.append(line)
480    
481    # busy clock        more = clientResulSet.nextRecord()
   self._object.dispatchEvent(GFEvent('beginWAIT'))  
   file = tempfile.mktemp('.client.html')  
   os.system("grcvs -D file -d %s --filter html ../report/client.grd" % file)  
   os.system(gConfig('PrintCommand') % (file))  
   os.unlink(file)  
482    
483    self._object.dispatchEvent(GFEvent('endWAIT'))    callTrigger('endWaitingModeTrigger')
484    
485      hack.previewPrint(table)
486      
487    ]]></trigger>    ]]></trigger>
488    
489    <trigger type="NAMED" name="searchTrigger"><![CDATA[    <trigger type="NAMED" name="searchTrigger"><![CDATA[
# Line 455  Line 543 
543          clientBlock.priceTypeNameEntry= str(searchingPriceTypeBlock.nameEntry)          clientBlock.priceTypeNameEntry= str(searchingPriceTypeBlock.nameEntry)
544      ]]></trigger>      ]]></trigger>
545    
546      <trigger name="startWaitingModeTrigger" type="NAMED"><![CDATA[
547        setStatusText("Procesando ...")
548        try:
549          # gnue version <= 0.4
550          from gnue.forms.GFEvent import GFEvent
551        except ImportError:
552          # gnue version >= 0.5
553          from gnue.common.events.Event import Event as GFEvent
554    
555        # busy clock
556        self._object.dispatchEvent(GFEvent('beginWAIT'))
557      ]]></trigger>
558    
559      <trigger name="endWaitingModeTrigger" type="NAMED"><![CDATA[
560        try:
561          # gnue version <= 0.4
562          from gnue.forms.GFEvent import GFEvent
563        except ImportError:
564          # gnue version >= 0.5
565          from gnue.common.events.Event import Event as GFEvent
566    
567        self._object.dispatchEvent(GFEvent('endWAIT'))
568        setStatusText("Listo")
569      ]]></trigger>
570    
571    <page name="Clientes">    <page name="Clientes">
572      <trigger type="Pre-Focusout"><![CDATA[      <trigger type="Pre-Focusout"><![CDATA[
573       clientBlock.processRollback()       clientBlock.processRollback()

Legend:
Removed from v.1.44  
changed lines
  Added in v.1.45

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