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 {} 
 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/addmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/annotationmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/annotationmd.tcl,v
diff -u -r1.3 -r1.3.4.1
--- openacs-4/packages/lorsm/www/md/annotationmd.tcl	17 May 2005 17:03:41 -0000	1.3
+++ openacs-4/packages/lorsm/www/md/annotationmd.tcl	5 Dec 2006 10:55:00 -0000	1.3.4.1
@@ -33,13 +33,4 @@
         }
     }
 
-db_multirow d_an_annot select_an_annot {
-select 
-    entity,
-    ims_md_an_id,
-    ims_md_id
-from 
-    ims_md_annotation 
-where 
-    ims_md_id = :ims_md_id
-} 
+db_multirow d_an_annot select_an_annot {} 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/annotationmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/classificationmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/classificationmd.tcl,v
diff -u -r1.3 -r1.3.4.1
--- openacs-4/packages/lorsm/www/md/classificationmd.tcl	17 May 2005 17:03:41 -0000	1.3
+++ openacs-4/packages/lorsm/www/md/classificationmd.tcl	5 Dec 2006 10:55:00 -0000	1.3.4.1
@@ -36,14 +36,4 @@
         }
     }
 
-db_multirow d_cl_class select_cl_class {
-select 
-    purpose_s,
-    purpose_v,
-    ims_md_cl_id,
-    ims_md_id
-from 
-    ims_md_classification 
-where 
-    ims_md_id = :ims_md_id
-} 
+db_multirow d_cl_class select_cl_class {} 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/classificationmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/educationalmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/educationalmd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/educationalmd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/educationalmd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -23,17 +23,11 @@
     -elements {
         intt {
             label ""
+	    display_eval {[concat \[$int_type_s\] $int_type_v]}
         }
     }
 
