Protheus :: MSSQL :: Retornando o conteúdo de campo “Memo” em uma Consulta

Às vezes precisamos consultar o conteúdo armazenado em um campo memo e, um simples SELECT não irá nos ajudar pois o conteúdo retornado será “Ininteligível”.

SELECT    [alias].[memoField] AS [MEMO] FROM    [table] [alias] WITH (NOLOCK)

irá retornar algo como:

SELECT     [SRM].[R_E_C_N_O_],     [SRM].[RM_MEMO] AS [MEMO] FROM     [SRM010] [SRM] WITH (NOLOCK)

Para que a consulta retorne o conteúdo que desejamos e não o seu valor binário, necessitaremos efetuar conversões de tipo usando a função “CONVERT” conforme abaixo:

SELECT     [SRM].[R_E_C_N_O_],     ISNULL(CONVERT(VARCHAR(1024),CONVERT(VARBINARY(1024),[alias].[memoField])),'') AS [MEMO] FROM     [table] [alias] WITH (NOLOCK)

Onde teremos:

SELECT    [SRM].[R_E_C_N_O_],    ISNULL(CONVERT(VARCHAR(1024),CONVERT(VARBINARY(1024),[SRM].[RM_MEMO])),'') AS [MEMO] FROM    [SRM010] [SRM] WITH (NOLOCK)

ou, de forma semelhante, com “CAST” onde teríamos:

SELECT    ISNULL(CAST(CAST([alias].[memoField] AS VARBINARY(1024)) AS VARCHAR(1024)),'') AS [MEMO] FROM    [table] [alias] WITH (NOLOCK)

Cujo retorno obtemos abaixo:

SELECT    [SRM].[R_E_C_N_O_],    ISNULL(CAST(CAST([SRM].[RM_MEMO] AS VARBINARY(1024)) AS VARCHAR(1024)),'') AS [MEMO] FROM    [SRM010] [SRM] WITH (NOLOCK)

Para maiores referências consulte: “(Microsoft/TechNet)::CAST e CONVERT (Transact-SQL)”

Lembrando que uma das piores soluções implementadas pela Totvs/Microsiga foi o uso do “Memo Virtual” onde usamos a famigerada MsMM() para armazenar/obter o conteúdo do “Campo Memo”. Sempre que possível, evite a utilização do “Memo Virtual” uma vez que, depois de muito tempo o dbAccess passou a suportar mais de um “Memo Real” por Tabela.

Obs.: Para o exemplo, populei o campo RM_MEMO da Tabela SRM, através do MP/APSDU com o seguinte conteúdo:

(     cCRLF := CHR(13) + CHR10) ,     RM_FILIAL  + " "    +     RM_CHAVE   + " "    +     RM_SEQ     + " "    +     RM_SUBSEQ  + " "    +     RM_DESCRIC + cCRLF  +     RM_IF      + cCRLF  +     RM_VERBA   + cCRLF  +     RM_FORMULA + cCRLF  +     RM_FALSE   + cCRLF  +     RM_CALCULO + cCRLF  +     RM_VERSAO  + cCRLF  +     RM_HABILIT + cCRLF  +     RM_CODFOR  +  cCRLF +     STR(RECNO(),10,0) )

[]s

иαldσ dj