Fala turma de boas?
Hoje vou deixar uma dica de função muito usada quando trabalhamos com query , a função FormatIN() tem o objetivo de formatar uma string para ser utilizada dentro do operador IN no ambiente SQL.
Sintaxe
FormatIn( <cString>, <cSep> )
Parâmetros
| Argumento | Obrigatório | Tipo | Descrição |
| cString | Sim | Caracter | String que será analisada. |
| cSep | Sim | Caracter | Carácter separador. |
Retorno
| Retorno | Tipo | Descrição |
| cRet | Carácter | String formatada. |
Exemplos:
#Include "protheus.ch"
#Include "totvs.ch"
#Include "topconn.ch"
/*--------------------------------------------------------------
Funcao : dica018 | Autor: @andredoprotheus
----------------------------------------------------------------
Objetivo: FormatIn - Montagem de query sem a função FormatIN()
--------------------------------------------------------------*/
User Function xFormtIN()
Local cQuery := ""
cQuery := " SELECT * FROM " + RetSqlName( "SA1" ) + " "
cQuery += " WHERE A1_COD IN ('000001','000002','000003','000004','000005') "
MsgInfo(cQuery, '@andredoprotheus')
Return()
Se você gostou, não se esqueça de deixar seu comentário e de compartilhar este artigo. Assim cresceremos juntos dividindo o nosso conhecimento com o próximo.
Um forte abraço!