-db_multirow d_ed_intt select_ed_intt {
-    select 
-    '[' || int_type_s || '] ' || int_type_v as intt 
-    from 
-           ims_md_educational
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_intt select_ed_intt {} 
 
 # Educational Learning Resource Type
 template::list::create \
@@ -45,17 +39,11 @@
     -elements {
         lrt {
             label ""
+	    display_eval {[concat \[$lrt_s\] $lrt_v]}
         }
     }
 
-db_multirow d_ed_lrt select_ed_lrt {
-    select 
-    '[' || lrt_s || '] ' || lrt_v as lrt 
-    from 
-           ims_md_educational_lrt
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_lrt select_ed_lrt {} 
 
 # Educational Interactivity Level
 template::list::create \
@@ -67,17 +55,11 @@
     -elements {
         intl {
             label ""
+	    display_eval {[concat \[$int_level_s\] $int_level_v]}
         }
     }
 
-db_multirow d_ed_intl select_ed_intl {
-    select 
-    '[' || int_level_s || '] ' || int_level_v as intl 
-    from 
-           ims_md_educational
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_intl select_ed_intl {} 
 
 # Educational Semantic Density
 template::list::create \
@@ -89,17 +71,11 @@
     -elements {
         semd {
             label ""
+	    display_eval {[concat \[$sem_density_s\] $sem_density_v]}
         }
     }
 
-db_multirow d_ed_semd select_ed_semd {
-    select 
-    '[' || sem_density_s || '] ' || sem_density_v as semd
-    from 
-           ims_md_educational
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_semd select_ed_semd {} 
 
 # Educational Intended End User Role
 template::list::create \
@@ -111,17 +87,11 @@
     -elements {
         ieur {
             label ""
+	    display_eval {[concat \[$ieur_s\] $ieur_v]}
         }
     }
 
-db_multirow d_ed_ieur select_ed_ieur {
-    select 
-    '[' || ieur_s || '] ' || ieur_v as ieur 
-    from 
-           ims_md_educational_ieur
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_ieur select_ed_ieur {} 
 
 # Educational Context
 template::list::create \
@@ -133,17 +103,11 @@
     -elements {
         context {
             label ""
+	    display_eval {[concat \[$context_s\] $context_v]}
         }
     }
 
-db_multirow d_ed_cont select_ed_cont {
-    select 
-    '[' || context_s || '] ' || context_v as context 
-    from 
-           ims_md_educational_context
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_cont select_ed_cont {} 
 
 # Educational Typical Age Range
 template::list::create \
@@ -155,17 +119,11 @@
     -elements {
         tar {
             label ""
+	    display_eval {[concat \[$tar_l\] $tar_s]}
         }
     }
 
-db_multirow d_ed_tar select_ed_tar {
-    select 
-    '[' || tar_l || '] ' || tar_s as tar 
-    from 
-           ims_md_educational_tar
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_tar select_ed_tar {} 
 
 # Educational Difficulty
 template::list::create \
@@ -177,17 +135,11 @@
     -elements {
         diff {
             label ""
+	    display_eval {[concat \[$difficulty_s\] $difficulty_v]}
         }
     }
 
-db_multirow d_ed_dif select_ed_dif {
-    select 
-    '[' || difficulty_s || '] ' || difficulty_v as diff
-    from 
-           ims_md_educational
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_dif select_ed_dif {} 
 
 # Educational Typical Learning Time
 template::list::create \
@@ -202,18 +154,11 @@
         }
         tlt_ls {
             label ""
+	    display_eval {[concat \[$type_lrn_time_l\] $type_lrn_time_s]}
         }
     }
 
-db_multirow d_ed_tlt select_ed_tlt {
-    select 
-    type_lrn_time as tlt,
-    '[' || type_lrn_time_l || '] ' || type_lrn_time_s as tlt_ls
-    from 
-           ims_md_educational
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_tlt select_ed_tlt {} 
 
 # Educational Description
 template::list::create \
@@ -223,19 +168,13 @@
     -actions [list "[_ lorsm.Add_Description]" [export_vars -base educationalmd/educational_desc {ims_md_id}] "[_ lorsm.lt_Add_another_Descripti]"] \
     -html { align right style "width: 100%;" } \
     -elements {
-        desc {
+        descrip {
             label ""
+	    display_eval {[concat \[$descrip_l\] $descrip_s]}
         }
     }
 
-db_multirow d_ed_desc select_ed_desc {
-    select 
-    '[' || descrip_l || '] ' || descrip_s as desc
-    from 
-           ims_md_educational_descrip
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_desc select_ed_desc {} 
 
 # Educational Language
 template::list::create \
@@ -250,11 +189,4 @@
         }
     }
 
-db_multirow d_ed_lang select_ed_lang {
-    select 
-           language
-    from 
-           ims_md_educational_lang
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ed_lang select_ed_lang {} 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/educationalmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/generalmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/generalmd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/generalmd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/generalmd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -31,14 +31,7 @@
         }
     }
 
-db_multirow d_gen_titles select_ge_titles {
-    select title_l,
-           title_s
-    from 
-           ims_md_general_title
-    where
-           ims_md_id = :ims_md_id
-} {
+db_multirow d_gen_titles select_ge_titles {} {
     set item_url [export_vars -base "item" { ims_md_id }]
 }
 
@@ -58,14 +51,7 @@
         }
     }
 
-db_multirow d_gen_desc select_ge_desc {
-    select descrip_l,
-           descrip_s
-    from 
-           ims_md_general_desc
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_gen_desc select_ge_desc {} 
 
 # General Catalog-entry
 template::list::create \
@@ -86,16 +72,7 @@
         }
     }
 
-db_multirow d_gen_cata select_ge_cata {
-    select 
-           catalog,
-           entry_l,
-           entry_s
-    from 
-           ims_md_general_cata
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_gen_cata select_ge_cata {} 
 
 
 
@@ -112,14 +89,7 @@
         }
     }
 
-db_multirow d_gen_lang select_ge_lang {
-    select 
-           language
-    from 
-           ims_md_general_lang
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_gen_lang select_ge_lang {} 
 
 # General Keywords
 template::list::create \
@@ -137,15 +107,7 @@
         }
     }
 
-db_multirow d_gen_key select_ge_key {
-    select 
-           keyword_l,
-           keyword_s
-    from 
-           ims_md_general_key
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_gen_key select_ge_key {} 
 
 # General Coverage
 template::list::create \
@@ -163,15 +125,7 @@
         }
     }
 
-db_multirow d_gen_cover select_ge_cover {
-    select 
-           cover_l,
-           cover_s
-    from 
-           ims_md_general_cover
-    where
-           ims_md_id = :ims_md_id
-}
+db_multirow d_gen_cover select_ge_cover {}
 
 # General Structure
 template::list::create \
@@ -189,15 +143,7 @@
         }
     }
 
-db_multirow d_gen_struc select_ge_struc {
-    select 
-           structure_s,
-           structure_v
-    from 
-           ims_md_general
-    where
-           ims_md_id = :ims_md_id
-}
+db_multirow d_gen_struc select_ge_struc {}
 
 
 # General Aggregation level
@@ -216,12 +162,4 @@
         }
     }
 
