Why does Entourage have to be set to Japanese before thisscript will work?

[Eric Hildum]

Title: Why does Entourage have to be set to Japanese before this script will work?

I use a number of scripts to set standard contact information, a sample of which is below. This particular one sets Japanese contact information, but only will work if Entourage is set to Japanese with the language register. The interesting thing is that the data, once stored into Entourage, will be displayed correctly regardless of whether or not Entourage is registered for Japanese. Have I missed something in the scripting which is causing this problem, or is it really necessary to set Entourage to Japanese to set Japanese data? Why won’t this script work correctly if Entourage is set to English with the language register?

tell application "Microsoft Entourage"
    set Sel to the selection
   set Stype to class of (item 1 of Sel)
    count Sel
   if the result is not 1 or Stype is not contact then
       error "You must select only one contact."
        return
   end if
   set contact1 to item 1 of Sel
   -- company
   set company of contact1 to "伊藤忠テクノサイエンス"
    set company furigana of contact1 to "いとうちゅうてくのさいえんす"
    -- business web page
   set business web page of contact1 to "www.ctc-g.co.jp"
    -- Business address fields
   set street address of business address of contact1 to "１丁目１１番５号"
    set city of business address of contact1 to "千代田区富士見"
    set state of business address of contact1 to "東京都"
    set zip of business address of contact1 to "102-8166"
    set country of business address of contact1 to "日本"
    -- main phone number
   set main phone number of contact1 to "+81-3-5226-1200"
    -- Japanese format , but we cannot sync these contacts right now
   set Japanese format of contact1 to true
   set sync with palm of contact1 to false
end tell

--
Eric Hildum