# $Header: /home/cvsroot/tcldb/wisql/Tlib/PGforBidden,v 1.1 1996/12/06 07:33:53 de Exp ${DB}forBidden,v 1.1.1.1 1996/10/12 02:26:26 de Exp $
# tcl procs saved on Tue Sep 05 09:32:54 PDT 1995

proc PGforBidden tbl {

	global dbpipe1 DB sybmsg server 

#	if a forbidden table were implemented in PG, this routine
#	would return a list of forbidden field names.
#	if there is no forbidden table (which at present there
#	ain't) or no fields are forbidden for this table, then 
#	this routine returns a null string.
#	At present this routine is a NOP

	return ""
	
}