-db_multirow d_gen_aggl select_ge_aggl {
-    select 
-           agg_level_s,
-           agg_level_v
-    from 
-           ims_md_general
-    where
-           ims_md_id = :ims_md_id
-}
+db_multirow d_gen_aggl select_ge_aggl {}
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/generalmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/lifecyclemd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/lifecyclemd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/lifecyclemd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/lifecyclemd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -30,14 +30,7 @@
         }
     }
 
-db_multirow d_lf_ver select_lf_ver {
-    select version_l,
-           version_s
-    from 
-           ims_md_life_cycle
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_lf_ver select_lf_ver {} 
 
 # Lifecycle status
 template::list::create \
@@ -55,14 +48,7 @@
         }
     }
 
-db_multirow d_lf_stat select_lf_stat {
-    select status_s,
-           status_v
-    from 
-           ims_md_life_cycle
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_lf_stat select_lf_stat {} 
 
 
 # Lifecycle Contrib
@@ -75,6 +61,7 @@
     -elements {
         role {
             label "[_ lorsm.Role]"
+	    display_eval {[concat $role_v \[$role_s\]]}
         }
         entity {
             label "[_ lorsm.Entity_1]"
@@ -84,20 +71,8 @@
         }
         cont_date_ls {
             label "[_ lorsm.Description_1]"
+	    display_eval {[concat $cont_date_l \[$cont_date_s\]]}
         }
     }
 
-db_multirow d_lf_cont select_lf_cont {
-select 
-	lfc.role_v || ' ' || '[' || lfc.role_s || ']' as role,
-    lfce.entity,
-    lfc.cont_date,
-    '[' || lfc.cont_date_l || ']' || ' ' || lfc.cont_date_s as cont_date_ls
-from 
-    ims_md_life_cycle_contrib lfc, 
-    ims_md_life_cycle_contrib_entity lfce 
-where 
-    lfc.ims_md_lf_cont_id = lfce.ims_md_lf_cont_id 
-and
-    lfc.ims_md_id = :ims_md_id
-} 
+db_multirow d_lf_cont select_lf_cont {}
\ No newline at end of file
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/lifecyclemd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/metamd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/metamd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/metamd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/metamd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -26,18 +26,11 @@
         }
         entry_ls {
             label "[_ lorsm.Language_Entry]"
+	    display_eval {[concat \[$entry_l\] $entry_s]}
         }
     }
 
-db_multirow d_md_cata select_md_cata {
-    select 
-           catalog,
-    '[' || entry_l || ']' || ' ' || entry_s as entry_ls
-    from 
-           ims_md_metadata_cata
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_md_cata select_md_cata {} 
 
 
 # Metametadata Contrib
@@ -50,6 +43,7 @@
     -elements {
         role {
             label "[_ lorsm.Role]"
+	    display_eval {[concat $role_v \[$role_s\]]}
         }
         entity {
             label "[_ lorsm.Entity_1]"
@@ -59,23 +53,11 @@
         }
         cont_date_ls {
             label "[_ lorsm.Description_1]"
+	    display_eval {[concat \[$cont_date_l\] $cont_date_s]}
         }
     }
 
-db_multirow d_md_cont select_md_cont {
-select 
-    mdc.role_v || ' ' || '[' || mdc.role_s || ']' as role,
-    mdce.entity,
-    mdc.cont_date,
-    '[' || mdc.cont_date_l || ']' || ' ' || mdc.cont_date_s as cont_date_ls
-from 
-    ims_md_metadata_contrib mdc, 
-    ims_md_metadata_contrib_entity mdce 
-where 
-    mdc.ims_md_md_cont_id = mdce.ims_md_md_cont_id 
-and
-    mdc.ims_md_id = :ims_md_id
-} 
+db_multirow d_md_cont select_md_cont {} 
 
 # Metametadata metadatascheme
 template::list::create \
@@ -90,14 +72,7 @@
         }
     }
 
-db_multirow d_md_scheme select_md_scheme {
-    select 
-           scheme
-    from 
-           ims_md_metadata_scheme
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_md_scheme select_md_scheme {} 
 
 # Metametadata language
 template::list::create \
@@ -112,11 +87,4 @@
         }
     }
 
-db_multirow d_md_lang select_md_lang {
-    select 
-           language
-    from 
-           ims_md_metadata
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_md_lang select_md_lang {} 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/metamd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/relationmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/relationmd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/relationmd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/relationmd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -36,18 +36,4 @@
         }
     }
 
