create l_global
   create l_english_word_store.make(english_word,classification,l_global.english)
   create l_spanish_word_store.make(spanish_word,classification,l_global.spanish)
   create l_proxy.make
   l_proxy.connect
   l_category := l_proxy.get_category(category)
   create l_e_vocabulary_store.make(l_global.english)
   create l_s_vocabulary_store.make(l_global.spanish)

   l_e_vocabulary_store.add_word(l_english_word_store)


   l_s_vocabulary_store.add_word(l_spanish_word_store)

   l_eid:=l_proxy.get_word_id(english_word)
   l_sid:=l_proxy.get_word_id(spanish_word)
   l_english_word_store.set_id(l_eid)
   l_spanish_word_store.set_id(l_sid)
   l_english_word_store.add_translation(l_spanish_word_store)

   l_spanish_word_store.add_category(l_category)
   l_proxy.disconnect
     ensure