Artikel ini berlaku untuk Microsoft Dynamics NAV untuk wilayah Yunani (g)
Gejala
Misalnya Anda memiliki bahasa Yunani Office paket bahasa diinstal. Ketika Anda membuat lebih dari delapan segmen baris di segmen dalam versi Yunani Microsoft Dynamics NAV 2009, terjadi galat "Tidak valid kolom gabungan" dari otomatisasi Word.
Masalah ini terjadi di dalam produk berikut ini:
-
Versi Yunani Microsoft Dynamics NAV 2009 R2
-
Versi Yunani Microsoft Dynamics NAV 2009 Paket Layanan 1
Pemecahan masalah
Informasi Hotfix
Sekarang tersedia hotfix yang didukung dari Microsoft. Namun, hanya ditujukan untuk memperbaiki masalah yang dijelaskan di artikel ini. Terapkan hanya ke sistem yang mengalami masalah khusus ini. Perbaikan terbaru ini dapat menerima pengujian tambahan. Oleh karena itu, jika Anda tidak terlalu dipengaruhi oleh masalah ini, kami sarankan Anda menunggu paket layanan Microsoft Dynamics NAV 2009 atau versi Microsoft Dynamics NAV berikutnya yang berisi perbaikan terbaru ini.
Catatan Dalam kasus tertentu, biaya yang biasanya diadakan untuk panggilan mungkin dibatalkan apabila profesional dukungan teknis untuk Microsoft Dynamics dan produk-produk terkait dukungan menentukan bahwa pembaruan khusus akan memecahkan masalah Anda. Biaya dukungan biasa akan berlaku untuk pertanyaan dan masalah yang tidak termasuk pada pembaruan tertentu yang dimaksud dukungan tambahan.
Informasi penginstalan
Microsoft menyediakan contoh pemrogaman hanya untuk ilustrasi, tanpa garansi baik tersurat maupun tersirat. Ini mencakup, namun tidak terbatas pada, garansi yang tersirat dapat diperjualbelikan atau kesesuaian untuk tujuan tertentu. Artikel ini menganggap bahwa Anda sudah terbiasa dengan bahasa pemrograman yang ditunjukkan dan terbiasa dengan alat-alat yang digunakan untuk membuat dan prosedur debug. Teknisi dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu, namun mereka tidak akan mengubah contoh tersebut untuk memberikan fungsionalitas tambahan atau menyusun prosedur untuk memenuhi persyaratan khusus Anda.
Catatan Sebelum Anda menginstal perbaikan terbaru ini, verifikasi bahwa semua pengguna klien Microsoft Navision log off sistem. Ini termasuk Microsoft Navision aplikasi Layanan (NAS) klien pengguna. Anda harus klien hanya pengguna yang masuk saat Anda menerapkan perbaikan terbaru ini.
Untuk menerapkan hotfix ini, Anda harus memiliki lisensi pengembang.
Kami menyarankan bahwa akun pengguna di jendela login Windows atau jendela login Database ditetapkan id peran "SUPER" Jika account pengguna tidak dapat ditetapkan ID peran "SUPER", Anda harus memverifikasi bahwa account pengguna yang memiliki izin berikut ini:
-
Ubah izin untuk objek yang Anda akan berubah.
-
Izin eksekusi untuk sistem objek ID 5210 objek dan objek sistem objek ID 9015 .
Catatan Anda tidak harus memiliki hak untuk penyimpanan data kecuali jika Anda harus melakukan perbaikan data.
Perubahan kode
Catatan Selalu menguji kode perbaikan di lingkungan yang dikontrol sebelum menerapkan perbaikan untuk komputer produksi.
Untuk mengatasi masalah ini, ikuti langkah-langkah berikut:
-
Membuat fungsi baru codeunit WordManagement (5054) sebagai berikut:
LOCAL PROCEDURE InsertCharSet(MergeFileName@1000000000 : Text[260]) : Text[250];VAR
NewLine : Text[250];
f: File;
f2: File;
b: Integer;
MergeFileNameServer: Text[250];
IF NOT ISSERVICETIER THEN
BEGIN
IF EXISTS(MergeFileName+'$') THEN
ERASE(MergeFileName+'$');
WITH f DO BEGIN
TEXTMODE(TRUE);
WRITEMODE(FALSE);
OPEN(MergeFileName);
END;
WITH f2 DO BEGIN
TEXTMODE(TRUE);
WRITEMODE(TRUE);
CREATE(MergeFileName+'$');
END;
END
ELSE
BEGIN
MergeFileNameServer := RBAutoMgt.ServerTempFileName(Text029,'.HTM');
UPLOAD(Text021, '', Text032, MergeFileName, MergeFileNameServer);
WITH f DO BEGIN
TEXTMODE(TRUE);
WRITEMODE(FALSE);
OPEN(MergeFileNameServer);
END;
WITH f2 DO BEGIN
TEXTMODE(TRUE);
WRITEMODE(TRUE);
CREATE(MergeFileNameServer+'$');
END;
END;
REPEAT
b:=f.READ(NewLine);
IF NewLine='<html>' THEN
NewLine:= '<HTML><META charset=windows-1253>';
f2.WRITE(NewLine);
UNTIL f.POS>=f.LEN;
f.CLOSE;
f2.CLOSE;
IF ISSERVICETIER THEN
BEGIN
ERASE(MergeFileNameServer);
RENAME(MergeFileNameServer+'$', MergeFileNameServer);
DOWNLOAD(MergeFileNameServer,Text035,'',Text032,MergeFileName);
END
ELSE
BEGIN
ERASE(MergeFileName);
RENAME(MergeFileName+'$', MergeFileName);
END;
EXIT (MergeFileName); -
Ubah kode empat digit di baris berikut ke fungsi InsertCharSet di codeunit WordManagement (5054):
NewLine:= '<HTML><META charset=windows-1253>';
Catatan "1253" adalah kode yang benar untuk menggunakan mana klien Microsoft Dynamics NAV bahasa Yunani (g). Ubah kode empat digit ini ke kode charset Windows untuk bahasa Anda klien Microsoft Dynamics NAV. Misalnya, "1257" adalah kode yang benar untuk bahasa Latvia (LV).
Untuk mendapatkan daftar lengkap tentang rangkaian karakter Windows, kunjungi situs web berikut:
http://msdn.microsoft.com/en-us/library/aa752010(v=vs.85).aspx -
Ubah kode di fungsi CreateWordAttachment di codeunit WordManagement (5054) sebagai berikut:
Kode yang ada...IF ISCLEAR(wrdApp) THEN
CREATE(wrdApp,FALSE,TRUE);
Attachment."File Extension" := GetWordDocExt(wrdApp.Version);
wrdDoc := wrdApp.Documents.Add;
wrdDoc.MailMerge.MainDocumentType := 0; // 0 = wdFormLetters
ParamInt := 7; // 7 = HTML
wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt);
...Penggantian kode
...IF ISCLEAR(wrdApp) THEN
CREATE(wrdApp,FALSE,TRUE);
Attachment."File Extension" := GetWordDocExt(wrdApp.Version);
wrdDoc := wrdApp.Documents.Add;
wrdDoc.MailMerge.MainDocumentType := 0; // 0 = wdFormLetters
ParamInt := 7; // 7 = HTML
// Add the following line.
MergeFileName:=InsertCharSet(MergeFileName);
wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt);
... -
Ubah kode di OpenWordAttachment fungsi codeunit WordManagement (5054) sebagai berikut:
Kode yang ada...IF ISCLEAR(wrdMergefile) THEN
CREATE(wrdMergefile,FALSE,TRUE);
MergeFileName := RBAutoMgt.ClientTempFileName(Text029,'.HTM');
CreateHeader(wrdMergefile,TRUE,MergeFileName);
IF ISCLEAR(wrdApp) THEN
CREATE(wrdApp,FALSE,TRUE);
...Penggantian kode
...IF ISCLEAR(wrdMergefile) THEN
CREATE(wrdMergefile,FALSE,TRUE);
MergeFileName := RBAutoMgt.ClientTempFileName(Text029,'.HTM');
CreateHeader(wrdMergefile,TRUE,MergeFileName);
// Add the following line.
MergeFileName:=InsertCharSet(MergeFileName);
IF ISCLEAR(wrdApp) THEN
CREATE(wrdApp,FALSE,TRUE);
... -
Ubah kode di fungsi ExecuteMerge di codeunit WordManagement (5054) sebagai berikut:
Kode yang ada...wrdDoc := wrdApp.Documents.Open(MainFileName);
wrdDoc.MailMerge.MainDocumentType := 0;
Window.UPDATE(6,Text013);
ParamInt := 7; // 7 = HTML
wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt);
Window.UPDATE(6,STRSUBSTNO(Text014,TempDeliverySorter."Correspondence Type"));
...Penggantian kode
...wrdDoc := wrdApp.Documents.Open(MainFileName);
wrdDoc.MailMerge.MainDocumentType := 0;
Window.UPDATE(6,Text013);
ParamInt := 7; // 7 = HTML
// Add the following line.
MergeFileName:=InsertCharSet(MergeFileName);
wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt);
Window.UPDATE(6,STRSUBSTNO(Text014,TempDeliverySorter."Correspondence Type"));
... -
Ubah kode di fungsi ShowMergedDocument di codeunit WordManagement (5054) sebagai berikut:
Kode yang ada...ParamInt := 7; // 7 = HTML
wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt);
ParamInt := 9999998; // 9999998 = wdToggle
wrdDoc.MailMerge.ViewMailMergeFieldCodes(ParamInt);
END;
WordHandler(wrdDoc,Attachment,WordCaption,IsTemporary,MainFileName,IsInherited);
CLEAR(wrdMergefile);
CLEAR(wrdDoc);
CLEAR(wrdApp);
DeleteFile(MergeFileName);
...Penggantian kode
...ParamInt := 7; // 7 = HTML
// Add the following line.
MergeFileName:=InsertCharSet(MergeFileName);
wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt);
ParamInt := 9999998; // 9999998 = wdToggle
wrdDoc.MailMerge.ViewMailMergeFieldCodes(ParamInt);
END;
WordHandler(wrdDoc,Attachment,WordCaption,IsTemporary,MainFileName,IsInherited);
CLEAR(wrdMergefile);
CLEAR(wrdDoc);
CLEAR(wrdApp);
DeleteFile(MergeFileName);
...
Prasyarat
Anda harus memiliki salah satu produk berikut yang diinstal untuk menerapkan perbaikan terbaru ini:
-
Versi Yunani Microsoft Dynamics NAV 2009 R2
-
Versi Yunani Microsoft Dynamics NAV 2009 Paket Layanan 1
Informasi penghapusan
Anda tidak dapat menghapus hotfix ini.
Status
Microsoft telah memastikan bahwa ini merupakan masalah di dalam produk Microsoft sebagaimana tercantum di bagian "Berlaku untuk".
Catatan Ini adalah artikel "Penerbitan cepat" dibuat langsung dari dalam organisasi dukungan Microsoft. Informasi yang terkandung di dalamnya disediakan sebagai tanggapan masalah yang muncul. Sebagai akibat dari kecepatan untuk menjadikannya tersedia, materi dapat mengandung kesalahan ketik dan dapat direvisi setiap saat tanpa pemberitahuan. Lihat Ketentuan untuk pertimbangan lainnya.