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

Diff of /papo/forms/ownPos.neb

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

revision 1.1 by mhepp, Fri May 2 20:58:58 2003 UTC revision 1.2 by mhepp, Mon May 5 21:52:25 2003 UTC
# Line 128  Line 128 
128    
129    <trigger type="ON-STARTUP">    <trigger type="ON-STARTUP">
130      masterBlock = getParameter ('master')      masterBlock = getParameter ('master')
     entityRelationBlock.entityRelationFromEntry = str(masterBlock.branchIdEntry)  
131      editBlock = getParameter ('edit')      editBlock = getParameter ('edit')
132      if editBlock:      if editBlock:
133            #busco el punto de venta
134          ownPosBlock.initQuery()          ownPosBlock.initQuery()
135          ownPosBlock.ownPosEntityIdEntry = str(editBlock.posEntityIdEntry)          ownPosBlock.ownPosEntityIdEntry = str(editBlock.posEntityIdEntry)
136          ownPosBlock.processQuery()          ownPosBlock.processQuery()
137            #busco entity_relation
138            entityRelationBlock.initQuery()
139            entityRelationBlock.entityRelationToEntry = str(ownPosBlock.ownPosEntityIdEntry)
140            entityRelationBlock.entityRelationFromEntry = str(masterBlock.branchIdEntry)
141            entityRelationBlock.processQuery()
142            #busco relation_types
143            relationTypesBlock.initQuery()
144            relationTypesBlock.entityRelationEntry = str(entityRelationBlock.entityRelationIdEntry)
145            relationTypesBlock.relationTypeEntry = <neb:Inline>'"'.PAPO::posOfType.'"'</neb:Inline>
146            relationTypesBlock.processQuery()
147        #el id del branch al que pertenece
148        entityRelationBlock.entityRelationFromEntry = str(masterBlock.branchIdEntry)
149        #le cargo el nombre de branch y de organization    
150      documentsPosBlock.ownBranchNameEntry = str(masterBlock.branchNameEntry)      documentsPosBlock.ownBranchNameEntry = str(masterBlock.branchNameEntry)
151      orgDataSource.createResultSet()      orgDataSource.createResultSet()
152      ownBranchBlock.ownBranchNameEntry = str(masterBlock.branchNameEntry)      ownBranchBlock.ownBranchNameEntry = str(masterBlock.branchNameEntry)
# Line 142  Line 155 
155    
156    
157    <trigger name="commitTrigger" type="NAMED">    <trigger name="commitTrigger" type="NAMED">
158      print 'commitTrigger'    if ownPosBlock.getCurrentRecord().isInserted():
159        print "Poniendo Nuevo"
160      ownPosBlock.commit()      ownPosBlock.commit()
161      #cargo el tipo      #cargo el tipo
162      entityTypesBlock.ownPosEntityEntry = str(ownPosBlock.ownPosEntityIdEntry)      entityTypesBlock.ownPosEntityEntry = str(ownPosBlock.ownPosEntityIdEntry)
163      entityTypesBlock.ownPosEntityTypeEntry = <neb:Inline>'"'.PAPO::ownPosType.'"'</neb:Inline>      entityTypesBlock.ownPosEntityTypeEntry = <neb:Inline>'"'.PAPO::ownPosType.'"'</neb:Inline>
164      #cargo la relation      #cargo la entity_relation
165      entityRelationBlock.entityRelationToEntry = str(ownPosBlock.ownPosEntityIdEntry)      entityRelationBlock.entityRelationToEntry = str(ownPosBlock.ownPosEntityIdEntry)
166      ownPosBlock.commit()      ownPosBlock.commit()
167      #cargo relation_types      #cargo relation_types
168      relationTypesBlock.entityRelationEntry = str(entityRelationBlock.entityRelationIdEntry)      relationTypesBlock.entityRelationEntry = str(entityRelationBlock.entityRelationIdEntry)
169      relationTypesBlock.relationTypeEntry = <neb:Inline>'"'.PAPO::posOfType.'"'</neb:Inline>      relationTypesBlock.relationTypeEntry = <neb:Inline>'"'.PAPO::posOfType.'"'</neb:Inline>
170        #cargo los documentos típicos
171        <neb:Block>my $numero = 0; foreach(PAPO::ownPosDocuments) {</neb:Block>
172        <neb:Inline>{ "posDocBlock.nextRecord()"  if $numero > 0 }</neb:Inline>
173        posDocBlock.posDocTypeIdEntry = <neb:Inline>'"'.$_.'"'</neb:Inline>
174        posDocBlock.posDocPrintEntry =  <neb:Inline>'"'.PAPO::ownPosDocumentsPrint.'"'</neb:Inline>
175        posDocBlock.posDocNumberEntry =  <neb:Inline>'"'.PAPO::ownPosDocumentsNumber.'"'</neb:Inline>      
176        <neb:Block>$numero++;}</neb:Block>
177      ownPosBlock.commit()      ownPosBlock.commit()
178      else:
179        ownPosBlock.commit()  
180        print 'solo editando'
181     </trigger>     </trigger>
182    <trigger name="ownPosRollbackTrigger" type="NAMED">    <trigger name="ownPosRollbackTrigger" type="NAMED">
183      import hack      import hack
184      hack.rollback(ownPosBlock)      hack.rollback(ownPosBlock)
185        hack.rollback(entityRelationBlock)
186    </trigger>    </trigger>
187    <trigger type="ON-EXIT">    <trigger type="ON-EXIT">
188      func= getParameter('callback')      func= getParameter('callback')
# Line 263  Line 288 
288          <label text="Tipo de documento" x="10" y="1" />          <label text="Tipo de documento" x="10" y="1" />
289          <label text="N prox" x="50" y="1" />          <label text="N prox" x="50" y="1" />
290          <label text="Impresión" x="60" y="1" />          <label text="Impresión" x="60" y="1" />
291        <!--   <entry x="1"  y="2"  name="posDocTypeIdEntry" rows="10" field="document_type" /> -->          <entry x="1"  y="2"  name="posDocTypeIdEntry" rows="10" field="document_type" hidden="" />
292          <!--    <entry x="1"  y="2" width="10" name="posDocCodeEntry" rows="10" /> -->          <!--    <entry x="1"  y="2" width="10" name="posDocCodeEntry" rows="10" /> -->
293   <entry x="1" y="2" field="document_type" name="posDocTypeCodeEntry"  readonly="" width="10" style="textlookup" foreign_key="documentsDataSource._table" foreign_key_description="code" rows="10" />   <entry x="1" y="2" field="document_type" name="posDocTypeCodeEntry"  readonly="" width="10" style="textlookup" foreign_key="documentsDataSource._table" foreign_key_description="code" rows="10" />
294          <entry x="10" y="2" field="document_type" name="posDocTypeNameEntry"  readonly="" width="35" style="textlookup" foreign_key="documentsDataSource._table" foreign_key_description="name" rows="10" />          <entry x="10" y="2" field="document_type" name="posDocTypeNameEntry"  readonly="" width="35" style="textlookup" foreign_key="documentsDataSource._table" foreign_key_description="name" rows="10" />

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

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