Index: openacs-4/packages/lorsm/www/admin/md/technicalmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/md/technicalmd.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/lorsm/www/admin/md/technicalmd.tcl	17 Nov 2008 13:36:44 -0000	1.3
+++ openacs-4/packages/lorsm/www/admin/md/technicalmd.tcl	12 Dec 2008 14:25:37 -0000	1.4
@@ -29,13 +29,8 @@
     -elements {
         format { label "" }
     }
+db_multirow d_te_form select_te_form {}
 
-db_multirow d_te_form select_te_form {
-    select format
-    from ims_md_technical_format
-    where ims_md_id = :ims_md_id
-}
-
 # Technical Size
 template::list::create \
     -name d_te_size \
@@ -48,13 +43,8 @@
     -elements {
         t_size_bytes { label "" }
     }
+db_multirow d_te_size  {}
 
-db_multirow d_te_size select_te_size {
-    select t_size || ' bytes' as t_size_bytes
-    from ims_md_technical
-    where ims_md_id = :ims_md_id
-}
-
 # Technical Location
 template::list::create \
     -name d_te_loca \
@@ -68,13 +58,8 @@
         type { label "" }
         location { label "" }
     }
+db_multirow d_te_loca select_te_loca {}
 
-db_multirow d_te_loca select_te_loca {
-    select type, location
-    from ims_md_technical_location
-    where ims_md_id = :ims_md_id
-}
-
 # Technical Requirements
 template::list::create \
     -name d_te_req \
@@ -90,15 +75,8 @@
         min_version { label "[_ lorsm.Min_Version]" }
         max_version { label "[_ lorsm.Max_Version]" }
     }
+db_multirow d_te_req select_te_req {}
 
-db_multirow d_te_req select_te_req {
-    select '[' || type_s || ']' || ' ' || type_v as type,
-        '[' || name_s || ']' || ' ' || name_v as name,
-    min_version, max_version
-    from ims_md_technical_requirement
-    where ims_md_id = :ims_md_id
-}
-
 # Technical Installation Remarks
 template::list::create \
     -name d_te_inst \
@@ -111,13 +89,8 @@
     -elements {
         instl_rmrks { label "" }
     }
+db_multirow d_te_inst select_te_inst {}
 
-db_multirow d_te_inst select_te_inst {
-    select '[' || instl_rmrks_l || ']' || ' ' || instl_rmrks_s as instl_rmrks
-    from ims_md_technical
-    where ims_md_id = :ims_md_id
-}
-
 # Technical Other Platform Requirements
 template::list::create \
     -name d_te_otr \
@@ -130,13 +103,8 @@
     -elements {
         otr_plt { label "" }
     }
+db_multirow d_te_otr select_te_otr {}
 
-db_multirow d_te_otr select_te_otr {
-    select '[' || otr_plt_l || ']' || ' ' || otr_plt_s as otr_plt
-    from ims_md_technical
-    where ims_md_id = :ims_md_id
-}
-
 # Technical Duration
 template::list::create \
     -name d_te_dur \
@@ -151,9 +119,4 @@
         duration_l { label "" }
         duration_s { label "" }
     }
-
-db_multirow d_te_dur select_te_dur {
-    select duration_l, duration_s, duration || 's' as duration_sec
-    from ims_md_technical
-    where ims_md_id = :ims_md_id
-}
+db_multirow d_te_dur select_te_dur {}