Initial commit

Modules/ado/plus/d/dropvars.ado

@@ -0,0 +1,15 @@
+*! 1.0.1  14mar2000  jw/ics
+program define dropvars
+	version 6
+
+	while "`1'" != "" {
+		capture drop `1'
+		if _rc { 
+			local nodropv "`nodropv' `1'"
+		}       
+		mac shift
+	}
+	if "`nodropv'" != "" {
+		di in gr "Unable to drop" in ye "`nodropv'"
+	}                
+end