Histórico da Página

...

Portuguese

Pagetitle

	TCSPExist
	TCSPExist

Função: TCSPExist

Verifica a existência de uma stored procedure no banco de dados atual.

TCSPExist ( < cStoredProc> ) --> lRet

Nome	Tipo	Descrição	Obrigatório	Referência
cStoredProc	Caracter	Indica o nome da stored procedure.	X

lRet

Retorna verdadeiro (.T.), se a stored procedure existe; caso contrário, falso (.F.).

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

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server