!
!text=SQL Connect
!#Conectar no servidor SQL com parmetros
!\%1=Edittext,Servidor/Host:,0,0,0,0,Localhost  
!\%2=Edittext,DataBase:,0,0,0,0,  
!\%3=Edittext,Usurio:,0,0,0,0,root  
!\%4=Edittext,Senha de Acesso:,0,0,0,0,  
!\%5=DropDown,Flags para conexo:,,,,,SQL_NO_WARNING|SQL_NO_ERROR  
!\%6=DropDown,Driver RDD:,,,,,MySQL|PostgreSQL  
SQL CONNECT ON "\%1" ;  
     DATABASE "\%2";  
     USER "\%3";  
     PASSWORD "\%4";  
     OPTIONS \%5;  
     LIB "\%6"  
!
!text=SQL Execute
!#Execuo direta de um SQL no servidor
SQL EXECUTE "\<"  
!
!text=SQL Translate PATH
!#Especifica o tipo de conversao no PATH dos arquivos
!\%1=ListBox,Tipo de Conversao:,0,0,0,0,tpFileName|tpFullPath|tpFullName|tpFullNamePath  
SQL TRANSLATE PATH TO \%1  
!
!text=SQL Translate CASE
!#Detemina o tipo de converso no caso de maisc/minusc para os nomes de arquivos
!\%1=ListBox,Tipo de Conversao:,0,0,0,0,tcNone|tcUpperCase|tcLowerCase  
SQL TRANSLATE CASE TO \%1  
!
!text=SQL Bloco de Transao
!#Inicia um bloco de transao SQL.
BEGIN TRANSACTION  
  
	/* Insira seus comandos SQL abaixo */  
	\<  
	COMMIT  
  
END TRANSACTION  
!
!text=SQL Bloco de Transao (protegido)
!#Inicia um bloco de transao SQL com proteo
BEGIN TRANSACTION  
	TRY  
		/* Insira seus comandos SQL abaixo */  
		\<  
		COMMIT  
  
	CATCH oError  
		/* Ocorreu algum erro? Enviamos um ROLLBACK! */  
	   SQL ROLLBACK  
		/* E avisamos ao usuario o motivo do erro!*/  
		Alert( oError:description )  
	End  
END TRANSACTION  
