Index: openacs-4/packages/lorsm/www/md/addmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/addmd.tcl,v
diff -u -r1.3 -r1.3.4.1
--- openacs-4/packages/lorsm/www/md/addmd.tcl	17 May 2005 17:03:41 -0000	1.3
+++ openacs-4/packages/lorsm/www/md/addmd.tcl	5 Dec 2006 10:54:59 -0000	1.3.4.1
@@ -49,16 +49,11 @@
 
 	if {![lors::imsmd::mdExist -ims_md_id $ims_md_id]} {
 
-	    db_dml do_insert "
-              insert into ims_md(ims_md_id, schema, schemaversion) 
-              values (:ims_md_id, :schema, :schemaversion)"
+	    db_dml do_insert ""
 
 	} else {
 
-	    db_dml do_update {
-		update ims_md set schema = :schema, schemaversion = :schemaversion
-                where ims_md_id = :ims_md_id
-	    }
+	    db_dml do_update ""
 
 	}
 	
@@ -69,33 +64,25 @@
 
 	    "ims_manifest_object" {
 
-		db_dml upd_manifest "
-            		update ims_cp_manifests set hasmetadata = 't'
-		            where man_id = :ims_md_id"
+		db_dml upd_manifest ""
 	    }
 	    "ims_item_object" {
 		
-		db_dml upd_item "
-            		update ims_cp_items set hasmetadata = 't'
-		            where ims_item_id = :ims_md_id"
+		db_dml upd_item ""
+
 	    }
 	    "ims_organization_object" {
 
-		db_dml upd_organization "
-            		update ims_cp_organizations set hasmetadata = 't'
-		            where org_id = :ims_md_id"
+		db_dml upd_organization ""
+
 	    }
 	    "ims_resource_object" {
 
-		db_dml upd_resource "
-            		update ims_cp_resources set hasmetadata = 't'
-		            where res_id = :ims_md_id"
+		db_dml upd_resource ""
 	    }
 	    "content_item" {
 
-		db_dml upd_file "
-            		update ims_cp_files set hasmetadata = 't'
-		            where file_id = :ims_md_id"
+		db_dml upd_file ""
 	    }
 
 	}
@@ -123,13 +110,5 @@
 	    }
 	}
 
-    db_multirow md_schema_info select_md_schema {
-    select 
-	   schema,
-	   schemaversion
-    from
-           ims_md
-    where
-           ims_md_id = :ims_md_id
-    } 
+    db_multirow md_schema_info select_md_schema {}