-db_multirow d_re_relat select_re_relat {
-select 
-    re.kind_s,
-    re.kind_v,
-    re.ims_md_id,
-    re.ims_md_re_id,
-    rere.ims_md_re_re_id
-from 
-    ims_md_relation re,
-    ims_md_relation_resource rere
-where 
-    re.ims_md_id = :ims_md_id
-and
-    rere.ims_md_re_id = re.ims_md_re_id
-} 
+db_multirow d_re_relat select_re_relat {} 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/relationmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/rightsmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/rightsmd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/rightsmd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/rightsmd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -23,17 +23,11 @@
     -elements {
         cost {
             label ""
+	    display_eval {[concat \[$cost_s\] $cost_v]}
         }
     }
 
-db_multirow d_ri_cost select_ri_cost {
-    select 
-    '[' || cost_s || '] ' || cost_v as cost
-    from 
-           ims_md_rights
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ri_cost select_ri_cost {} 
 
 # Rights Copyright or other Restrictions 
 template::list::create \
@@ -45,17 +39,11 @@
     -elements {
         caor {
             label ""
+	    display_eval {[concat \[$caor_s\] $caor_v]}
         }
     }
 
-db_multirow d_ri_caor select_ri_caor {
-    select 
-    '[' || caor_s || '] ' || caor_v as caor
-    from 
-           ims_md_rights
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ri_caor select_ri_caor {} 
 
 # Rights Description
 template::list::create \
@@ -65,16 +53,10 @@
     -actions [list "[_ lorsm.Add_Description]" [export_vars -base rightsmd/rights_desc {ims_md_id}] "[_ lorsm.lt_Add_another_Descripti]"] \
     -html { align right style "width: 100%;" } \
     -elements {
-        desc {
+        descrip {
             label ""
+	    display_eval {[concat \[$descrip_l\] $descrip_s]}
         }
     }
 
-db_multirow d_ri_desc select_ri_desc {
-    select 
-    '[' || descrip_l || '] ' || descrip_s as desc
-    from 
-           ims_md_rights
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_ri_desc select_ri_desc {} 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/rightsmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/lorsm/www/md/technicalmd.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/md/Attic/technicalmd.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/lorsm/www/md/technicalmd.tcl	17 May 2005 17:03:41 -0000	1.4
+++ openacs-4/packages/lorsm/www/md/technicalmd.tcl	5 Dec 2006 10:55:00 -0000	1.4.4.1
@@ -27,12 +27,7 @@
     }
 
 db_multirow d_te_form select_te_form {
-    select 
-           format
-    from 
-           ims_md_technical_format
-    where
-           ims_md_id = :ims_md_id
+
 } 
 
 # Technical Size
@@ -48,14 +43,7 @@
         }
     }
 
-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
-} 
+db_multirow d_te_size select_te_size {} 
 
 # Technical Location
 template::list::create \
@@ -73,15 +61,7 @@
         }
     }
 
-db_multirow d_te_loca select_te_loca {
-    select 
-           type, 
-           location
-    from 
-           ims_md_technical_location
-    where
-           ims_md_id = :ims_md_id
-} 
+db_multirow d_te_loca select_te_loca {} 
 
 # Technical Requirements 
 template::list::create \
@@ -93,9 +73,11 @@
     -elements {
         type {
             label "[_ lorsm.Type]"
+	    display_eval {[concat \[$type_s\] $type_v]}
         }
         name {
             label "[_ lorsm.Name]"
+	    display_eval {[concat \[$name_s\] $name_v]}
         }
         min_version {
             label "[_ lorsm.Min_Version]"
@@ -105,17 +87,7 @@
         }
     }
 
-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
-} 
+db_multirow d_te_req select_te_req {} 
 
 # Technical Installation Remarks
 template::list::create \
@@ -127,17 +99,11 @@
     -elements {
         instl_rmrks {
             label ""
+	    display_eval {[concat \[$instl_rmrks_l\] $instl_rmrks_s]}
         }
     }
 
-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
-}
+db_multirow d_te_inst select_te_inst {}
 
 # Technical Other Platform Requirements
 template::list::create \
@@ -149,17 +115,11 @@
     -elements {
         otr_plt {
             label ""
+	    display_eval {[concat \[$otr_plt_l\] $otr_plt_s]}
         }
     }
 
-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
-}
+db_multirow d_te_otr select_te_otr {}
 
 # Technical Duration
 template::list::create \
@@ -180,13 +140,4 @@
 	}
     }
 
-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 {}
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/lorsm/www/md/technicalmd.xql'.
Fisheye: No comparison available.  Pass `N' to diff?