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

Diff of /papo/forms/payOrder.neb

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

revision 1.4 by charlie, Thu May 15 21:19:26 2003 UTC revision 1.5 by charlie, Thu May 22 21:09:28 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    
4  <form width="88" height="13" title="Carga de Ordenes de Pago a Proveedores">  <form width="86" height="16" title="Carga de Ordenes de Pago a Proveedores">
5    
6    <neb:Block>    <neb:Block>
7      use PAPO;      use PAPO;
8      my $uniqed=0;      my $uniqed=0;
9    </neb:Block>    </neb:Block>
10    
11    <datasource name="tmpSearchDataSource" cache="1"/>    <datasource name="tmpSearchDataSource" cache="1"/>
12    
13      <datasource name="tmpDataSource" cache="1"/>
14    
15      <datasource name="tmpCurrencyDataSource" cache="1"/>
16    
17    <datasource name="tmpInvToPayDataSource" cache="1"/>    <datasource name="tmpInvToPayDataSource" cache="1"/>
18    
19    <datasource name="invoiceToPayDataSource" cache="1"/>    <datasource name="invoiceToPayDataSource" cache="1"/>
20    
21      <datasource name="dataCurrencyDataSource" cache="1"/>
22    
23      <datasource name="onlyProviderDataSource" database="papo" table="_entity_data">
24        <condition>
25          <and>
26            <null>
27              <cfield name="_entity_data._end_t"></cfield>
28            </null>
29          </and>
30        </condition>
31      </datasource>
32    
33    <datasource name="providerSearchDataSource" database="papo"    <datasource name="providerSearchDataSource" database="papo"
34                table="_entity_data, _alien_entity_data, _persona_data, _provider_data, entity_type_uid_conf,                table="_entity_data, _alien_entity_data, _persona_data, _provider_data,
35                       _entity_uid_data"                       entity_type_uid_conf, _entity_uid_data"
36                order_by="_entity_data.name">                order_by="_entity_data.name">
37      <condition>      <condition>
38        <and>        <and>
# Line 72  Line 90 
90    </datasource>    </datasource>
91    
92    <datasource name="productInvoiceDataSource" database="papo"    <datasource name="productInvoiceDataSource" database="papo"
93                table="_entity_data, alien_document, alien_item, alien_product_item, alien_item_tax"      table="_entity_data, alien_document, alien_item, alien_product_item, alien_item_tax"
94                order_by="alien_product_item.id">      order_by="alien_product_item.id">
95      <condition>      <condition>
96        <and>        <and>
97          <eq>          <eq>
98            <!-- Aqui se refiere al cliente  -->            <!-- Aqui se refiere al cliente  -->
99            <cfield name="_entity_data._table"/>            <cfield name="_entity_data.id"/>
100            <cfield name="alien_document.sender"/>            <cfield name="alien_document.sender"/>
101          </eq>          </eq>
102          <eq>          <eq>
# Line 111  Line 129 
129      </condition>      </condition>
130    </datasource>    </datasource>
131    
132    <datasource name="payTotDataSource" database="papo" table="_entity_data, alien_document, alien_document_proceeding">    <datasource name="payTotDataSource" database="papo"
133        table="_entity_data, alien_document, alien_document_proceeding">
134      <condition>      <condition>
135        <and>        <and>
136          <eq>          <eq>
137            <!-- Aqui se refiere al cliente  -->            <!-- Aqui se refiere al cliente  -->
138            <cfield name="_entity_data._table"/>            <cfield name="_entity_data.id"/>
139            <cfield name="alien_document.sender"/>            <cfield name="alien_document.sender"/>
140          </eq>          </eq>
141          <eq>          <eq>
# Line 142  Line 161 
161    <datasource database="papo" name="alienDocumentDataSource" table="alien_document"    <datasource database="papo" name="alienDocumentDataSource" table="alien_document"
162      order_by="date" />      order_by="date" />
163    
164      <datasource database="papo" name="ownDocumentDataSource" table="own_document"
165        order_by="date" />
166    
167    <datasource name="proceedingDataSource" database="papo" table="proceeding"/>    <datasource name="proceedingDataSource" database="papo" table="proceeding"/>
168    
169    <datasource name="alienDocumentProceedingDataSource" database="papo" table="alien_document_proceeding"/>    <datasource name="alienDocumentProceedingDataSource" database="papo"
170        table="alien_document_proceeding"/>
171    
172    <datasource name="currencyMovementDataSource" database="papo"    <datasource name="currencyMovementDataSource" database="papo"
173                table="movement, currency_movement">      table="movement, currency_movement">
174      <condition>      <condition>
175        <eq>        <eq>
176          <cfield name="movement.id"/>          <cfield name="movement.id"/>
# Line 156  Line 179 
179      </condition>      </condition>
180    </datasource>    </datasource>
181    
182      <neb:Sub neb:src="datasource.nebc" zot="../zot/PAPO-ER.zot"
183        search="currency_type" database="papo" name="currencyTypeDataSource" />
184    
185    <trigger name="cancelTrigger" type="NAMED">    <trigger name="cancelTrigger" type="NAMED">
186      alienDocumentSearchBlock.clear()      alienDocumentSearchBlock.clear()
187      invoiceToPayBlock.clear()      invoiceToPayBlock.clear()
# Line 163  Line 189 
189      proceedingBlock.clear()      proceedingBlock.clear()
190      currencyMovementBlock.clear()      currencyMovementBlock.clear()
191      alienDocumentProceedingBlock.clear()      alienDocumentProceedingBlock.clear()
192        ownDocumentBlock.clear()
193        ownPosDocumentBlock.clear()
194        setFocus(tmpBlock.tmpDateEntry)
195    </trigger>    </trigger>
196    
197    <trigger name="searchTrigger" type="NAMED"><![CDATA[    <trigger name="searchTrigger" type="NAMED"><![CDATA[
# Line 171  tmpInvToPayedBlock.clear() Line 200  tmpInvToPayedBlock.clear()
200  invoiceToPayBlock.clear()  invoiceToPayBlock.clear()
201    
202  total = 0.0  total = 0.0
203  if str(alienDocumentSearchBlock.providerSearchBox.providerEntry):  rs = onlyProviderDataSource.createResultSet({'_entity_data.id':str(alienDocumentSearchBlock.providerSearchBox.providerEntry)})
204    provider = 0
205    if rs.firstRecord():
206        provider = rs.current.getField('_table')
207        
208    if provider:
209      import gnue.common.GConditions as GConditions      import gnue.common.GConditions as GConditions
210      import hack      import hack
211    
# Line 181  if str(alienDocumentSearchBlock.provider Line 215  if str(alienDocumentSearchBlock.provider
215    
216      eq = GConditions.GCeq(condProductInvoice)      eq = GConditions.GCeq(condProductInvoice)
217      GConditions.GCField(eq,"_entity_data._table")      GConditions.GCField(eq,"_entity_data._table")
218      GConditions.GCConst(eq,str(alienDocumentSearchBlock.providerSearchBox.providerEntry))      GConditions.GCConst(eq,str(provider))
219    
220      eq = GConditions.GCeq(condPay)      eq = GConditions.GCeq(condPay)
221      GConditions.GCField(eq,"_entity_data._table")      GConditions.GCField(eq,"_entity_data._table")
222      GConditions.GCConst(eq,str(alienDocumentSearchBlock.providerSearchBox.providerEntry))      GConditions.GCConst(eq,str(provider))
223            
224      # Calculo del total facturado por Productos      # Calculo del total facturado por Productos
225      productInvoiceResultSet = productInvoiceDataSource.createResultSet(condProductInvoice)      productInvoiceResultSet = productInvoiceDataSource.createResultSet(condProductInvoice)
# Line 196  if str(alienDocumentSearchBlock.provider Line 230  if str(alienDocumentSearchBlock.provider
230          invoiceTotal = 0          invoiceTotal = 0
231          currAlienDoc = productInvoiceResultSet.current.getField("alien_document.id")          currAlienDoc = productInvoiceResultSet.current.getField("alien_document.id")
232          tmpInvToPayedBlock.idEntry = str(productInvoiceResultSet.current.getField("alien_document.id"))          tmpInvToPayedBlock.idEntry = str(productInvoiceResultSet.current.getField("alien_document.id"))
233            tmpInvToPayedBlock.numberEntry = str(productInvoiceResultSet.current.getField("alien_document.number"))
234            tmpInvToPayedBlock.dateEntry = str(productInvoiceResultSet.current.getField("alien_document.date"))
235          while productInvoiceResultSet.current.getField("alien_document.id") == currAlienDoc and more:          while productInvoiceResultSet.current.getField("alien_document.id") == currAlienDoc and more:
236              lQty = hack.a2f(productInvoiceResultSet.current.getField("alien_product_item.qty"))              lQty = hack.a2f(productInvoiceResultSet.current.getField("alien_product_item.qty"))
237              lUnitPrice = hack.a2f(productInvoiceResultSet.current.getField("alien_product_item.unit_price"))              lUnitPrice = hack.a2f(productInvoiceResultSet.current.getField("alien_product_item.unit_price"))
# Line 214  if str(alienDocumentSearchBlock.provider Line 250  if str(alienDocumentSearchBlock.provider
250              invoiceTotal += hack.a2f(odt_rs.current.getField("alien_document_tax.amount"))              invoiceTotal += hack.a2f(odt_rs.current.getField("alien_document_tax.amount"))
251              odt_more = odt_rs.nextRecord()              odt_more = odt_rs.nextRecord()
252                                    
         tmpInvToPayedBlock.numberEntry = str(productInvoiceResultSet.current.getField("alien_document.number"))  
         tmpInvToPayedBlock.dateEntry = str(productInvoiceResultSet.current.getField("alien_document.date"))  
253          tmpInvToPayedBlock.amountEntry = str(invoiceTotal)          tmpInvToPayedBlock.amountEntry = str(invoiceTotal)
254          tmpInvToPayedBlock.payedEntry = "0.0"          tmpInvToPayedBlock.payedEntry = "0.0"
255          tmpInvToPayedBlock.newRecord()          tmpInvToPayedBlock.newRecord()
# Line 266  invoiceToPayBlock.invoiceBox.totalEntry Line 300  invoiceToPayBlock.invoiceBox.totalEntry
300                            
301      ]]></trigger>      ]]></trigger>
302        
303    <trigger type="NAMED" name="acceptTrigger"><![CDATA[    <trigger type="NAMED" name="writeAllTrigger"><![CDATA[
304  import hack  import hack
305  import string  import string
306  import printing  import printing
307    from gnue.common.GDataObjects import ConnectionError as DBError
308    
309  proceedingBlock.clear()  proceedingBlock.clear()
310  currencyMovementBlock.clear()  currencyMovementBlock.clear()
311  alienDocumentProceedingBlock.clear()  alienDocumentProceedingBlock.clear()
312    
313  alienDocumentSearchBlock.providerSearchBox.dateEntry = alienDocumentDataSource.getTimeStamp()  ownDocumentBlock.dateEntry = str(tmpBlock.tmpDateEntry)
314  alienDocumentSearchBlock.providerSearchBox.idEntry.autofillBySequence('alien_document_id_seq')  ownDocumentBlock.idEntry.autofillBySequence('own_document_id_seq')
315  alienDocumentSearchBlock.providerSearchBox.typeEntry = "6"  ownDocumentBlock.numberEntry = str(ownPosDocumentBlock.documentNumberEntry)
316    ownDocumentBlock.providerEntry = str(alienDocumentSearchBlock.providerSearchBox.idEntry)
317    
318  proceedingBlock.idEntry.autofillBySequence('proceeding_id_seq')  proceedingBlock.idEntry.autofillBySequence('proceeding_id_seq')
319  proceedingBlock.dateEntry = proceedingDataSource.getTimeStamp()  proceedingBlock.dateEntry = str(tmpBlock.tmpDateEntry)
320    
321  currencyMovementBlock.proceedingEntry = str(proceedingBlock.idEntry)  rc = currencyTypeBlock.getRecordCount()
322  currencyMovementBlock.movementTypeEntry = "" # Revisar com queda esto  for recNum in range(rc):
323  currencyMovementBlock.currencyTypeEntry = "1"      currencyTypeBlock.jumpRecord(recNum)
324  currencyMovementBlock.amountEntry = str(invoiceToPayBlock.invoiceBox.totalEntry)      if hack.a2f(currencyTypeBlock.currencyBox.payEntry) > 0:
325            currencyMovementBlock.newRecord()
326            currencyMovementBlock.proceedingEntry = str(proceedingBlock.idEntry)
327            currencyMovementBlock.movementTypeEntry = "" # Revisar com queda esto
328            currencyMovementBlock.currencyTypeEntry = str(currencyTypeBlock.currencyBox.idEntry)
329            currencyMovementBlock.amountEntry = str(hack.a2f(currencyTypeBlock.currencyBox.payEntry) * hack.a2f(currencyTypeBlock.currencyBox.rateEntry))
330    
331  alienDocumentProceedingBlock.proceedingEntry = str(proceedingBlock.idEntry)  alienDocumentProceedingBlock.proceedingEntry = str(proceedingBlock.idEntry)
332  alienDocumentProceedingBlock.alienDocumentEntry = str(alienDocumentSearchBlock.providerSearchBox.idEntry)  alienDocumentProceedingBlock.alienDocumentEntry = str(alienDocumentSearchBlock.providerSearchBox.idEntry)
# Line 336  line += printing.printTitle(" ",20) + " Line 377  line += printing.printTitle(" ",20) + "
377  line += printing.printField(invoiceToPayBlock.invoiceBox.totalEntry,20,'r') + " | "  line += printing.printField(invoiceToPayBlock.invoiceBox.totalEntry,20,'r') + " | "
378  table.append(line)  table.append(line)
379    
380  alienDocumentSearchBlock.commit()  error = 0
381  callTrigger('cancelTrigger')  try:
382  printing.previewPrint(table)      ownPosDocumentBlock.documentNumberEntry.postAtomicModify (lambda x:int(x)+1)
383              error += 1
384        ownDocumentBlock.postChanges()
385        error += 1
386        proceedingBlock.postChanges()
387        error += 1
388        currencyMovementBlock.postChanges()
389        error += 1
390        alienDocumentProceedingBlock.postChanges()
391        error += 1
392        commitConnection()
393        printing.previewPrint(table)
394    except DBError, err:
395        rollbackConnection()
396        errStr = ["número de factura","Orden de Pago","procedimientos",
397                  "movimientos de monedas","moviminetos de porcedimientos"]
398        genericBox("Hay problemas para grabar los "+errStr[error]+"\n",['Aceptar'])
399        
400    callTrigger('cancelTrigger')  
401      ]]></trigger>      ]]></trigger>
402    
403      <trigger name="providerSearchTrigger" type="NAMED"><![CDATA[      <trigger name="providerSearchTrigger" type="NAMED"><![CDATA[
# Line 369  elif recordCount == 1: Line 427  elif recordCount == 1:
427      alienDocumentSearchBlock.providerSearchBox.providerNameEntry = str(providerResultBlock.providerNameEntry)      alienDocumentSearchBlock.providerSearchBox.providerNameEntry = str(providerResultBlock.providerNameEntry)
428      alienDocumentSearchBlock.providerSearchBox.providerEntry = str(providerResultBlock.providerEntry)      alienDocumentSearchBlock.providerSearchBox.providerEntry = str(providerResultBlock.providerEntry)
429    
430    ownDocumentBlock.typeEntry = "6"
431    callTrigger('searchNextPayOrderNumber')
432    
433    
434    ]]></trigger>    ]]></trigger>
435    
436      <trigger name="startUp" type="On-Startup">
437        tmpBlock.tmpDateEntry = ownDocumentDataSource.getTimeStamp()
438      </trigger>
439    
440      <trigger type="NAMED" name="endPayTrigger"><![CDATA[
441    import hack
442    
443    callTrigger('totalTrigger')
444    if hack.a2f(invoiceToPayBlock.invoiceBox.totalEntry) > 0:
445        currencyTypeBlock.clear()
446        currencyDataBlock.clear()
447    
448        rs = currencyTypeDataSource.createResultSet()
449        client = 0
450        more = rs.firstRecord()
451        while more:
452            currencyTypeBlock.currencyBox.idEntry = rs.current.getField("_table")
453            currencyTypeBlock.currencyBox.nameEntry = rs.current.getField("name")
454            currencyTypeBlock.currencyBox.rateEntry = hack.a2f(rs.current.getField("rate"))
455            monto = hack.a2f(invoiceToPayBlock.invoiceBox.totalEntry) / hack.a2f(rs.current.getField("rate"))
456            currencyTypeBlock.currencyBox.formatEntry = rs.current.getField("format")
457            currencyTypeBlock.currencyBox.amountEntry = str(currencyTypeBlock.currencyBox.formatEntry) % monto
458            currencyTypeBlock.currencyBox.payEntry = 0.0
459            currencyTypeBlock.newRecord()
460            more = rs.nextRecord()
461    
462        currencyDataBlock.payOrderBox.dateEntry = str(tmpBlock.tmpDateEntry)
463        currencyDataBlock.payOrderBox.numberEntry = str(ownPosDocumentBlock.documentNumberEntry)
464        
465        currencyDataBlock.providerBox.providerCodeEntry = str(alienDocumentSearchBlock.providerSearchBox.providerCodeEntry)
466        currencyDataBlock.providerBox.providerNameEntry = str(alienDocumentSearchBlock.providerSearchBox.providerNameEntry)
467        
468        currencyDataBlock.providerBox.totalEntry = str(invoiceToPayBlock.invoiceBox.totalEntry)
469        
470        setFocus(currencyTypeBlock.currencyBox.payEntry)
471    
472        ]]></trigger>
473    
474      <trigger type="NAMED" name="currencyTypeTrigger">
475        <![CDATA[
476    import hack
477        
478    total = hack.a2f(invoiceToPayBlock.invoiceBox.totalEntry)
479    rc = currencyTypeBlock.getRecordCount()
480    for recNum in range(rc):
481        currencyTypeBlock.jumpRecord(recNum)
482        if hack.a2f(currencyTypeBlock.currencyBox.payEntry) > 0:
483            total -= hack.a2f(currencyTypeBlock.currencyBox.payEntry) * hack.a2f(currencyTypeBlock.currencyBox.rateEntry)
484    
485    rc = currencyTypeBlock.getRecordCount()
486    for recNum in range(rc):
487        currencyTypeBlock.jumpRecord(recNum)
488        if hack.a2f(currencyTypeBlock.currencyBox.rateEntry) > 0:
489            monto = total / hack.a2f(currencyTypeBlock.currencyBox.rateEntry)
490            currencyTypeBlock.currencyBox.amountEntry = str(currencyTypeBlock.currencyBox.formatEntry) % monto
491        
492        ]]>
493      </trigger>
494    
495      <trigger type="NAMED" name="endTypeTrigger">
496        <![CDATA[
497    
498    import hack
499        
500    callTrigger('currencyTypeTrigger')
501    
502    total = hack.a2f(invoiceToPayBlock.invoiceBox.totalEntry)
503    rc = currencyTypeBlock.getRecordCount()
504    for recNum in range(rc):
505        currencyTypeBlock.jumpRecord(recNum)
506        if hack.a2f(currencyTypeBlock.currencyBox.rateEntry) > 0:
507            total -= hack.a2f(currencyTypeBlock.currencyBox.payEntry) * hack.a2f(currencyTypeBlock.currencyBox.rateEntry)
508    
509    if total > 0:
510        genericBox("La Orden de pago no esta totalmente pagada\n",['Aceptar'])
511    else:
512        callTrigger('writeAllTrigger')
513        
514        ]]>
515      </trigger>
516    
517    <neb:Sub neb:src="wait.nebc"/>    <neb:Sub neb:src="wait.nebc"/>
518    
519    <page name="Búsqueda de Facturas de Proveedor">    <page name="Búsqueda de Facturas de Proveedor">
520    
521      <block name="providerResultBlock" datasource="providerSearchDataSource">      <block name="providerResultBlock" datasource="providerSearchDataSource">
522          <entry name="providerEntry" field="_entity_data.id" hidden="" x="1" y="1" width="12"/>            <entry name="providerEntry" field="_entity_data.id"
523          <entry name="providerTypeEntry" field="_entity_uid_data.entity_uid_type" hidden="" x="1" y="1" width="12"/>          hidden="" x="1" y="1" width="12"/>    
524          <entry name="providerCodeEntry" field="_entity_uid_data.uid" hidden="" x="1" y="1" width="12"/>                    <entry name="providerTypeEntry" field="_entity_uid_data.entity_uid_type"
525          <entry name="providerNameEntry" field="_entity_data.name" hidden="" x="1" y="1" width="20"/>              hidden="" x="1" y="1" width="12"/>
526          <entry name="providerCodeEntry" field="_entity_uid_data.uid"
527            hidden="" x="1" y="1" width="12"/>            
528          <entry name="providerNameEntry" field="_entity_data.name"
529            hidden="" x="1" y="1" width="20"/>    
530        </block>
531    
532        <box label="Orden de Pagos" name="payOrderBox" height="4" width="85" x="0" y="0">
533          <block name="tmpBlock" datasource="tmpDataSource" transparentBlock="">
534            <label  text="Fecha" x="1" y="1" />
535            <label  text="Orden de Pago:" x="32" y="1"/>
536            <entry name="tmpDateEntry" typecast="date" width="14" x="7" y="1"/>
537          </block>
538          <neb:Sub neb:src="posDocument.nebc" documentType="ownDocumentBlock.typeEntry"
539            ownPosDocumentBlock="ownPosDocumentBlock"  documentNumberEntry="documentNumberEntry"
540            documentNumberEntryX="55" documentNumberEntryY="1"
541            searchNextDocumentNumber="searchNextPayOrderNumber">
542          </neb:Sub>
543        </box>
544    
545        <block datasource="ownDocumentDataSource" name="ownDocumentBlock">
546          <entry field="id" name="idEntry" x="1" y="1" hidden=""/>
547          <entry field="own_document_type" name="typeEntry" x="1" y="1" hidden=""/>
548          <entry field="recipient" name="providerEntry" x="1" y="1" hidden=""/>
549          <entry field="date" name="dateEntry" typecast="date" x="1" y="1" hidden=""/>
550      </block>      </block>
551    
552      <block datasource="alienDocumentDataSource" name="alienDocumentSearchBlock" restrictInsert="">      <block datasource="alienDocumentDataSource" name="alienDocumentSearchBlock" restrictInsert="">
553    
554        <box height="5" label="Proveedores"        <box height="5" label="Proveedores" name="providerSearchBox" width="85" x="0" y="3">
         name="providerSearchBox" width="85" x="1" y="0">  
