Anexo - Caminho Destino - PN

[Former Member]

Pessoal,

Temos um cliente que teve seu servidor migrado, consequentemente todos os dados.

No Cadastro de Parceiro de Negócios o cliente tinha alguns documentos anexados antes de migrar o servidor.

Após migrar o servidor, estes anexos não estão mais abrindo, pois o Caminho Destino "Antigo" ficou gravado,

e hoje os documentos se encontram em outras pastas.

Como são mais de 1000 Registros, estamos tentando alterar este caminho através do DTW, mas sem sucesso.

Alguém já passou por isso? Ou tem alguma idéia para Solução?

Grato desde já.

[former_member185682 · Accepted solution]

Olá Elder,

Uma outra opção seria você utilizar a DI API para fazer essa movimentação dos anexos. Abaixo um código exemplo, antes de executa-lo faça um backup da base, ou execute ele em base teste.

            try
            {


                //Cada BP tem um campo chamado AtcEntry(AttachmentEntry API) que liga com a OATC
                //e por fim com a ATC1
                //logica, carrega os BPs
                BusinessPartners oBp = oCompany.GetBusinessObject(BoObjectTypes.oBusinessPartners);
                Recordset oRs = oCompany.GetBusinessObject(BoObjectTypes.BoRecordset);


                oRs.DoQuery("SELECT CardCode FROM OCRD WHERE AtcEntry IS NOT NULL");
                oBp.Browser.Recordset = oRs;


                while (!oBp.Browser.EoF)
                {


                    SAPbobsCOM.Attachments2 oAtt = oCompany.GetBusinessObject(BoObjectTypes.oAttachments2);


                    if (oAtt.GetByKey(oBp.AttachmentEntry))
                    {
                        for (int i = 0; i < oAtt.Lines.Count; i++)
                        {
                            oAtt.Lines.SetCurrentLine(i);
                            //Indique o seu diretório antigo como origem dos arquivos.
                            //Não é necessário mudar as outras propriedades, já que ele vai buscar o arquivo
                            // e extensão corrente do loop
                            oAtt.Lines.SourcePath = @"C:\Users\diego.lother\Desktop\teste";
                        }


                        if (oAtt.Update() != 0)
                            MessageBox.Show(oCompany.GetLastErrorDescription());
                    }
                    oBp.Browser.MoveNext();
                }
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
            }

Do contrário, acredito que seria necessário a abertura de um ticket na SAP, conforme sugestão do Augusto.

---

Atenciosamente,

Diego Lother

[former_member230053 · Accepted solution]

Boa tarde Elder,

No SAP 9.1 foi disponibilizado uma opção que realiza os ajustes nos anexos, para isso basta copiar todos os documentos que foram atribuídos a um Parceiro de Negócios para a nova Pasta de Anexos e em seguida clicar no botão "Refresh Paths in Docments".

RECOMENDÁVEL REALIZAR O PROCESSO PRIMEIRO EM BASE DE TESTES.

Att,

[Former Member · Accepted solution]

Pablo,

Nos ajudou muito a sua orientação. Não sabia a utilização deste botão.

Obrigado a Todos pela ajuda.

[former_member230053 · Accepted solution]

Bom dia Elder,

Fico feliz que tenha dado certo a dica!!

Att,