Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Esta função não está disponível para uso com RPODB=SQLITE.
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Pagetitle
TCSPExist
TCSPExist

Função: TCSPExist

...

Função verifica a existência de uma stored procedure no banco de dados atual.

Sintaxe

Bloco de código
collapsefalse
TCSPExist( <
cStoredProc> ) --> lRet
 cStoredProc > )

Parâmetros

...

Nome

Tipo

Descrição

Obrigatório

Referência

cStoredProc

...

caractere

...

Nome da stored procedure a ser verificada.

X


Retorno

Nome

Tipo

Descrição

lRet

...

lógico

Retorna

...

.T.

...

se a stored procedure

...

existir, caso contrário,

...

retorna .F.

Nota
titleAtenção

Esta função não está disponível para uso com RPODB=SQLITE.

Observações

  • A função faz a adequação do nome da stored procedure (nome em maiúsculo ou minúsculo) para cada SGBD suportado.

Exemplos

...

if TCSPExist('SP000001')       cStr:= 'DROP PROCEDURE '+ 'SP000001 '       TCSqlExec(cStr)endif

...

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
user function test()
  Local lRet
  
  TCLink()
  
  lRet := TCSPExist( "PROC1" )
  
  if lRet == .F.
    conout( "Store Procedure does not exist!" )
  endif
  
  TCUnlink()
return lRet

Veja também