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

Diff of /papo/forms/productSelect.gfd

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

revision 1.2 by apronotti, Mon Feb 17 20:57:15 2003 UTC revision 1.2.2.1 by anthonyl, Fri Mar 14 22:45:25 2003 UTC
# Line 1  Line 1 
1  <?xml version="1.0" encoding="ISO-8859-1"?>  <?xml version="1.0" encoding="ISO-8859-1"?>
 <form width="65" height="26">  
   <datasource name="ghost" cache="1"/>  
2    
3    <!--  GNUe Forms 0.5.0 Migration Tool
4          Saved on: 2003-02-11 17:42:16  -->
5    
6    <form>
7      <datasource name="ghost" cache="1"/>
8    <parameter name="data" default=""/>    <parameter name="data" default=""/>
9    <parameter name="callback" default=""/>    <parameter name="callback" default=""/>
   
10    <trigger type="ON-STARTUP"><![CDATA[    <trigger type="ON-STARTUP"><![CDATA[
11      sourceBlock = getParameter ('data')      sourceBlock = getParameter ('data')
12    
13      lRecordCount = sourceBlock.getRecordCount()      lRecordCount = sourceBlock.getRecordCount()
14      for recNum in range(lRecordCount-1):      for recNum in range(lRecordCount-1):
15        sourceBlock.jumpRecord(recNum)        sourceBlock.gotoRecord(recNum)
16        #targetBlock.key = str(sourceBlock.prodPriceEntry)        targetBlock.key = str(sourceBlock.prodPriceEntry1)
17        targetBlock.code = str(sourceBlock.prodCodeEntry)        targetBlock.code = str(sourceBlock.prodCodeEntry1)
18        targetBlock.desc = str(sourceBlock.prodNameEntry)        targetBlock.desc = str(sourceBlock.prodNameEntry1)
19        targetBlock.newRecord()        targetBlock.newRecord()
20      sourceBlock.jumpRecord(recNum+1)      sourceBlock.gotoRecord(recNum+1)
21      #targetBlock.key = str(sourceBlock.prodPriceEntry)      targetBlock.key = str(sourceBlock.prodPriceEntry1)
22      targetBlock.code = str(sourceBlock.prodCodeEntry)      targetBlock.code = str(sourceBlock.prodCodeEntry1)
23      targetBlock.desc = str(sourceBlock.prodNameEntry)      targetBlock.desc = str(sourceBlock.prodNameEntry1)
24            
25    ]]></trigger>    ]]></trigger>
   
26    <trigger type="ON-EXIT"><![CDATA[    <trigger type="ON-EXIT"><![CDATA[
27      func= getParameter ('callback')      func= getParameter ('callback')
28      func (targetBlock.getCurrentRecordNumber())      func (targetBlock.getCurrentRecordNumber())
29    ]]>b</trigger>    b]]></trigger>
30      <trigger name="exitTrigger" type="NAMED"><![CDATA[
31    <trigger type="NAMED" name="exitTrigger"><![CDATA[       close()
      exit()  
32    ]]></trigger>    ]]></trigger>
33      <logic>
   <page>  
34      <block name="targetBlock" datasource="ghost">      <block name="targetBlock" datasource="ghost">
35  <!--       <entry name="key" field="key" x="2" y="2" width="20" hidden=""/> -->        <field name="key" field="key"/>
36        <label name="codeLbl" text="Código" x="2" y="1" />        <field name="code" field="code"/>
37        <entry name="code" field="code" x="2" y="2" width="20" rows="23"/>        <field name="desc" field="desc"/>
       <label name="descLbl" text="Nombre o Descripción" x="25" y="1" />  
       <entry name="desc" field="desc" style="label" x="25" y="2" width="35" rows="23"/>  
       <scrollbar page="2" x="61" y="2" width="1" height="23"/>        
       <button name="exitButton" label="Ok" trigger="exitTrigger" height="2" width="10" x="30" y="26"/>  
38      </block>      </block>
39    </page>    </logic>
40      <layout xmlns:c="GNUe:Layout:Char" c:height="29" c:width="65">
41        <page>
42          <entry block="targetBlock" field="key" hidden="" c:width="20" c:x="2"
43                 c:y="2"/>
44          <label name="codeLbl" text="Código" c:x="2" c:y="1"/>
45          <entry block="targetBlock" field="code" rows="23" c:width="20" c:x="2"
46                 c:y="2"/>
47          <label name="descLbl" text="Nombre o Descripción" c:x="25" c:y="1"/>
48          <entry block="targetBlock" field="desc" rows="23" style="label"
49                 c:width="35" c:x="25" c:y="2"/>
50          <scrollbar block="targetBlock" c:height="23" page="2" c:width="1"
51                     c:x="61" c:y="2"/>
52          <button name="exitButton" c:height="2" label="Ok" c:width="10" c:x="30"
53                  c:y="26">
54            <trigger src="exitTrigger" type="On-Action"/>
55          </button>
56        </page>
57      </layout>
58  </form>  </form>

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.2.2.1

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