555    
556          <entry field="id" hidden="" name="idEntry" x="1" y="1"/>          <entry field="id" hidden="" name="idEntry" x="1" y="1"/>
557          <entry field="alien_document_type" hidden="" name="typeEntry" x="1" y="1"/>          <entry field="alien_document_type" hidden="" name="typeEntry" x="1" y="1"/>
   
558          <entry x="1" y="1" field="sender" name="providerEntry" width="30" hidden=""/>          <entry x="1" y="1" field="sender" name="providerEntry" width="30" hidden=""/>
559          <entry x="1" y="1" name="providerCodeEntry" width="20"/>          <entry x="1" y="1" name="providerCodeEntry" width="20"/>
560          <entry x="21" y="1" name="providerNameEntry" width="35"/>          <entry x="21" y="1" name="providerNameEntry" width="35"/>
# Line 398  elif recordCount == 1: Line 563  elif recordCount == 1:
563    
564          <button name="providerSearchButton" trigger="providerSearchTrigger" label="Buscar"          <button name="providerSearchButton" trigger="providerSearchTrigger" label="Buscar"
565            width="10" height="1" x="60" y="1"/>            width="10" height="1" x="60" y="1"/>
   
566          <button name="cancelButton" trigger="cancelTrigger" label="Cancelar"          <button name="cancelButton" trigger="cancelTrigger" label="Cancelar"
567            width="10" height="1" x="70" y="1"/>            width="10" height="1" x="70" y="1"/>
   
