Entrar com a conta da Microsoft
Entre ou crie uma conta.
Olá,
Selecione uma conta diferente.
Você tem várias contas
Escolha a conta com a qual você deseja entrar.

Este artigo se aplica ao Microsoft Dynamics NAV para a região grego (gr).

Sintomas

Suponha que você tenha o pacote de idioma grego Office instalado. Quando você criar mais de oito linhas de segmentos em um segmento na versão grega do Microsoft Dynamics NAV 2009, ocorrerá um erro de "Campo de mesclagem inválido" de automação do Word.
Esse problema ocorre nos seguintes produtos:

  • A versão em grego do Microsoft Dynamics NAV 2009 R2

  • A versão em grego do Microsoft Dynamics NAV 2009 Service Pack 1


Resolução

Informações sobre o hotfix

Um hotfix suportado está disponível agora na Microsoft. No entanto, apenas destina-se a corrigir o problema descrito neste artigo. Aplique-o somente aos sistemas que apresentarem esse problema específico. Esta correção poderá ser submetida a testes adicionais. Portanto, se esse problema não o prejudicar, recomendamos que você aguarde o próximo service pack do Microsoft Dynamics NAV 2009 ou a próxima versão do Microsoft Dynamics NAV que contém esse hotfix.

Observação: Em alguns casos, as taxas cobradas para suporte a chamadas podem ser canceladas se um profissional de suporte técnico do Microsoft Dynamics e produtos relacionados determina que uma atualização específica resolverá o problema. Os custos normais de suporte serão aplicados para questões de suporte adicionais e problemas que não se qualificam à atualização específica em questão.



Informações sobre a instalação

A Microsoft fornece exemplos de programação somente para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação a um propósito específico. Este artigo presume que você esteja familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades específicas.

Observação: Antes de instalar esse hotfix, verifique se todos os usuários de cliente do Microsoft Navision estiver desconectados do sistema. Isso inclui usuários de cliente do Microsoft Navision Application Server (NAS). Você deve ser o único usuário do cliente conectado ao implementar esse hotfix.

Para implementar esse hotfix, você deve ter uma licença de desenvolvedor.

É recomendável que a conta de usuário na janela de Logins do Windows ou na janela banco de dados seja atribuída a ID de função "SUPER". Se a conta de usuário não pode ser atribuída a ID de função "SUPER", você deverá verificar se a conta de usuário tem as seguintes permissões:

  • A permissão Modificar para o objeto que será alterado.

  • A permissão de execução para o objeto de sistema 5210 de identificação de objeto e do objeto de sistema 9015 de identificação de objeto .



Observação: Você não precisa ter direitos para os armazenamentos de dados, a menos que você precise executar o reparo de dados.

Alterações de código

Observação: Sempre teste código correções em um ambiente controlado antes de aplicar as correções para os computadores de produção.
Para resolver esse problema, execute as seguintes etapas:

  1. Crie uma nova função na codeunit WordManagement (5054) da seguinte forma:

    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);
  2. Altere o código de quatro dígitos na linha a seguir na função InsertCharSet na codeunit WordManagement (5054):

    NewLine:= '<HTML><META charset=windows-1253>';

    Observação:  "1253" é o código correto para usar a linguagem do cliente do Microsoft Dynamics NAV cadê grego (GR). Altere esse código de quatro dígitos para o código de conjunto de caracteres do Windows para o seu idioma de cliente do Microsoft Dynamics NAV. Por exemplo, "1257" é o código correto para Letão (LV).
    Para obter uma lista completa dos conjuntos de caracteres do Windows, visite o seguinte site:
    http://msdn.microsoft.com/en-us/library/aa752010(v=vs.85).aspx

  3. Altere o código na função CreateWordAttachment na codeunit WordManagement (5054) da seguinte forma:
    Código existente

    ...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);
    ...

    Código de substituição

    ...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);
    ...
  4. Altere o código no OpenWordAttachment a função na codeunit WordManagement (5054) da seguinte forma:
    Código existente

    ...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);
    ...

    Código de substituição

    ...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);
    ...
  5. Altere o código na função ExecuteMerge na codeunit WordManagement (5054) da seguinte forma:
    Código existente

    ...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"));
    ...

    Código de substituição

    ...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"));
    ...
  6. Altere o código na função ShowMergedDocument na codeunit WordManagement (5054) da seguinte forma:
    Código existente

    ...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);
    ...

    Código de substituição

    ...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);
    ...



Pré-requisitos:

Você deve ter um dos seguintes produtos instalados para aplicar esse hotfix:

  • A versão em grego do Microsoft Dynamics NAV 2009 R2

  • A versão em grego do Microsoft Dynamics NAV 2009 Service Pack 1

Informações sobre remoção

Você não pode remover esse hotfix.

Status

A Microsoft confirma que este é um problema em seus produtos listados na seção "Aplica-se a".

Observação: Este é um artigo de "PUBLICAÇÃO RÁPIDA" criado diretamente de dentro da organização de suporte da Microsoft. As informações contidas neste documento são fornecidas desta maneira, em resposta a problemas emergentes. Como um dos resultados da velocidade da publicação, os materiais podem incluir erros tipográficos e podem ser revisados a qualquer momento sem aviso prévio. Consulte os Termos de uso para outras considerações.

Precisa de mais ajuda?

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Microsoft Insider

Essas informações foram úteis?

Qual é o seu grau de satisfação com a qualidade do idioma?
O que afetou sua experiência?

Obrigado pelos seus comentários!

×