Denne artikkelen gjelder for Microsoft Dynamics NAV for gresk (gr) regionen.
Symptomer
Anta at du har installert gresk Office Language Pack. Når du oppretter mer enn åtte segmentlinjene i et segment i den greske versjonen av Microsoft Dynamics NAV 2009, oppstår det feil "Ugyldig flettefelt" fra Word-automatisering.
Dette problemet oppstår i følgende produkter:-
Den greske versjonen av Microsoft Dynamics NAV 2009 R2
-
Den greske versjonen av Microsoft Dynamics NAV 2009 Service Pack 1
Oppløsning
Informasjon om hurtigreparasjon
En støttet hurtigreparasjon er nå tilgjengelig fra Microsoft. Det er imidlertid bare ment å løse problemet som er beskrevet i denne artikkelen. Bruk den bare på systemer som har dette bestemte problemet. Denne hurtigreparasjonen kan gjennomgå ytterligere testing. Hvis du ikke er alvorlig påvirket av dette problemet, anbefaler vi derfor at du venter på neste oppdateringspakke for Microsoft Dynamics NAV 2009 eller den neste versjonen av Microsoft Dynamics NAV som inneholder denne hurtigreparasjonen.
Obs! I spesielle tilfeller avgifter som vanligvis påløper for støtte samtaler kan avbrytes hvis en kundestøttemedarbeider for Microsoft Dynamics og beslektede produkter avgjør at en bestemt oppdatering løser problemet. Vanlige kundestøttekostnader gjelder for ytterligere kundestøttespørsmål og problemer som ikke dekkes av den gjeldende oppdateringen.
Installasjonsinformasjon
Microsoft bruker ment som eksempler, uten garanti, verken direkte eller indirekte. Dette inkluderer, men er ikke begrenset til, eventuelle stilltiende garantier om salgbarhet eller anvendelighet for særskilte formål. Denne artikkelen forutsetter at du er kjent med programmeringsspråket som anvendes, og verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsofts kundestøtteteknikere kan hjelpe deg med å forklare funksjonaliteten til en bestemt prosedyre, men de endrer ikke disse eksemplene for å lage forbedret funksjonalitet eller lage prosedyrer som dekker dine spesifikke behov.
Obs! Før du installerer denne hurtigreparasjonen, må du kontrollere at alle brukere av Microsoft Navision-klienten er logget av systemet. Dette inkluderer Microsoft Navision Application tjenester (NAS) client-brukere. Du skal bare klient-brukeren som er logget på når du implementerer denne hurtigreparasjonen. Hvis du vil implementere denne hurtigreparasjonen, må du ha en utviklerlisens. Vi anbefaler at kontoen i vinduet Windows-pålogging eller i vinduet Database-pålogging være tildelt "SUPER" rolle-ID. Hvis brukerkontoen ikke kan tilordnes "SUPER" rolle-IDen, må du kontrollere at brukerkontoen har følgende tillatelser:-
Endre-tillatelse for objektet du vil endre.
-
Tilgangsnivået for systemet objekt-IDen til 5210 objektet og systemet objekt-ID-9015 -objekt.
Obs! Du har ikke tilgangsrettigheter til datalagre med mindre du har til å utføre data reparasjon.
Kodeendringer
Obs! Alltid løser teste koden i et kontrollert miljø før du installerer hurtigreparasjoner til produksjonsdatamaskiner for.
Hvis du vil løse dette problemet, gjør du følgende:-
Opprett en ny funksjon i WordManagement kodeenheten (5054) som følger:
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); -
Endre den firesifrede koden i følgende linje i InsertCharSet -funksjonen i kodeenheten WordManagement (5054):
NewLine:= '<HTML><META charset=windows-1253>';
Obs! "1253" er den riktige koden for å bruke der språket for Microsoft Dynamics NAV-klienten er Gresk (GR). Endre denne firesifret kode til Windows charset koden for språket ditt Microsoft Dynamics NAV-klienten. "1257" er for eksempel riktig kode for Latvisk (LV).http://msdn.microsoft.com/en-us/library/aa752010(v=vs.85).aspx
Hvis du vil ha en fullstendig liste over Windows-tegnsett, kan du gå til følgende webområde: -
Endre koden i CreateWordAttachment -funksjonen i kodeenheten WordManagement (5054) som følger:
Eksisterende 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 wrdDoc.MailMerge.OpenDataSource(MergeFileName,ParamInt); ...Ny 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); ... -
Endre koden i OpenWordAttachment funksjon i WordManagement kodeenheten (5054) som følger:
Eksisterende kode...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); ...Ny 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); ... -
Endre koden i ExecuteMerge -funksjonen i kodeenheten WordManagement (5054) som følger:
Eksisterende kode...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")); ...Ny 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")); ... -
Endre koden i ShowMergedDocument -funksjonen i kodeenheten WordManagement (5054) som følger:
Eksisterende kode...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); ...Ny 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); ...
Forutsetninger
Du må ha én av de følgende programmene installert for å bruke denne hurtigreparasjonen:
-
Den greske versjonen av Microsoft Dynamics NAV 2009 R2
-
Den greske versjonen av Microsoft Dynamics NAV 2009 Service Pack 1
Informasjon om fjerning
Du kan ikke fjerne denne hurtigreparasjonen.
Status
Microsoft har bekreftet at dette er et problem i Microsoft-produktene som er oppført i delen "Gjelder for".
Obs! Dette er en "RASKT PUBLISERE" artikkel opprettet direkte fra innenfor organisasjonen Microsoft Kundestøtte. Informasjonen i dette dokumentet tilbys som-er som svar på nye problemer. Som et resultat av hastigheten i å gjøre den tilgjengelig materialene kan inkludere typografiske feil, og den kunne bli revidert når som helst uten varsel. Se Vilkårene for Bruk for andre hensyn.