Usando a função FormatIn
Formatar uma string para ser utilizada no clausula IN do comando SELECT em ambiente SQL. Parametros: cString -> String a ser formatada cSep -> Separador das strings Retorno: cRet -> String formatada, conforme exemplo
|
1 |
FormatIn("BA /AB-/CA-/XX+", "/")= "('BA','AB-','CA-','XX+')" |
Exemplo:
|
1 2 3 4 5 6 7 |
cNFs := "000001234/000001445/000001124" cQuery := " SELECT * FROM " + RetSqlName("CB6") + " " + CRLF cQuery += " WHERE D_E_L_E_T_='' " + CRLF cQuery += " AND CB6_NOTA IN " + FormatIn(cNFs,"/") + " " + CRLF cQuery += " AND CB6_SERIE= '" + cSeries + "' " + CRLF cQuery += " ORDER BY CB6_VOLUME " |