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

Diff of /papo/forms/ownBranch.neb

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

revision 1.4 by mhepp, Fri May 2 20:58:58 2003 UTC revision 1.5 by mhepp, Mon May 5 21:52:25 2003 UTC
# Line 147  my $uniqed=0; Line 147  my $uniqed=0;
147          entityTypesBlock.ownBranchEntityEntry = str(ownBranchBlock.entityIdEntry)          entityTypesBlock.ownBranchEntityEntry = str(ownBranchBlock.entityIdEntry)
148          # own branch lo busco de entre las constantes PAPO          # own branch lo busco de entre las constantes PAPO
149          entityTypesBlock.ownBranchEntityTypeEntry = <neb:Inline>'"'.PAPO::ownBranchType.'"'</neb:Inline>          entityTypesBlock.ownBranchEntityTypeEntry = <neb:Inline>'"'.PAPO::ownBranchType.'"'</neb:Inline>
150            # le doy de alta a las 4 direcciones basicas
151            addressBlock.addressTypeIdEntry = 1
152            addressBlock.nextRecord()
153            addressBlock.addressTypeIdEntry = 2
154            addressBlock.nextRecord()
155            addressBlock.addressTypeIdEntry = 3
156            addressBlock.nextRecord()
157            addressBlock.addressTypeIdEntry = 4
158          ownBranchBlock.commit()          ownBranchBlock.commit()
159      else:      else:
160          ownBranchBlock.commit()          ownBranchBlock.commit()

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