Funcdropcolumn (delete a field for a table)

Automatic detection of the field in the table, both to avoid the deletion of errors, but also to improve the flexibility of the program.

/*
Author:nyb
Time:2003/12/29
Fixtime:
AIM: See if there is a field in the table, if so, delete
Input:
Call:

Execute Funcdropcolumn ' PSZ31 ', ' z31no '
*/
CREATE PROCEDURE Funcdropcolumn
@tablename varchar (128),--table name
@Columnname varchar (128)--column name

As
Set @tablename = LTrim (RTrim (@tablename))
Set @Columnname = LTrim (RTrim (@Columnname))

DECLARE @string varchar (8000)

IF EXISTS (SELECT * from syscolumns where id=object_id (@tablename) and name = @Columnname)
Begin
Select @string = ' ALTER TABLE ' + @tablename + ' DROP COLUMN [' + LTrim (RTrim (@Columnname)] + '] '
Print @string
Execute (@string)
End




Go