Prezados, bom dia.

Estou tentando realizar a criação de um documento via serviço e recebo a seguinte notificação: Não é possivel cadastrar o documento sem Anexo(s)

A rotina cria a estrutura das pastas corretamente, porém, quando chega no arquivo em si, é que ocorre o problema.

LAnexo := ECMDocumentService.attachment.Create;

LAnexo.fileName := LArquivoItem; // exemplo: c:\documentos\arquivo.txt

LAnexo.fileSize := TFuncoes.TamanhoArquivo(LArquivoItem); // retorna o tamanho em bytes do arquivo

LAnexo.attach := True; // é um anexo local

LAnexo.editing := False; // não esta em edição

LAnexo.principal := True; // é um arquivo principal

LAnexo.iconPath := '1'; // ícone padrão

LAnexo.filecontent := LoadFileToByteDynArray(LArquivoItem); // arquivo convertido em bytes

LAnexo.descriptor := False; // não é um arquivo descritor (arquivo .dat)

// instancio o array de anexo

LAnexos := ECMDocumentService.attachmentArray.Create;

// informo o tamanho do array

LAnexos.SetattachmentArrayLength(1);

// Adiciono o anexo ao array

lanexos.SetattachmentArray(0, LAnexo);

// chamo o serviço

LRetorno := LDocumentService.createSimpleDocument(C_USUARIO, C_SENHA, C_COMPANYID, LparentID, C_PUBLISHED, LNomeArquivo, LAnexos);

Alguém saberia indicar se esqueci de algo?