568          <button x="60" y="2" trigger="searchTrigger" width="20" label="Facturas a Pagar"          <button x="60" y="2" trigger="searchTrigger" width="20" label="Facturas a Pagar"
569            name="searchBtn" height="1"/>            name="searchBtn" height="1"/>
570    
# Line 418  elif recordCount == 1: Line 581  elif recordCount == 1:
581    
582      <block name="invoiceToPayBlock" datasource="invoiceToPayDataSource">      <block name="invoiceToPayBlock" datasource="invoiceToPayDataSource">
583        <box height="12" label="Facturas A Pagar" name="invoiceBox"        <box height="12" label="Facturas A Pagar" name="invoiceBox"
584          width="85" x="1" y="4">          width="85" x="0" y="7">
585          <label name="numberLbl" text="Numero" x="1" y="1"/>          <label name="numberLbl" text="Numero" x="1" y="1"/>
586          <label name="dateLbl" text="Fecha" x="20" y="1"/>          <label name="dateLbl" text="Fecha" x="20" y="1"/>
587          <label name="amountLbl" text="Monto" x="33" y="1"/>          <label name="amountLbl" text="Monto" x="33" y="1"/>
# Line 443  elif recordCount == 1: Line 606  elif recordCount == 1:
606          <scrollbar page="2" x="68" y="2" width="1" height="8"/>          <scrollbar page="2" x="68" y="2" width="1" height="8"/>
607    
608          <label name="totalLbl" text="Total a Pagar" x="70" y="5"/>          <label name="totalLbl" text="Total a Pagar" x="70" y="5"/>
609          <entry name="totalEntry" field="total" x="70" y="6" width="10" readonly="" typecast="number" displaymask="%0.2f"/>          <entry name="totalEntry" field="total" x="70" y="6" width="10" readonly=""
610              typecast="number" displaymask="%0.2f"/>
611    
612          <button name="acceptButton" trigger="acceptTrigger" label="Aceptar"          <button name="acceptButton" trigger="endPayTrigger" label="Fin O.Pago"
613            width="10" height="1" x="70" y="8"/>            width="12" height="1" x="70" y="8"/>
614          <button name="cancelButton" trigger="cancelTrigger" label="Cancelar"          <button name="cancelButton" trigger="cancelTrigger" label="Cancelar"
615            width="10" height="1" x="70" y="9"/>            width="12" height="1" x="70" y="9"/>
616        </box>        </box>
617      </block>      </block>
618    
# Line 456  elif recordCount == 1: Line 620  elif recordCount == 1:
620          <entry name="idEntry" field="id" hidden="" x="1" y="1" width="12"/>              <entry name="idEntry" field="id" hidden="" x="1" y="1" width="12"/>    
621          <entry name="dateEntry" field="date" hidden="" x="1" y="1" width="12"/>              <entry name="dateEntry" field="date" hidden="" x="1" y="1" width="12"/>    
622      </block>      </block>
623    
624      <block name="alienDocumentProceedingBlock" datasource="alienDocumentProceedingDataSource">      <block name="alienDocumentProceedingBlock" datasource="alienDocumentProceedingDataSource">
625        <entry name="proceedingEntry" field="proceeding" hidden="" x="1" y="1" width="12"/>            <entry name="proceedingEntry" field="proceeding" hidden="" x="1" y="1" width="12"/>    
626        <entry name="alienDocumentEntry" field="alien_document" hidden=""        <entry name="alienDocumentEntry" field="alien_document" hidden=""
627          x="1" y="1" width="12"/>              x="1" y="1" width="12"/>    
628        <entry name="amountEntry" field="amount" hidden="" x="1" y="1" width="12"/>            <entry name="amountEntry" field="amount" hidden="" x="1" y="1" width="12"/>    
629      </block>      </block>
630    
631      <block name="currencyMovementBlock" datasource="currencyMovementDataSource">      <block name="currencyMovementBlock" datasource="currencyMovementDataSource">
632        <entry name="proceedingEntry" field="movement.proceeding" hidden=""        <entry name="proceedingEntry" field="movement.proceeding" hidden=""
633          x="1" y="1" width="12"/>              x="1" y="1" width="12"/>    
# Line 473  elif recordCount == 1: Line 639  elif recordCount == 1:
639      </block>      </block>
640    </page>    </page>
641    
642      <page name="Determinacion de Monedas">
643        <block name="currencyDataBlock" datasource="dataCurrencyDataSource">
644          <box height="4" label="Orden de Pago" name="payOrderBox" width="72" x="0" y="0">
645            <label  text="Fecha" x="1" y="1" />
646            <label  text="Orden de Pago:" x="32" y="1"/>
647            <entry name="dateEntry" style="label" typecast="date" width="14" x="7" y="1"/>
648            <entry name="numberEntry" style="label" typecast="number" width="14" x="50" y="1"/>
649          </box>
650          <box label="Datos del Proveedor" name="providerBox" height="5" width="72" x="0" y="3">
651            <label name="codeLbl" text="Codigo" x="1" y="1"/>
652            <label name="nameLbl" text="Nombre" x="21" y="1"/>
653            <entry x="1" y="2" name="providerCodeEntry" style="label" width="20"/>
654            <entry x="21" y="2" name="providerNameEntry" style="label" width="35"/>
655            <label name="totalLbl" text="Total a Pagar:" x="26" y="3"/>
656            <entry name="totalEntry" field="total" x="41" y="3" width="10" style="label"
657              typecast="number" displaymask="%10.2f"/>
658          </box>
659        </block>
660        <block name="currencyTypeBlock" datasource="tmpCurrencyDataSource">
661          <box label="Monedas de Pago" name="currencyBox"
662            height="13" width="72" x="0" y="7">
663    
664            <label name="nameLbl" text="Moneda" x="1" y="1"/>
665            <label name="rateLbl" text="Cotización" x="10" y="1"/>
666            <label name="montoLbl" text="Monto" x="21" y="1"/>
667            <label name="pagoLbl" text="Pago" x="31" y="1"/>
668    
669            <entry name="idEntry" field="id" rows="6" x="1" y="1" hidden=""/>
670            <entry name="formatEntry" field="format" rows="6" x="1" y="1" hidden=""/>
671            <entry name="nameEntry" field="name" style="label" rows="6"
672              x="1" y="2" width="6" readonly=""/>
673            <entry name="rateEntry" field="rate" style="label" rows="6" typecast="number"
674              displaymask="%4.2f" x="10" y="2" width="10" readonly=""/>
675            <entry name="amountEntry" field="amount" style="label" rows="6"
676              x="21" y="2" width="20" readonly=""/>
677            <entry name="payEntry" field="pay" rows="6" x="38" y="2" width="20"
678              typecast="number" displaymask="%10.2f">
679              <trigger type="PRE-FOCUSOUT" src="currencyTypeTrigger"/>
680            </entry>
681            <scrollbar page="2" x="68" y="2" width="1" height="6"/>
682            <button name="acceptButton" trigger="endTypeTrigger" label="Aceptar"
683              width="10" height="1" x="10" y="10"/>
684            <button name="cancelButton" trigger="cancelTrigger" label="Cancelar"
685              width="10" height="1" x="20" y="10"/>
686          </box>
687        </block>
688      </page>
689    
690  </form>  </form>

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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